From 6e93e717799723de98287f5a036ab34367bd08cd Mon Sep 17 00:00:00 2001
From: xj qian <qianxj15@sina.com>
Date: 星期五, 05 七月 2024 17:15:44 +0800
Subject: [PATCH] update some
---
jrj/project/business/AP/maint.ap.cpp | 306 +++++++++++++++++++++++++++++++++++++++++++++++++++
1 files changed, 306 insertions(+), 0 deletions(-)
diff --git a/jrj/project/business/AP/maint.ap.cpp b/jrj/project/business/AP/maint.ap.cpp
new file mode 100644
index 0000000..3c173ed
--- /dev/null
+++ b/jrj/project/business/AP/maint.ap.cpp
@@ -0,0 +1,306 @@
+#include <wobject/xstring.hpp>
+#include <xcontrol/xtreeview.hpp>
+#include <xcontrol/xdwgrid.hpp>
+
+#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
+#include "viewobject/view.base.hpp"
+
+using xml = KXMLDOMDocument;
+ class __declspec(dllexport) MaintAP : public xframe
+ {
+ public:
+ xstring APID;
+ xstring APType;
+ xdwtable dw_base;
+ xnode m_agentNode; //Agent Condition
+ HWND hObject = 0;
+ public:
+ MaintAP(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
+ public:
+ static MaintAP* CreateInstance(void* implPtr, void* hWnd)
+ {
+ MaintAP* pWin = new MaintAP(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;
+ }
+
+ //焦点激活处理函数
+ int OnSetFocus(TEvent* evt, LPARAM param)
+ {
+ //重置工具条
+ SetAgent();
+ return 1;
+ }
+ int updateAdvance()
+ {
+ xstring AdvanceID = dw_base.GetItemString(1, L"AdvanceID");
+ xstring ChargeOffState = L"Y";
+ xstring ChargeOffDate = dw_base.GetItemString(1, L"APDate");
+ xstring PayedAmount = dw_base.GetItemString(1, L"PayedAmount");
+ xstring val = L"<data><PO><item guid='" + AdvanceID + L"' update.modify='1'>" +
+ "<ChargeOffState update.modify='1'>" + ChargeOffState + L"</ChargeOffState>" +
+ "<ChargeOffMoney update.modify='1'>" + PayedAmount + L"</ChargeOffMoney>" +
+ "<ChargeOffDate update.modify='1'>" + ChargeOffDate + L"</ChargeOffDate></item></PO></data>";
+ xaserverarg arg;
+
+ arg.AddArg(L"content", val);
+ xml x ;
+
+ if (xurl::get(L"/sale/data/PurchaseOrder/update/polistex", arg.GetString(), x) != 1)
+ {
+ xstring error = x.text();
+ //alert(error);
+ return 0;
+ }
+ return 1;
+ }
+
+ int OnSave()
+ {
+ xstring APNo = dw_base.GetItemString(1, L"APNo");
+ xml x ;
+ if (APNo == L"")
+ {
+ x = ViewObject::RetrieveData(L"/sale/data/AP/MakeAPNo");
+ APNo = x.text();
+ dw_base.SetItemString(1, L"APNo", APNo);
+ }
+ xstring AdvanceID = dw_base.GetItemString(1, L"AdvanceID");
+ xstring OrigSysID = dw_base.GetItemString(1, L"OrigSysID");
+ xstring APType1 = dw_base.GetItemString(1, L"APType");
+ if (APType1 != L"000")
+ {
+ if (AdvanceID == L"" && OrigSysID != L"") {
+ alert(L"请转入");
+ return 0;
+ }
+ }
+
+
+ dw_base.AcceptText();
+ dw_base.DwUpdateAllTo(x);
+ xaserverarg arg;
+
+ arg.AddArg(L"content", x.xml());
+
+ if (xurl::get(L"/sale/data/AP/update", 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();
+ updateAdvance();
+ alert(L"保存成功!");
+
+ SendMessage(hObject, 0x401, (LPARAM)L"xmRefresh", 0);
+ CloseWindow();
+ }
+ else
+ {
+ alert(L"保存失败!");
+ }
+ return 1;
+ }
+
+ int OnItemChanged(TEvent* evt, LPARAM p)
+ {
+ DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
+ xstring colname = hdr.colname;
+ xstring value = hdr.data;
+ int row = hdr.row;
+ xstring dwname = L"dw_base";
+ xstring ETD = L"";
+
+ if (value == L"") return 1;
+ if (colname == L"SupplierID")
+ {
+ dw_base.SetItemString(1, L"APSupplierID", dw_base.GetItemString(1, L"SupplierID"));
+ dw_base.SetItemDisplayString(1, L"APSupplierID", dw_base.GetItemDisplayString(1, L"SupplierID"));
+ }
+ if (colname == L"Amount")
+ {
+ dw_base.SetItemString(1, L"PayedAmount", dw_base.GetItemString(1, L"Amount"));
+ }
+ if (colname == L"InvoiceNo")
+ {
+ dw_base.SetItemString(1, L"NotifyInvoiceNo", dw_base.GetItemString(1, L"InvoiceNo"));
+
+ xml x11 = ViewObject::RetrieveData(L"/sale/data/AP/GetInvoiceNo", L"InvoiceNo", dw_base.GetItemString(1, L"InvoiceNo"));
+ if (x11)
+ {
+ ETD = x11.text();
+ }
+ dw_base.SetItemString(1, L"GDNDate", ETD);
+ }
+
+ return 1;
+
+ }
+ int OnImport()
+ {
+ xaserverarg arg1;
+
+ arg1.AddArg(L"PONo", dw_base.GetItemString(1, L"PONo"));
+ OpenWindow(L"dev:xpage[Select.AP.vx]", arg1);
+ xstring str = arg1.GetArgString(L"items");
+ if (str != L"")
+ {
+ xml x ;
+
+ x.loadXML(str);
+ KXMLDOMNodeList items = x.selectNodes(L"data/item");
+ KXMLDOMNode t = items.item(0);
+ KXMLDOMNodeList items1 = x.selectNodes(L"data");
+ KXMLDOMNode t1 = items1.item(0);
+ if (t1.selectSingleNode(L"item/@guid"))dw_base.SetItemString(1, L"AdvanceID", t1.selectSingleNode(L"item/@guid").text());
+ if (t.selectSingleNode(L"PONo"))dw_base.SetItemString(1, L"PONo", t.selectSingleNode(L"PONo").text());
+ if (t.selectSingleNode(L"OrgName"))dw_base.SetItemString(1, L"OrgName", t.selectSingleNode(L"OrgName").text());
+ if (t.selectSingleNode(L"SalespersonID/@_displaystring"))dw_base.SetItemDisplayString(1, L"SalespersonID", t.selectSingleNode(L"SalespersonID/@_displaystring").text());
+ if (t.selectSingleNode(L"SalespersonID"))dw_base.SetItemString(1, L"SalespersonID", t.selectSingleNode(L"SalespersonID").text());
+ if (t.selectSingleNode(L"AdvancedMoney"))dw_base.SetItemString(1, L"Amount", t.selectSingleNode(L"AdvancedMoney").text());
+ if (t.selectSingleNode(L"AdvancedMoney"))dw_base.SetItemString(1, L"PayedAmount", t.selectSingleNode(L"AdvancedMoney").text());
+ if (t.selectSingleNode(L"PartyID"))dw_base.SetItemString(1, L"SupplierID", t.selectSingleNode(L"PartyID").text());
+ if (t.selectSingleNode(L"PartyID"))dw_base.SetItemString(1, L"APSupplierID", t.selectSingleNode(L"PartyID").text());
+ if (t.selectSingleNode(L"ShortName"))dw_base.SetItemDisplayString(1, L"APSupplierID", t.selectSingleNode(L"ShortName").text());
+ if (t.selectSingleNode(L"ShortName"))dw_base.SetItemDisplayString(1, L"SupplierID", t.selectSingleNode(L"ShortName").text());
+ if (t.selectSingleNode(L"SONo"))dw_base.SetItemString(1, L"SONO", t.selectSingleNode(L"SONo").text());
+
+ if (t.selectSingleNode(L"POAmount"))dw_base.SetItemString(1, L"POAmount", t.selectSingleNode(L"POAmount").text());
+ }
+ return 1;
+ }
+ //命令发布函数
+ int OnCmdDispatch(xstring comdid)
+ {
+ if (comdid == L"xmImport")
+ {
+ OnImport();
+ return 1;
+ }
+ else if (comdid == L"xmClose")
+ {
+ CloseWindow();
+ return 1;
+ }
+ else if (comdid == L"xmSave")
+ {
+ return OnSave();
+ }
+ return 0;
+ }
+
+ //命令处理事件
+ int OnXCommand(TEvent* evt, LPARAM param)
+ {
+ return OnCmdDispatch(evt->xcommand.pStrID);
+ }
+
+ int OnAttachEvent()
+ {
+ //绑定工具条点击事件
+ AttachEvent(L"WM_XCOMMAND", (FEvent)&MaintAP::OnXCommand);
+ AttachEvent(L"dw_base", L"DWV_ITEMCHANGED", (FEvent)&MaintAP::OnItemChanged);
+ //获取焦点事件，用于重置工具条
+ AttachEvent(L"WM_SETFOCUS", (FEvent)&MaintAP::OnSetFocus);
+ return 1;
+ }
+
+ int OnRetrieve()
+ {
+ xml x ;
+
+ xaserverarg arg;
+
+ arg.AddArg(L"EntityID", APID);
+ if (getUrl(L"/sale/data/AP/base", arg.GetString(), x) != 1)
+ {
+ trace(x.text());
+ return -1;
+ }
+ else
+ {
+ dw_base.Retrieve(x);
+ dw_base.Redraw();
+ }
+ return 1;
+ }
+
+ int onload()
+ {
+ APID = L"";
+ APType = L"";
+ if (GetWinParam())
+ {
+ xaserverarg arg=GetArg();
+
+ APID = arg.GetArgString(L"APID");
+ APType = arg.GetArgString(L"APType");
+ }
+ 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);
+
+ OnAttachEvent();
+
+ if (APID != L"")
+ {
+ OnRetrieve();
+ }
+ else
+ {
+ 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"001");
+ dw_base.SetItemDisplayString(1, L"APType", L"预付款");
+ dw_base.SetItemString(1, L"ApprovalStatus", L"6");
+
+ }
+ for (int m = 1; m <= dw_base.GetColumnCount(); m++)
+ {
+ xstring col = dw_base.GetColumnName(m);
+ if (col == L"OrgName" || col == L"APNo")
+ dw_base.SetColumnProp(col, L"cellprotect", L"1");
+ }
+ return 1;
+ }
+
+ int onloaded()
+ {
+ SetAgent();
+
+ return 1;
+ }
+ };
--
Gitblit v1.9.3