From 2a1d4fcebeca6c3b7f8af0c13463486fb30a78e1 Mon Sep 17 00:00:00 2001 From: LiFan <2308045698@qq.com> Date: 星期三, 10 七月 2024 10:16:10 +0800 Subject: [PATCH] update --- jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp | 729 ++++++++++++++++---------------------------------------- 1 files changed, 208 insertions(+), 521 deletions(-) diff --git a/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp b/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp index 6c3d5bb..0885ef1 100644 --- a/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp +++ b/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp @@ -1,542 +1,229 @@ -#include <wobject/xstring.hpp> -#include <xcontrol/xtreeview.hpp> -#include <xcontrol/xdwgrid.hpp> +use "xcontrol.vframe.vbusiness.vd" +use "xbase.vframe.vbusiness.vd" +use "base.view.vd" -#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" -#include "viewobject/view.base.hpp" - -using xml = KXMLDOMDocument; -class __declspec(dllexport) listSupplierv3 : public listwin -{ -public: - xdwgrid dw_goods; - xtreeview tv_1; - xcombobox ddlb_1; - int changeddlb; - xstring TypeWork; - xstring GoodsUrl; - xstring m_sType; //type - xstring m_sTypeTxt; //选中树的data - // xstring m_searchtxt; - int PIndex; - xnode m_agentNode; //Agent Condition - xstring m_agentCond; //Agent Node - -public: - listSupplierv3(void* implPtr, HWND hWnd) :listwin(implPtr, hWnd) {} -public: - static listSupplierv3* CreateInstance(void* implPtr, void* hWnd) +unit trade +[ + class EnquiryExQuoteWin : public frame { - listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); - return pWin; - } - int OnRetrieve() - { - xml x; + xdwgrid dw_list; + xnode m_agentNode; //Agent Condition - xaserverarg arg; - arg.AddArg(L"pageindex", xstring(PIndex)); //第几页 - arg.AddArg(L"pagenumber", xstring(listwin::m_pageNumber)); //每页数量 - arg.AddArg(L"QueryTxt", listwin::m_QueryTxt); - arg.AddArg(L"sType", m_sType); - arg.AddArg(L"sTypeTxt", m_sTypeTxt); - trace(arg.GetString()); - //alert(L"xxxx"); - if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/list", arg.GetString(), x) != 1) + + int SetAgent() { - return -1; - } - else - { - KXMLDOMElement e = x.documentElement(); - if (listwin::dw_pages && e.selectSingleNode(L"@TotalPage")) + string xfNodeAgentArea = "agentarea"; + xnode anode = GetAgentNode(xfNodeAgentArea); + if (m_agentNode) { - xstring s = e.selectSingleNode(L"@TotalPage").text(); //总数量 - listwin::dw_pages.SetMaxPage(s.toInt()); + SetAgentNodeContent(anode, m_agentNode); } - //alert(x.GetXml()); - dw_list.Retrieve(x); - dw_list.Redraw(); + else + { + msxml::IXMLDOMElement xframeElement = GetElement(); + msxml::IXMLDOMElement agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*"); + if (agent) + { + string s = agent.xml; + m_agentNode = SetAgentNodeContent(anode, s); + } + } + return 1; + } + + int OnSearch() + { + + xml x = new xml; + string EnquiryNo; + x.setNativePointer(xml::CreateInstance()); + xaserverarg arg = GetParam(); + xcontrol QuoteNo = GetControl("QuoteNo"); + EnquiryNo = QuoteNo.GetText(); + + //alert(EnquiryNo); + + //string PartyID = arg.GetArgString("PartyID"); + //x = ViewObject::RetrieveData("/sale/data/Customerv3/entity/XmShare"); + + x = ViewObject::RetrieveData("/sale/data/Quote3/maint", "id", EnquiryNo); + if (x)dw_list.Retrieve(x); dw_list.SetReadOnly(true); - } - return 1; - } + dw_list.Redraw(); - int SetEntityData(xaserverarg arg) - { - xstring strQueryTxt = arg.GetArgString(L"QueryTxt"); - xml x; - - arg.AddArg(L"sType", m_sType); - arg.AddArg(L"sTypeTxt", m_sTypeTxt); - trace(arg.GetString()); - if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/list", arg.GetString(), x) != 1) - { - alert(x.text()); - - return -1; - } - else - { - KXMLDOMElement e = x.documentElement(); - if (listwin::dw_pages && e.selectSingleNode(L"@TotalPage")) - { - - xstring s = e.selectSingleNode(L"@TotalPage").text(); //总数量 - listwin::dw_pages.SetMaxPage(s.toInt()); - } - //trace(x.GetXml()); - listwin::dw_list.Retrieve(x); - listwin::dw_list.Redraw(); - listwin::dw_list.SetReadOnly(true); - } - - return 1; - } - - int OnChangePages(TEvent* evt, LPARAM p) - { - PAGENMHDR* h = (PAGENMHDR*)evt->notify.pnmh; - int c = h->cur; - - - HCURSOR hCursor = xutil::SetCursorWait(); - OnRetrieve(); - PIndex = c; - xutil::RestoreCursor(hCursor); - return 1; - - - } - - int ViewUpdate(int pr, xstring updateItem, xaserverarg arg) - { - if (updateItem == L"refresh") - { - //trace(L"sd"); - xdwpages zz = GetControl(L"pages"); - int h = zz.SetCurPage(1); - //trace(h); - OnRetrieve(); - } - return 1; - } - - //树选择 - int OnTreeSelChanged(TEvent evt, LPARAM p) - { - if (changeddlb != 1) - { - //alert(L"1"); - - HTREEITEM h = tv_1.GetSelectedItem(); - KXMLDOMElement& e = *(KXMLDOMElement*)tv_1.GetItemData(h); - - xstring t = e.selectSingleNode(L"@type").text(); - m_sType = t + L""; - xstring txt = e.selectSingleNode(L"@code").text(); - if (txt == L"") - txt = e.selectSingleNode(L"@name").text(); - m_sTypeTxt = txt + L""; - - //alert(m_sTypeTxt); - - PIndex = 1; - OnRetrieve(); - } - return 1; - } - - int createSubTree(HTREEITEM h, KXMLDOMElement ele) - { - KXMLDOMNodeList nlist = ele.selectNodes(L"item"); - int i; - int s = nlist.length(); - if (s > 0) - for (i = 0; i < s; i++) - { - - KXMLDOMElement* e = new KXMLDOMElement(nlist.item(i)); - xstring name = e->selectSingleNode(L"@name").text(); - HTREEITEM hw = tv_1.InsertChildItem(h, name, (LPARAM)e, 15); - createSubTree(hw, *e); - } - return 1; - } - - int OnCreateTree(xstring sType) - { - - while (tv_1.GetRootItem()) - tv_1.DeleteItem(tv_1.GetRootItem()); - - xml x; - - xaserverarg arg; - - arg.AddArg(L"sType", sType); - //Tree.pref.supplier.xq - //getUrl(GetEntityName(1)+L"/entity/list",arg.GetString(),x); - //if (xaserver::ExecXQuery(GetServerUrl(),L"[Tree.pref.supplier.xq]",arg.GetString(),x)!=1) - if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/pref/list/tree", arg.GetString(), x) != 1) - { - trace(x.text()); - return -1; - } - else - { - KXMLDOMNodeList nlist = x.selectNodes(L"root/item"); - int len = nlist.length(); - if (len > 0) - { - int i; - for (i = 0; i < len; i++) - { - - KXMLDOMElement* e = new KXMLDOMElement(nlist.item(i)); - xstring name = e->selectSingleNode(L"@name").text(); - HTREEITEM hw = tv_1.InsertChildItem(0, name, (LPARAM)e, 15); - - createSubTree(hw, *e); - tv_1.ExpandItem(hw); - } - tv_1.ExpandItem(0); - } - } - - return 1; - } - - //xcombobox下拉 - int OnSelectDdlb(TEvent evt, LPARAM p) - { - changeddlb = 1; - - int CB_GETCURSEL = 0x0147; - int nIndex = SendMessageW(ddlb_1.GetHWND(), CB_GETCURSEL, 0, 0); - KXMLDOMElement e = ddlb_1.GetElement();//GetitemData(wid,nIndex);//ddlb_1.GetElement(); - KXMLDOMElement e2 = e.selectSingleNode(L"item[" + xstring((nIndex + 1)) + L"]"); - xstring text = e2.selectSingleNode(L"@element").text(); - OnCreateTree(text); - changeddlb = 0; - return 1; - } - - int OnDeleteRow() - { - int row = listwin::dw_list.GetNextSelectRow(1); - if (row < 1) { - row = listwin::dw_list.GetRow(); - if (row < 1) { - //win::MessageBox(GetHWND(),L"请选中要删除的行!",L"提示",0); - return -1; - } - } - - KXMLDOMElement e = listwin::dw_list.GetRowElement(row); - //xstring sguid = e.SelectSingleNode(L"@guid").text; - //xstring sName = e.selectSingleNode(L"Name").text+L""; - xstring sguid = dw_list.GetItemString(dw_list.GetRow(), L"SupplierID"); - xstring sName = dw_list.GetItemString(dw_list.GetRow(), L"Name"); - int MB_YESNO = 0x00000004; - int IDYES = 6; - if (MessageBoxW(GetHWND(), L"确认要删除供应商 " + sName + L" 的信息吗?", L"提示", MB_YESNO) != IDYES) return 1; - xml x; - - xaserverarg arg; - arg.setNativePointer(arg.CreateInstance()); - arg.AddArg(L"guid", sguid); - arg.AddArg(L"EntityID", sguid); - // trace(sguid); - if (xurl::post(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/delete", arg.GetString(), x) != 1) - { - xstring error = x.text(); - trace(error); - } - else - { - KXMLDOMElement msg = x.selectNodes(L"process").item(0); - xstring success = msg.selectSingleNode(L"@finished").text(); - if (success == L"0") - { - alert(msg.selectSingleNode(L"@errInfo").text()); - } - else - { - MessageBoxW(GetHWND(), L"删除成功!", L"提示", 0); - listwin::dw_list.DeleteRow(row); - } - } - return 1; - } - - int OnRowChangedEx(TEvent* evt, LPARAM p) - { - DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; - int row = hdr.row; - //if(row < 1 or row > dw_list.GetRowCount()) return 1; - KXMLDOMElement ele = listwin::dw_list.GetRowElement(row); - xstring entity = ele.selectSingleNode(L"SupplierID").text(); - xml x; - - xaserverarg arg; - arg.setNativePointer(arg.CreateInstance()); - arg.AddArg(L"EntityID", entity); - - - xstring no1 = publiccode::GetUser().no; - if (no1 != L"00201") - { - - if (TypeWork.find(L"采购") >= 0) - { - GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritemEx"; - } - else - { - GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritem"; - } - } - else - { - GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritem"; - } - if (getUrl(GetServerUrl(), GoodsUrl, arg.GetString(), x) != 1) - { - trace(x.text()); - return -1; - } - else - { - dw_goods.Retrieve(x); - dw_goods.Redraw(); - dw_goods.SetReadOnly(true); - } - SetAgent(L"list", entity); - return 1; - } - - int GridSearch() - { - //alert(L"你好"); -#if 0 - - xstring m_config = L"view.Supplier.v3.config"; - xdwgrid dw = listwin::dw_list; - xaserverarg& arg = *new xaserverarg; - arg.setNativePointer(arg.CreateInstance()); - xstring str = TFile::node(m_config, L"config", L"search"); - if (str != L"") { - arg.AddArg(L"sheet", str); - } - else - arg.AddArg(L"sheet", L"dev:sheet[Supplier.v3.tpl/list]"); - arg.AddArg(L"search", listwin::m_QueryTxt); - openUrl(L"view.dlg.vface/xpage/grid/column/search", &arg); - xstring ok = arg.GetArgString(L"return"); - if (ok == L"ok") { - xstring txt = arg.GetArgString(L"search"); - if (txt != L"") { - listwin::m_QueryTxt = txt; - //trace(txt); - OnRetrieve(); - } - } -#endif - return 0; - } - - int OnSelectAllRow() - { - int rows = listwin::dw_list.GetRowCount(); - if (rows < 1) return -1; - listwin::dw_list.SelectRow(1, rows, true); - listwin::dw_list.Redraw(); - return 1; - } - - int OnRClick(TEvent evt, LPARAM p) - { - return 1; - } - int OnLogOff() - { - return 1; - } - int OnChecked() - { - xstring partyno = dw_list.GetItemString(dw_list.GetRow(), L"PartyNo"); - if (partyno.find(L"N") < 0) - { - alert(L"已经是正式供应商"); - return 0; - } - xstring entityid = GetEntityID(dw_list.GetRow()); - int MB_OKCANCEL = 1; - int IDOK = 1; - int ret = MessageBoxW(GetHWND(), L"是否转成正式供应商?", L"提示", MB_OKCANCEL); - if (ret == IDOK) - { - xml x = ViewObject::RetrieveData(GetServerUrl(), L"/sale/data/SupplierV3/entity/updateno", L"entityid", entityid); - - if (xstring(x.xml()).find(L"success") > 0) - { - alert(L"处理成功"); - OnRetrieve(); - } - } - return 1; - } - int PreOnCmdDispatch(xstring comdid) - { - //alert(comdid); - - if (comdid.find(L"action:LogOff", 0) >= 0) return OnLogOff(); - if (comdid.find(L"action:bill.delete", 0) >= 0) - { - OnDeleteRow(); - return 0; - } - if (comdid == L"action:search1") return GridSearch(); - if (comdid == L"action:bill.refresh") - { - return OnRetrieve(); - } - if (comdid == L"action:bill.xmSaveAs") - { - xstring userno = publiccode::GetUser().no; - if (userno == L"00701" || userno == L"00601" || userno == L"admin") - { - dw_list.SaveAs(L""); - } return 1; } - if (comdid == L"action:bill.Annex") + + //焦点激活处理函数 + int OnSetFocus(ref TEvent evt, int param) { - xaserverarg& arg = *new xaserverarg; + //重置工具条 + SetAgent(); + return 1; + } + + int OnSaveAs() + { + int i = dw_list.SaveAs(""); + if (i == 1) + alert("导出成功"); + return 1; + } + + int OnMatch() + { + xaserverarg arg = new xaserverarg; arg.setNativePointer(arg.CreateInstance()); - arg.AddArg(L"entityid", dw_list.GetItemString(dw_list.GetRow(), L"SupplierID")); - arg.AddArg(L"ApplyStatus", dw_list.GetItemString(dw_list.GetRow(), L"ApplyStatus")); - - OpenWindow(L"dev:xpage[maint.Document.Supplier.v3.vx]", (LPARAM)&arg); - return 1; - } - if (comdid == L"action:bill.AnnexEx") - { - xaserverarg& arg4 = *new xaserverarg; - arg4.setNativePointer(arg4.CreateInstance()); - arg4.AddArg(L"entityid", dw_list.GetItemString(dw_list.GetRow(), L"SupplierID")); - //arg4.AddArg(L"ApplyStatus",dw_list.GetItemString(dw_list.GetRow(),L"ApplyStatus")); - - //OpenWindow(L"dev:xpage[maint.Document.Customer.v3.vx]", p4); - OpenWindow(L"dev:xpage[maint.Document.SupplierSD.v3.vx]", (LPARAM)&arg4); - return 1; - } - if (comdid == L"action:bill.checked") - return OnChecked(); - // if(comdid==L"action:bill.import") return OnImport(); - // if(comdid.find(L"action:",0)>=0) return ProcessFlowAction(comdid,1); - //if(comdid==L"search") return GridSearch(L"view.dlg.vface/xpage/grid/column/edit"); - //if(comdid==L"showall") return ShowAll(); - - return 1; - } - - - int PostOnAttachEvent() - { - //获得树的选择事件 - AttachEvent(L"tv_1", L"TVN_SELCHANGED", (FEvent)&listSupplierv3::OnTreeSelChanged); - AttachEvent(L"cbx_1", L"CBN_SELCHANGE", (FEvent)&listSupplierv3::OnSelectDdlb); - AttachEvent(L"pages", L"PAGE_CLICK", (FEvent)&listSupplierv3::OnChangePages); - AttachEvent(L"dw_list", L"DWV_RCLICKED", (FEvent)&listSupplierv3::OnRClick);//鼠标右键 - //AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&listSupplierv3::OnDoubleClicked); - - return 1; - } - - int onload() - { - PIndex = 1; - listwin::m_QueryTxt = L""; //查询条件 - m_sType = L""; //type - m_sTypeTxt = L""; //选中树的data - - listwin::onload(); - - tv_1 = GetControl(L"tv_1"); - ddlb_1 = GetControl(L"cbx_1"); - - changeddlb = 0; - OnCreateTree(L"GoodsCates"); - dw_list.SetColumnState(L"SupplierID", false); - dw_list.SetColumnState(L"userNo", false); - dw_list.SetColumnState(L"YearEstablished", false); - dw_list.SetColumnState(L"LegalPerson", false); - dw_list.SetColumnState(L"ThirdPartyReport", false); - dw_list.SetColumnState(L"bAddress", false); - dw_list.SetColumnState(L"PayType", false); - dw_list.SetColumnState(L"PicPath", false); - dw_list.SetColumnState(L"SDID", false); - dw_list.SetColumnState(L"AdvantageProduct", false); - //dw_list.SetColumnState(L"ApplyStatus",false); - - dw_goods = GetControl(L"dw_goods"); - dw_goods.openUrl(GetServerUrl(), L"/sale/view/SupplierV3/template/supplier/supplieritem"); - - if (publiccode::GetUser().name != L"admin") - { - xstring s = publiccode::GetUser().id; - - xml supplier_x = ViewObject::RetrieveData(GetServerUrl(), L"/sale/data/SupplierV3/entity/FindBySaleType", L"id", s); - if (supplier_x) + int row = dw_list.GetNextSelectRow(1); + string items = ""; + while (row > 0 && row <= dw_list.GetRowCount()) { - TypeWork = supplier_x.text(); + msxml::IXMLDOMElement e = dw_list.GetRowElement(row); + string id = e.selectSingleNode("@guid").text; - if (TypeWork.find(L"采购") >= 0) - { + if (items == "") + items = id; + else + items += "," + id; + row = dw_list.GetNextSelectRow(row + 1); + } + xml x = ViewObject::RetrieveData("/sale/data/Enquiry/Update/UpdateQuoteLine", "ItemList", items); + OnSearch(); + return 1; + } - dw_list.SetColumnState(L"DateEx", false); - dw_list.SetColumnState(L"DateExS", false); - dw_list.SetColumnState(L"Name", false); - dw_list.SetColumnState(L"ProvinceCode", false); - dw_list.SetColumnState(L"City", false); - dw_list.SetColumnState(L"District", false); - dw_list.SetColumnState(L"Address", false); - dw_list.SetColumnState(L"CName", false); - dw_list.SetColumnState(L"TEL", false); - dw_list.SetColumnState(L"Mob", false); - dw_list.SetColumnState(L"AreaCode", false); - dw_list.SetColumnState(L"Fax", false); - dw_goods.SetColumnState(L"Price", false); - dw_goods.SetColumnState(L"PackRMBPrice", false); - dw_goods.SetColumnState(L"PartRMBPrice", false); - dw_goods.SetColumnState(L"PaperRMBPrice", false); - dw_goods.SetColumnState(L"ETD", false); - dw_goods.SetColumnState(L"InvoiceNo", false); + int OnPriceListSupplierEx() + { + xaserverarg arg = new xaserverarg; + arg.setNativePointer(arg.CreateInstance()); + arg.AddArg("sheetname", "tab_list2"); + arg.AddArg("EntityName", "Enquiry3"); + arg.AddArg("EntityID", ""); + arg.AddArg("EntityNo", ""); + arg.AddArg("Source", "quote"); + arg.AddArg("QuoteNo", GetControl("QuoteNo").GetText()); - } + int row = dw_list.GetNextSelectRow(1); + string items = ""; + //while(row > 0 && row <= dw_list.GetRowCount()) + for (row = 1; row <= dw_list.GetRowCount(); row++) + { + msxml::IXMLDOMElement e = dw_list.GetRowElement(row); + string id = e.selectSingleNode("@guid").text; + + if (items == "") + items = id; + else + items += "," + id; + //row = dw_list.GetNextSelectRow(row + 1); + } + arg.AddArg("EntityIDList", items); + int p = arg.ptr_native_; + OpenWindow("dev:xpage[Enquiry.maint.vx]", p); + return 1; + } + + //命令发布函数 + int OnCmdDispatch(string comdid) + { + if (comdid == "xmClose") + { + CloseWindow(); + return 1; + } + if (comdid == "xmSearch") + { + OnSearch(); + return 1; + } + if (comdid == "xmMatch") + { + OnMatch(); + return 1; + } + if (comdid == "xmMaint") + { + //win32::HideWindow(1); + OnPriceListSupplierEx(); + CloseWindow(); + return 1; + } + if (comdid == "xmSave") + { + return 1; + } + if (comdid == "xmSaveAs") + { + return OnSaveAs(); + } + return 0; + } + + //命令处理事件 + int OnXCommand(ref TXCommandEvent evt, int param) + { + return OnCmdDispatch(evt.pStrID); + } + + int OnAttachEvent() + { + //绑定工具条点击事件 + AttachEvent("WM_XCOMMAND", OnXCommand); + //获取焦点事件,用于重置工具条 + AttachEvent("WM_SETFOCUS", OnSetFocus); + } + + /*int OnRetrieve() + { + xml x = new xml; + x.setNativePointer(xml::CreateInstance()); + xaserverarg arg = new xaserverarg; + arg.setNativePointer(arg.CreateInstance()); + arg.AddArg("xxx","xxx"); + if (getUrl("",arg.GetString(),x)!=1) + { + trace(x.GetXmlDoc().text); + return -1; + }else + { + dw_list.Retrieve(x); + dw_list.Redraw(); + } + return 1; + }*/ + + + + int onload() + { + dw_list = GetControl("dw_list"); + dw_list.openUrl("/sale/view/Quote3/template/item/pricelist"); + dw_list.SetColumnState("ItemID", false); + dw_list.SetColumnState("Picture", false); + dw_list.SetColumnState("category", false); + dw_list.SetColumnState("RealEnquiryLineID", false); + dw_list.SetColumnState("RelEnquiryLineID", false); + + dw_list.SetSelectionMode(3); + + if (GetParam()) + { + string no = GetParam(); + + GetControl("QuoteNo").SetText(no); + OnSearch(); } + OnAttachEvent(); + + return 1; } - return 1; - } + int onloaded() + { + SetAgent(); - int onloaded() - { - AttachEvent(L"dw_list", L"DWV_ROWFOCUSCHANGED", (FEvent)&listSupplierv3::OnRowChangedEx); - - listwin::onloaded(); - xstring EntityID; - int row = dw_list.GetRow(); - if (row<0 || row>dw_list.GetRowCount()) return 1; - KXMLDOMElement ele = dw_list.GetRowElement(row); - xstring id = listwin::m_configDoc.selectSingleNode(L"//entity/EntityID[1]").text(); - if (ele.selectSingleNode(id)) - EntityID = ele.selectSingleNode(id).text(); - listwin::SetAgent(L"list", EntityID); - return 1; - } - -}; \ No newline at end of file + return 1; + } + }; +] \ No newline at end of file -- Gitblit v1.9.3