þÿ#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) CommissionExpenseWin : public xframe { public: xdwgrid dw_list; xdatetimepick sdate; xdatetimepick edate; xdwtable dw_arg; xnode m_agentNode; //Agent Condition xstring DatePicker; public: CommissionExpenseWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static CommissionExpenseWin* CreateInstance(void* implPtr, void* hWnd) { CommissionExpenseWin* pWin = new CommissionExpenseWin(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Àm;YtQýep int OnSetFocus(TEvent* evt, LPARAM param) { //‘Ín]åQwga SetAgent(); return 1; } int OnSave() { xml x ; KXMLDOMDocument xdoc = x; dw_list.DwUpdateAllToEx(xdoc); xaserverarg arg; arg.AddArg(L"content", x.xml()); //alert(x.xml()); if (xurl::get(L"/sale/data/expense3/update/Commission", arg.GetString(), x) != 1) { xstring error = x.text(); alert(L"err:" + error); return 1; } //alert(x.xml()); alert(L"OÝ[XbRŸÿ"); dw_list.ResetUpdateStatus(); return 1; } int OnItemChanged(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname = hdr.colname; xstring value = hdr.data; xstring dwname = L"dw_list"; if (value != L"") { //alert(dwname); KXMLDOMNodeList nlist = GetElement().selectNodes(L"//*[@name='" + dwname + L"']/trans[@for='" + colname + L"']"); ViewObject::TransData(nlist, dw_list, hdr.row, colname, value); } return 1; } //T}NäSÑ^Qýep int OnCmdDispatch(xstring comdid) { if (comdid == L"xmAddRow") { int row = dw_list.GetRowCount(); dw_list.InsertRow(0); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; dw_list.SetItemString(row + 1, L"CreateID", suserid); dw_list.SetItemDisplayString(row + 1, L"CreateID", susername); xstring sdate1 = publiccode::GetCurrentDate(); dw_list.SetItemString(row + 1, L"CreateDate", sdate1); return 1; } else if (comdid == L"xmDeleteRow") { dw_list.DeleteRow(0); return 1; } else if (comdid == L"xmSave") { OnSave(); } else if (comdid == L"xmAdd") { xaserverarg arg; arg.AddArg(L"HWND", xstring((__int64)GetHWND())); OpenWindow(L"dev:xpage[CommissionExpenseBase.vx]", arg); } else if (comdid == L"SwitchTo") { OnSwitchTo(); return 1; } else if (comdid == L"xmEdit") { xaserverarg arg; xstring CommissionExpenseID = dw_list.GetGuid(dw_list.GetRow()); arg.AddArg(L"CommissionExpenseID", CommissionExpenseID); arg.AddArg(L"HWND", xstring((__int64)GetHWND())); OpenWindow(L"dev:xpage[CommissionExpenseBase.vx]", arg); } else if (comdid == L"xmDelete") { xstring CommissionExpenseID1 = dw_list.GetGuid(dw_list.GetRow()); int MB_OKCANCEL = 1; int IDOK = 1; int ret = MessageBox(GetHWND(), L"xn‹¤R –dOc‘э9?", L"cÐy:", MB_OKCANCEL); if (ret == IDOK) { ViewObject::RetrieveData(L"/sale/data/expense3/delete/CommissionExpense", L"EntityID", CommissionExpenseID1); OnRetrieve(DatePicker); } } else if (comdid == L"xmRefresh") { OnRetrieve(DatePicker); } return 0; } int OnSwitchTo() { xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; xstring sdate2 = publiccode::GetCurrentDate(); xaserverarg arg1; OpenWindow(L"dev:xpage[CommissionExpenseItem.vx]", arg1); xstring str = arg1.GetArgString(L"items"); trace(str); if (str != L"") { xml x ; x.loadXML(str); KXMLDOMNodeList items = x.selectNodes(L"data/Item"); int len = items.length(); int row = 0; for (int i = 0; i < len; i++) { row = dw_list.InsertRow(0); KXMLDOMNode t = items.item(i); if (t.selectSingleNode(L"InvoiceNo"))dw_list.SetItemString(row, L"InvoiceNo", t.selectSingleNode(L"InvoiceNo").text()); if (t.selectSingleNode(L"CustomerName"))dw_list.SetItemString(row, L"CustomerName", t.selectSingleNode(L"CustomerName").text()); if (t.selectSingleNode(L"Amount"))dw_list.SetItemString(row, L"Amount", t.selectSingleNode(L"Amount").text()); if (t.selectSingleNode(L"SalesPerson"))dw_list.SetItemString(row, L"SalesPerson", t.selectSingleNode(L"SalesPerson").text()); if (t.selectSingleNode(L"OrgName"))dw_list.SetItemString(row, L"OrgName", t.selectSingleNode(L"OrgName").text()); if (t.selectSingleNode(L"PrivateCommissionAmount"))dw_list.SetItemString(row, L"CommAmount", t.selectSingleNode(L"PrivateCommissionAmount").text()); if (t.selectSingleNode(L"CurrencyCode"))dw_list.SetItemString(row, L"CurrencyCode", t.selectSingleNode(L"CurrencyCode").text()); if (t.selectSingleNode(L"Exchage"))dw_list.SetItemString(row, L"Exchage", t.selectSingleNode(L"Exchage").text()); dw_list.SetItemString(row, L"CreateID", suserid); dw_list.SetItemDisplayString(row, L"CreateID", susername); dw_list.SetItemString(row, L"CreateDate", sdate2); dw_list.SetItemString(row, L"CommDate", sdate2); } dw_list.Redraw(); } SetAgent(); return 1; } //T}NäYtN‹Nö int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnDoubleClicked(TEvent* evt, LPARAM p) { return OnCmdDispatch(L"xmEdit"); } int OnAttachEvent() { //~Ñ[š]åQwgap¹QûN‹Nö AttachEvent(L"WM_XCOMMAND", (FEvent)&CommissionExpenseWin::OnXCommand); //ƒ·SÖq&p¹N‹Nöÿ u(NŽ‘Ín]åQwga AttachEvent(L"WM_SETFOCUS", (FEvent)&CommissionExpenseWin::OnSetFocus); AttachEvent(L"dw_list", L"DWV_ITEMCHANGED", (FEvent)&CommissionExpenseWin::OnItemChanged); AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&CommissionExpenseWin::OnDoubleClicked);//ˆLSÌQû AttachEvent(L"cbx_state", L"CBN_SELCHANGE", (FEvent)&CommissionExpenseWin::OnDatePicker); return 1; } int OnDatePicker(TEvent* evt, LPARAM lParam) { int h = xcombobox::GetCurSel(evt->command.hCtrl); if (h > -1) { xstring txt = (string)xcombobox::GetLBText(evt->command.hCtrl, h); if (txt == L"R6SUeåg") { DatePicker = L"CommDate"; OnRetrieve(DatePicker); } else if (txt == L"_UQeeåg") { DatePicker = L"CreateDate"; OnRetrieve(DatePicker); } } return 1; } xstring GetQueryArg() { dw_arg.AcceptText(); xml x ; dw_arg.DwUpdateAllTo(x); return x.xml(); } int OnRetrieve(xstring DatePicker) { xml x ; xaserverarg arg; arg.AddArg(L"QueryTxt",xcontrol(GetControl(L"sle_search")).GetText()); arg.AddArg(L"QueryArg", GetQueryArg()); arg.AddArg(L"DatePicker", DatePicker); if (getUrl(L"/sale/data/Expense3/view/Commission", arg.GetString(), x) != 1) { trace(x.text()); return -1; } else { dw_list.Retrieve(x); dw_list.Redraw(); } return 1; } int onload() { 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"g,^t"); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/Expense3/commission/list"); OnAttachEvent(); //dw_list.SetReadOnly(true); return 1; } int onloaded() { SetAgent(); OnRetrieve(DatePicker); return 1; } };