ÿþ#include <wobject/xstring.hpp> #include <xcontrol/xtreeview.hpp> #include <xcontrol/xdwgrid.hpp> #include <wobject/xdouble.hpp> #include <xcontrol/xlayersheet.hpp> #include <xcontrol/xdatetimepick.hpp> #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" #include "viewobject/view.base.hpp" using xml = KXMLDOMDocument; class __declspec(dllexport) VATNotityListShiftToList : public xframe { public: xdwgrid dw_list; xnode m_agentNode; //Agent Condition public: VATNotityListShiftToList(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static VATNotityListShiftToList* CreateInstance(void* implPtr, void* hWnd) { VATNotityListShiftToList* pWin = new VATNotityListShiftToList(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; } //&q¹pÀo;mYtýQpe int OnSetFocus(TEvent* evt, LPARAM param) { //͑nå]wQag //SetAgent(); return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(xstring comdid) { if(comdid==L"xmSelectAll") { for(int i=1;i<=dw_list.GetRowCount();i++) { dw_list.SelectRow(i,true); } dw_list.Redraw(); return 1; } else if(comdid==L"xmSelectNo") { dw_list.SelectRow(0,false); dw_list.Redraw(); return 1; } else if(comdid==L"xmOk") { xaserverarg arg = GetArg(); arg.AddArg(L"items",L""); xstring str = L""; int row = dw_list.GetNextSelectRow(1); while(row > 0 && row <= dw_list.GetRowCount()) { KXMLDOMElement ele = dw_list.GetRowElement(row); str += ele.xml(); ele.Release(); row = dw_list.GetNextSelectRow(row + 1); } if(str != L"") arg.AddArg(L"items",L"<data>"+str+L"</data>"); CloseWindow(); return 1; } else if(comdid==L"xmCancel") { CloseWindow(); return 1; } return 0; } //}TäNYt‹NöN int OnXCommand(TEvent* evt, int param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnAttachEvent() { //Ñ~š[å]wQag¹pûQ‹NöN AttachEvent(L"WM_XCOMMAND", (FEvent)&VATNotityListShiftToList::OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent(L"WM_SETFOCUS", (FEvent)&VATNotityListShiftToList::OnSetFocus); return 1; } int onload() { SetArg(); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/AP/_hyfÆ~leQ"); dw_list.SetColumnState(L"ClassifyID",false); dw_list.SetColumnState(L"QtyUnitName",false); dw_list.SetColumnState(L"QtyUnit",false); dw_list.SetColumnState(L"CQtyUnit",false); dw_list.SetColumnState(L"InvoiceNo",false); xml x; xaserverarg arg = GetArg(); if(arg) { xstring InvoiceNo = arg.GetArgString(L"InvoiceNo"); xstring storeOne =arg.GetArgString(L"storeOne"); xstring vatnotify =arg.GetArgString(L"vatnotify"); x = ViewObject::RetrieveData(L"/sale/data/AP/VATNotityListShiftToListOne",L"storeOne",storeOne,L"vatnotify",vatnotify); //x = ViewObject::RetrieveData(L"/sale/data/AP/VATNotityListShiftToList",L"InvoiceNo",InvoiceNo); //trace(x.xml()); if(x)dw_list.Retrieve(x); dw_list.SetReadOnly(true); dw_list.SetSelectionMode(3); arg.AddArg(L"items",L""); } OnAttachEvent(); return 1; } int onloaded() { //SetAgent(); return 1; } };