ÿþ#include <xcontrol/xdwgrid.hpp> #include <wobject/xdouble.hpp> #include <xcontrol/xlayersheet.hpp> #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" #include "viewobject/view.base.hpp" using xml = KXMLDOMDocument; class __declspec(dllexport) Samplerequest2Edit : public xframe { public: xdwtable dw_base; xnode m_agentNode; //Agent Condition HWND hObject; bool updated; public: Samplerequest2Edit(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static Samplerequest2Edit* CreateInstance(void* implPtr, void* hWnd) { Samplerequest2Edit* pWin = new Samplerequest2Edit(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; } int OnSave() { xml x; dw_base.AcceptText(); dw_base.DwUpdateAllTo(x); xstring FASampleFee; FASampleFee = dw_base.GetItemString(1,L"FASampleFee"); if (FASampleFee == L"") { alert(L"7hÁT9:Nzzÿ"); return 0; } xaserverarg arg; arg.AddArg(L"content",x.xml()); if(xurl::get(L"/sale/data/expense3/update/samplerequest", arg.GetString(),x)!=1) { xstring error = x.text(); alert(L"err:"+error); return 1; } xstring str = x.documentElement().getAttribute(L"text"); if(str == L"true") { dw_base.ResetUpdateStatus(); dw_base.Redraw(); updated = true; alert(L"ÝOX[bŸR!"); }else { alert(L"ÝOX[1Y%!"); } return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(xstring comdid) { if(comdid==L"xmClose") { if(updated) SendMessage(hObject, 0x401, (LPARAM)L"xmRefresh", 0); CloseWindow(); return 1; }else if(comdid == L"xmSave") { OnSave(); } else if(comdid==L"xmCheck") { ProcessFlowAction(L"action:bill.check.agree", 1); PostMessage(GetFrameWindow().GetHWND(),0x401,(LPARAM)L"xmRefresh",0); CloseWindow(); return 1; } else if(comdid== L"Image") { xaserverarg arg; xstring guid = dw_base.GetGuid(1); if(guid.length() <= 0) { guid = publiccode::GetGuid(); dw_base.SetGuid(1,guid); } arg.AddArg(L"entityid",guid); trace(dw_base.GetGuid(1)); OpenWindow(L"dev:xpage[maint.Document.Supplier.v3.vx]", arg); return 1; } return 0; } //}TäNYt‹NöN int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnItemChanged(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname=hdr.colname; xstring value = hdr.data; int row = hdr.row; if(colname == L"FAID") { if(value == L"") return 0; xml x = ViewObject::RetrieveData(L"/sale/data/expense3/view/getContactByFAID",L"SupplierID",value); KXMLDOMNodeList items = x.selectNodes(L"data/Item"); KXMLDOMNode t = items.item(0); if(t.selectSingleNode(L"Name")) { dw_base.SetItemString(1,L"FAContactPerson",t.selectSingleNode(L"Name").text()); } if(t.selectSingleNode(L"Mobile")) { dw_base.SetItemString(1,L"FAContactMethod",t.selectSingleNode(L"Mobile").text()); } } } int OnAttachEvent() { //Ñ~š[å]wQag¹pûQ‹NöN AttachEvent(L"WM_XCOMMAND", (FEvent)&Samplerequest2Edit::OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent(L"WM_SETFOCUS", (FEvent)&Samplerequest2Edit::OnSetFocus); AttachEvent(L"dw_base",L"DWV_ITEMCHANGED", (FEvent)&Samplerequest2Edit::OnItemChanged); return 1; } xstring GetEntityName(LPARAM pr) { return L"SampleRequest"; } xstring GetEntityID(LPARAM pr) { xaserverarg arg = GetArg(); return arg.GetArgString(L"EntityID"); } int OnRetrieve(xstring RequestID) { xml x; xaserverarg arg; arg.AddArg(L"RequestID",RequestID); if (getUrl(L"/sale/data/expense3/view/getSapleRequestByID",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/expense3/SampleRequest/Base"); dw_base.SetColHeaderHeight(0); dw_base.SetRowSelectorWidth(0); dw_base.SetHScrollState(false); dw_base.SetVScrollState(false); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; xstring sdate = publiccode::GetCurrentDate(); xstring EntityID = L""; hObject = 0; if(GetWinParam()) { xaserverarg arg = GetArg(); if(arg.GetArgString(L"RequestID")) { EntityID=arg.GetArgString(L"RequestID"); }else { EntityID = arg.GetArgString(L"EntityID"); } hObject = (HWND)arg.GetParam(L"HWND"); } if(EntityID != L"") { OnRetrieve(EntityID); }else { dw_base.SetItemString(1,L"CreateDate",sdate); dw_base.SetItemString(1,L"CreateorID",suserid); dw_base.SetItemString(1,L"SaleID",suserid); dw_base.SetItemDisplayString(1,L"SaleID",susername); } OnAttachEvent(); updated = false; xstring positionname = publiccode::GetUser().positionname; /*if (positionname.find(L"N¡R") >= 0) { dw_base.SetItemString(1,L"Position",L"N¡R"); }*/ if(positionname.find(L"Ǒ-")>=0){ dw_base.SetItemString(1,L"Position",L"Ǒ-"); dw_base.SetItemString(1,L"RequestDate",sdate); } return 1; } int onloaded() { SetAgent(); return 1; } };