From 1b1a2e68cfd02074fc3300a0cc0fa40888a92f10 Mon Sep 17 00:00:00 2001
From: LiFan <2308045698@qq.com>
Date: 星期一, 15 七月 2024 11:57:06 +0800
Subject: [PATCH] update
---
jrj/project/business/Company/CompanyMaint.cpp | 570 ++++++++++++++++++++++++++++++++++++++------------------
1 files changed, 381 insertions(+), 189 deletions(-)
diff --git a/jrj/project/business/Company/CompanyMaint.cpp b/jrj/project/business/Company/CompanyMaint.cpp
index cb4571d..0ade828 100644
--- a/jrj/project/business/Company/CompanyMaint.cpp
+++ b/jrj/project/business/Company/CompanyMaint.cpp
@@ -1,211 +1,403 @@
-#include <wobject/xstring.hpp>
-#include <xcontrol/xtreeview.hpp>
-#include <xcontrol/xdwgrid.hpp>
+use "win.vl"
+use "treeview.vm"
+use "dev:vm[xdwgrid.vm]"
+use "dev:vm[xdwtable.vm]"
+use "pref.vl"
+use "dev:vm[xml.vm]"
+use "dev:vm[xaserverarg.vm]"
+use "dev:vm[xaserver.vm]"
+use "dev:vm[xutil.vm]"
+use "dev:vm[pagecontrol.vm]"
+use "maint.vl"
+use "publiccode.vl"
-#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
-#include "viewobject/view.base.hpp"
+unit vbusiness.xpage
+[
+ CompanyMaint is extend maint;
+ about CompanyMaint
+ [
+ control:
-using xml = KXMLDOMDocument;
- class __declspec(dllexport) Deduction : public xframe
- {
- public:
- xdwgrid dw_list;
- xstring EntityID;
- xstring InvoiceNo;
+ method:
+ [
+ pagecontrol__ m_layer;
+ xdwtable__ dw_detail;
+ xdwtable__ dw_bank;
+ string m_operate;
+ string m_sguid;
- xnode m_agentNode; //Agent Condition
-
- public:
- Deduction(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
- public:
- static Deduction* CreateInstance(void* implPtr, void* hWnd)
- {
- Deduction* pWin = new Deduction(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)
+ xnode__ m_agentNode; //Agent Condition
+ string m_agentCond; //Agent Node
+ int SetAgent()
{
- xstring s = agent.xml();
- m_agentNode = SetAgentNode(anode, s);
+ string xfNodeAgentArea = "agentarea";
+ xnode__ anode = new xnode__;
+ anode.setNativePointer(GetAgentNode(xfNodeAgentArea));
+ var xframeElement = GetElement();
+ var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*");
+ if (agent)
+ {
+ string s = agent.xml;
+ SetAgentNodeContent(anode, s);
+ }
+ return 1;
}
- }
- return 1;
- }
- int OnRowChanged(TEvent* evt, LPARAM p)
- {
- DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
- int row = hdr.row;
- SetAgent();
- return 1;
- }
+ //焦点激活处理函数
+ int OnSetFocus(ref TEvent evt, int param)
+ {
+ SetAgent();
- //焦点激活处理函数
- int OnSetFocus(TEvent* evt, LPARAM param)
- {
- //重置工具条
- SetAgent();
- return 1;
- }
+ //重置工具条
+ return 1;
+ }
- //命令发布函数
- int OnCmdDispatch(xstring comdid)
- {
- if (comdid == L"xmSave")
- {
- OnSave();
- return 1;
- }
- if (comdid == L"xmSearch")
- {
- OnRetrieve(InvoiceNo, EntityID);
- return 1;
- }
- if (comdid == L"xmClose")
- {
- CloseWindow();
- return 1;
- }
- return 0;
- }
+ int OnPreSave()
+ {
+ xdwtable__ dw = new xdwtable__;
+ dw.setNativePointer(dw_detail.FindDwTable("CompanyInfo", 0));
+ string sPartyNo = dw.GetItemString(1, "PartyNo", 0);
+ if (sPartyNo == "" || sPartyNo == nil)
+ {
+ string sGetNo = publiccode::GetIdentityNo("");
+ dw.SetItemString(1, "PartyNo", sGetNo);
+ //alert("公司编号为空！");
+ //return -1;
+ }
+ string sPartyName = dw.GetItemString(1, "Name", 0);
+ if (sPartyName == "" || sPartyName == nil)
+ {
+ alert("公司名称为空！");
+ return -1;
+ }
- //命令处理事件
- int OnXCommand(TEvent* evt, LPARAM param)
- {
- return OnCmdDispatch(evt->xcommand.pStrID);
- }
+ string suserid = publiccode::GetUserInfo().id;
+ string sdate = publiccode::GetCurDate();
+ dw.SetItemString(1, "ModifierID", suserid);
+ dw.SetItemString(1, "ModifyDate", sdate);
- xstring GetGuid()
- {
- return publiccode::GetGuid();
- }
+ dw.setNativePointer(dw_bank.FindDwTable("item", 0));
+ if (dw)
+ {
+ string sno;
+ string sname,
+ string status;
+ int i;
+ int row = dw.GetRowCount();
+ for (i = 1; i <= row; i++)
+ {
+ status = dw.GetItemString(i, "Status", 0) + "";
+ if (status == "" || status == nil)
+ {
+ dw.SetItemString(i, "Status", "Y");
+ //alert("第"+i.toString()+"行状态为空");
+ //return -1;
+ }
+ /*
+ sno=dw.GetItemString(i,"BankAccountNo",0)+"";
+ sname=dw.GetItemString(i,"BankName",0)+"";
+ status=dw.GetItemString(i,"Status",0)+"";
+ if (sno=="" || sno==nil)
+ {
+ if(sname !="" && sname != nil)
+ {
+ alert("第"+i.toString()+"行银行编号为空");
+ return -1;
+ }
+ }
- int OnSave()
- {
- xml x;
-
- dw_list.AcceptText();
- dw_list.DwUpdateAllToEx(x);
- xaserverarg arg ;
-
- arg.AddArg(L"content", x.xml());
- trace(x.xml());
- if (xurl::get(L"/sale/data/AR/update/ARDeduction", 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"保存成功!");
- }
- else
- {
- alert(L"保存失败!");
- }
- return 1;
- }
+ if (sname=="" || sname==nil)
+ {
+ if(sno !="" && sno != nil)
+ {
+ alert("第"+i.toString()+"行银行名称为空");
+ return -1;
+ }
+ }
+ else
+ {
+ if (status=="" || status==nil)
+ {
+ dw.SetItemString(i,"Status","Y");
+ //alert("第"+i.toString()+"行状态为空");
+ //return -1;
+ }
+ }
+ */
+ }
+ }
+ 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_list";
- if (colname == L"DeductionAmount")
- {
- dw_list.SetItemString(row, L"SettlementAdjustID", EntityID);
- xstring id = publiccode::GetGuid();
- KXMLDOMElement ele = dw_list.GetRowElement(row);
- ele.setAttribute(L"guid", id);
- //dw_list.SetGuid(row,id);
- //alert(ele.xml);
- //alert(dw_list.GetGuid(row));
- }
- dw_list.Redraw();
- return 1;
- }
+ int OnSave()
+ {
+ dw_detail.AcceptText();
+ dw_bank.AcceptText();
+ int rec;
+ rec = OnPreSave();
+ if (rec == -1)
+ return -1;
- int OnAttachEvent()
- {
- //绑定工具条点击事件
- AttachEvent(L"WM_XCOMMAND", (FEvent)&Deduction::OnXCommand);
- //获取焦点事件，用于重置工具条
- AttachEvent(L"WM_SETFOCUS", (FEvent)&Deduction::OnSetFocus);
- AttachEvent(L"dw_list", L"DWV_ROWFOCUSCHANGED", (FEvent)&Deduction::OnRowChanged);
- AttachEvent(L"dw_list", L"DWV_ITEMCHANGED", (FEvent)&Deduction::OnItemChanged);
- return 1;
- }
+ int hIcon = xutil__::SetCursorWait();
+ string val, val2;
+ xml__ x = new xml__;
+ x.setNativePointer(x.CreateInstance());
+ var xdoc = x.GetXmlDoc();
+ dw_detail.DwUpdateAllTo(xdoc);
+ //val = xdoc.xml ;
+ dw_bank.DwUpdateAllTo(xdoc);
+ val = xdoc.xml;
+ trace(val);
+ xaserverarg__ args = new xaserverarg__;
+ args.setNativePointer(args.CreateInstance());
+ args.AddArg("content", val);
+ args.AddArg("dbmap", "CompanyInfo.dbmap");
+ //trace(m_EntityValueEx);
+ xml__ x1 = new xml__;
+ x1.setNativePointer(x1.CreateInstance());
+ if (url::post("OrganizationStruct/update.companyinfoex", args.GetString(), x1) != 1)
+ //if (xaserver__::ExecXAction("","[update.CompanyInfoEx.xa]",args.GetString(),x1) !=1)
+ {
+ string error = x1.GetXmlDoc().text;
+ trace(error);
+ }
+ else
+ {
+ trace(x1.GetXml());
+ if (x1.GetXmlDoc().selectSingleNode("error"))
+ {
+ alert("保存出错2!");
+ return 0;
+ }
+ win__::MessageBox(GetHWND(), "保存成功！", "提示", 0);
+ }
+ xutil__::RestoreCursor(hIcon);
+ dw_detail.ResetUpdateStatus();
+ dw_bank.ResetUpdateStatus();
+ var xdoc2 = x.GetXmlDoc();
+ dw_detail.DwUpdateAllTo(xdoc2);
+ val = xdoc.xml;
+ trace(val);
+ return 1;
+ }
- int OnRetrieve(xstring InvoiceNo, xstring EntityID)
- {
- xml x;
-
- xaserverarg arg ;
-
- arg.AddArg(L"InvoiceNo", InvoiceNo);
- arg.AddArg(L"InvoiceNoEx", xcontrol(GetControl(L"search")).GetText());
- arg.AddArg(L"EntityID", EntityID);
+ int OnItemChanged(ref TNotifyEvent evt, int p)
+ {
+ ref DWNMHDR dwhdr = evt.pnmh;
+ int row = dwhdr.row;
+ string col = dwhdr.colname;
+ string data = dwhdr.data;
+ if (col == "Name")
+ {
+ xml__ x = new xml__;
+ x.setNativePointer(x.CreateInstance());
+ xaserverarg__ arg = new xaserverarg__;
+ arg.setNativePointer(arg.CreateInstance());
+ arg.AddArg("Name", data);
+ }
- //trace(GetControl(L"search").GetText());
- if (getUrl(L"/sale/data/AR/DeductionList", arg.GetString(), x) != 1)
- {
- trace(x.text());
- return -1;
- }
- else
- {
- dw_list.Retrieve(x);
- dw_list.Redraw();
- }
- dw_list.SetSelectionMode(1);
- return 1;
- }
+ return 1;
+ }
- int onload()
- {
- SetArg();
- dw_list = GetControl(L"dw_list");
- dw_list.openUrl(L"/sale/view/AR/template/Deduction");
+ int OnChildContent(ref TNotifyEvent evt, int p)
+ {
+ ref DWNMHDR dwhdr = evt.pnmh;
+ string col = dwhdr.colname;
+ if (col != "") {
+ xml__ x = new xml__;
+ x.setNativePointer(x.CreateInstance());
+ xaserverarg__ arg = new xaserverarg__;
+ arg.setNativePointer(arg.CreateInstance());
+ string query;
+ query = "[IResourceMSSql.xq]";
+ if (col == "TradeType") {
+ arg.AddArg("ResourceType", "TradeType");//贸易方式
+ }
+ if (xaserver__::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1)
+ dwhdr.data = x.GetXml();
+ //trace(x.GetXml());
+ }
+ return 1;
+ }
- dw_list.SetColumnState(L"ID", false);
- dw_list.SetColumnState(L"GDNLineID", false);
- dw_list.SetColumnState(L"SettlementAdjustID", false);
+ int OnAddRow()
+ {
+ int h = m_layer.GetSheetIndex();
+ if (h == 1)
+ {
+ xdwtable__ dw = new xdwtable__;
+ dw.setNativePointer(dw_bank.GetCurTable());
+ string dw_n = dw.GetDwName();
+ if (dw_n == "item")
+ {
+ int row = dw.InsertRow(0);
+ dw.SetItemString(row, "Status", "Y");
+ }
+ }
+ return 1;
+ }
+ int OnInsertRow()
+ {
+ int h = m_layer.GetSheetIndex();
+ if (h == 1)
+ {
+ xdwtable__ dw = new xdwtable__;
+ dw.setNativePointer(dw_bank.GetCurTable());
+ string dw_n = dw.GetDwName();
+ if (dw_n == "item")
+ {
+ int row = dw.GetRow();
+ int crow = dw.InsertRow(row);
+ dw.SetItemString(crow, "Status", "Y");
+ }
+ }
+ return 1;
+ }
- if (GetWinParam())
- {
- xaserverarg arg = GetArg();
- EntityID = arg.GetArgString(L"EntityID");
- InvoiceNo = arg.GetArgString(L"InvoiceNo");
- }
- trace(InvoiceNo);
- OnRetrieve(InvoiceNo, EntityID);
- OnAttachEvent();
- return 1;
- }
+ int OnDeleteRow()
+ {
+ int h = m_layer.GetSheetIndex();
+ if (h == 1)
+ {
+ xdwtable__ dw = new xdwtable__;
+ dw.setNativePointer(dw_bank.GetCurTable());
+ string dw_n = dw.GetDwName();
+ if (dw_n == "item")
+ {
+ int row = dw.GetRow();
+ dw.DeleteRow(row);
+ }
+ }
+ return 1;
+ }
- int onloaded()
- {
- SetAgent();
+ //命令发布函数
+ int OnCmdDispatch(string comdid)
+ {
+ if (comdid == "Save") OnSave();
+ else if (comdid == "AddRow") OnAddRow();
+ else if (comdid == "InsertRow") OnInsertRow();
+ else if (comdid == "DeleteRow") OnDeleteRow();
+ return 0;
+ }
- return 1;
- }
- };
+ //命令处理事件
+ int OnXCommand(ref TXCommandEvent evt, int param)
+ {
+ return OnCmdDispatch(evt.pStrID);
+ }
+
+ int OnAttachEvent()
+ {
+ //绑定工具条点击事件
+ AttachEvent("WM_XCOMMAND", OnXCommand);
+ //获取焦点事件，用于重置工具条
+ AttachEvent("WM_SETFOCUS", OnSetFocus);
+ //下拉框 提供内容
+ AttachEvent("dw_detail", "DWV_CHILDCONTENT", OnChildContent);
+ AttachEvent("dw_detail", "DWV_ITEMCHANGED", OnItemChanged);
+ }
+
+ int OnRetrieve()
+ {
+ xml__ x = new xml__;
+ x.setNativePointer(x.CreateInstance());
+ xaserverarg__ arg = new xaserverarg__;
+ arg.setNativePointer(arg.CreateInstance());
+ arg.AddArg("guid", m_sguid);
+ //trace(m_sguid);
+ //if (url::get("OrganizationStruct/detail.CompanyInfo",arg.GetString(),x) != 1)
+ if (url::post("OrganizationStruct/detail.CompanyInfo", arg.GetString(), x) != 1)
+ {
+ trace(x.GetXmlDoc().text);
+ return -1;
+ }
+ else
+ {
+ dw_detail.Retrieve(x);
+ dw_detail.Redraw();
+ dw_bank.Retrieve(x);
+ dw_bank.Redraw();
+ //trace(x.GetXml());
+ }
+
+ return 1;
+ }
+
+ int OnInitial()
+ {
+ SetAgent();
+
+ xaserverarg__ arg = new xaserverarg__;
+ arg.setNativePointer(arg.CreateInstance());
+ arg = this.GetParam();
+ if (arg)
+ {
+ m_operate = arg.GetArgString("operate");
+ m_sguid = arg.GetArgString("guid");
+ }
+ /*if ( m_sguid == "" || m_sguid == nil)
+ {
+ m_sguid = win__::GetGuid();
+ trace(m_sguid);
+ }*/
+
+ OnAttachEvent();
+
+ return 1;
+ }
+
+ int onload()
+ {
+ m_layer = new pagecontrol__;
+ m_layer.setNativePointer(this.GetControl("cTab"));
+
+ dw_detail = new xdwtable__;
+ dw_detail.setNativePointer(this.GetControl("dw_detail"));
+ dw_detail.openUrl("组织架构.vface/template/company/detail");
+ dw_detail.SetColHeaderHeight(0);
+ dw_detail.SetRowSelectorWidth(0);
+ dw_bank = new xdwtable__;
+ dw_bank.setNativePointer(this.GetControl("dw_bank"));
+ dw_bank.openUrl("组织架构.vface/template/company/bank");
+
+ OnInitial();
+ if (m_sguid != "") {
+ OnRetrieve();
+ }
+ else {
+ xdwtable__ dw = new xdwtable__;
+ dw.setNativePointer(dw_detail.FindDwTable("CompanyInfo", 0));
+ dw.SetItemString(1, "Status", "1");
+ dw.SetItemString(1, "InternalFlag", "Y");
+ dw.SetItemString(1, "Type", "0");
+ string suserid = publiccode::GetUserInfo().id;
+ /*string susername = publiccode::GetUserInfo().name;
+ string sdate = publiccode::GetCurDate();
+ dw.SetItemString(1,"CreatorID",suserid);
+ dw.SetItemDisplayString(1,"CreatorID",susername);
+ dw.SetItemString(1,"CreateDate",sdate);*/
+
+ dw.setNativePointer(dw_detail.FindDwTable("address", 0));
+ dw.SetItemString(1, "IdentifyAddressFlag", "Y");
+ dw.SetItemString(1, "Status", "1");
+ dw.setNativePointer(dw_detail.FindDwTable("Regist", 0));
+ dw.SetItemString(1, "IdentifyAddressFlag", "N");
+ dw.SetItemString(1, "Status", "1");
+
+ dw.setNativePointer(dw_bank.FindDwTable("item", 0));
+ if (dw) {
+ //msxml::IXMLDOMElement ele = dw.GetElement();
+ //trace(ele.xml);
+ //dw.SetItemString(1,"Status","Y");
+ }
+ }
+ return 1;
+ }
+
+ ]
+
+ ]
+]
\ No newline at end of file
--
Gitblit v1.9.3