ÿþ#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) SalaryslipEx : public xframe { public: SalaryslipEx(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static SalaryslipEx* CreateInstance(void* implPtr, void* hWnd) { SalaryslipEx* pWin = new SalaryslipEx(implPtr, (HWND)hWnd); return pWin; } public: xdwgrid dw_list; xdwtable dw_arg; xnode m_agentNode; //Agent Condition 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 ViewUpdate(int pr,xstring updateItem,xaserverarg arg) { if( updateItem==L"del") { int DelRow = dw_list.GetRow(); dw_list.DeleteRow(DelRow); } else if( updateItem==L"setstate") { int row = dw_list.GetRow(); if (row < 1) return 1; // msxml::IXMLDOMElement ele = this.dw_list.GetRowElement(row); //xstring id = GetEntityIDName(1); //xstring entity = ele.selectSingleNode(id).text; //SetAgent(L"list", entity); // SetAgent(L"list",GetEntityID(1)); // if(arg.GetArgString(L"state") != L"") //this.dw_list.SetItemString(row, L"ApprovalStatus", arg.GetArgString(L"state")); dw_list.SetItemString(row, L"ApplyStatus", arg.GetArgString(L"state")); if(arg.GetArgString(L"billstatus") != L"") { xstring billstatus = arg.GetArgString(L"billstatus"); xstring statusName = GetBillStatusName(billstatus); dw_list.SetItemString(row, L"ApprovalStatusName", billstatus); dw_list.SetItemDisplayString(row, L"ApprovalStatusName", statusName); } dw_list.Redraw(); } return 1; } int OnSave() { dw_list.AcceptText(); xml x; KXMLDOMDocument xdoc = x; dw_list.DwUpdateAllToEx(xdoc); xaserverarg arg; arg.AddArg(L"content",x.xml()); //alert(x.GetXml()); //return 1; if(xurl::get(L"/sale/data/expense3/update/ReimbursementBase", 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_list.ResetUpdateStatus(); alert(L"ÝOX[bŸR!"); }else { alert(L"ÝOX[1Y%!"); } return 1; } int OnModifyRow(int row) { xaserverarg arg; arg.AddArg(L"SSBID", dw_list.GetItemString(row,L"SSBID")); OpenWindow(L"dev:xpage[SalaryslipExMaint.vx]", arg); return 1; } int OnDelete() { int row = dw_list.GetRow(); if(row < 1) return 1; xstring SSBID=dw_list.GetItemString(row,L"SSBID"); //alert(mfid); xml x; xaserverarg arg; arg.AddArg(L"SSBID", SSBID); int res = MessageBox(GetHWND(), L"/f&Tnx¤‹ Rd–?",L"Ðc:y",4); if(res == 6) { if(getUrl(L"/sale/data/expense3/Delete/SalaryslipEx", arg.GetString(),x)!=1) { xstring error = x.text(); alert(L"err:"+error); return 1; } alert(L" Rd–bŸR"); } OnRetrieve(); return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(xstring comdid) { if(comdid==L"OnNew") //xmAddRow { OpenWindow(L"dev:xpage[SalaryslipExMaint.vx]",0); return 1; } else if (comdid == L"OnOpen")//"xmModifyRow" { return OnModifyRow(dw_list.GetRow()); } else if(comdid==L"OnDelete") { OnDelete(); } else if (comdid ==L"xmSearch") { OnRetrieve(); } else if(comdid ==L"Copy") { xstring SSBID=dw_list.GetItemString(dw_list.GetRow(),L"SSBID"); xaserverarg arg; arg.AddArg(L"action",L"Copy"); arg.AddArg(L"SSBID",SSBID); OpenWindow(L"dev:xpage[SalaryslipExMaint.vx]",arg); } else if(comdid==L"xmSaveAs") { dw_list.SaveAs(L""); return 1; } return 0; } //æ‰ÑS Ÿh»y_Ttran‹NöN ÿÇåg~bÐg*NÂSpe—_0Rù[”^„vR int OnBaseItemChanged(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"RecordDate") { row = dw_list.GetRow(); xstring sdate = publiccode::GetCurrentDate(); dw_list.SetItemString(row,L"ModifyTime",sdate); //InvoiceNo = dw_list.GetItemString(row,L"NInvoiceNo"); return 1; } return 1; } //}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)&SalaryslipEx::OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent(L"WM_SETFOCUS", (FEvent)&SalaryslipEx::OnSetFocus); AttachEvent(L"dw_list",L"DWV_ITEMCHANGED", (FEvent)&SalaryslipEx::OnBaseItemChanged); AttachEvent(L"dw_list",L"DWV_DOUBLECLICKED", (FEvent)&SalaryslipEx::OnDoubleClicked);//LˆÌSûQ return 1; } int OnDoubleClicked(TEvent* evt, int p) { return OnCmdDispatch(L"OnOpen"); } xstring GetQueryArg() { dw_arg.AcceptText(); xml x; dw_arg.DwUpdateAllTo(x); return x.xml(); } int OnRetrieve() { xml x; xaserverarg arg ; arg.AddArg(L"QueryTxt", xcontrol(GetControl(L"search")).GetText()); arg.AddArg(L"QueryArg",GetQueryArg()); trace(GetQueryArg()); if (getUrl(L"/sale/data/Expense3/SalaryslipEx",arg.GetString(),x)!=1) { trace(x.text()); return -1; }else { dw_list.Retrieve(x); dw_list.Redraw(); dw_list.SetSelectionMode(1); dw_list.SetReadOnly(true); } return 1; } int onload() { dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/Expense3/SalaryslipExList"); dw_list.SetColumnState(L"SSBID",false); dw_arg = GetControl(L"dw_arg"); dw_arg.openUrl(L"/sale/view/AR/template/queryarg"); dw_arg.SetColHeaderHeight(0); dw_arg.SetRowSelectorWidth(0); dw_arg.SetHScrollState(false); dw_arg.SetVScrollState(false); dw_arg.SetItemString(1,L"DateType",L",gt^"); OnRetrieve(); OnAttachEvent(); return 1; } int onloaded() { SetAgent(); return 1; } };