#include #include #include #include #include #include #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" #include "viewobject/view.base.hpp" using xml = KXMLDOMDocument; class __declspec(dllexport) EnquiryExQuoteWin : public xframe { public: xdwgrid dw_list; xnode m_agentNode; //Agent Condition public: EnquiryExQuoteWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static EnquiryExQuoteWin* CreateInstance(void* implPtr, void* hWnd) { EnquiryExQuoteWin* pWin = new EnquiryExQuoteWin(implPtr, (HWND)hWnd); return pWin; } int SetAgent() { xstring xfNodeAgentArea = L"agentarea"; xnode anode = GetAgentNode(xfNodeAgentArea); if (m_agentNode) { SetAgentNode(anode, m_agentNode); } else { KXMLDOMElement xframeElement = GetElement(); KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*"); if (agent) { xstring s = agent.xml(); m_agentNode = SetAgentNode(anode, s); } } return 1; } int OnSearch() { xml x ; xstring EnquiryNo; xaserverarg arg; xcontrol QuoteNo = GetControl(L"QuoteNo"); EnquiryNo = QuoteNo.GetText(); //alert(EnquiryNo); //xstring PartyID = arg.GetArgString(L"PartyID"); //x = ViewObject::RetrieveData(L"/sale/data/Customerv3/entity/XmShare"); x = ViewObject::RetrieveData(L"/sale/data/Quote3/maint", L"id", EnquiryNo); if (x)dw_list.Retrieve(x); dw_list.SetReadOnly(true); dw_list.Redraw(); return 1; } //½¹µã¼¤»î´¦Àíº¯Êý int OnSetFocus(TEvent* evt, LPARAM param) { //ÖØÖù¤¾ßÌõ SetAgent(); return 1; } int OnSaveAs() { int i = dw_list.SaveAs(L""); if (i == 1) alert(L"µ¼³ö³É¹¦"); return 1; } int OnMatch() { xaserverarg arg; int row = dw_list.GetNextSelectRow(1); xstring items = L""; while (row > 0 && row <= dw_list.GetRowCount()) { KXMLDOMElement e = dw_list.GetRowElement(row); xstring id = e.selectSingleNode(L"@guid").text(); if (items == L"") items = id; else items += L"," + id; row = dw_list.GetNextSelectRow(row + 1); } xml x = ViewObject::RetrieveData(L"/sale/data/Enquiry/Update/UpdateQuoteLine", L"ItemList", items); OnSearch(); return 1; } int OnPriceListSupplierEx() { xaserverarg arg; arg.AddArg(L"sheetname", L"tab_list2"); arg.AddArg(L"EntityName", L"Enquiry3"); arg.AddArg(L"EntityID", L""); arg.AddArg(L"EntityNo", L""); arg.AddArg(L"Source", L"quote"); arg.AddArg(L"QuoteNo", xcontrol(GetControl(L"QuoteNo")).GetText()); int row = dw_list.GetNextSelectRow(1); xstring items = L""; //while(row > 0 && row <= dw_list.GetRowCount()) for (row = 1; row <= dw_list.GetRowCount(); row++) { KXMLDOMElement e = dw_list.GetRowElement(row); xstring id = e.selectSingleNode(L"@guid").text(); if (items == L"") items = id; else items += L"," + id; //row = dw_list.GetNextSelectRow(row + 1); } arg.AddArg(L"EntityIDList", items); OpenWindow(L"dev:xpage[Enquiry.maint.vx]", arg); return 1; } //ÃüÁî·¢²¼º¯Êý int OnCmdDispatch(xstring comdid) { if (comdid == L"xmClose") { CloseWindow(); return 1; } if (comdid == L"xmSearch") { OnSearch(); return 1; } if (comdid == L"xmMatch") { OnMatch(); return 1; } if (comdid == L"xmMaint") { //win32::HideWindow(1); OnPriceListSupplierEx(); CloseWindow(); return 1; } if (comdid == L"xmSave") { return 1; } if (comdid == L"xmSaveAs") { return OnSaveAs(); } return 0; } //ÃüÁî´¦Àíʼþ int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnAttachEvent() { //°ó¶¨¹¤¾ßÌõµã»÷ʼþ AttachEvent(L"WM_XCOMMAND", (FEvent)&EnquiryExQuoteWin::OnXCommand); //»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ AttachEvent(L"WM_SETFOCUS", (FEvent)&EnquiryExQuoteWin::OnSetFocus); return 1; } /*int OnRetrieve() { xml x ; xaserverarg arg; arg.AddArg(L"xxx",L"xxx"); if (getUrl(L"",arg.GetString(),x)!=1) { trace(x.text()); return -1; }else { dw_list.Retrieve(x); dw_list.Redraw(); } return 1; }*/ int onload() { SetArg(); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/Quote3/template/item/pricelist"); dw_list.SetColumnState(L"ItemID", false); dw_list.SetColumnState(L"Picture", false); dw_list.SetColumnState(L"category", false); dw_list.SetColumnState(L"RealEnquiryLineID", false); dw_list.SetColumnState(L"RelEnquiryLineID", false); dw_list.SetSelectionMode(3); if (GetWinParam()) { xstring no = GetWinParam(); xcontrol(GetControl(L"QuoteNo")).SetText(no); OnSearch(); } OnAttachEvent(); return 1; } int onloaded() { SetAgent(); return 1; } };