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