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