ÿþ#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) APOther : public xframe { public: int hObject = 0; xdwtable dw_base; xnode m_agentNode; //Agent Condition public: APOther(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static APOther* CreateInstance(void* implPtr, void* hWnd) { APOther* pWin = new APOther(implPtr, (HWND)hWnd); return pWin; } int SetAgent() { return 1; 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; } int OnSave() { xml x ; xaserverarg arg ; dw_base.AcceptText(); dw_base.DwUpdateAllTo(x); xstring error = L""; arg.AddArg(L"content", x.xml() ); if(xurl::get(L"/sale/data/AP/update", arg.GetString(),x)!=1) { error = x.text(); //alert(error); }else { xstring str = x.documentElement().getAttribute(L"text"); if(str == L"true") { dw_base.ResetUpdateStatus(); alert(L"ÝOX[bŸR!"); SendMessage(GetHWND(), 0x401, (LPARAM)L"xmRefresh", 0); CloseWindow(); }else { alert(L"ÝOX[1Y%!"); } //alert(str); } return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(xstring comdid) { if(comdid==L"xmSave") { if(dw_base.GetItemString(1,L"InvoiceNo") ==L"") { alert(L"YЏ÷S:Nzzÿ"); return 0; } /*if(dw_base.GetItemString(1,L"VATBillAmount") ==L"") { alert(L";`ё˜:Nzzÿ"); return 0; } if(dw_base.GetItemString(1,L"DeduceAmount") ==L"") { alert(L"cb>kё˜:Nzzÿ"); return 0; } if(dw_base.GetItemString(1,L"GoodsAmount") ==L"") { alert(L"¡‹zё˜:Nzzÿ"); return 0; } if(dw_base.GetItemString(1,L"OverAmount") ==L"") { alert(L"Y_ё˜:Nzzÿ"); return 0; } if(dw_base.GetItemString(1,L"RefundAmount") ==L"") { alert(L"zё˜:Nzzÿ"); return 0; } if(dw_base.GetItemString(1,L"VATAmount") ==L"") { alert(L"žXxcommand.pStrID); } int OnItemChanged(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname=hdr.colname; xstring value = hdr.data; double Amount= dw_base.GetItemDouble(hdr.row,L"Amount"); double PayedAmount = dw_base.GetItemDouble(hdr.row,L"PayedAmount"); if(PayedAmount ==0.00) { dw_base.SetItemDouble(hdr.row,L"PayedAmount", xdouble(Amount).round(2)); } if (colname == L"PrePayAmount" || colname == L"Amount") { double Amount1 = dw_base.GetItemDouble(hdr.row,L"Amount"); double PrePayAmount = dw_base.GetItemDouble(hdr.row,L"PrePayAmount"); dw_base.SetItemDouble(hdr.row,L"PayedAmount", xdouble(Amount - PrePayAmount).round(2)); } return 1; } int OnAttachEvent() { //Ñ~š[å]wQag¹pûQ‹NöN AttachEvent(L"WM_XCOMMAND", (FEvent)&APOther::OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent(L"WM_SETFOCUS", (FEvent)&APOther::OnSetFocus); AttachEvent(L"dw_base",L"DWV_ITEMCHANGED", (FEvent)&APOther::OnItemChanged); return 1; } /* int OnRetrieve() { xml x ; xaserverarg arg ; arg.setNativePointer(arg.CreateInstance()); arg.AddArg(L"xxx",L"xxx"); if (getUrl(L"",arg.GetString(),x)!=1) { trace(x.text()); return -1; }else { //dw_base.Retrieve(x); //dw_base.Redraw(); } return 1; } */ int onload() { SetArg(); dw_base = GetControl(L"dw_base"); dw_base.openUrl(L"/sale/view/AP/template/Base1"); dw_base.SetColHeaderHeight(0); dw_base.SetRowSelectorWidth(0); dw_base.SetHScrollState(false); dw_base.SetVScrollState(false); //set initial xaserverarg arg = GetArg(); if(arg) { xstring InvoiceNo = arg.GetArgString(L"InvoiceNo"); xstring SalespersonID = arg.GetArgString(L"SalespersonID"); xstring OrgName = arg.GetArgString(L"OrgName"); xstring SalespersonIDName = arg.GetArgString(L"SalespersonIDName"); double NotifyAmt=arg.GetArgString(L"NotifyAmt").toInt(); double PayedAmt=arg.GetArgString(L"PayedAmt").toInt(); dw_base.SetItemString(1,L"InvoiceNo",InvoiceNo); dw_base.SetItemString(1,L"SalespersonID",SalespersonID); dw_base.SetItemDisplayString(1,L"SalespersonID",SalespersonIDName); dw_base.SetItemString(1,L"OrgName",OrgName); dw_base.SetItemDouble(1,L"Amount",NotifyAmt - PayedAmt); } xstring sdate = publiccode::GetCurrentDate(); dw_base.SetItemString(1,L"APDate",sdate); dw_base.SetItemString(1,L"PayedDate",sdate); dw_base.SetItemString(1,L"CreateDate",sdate); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; dw_base.SetItemString(1,L"CreatorID",suserid); dw_base.SetItemDisplayString(1,L"CreatorID",susername); dw_base.SetItemString(1,L"APType",L"000"); dw_base.SetItemDisplayString(1,L"APType",L"7>k"); dw_base.SetItemString(1,L"ApprovalStatus",L"6"); OnAttachEvent(); return 1; } int onloaded() { //SetAgent(); return 1; } };