From b3d77b8716c3bce1a556c53656a14879c7e913cb Mon Sep 17 00:00:00 2001 From: LiFan <2308045698@qq.com> Date: 星期三, 10 七月 2024 10:01:11 +0800 Subject: [PATCH] update Enquiry --- jrj/project/business/Enquiry/ProductSchema.cpp | 542 +++++ jrj/project/business/Enquiry/SKU.PictureView.Product3.cpp | 542 +++++ jrj/project/business/Enquiry/ViewPictures.cpp | 542 +++++ jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp | 542 +++++ jrj/project/business/Enquiry/Enquiry.maint.cpp | 542 +++++ jrj/project/business/Enquiry/PriceList.PurcharItemSelect.cpp | 542 +++++ jrj/project/business/Enquiry/Entity.Product.Select.cpp | 542 +++++ jrj/project/business/Enquiry/PriceList.PurcharItemSelectEx.cpp | 542 +++++ jrj/project/business/Enquiry/QuoteFile.cpp | 542 +++++ jrj/project/business/Enquiry/ProductSchemaSelect.cpp | 542 +++++ jrj/ext-jrj/ext-jrj.vcxproj | 10 jrj/ext-jrj/ext-jrj.vcxproj.filters | 33 12 files changed, 5,463 insertions(+), 0 deletions(-) diff --git a/jrj/ext-jrj/ext-jrj.vcxproj b/jrj/ext-jrj/ext-jrj.vcxproj index f4b9ad2..8b7a5a5 100644 --- a/jrj/ext-jrj/ext-jrj.vcxproj +++ b/jrj/ext-jrj/ext-jrj.vcxproj @@ -298,6 +298,16 @@ <ExcludedFromBuild Condition="'$(Configuration)|$(Platform)'=='Release|x64'">true</ExcludedFromBuild> </ClCompile> <ClCompile Include="..\project\business\EnquiryEx3.list.cpp" /> + <ClCompile Include="..\project\business\Enquiry\Enquiry.maint.cpp" /> + <ClCompile Include="..\project\business\Enquiry\EnquiryEx.quote.vx.cpp" /> + <ClCompile Include="..\project\business\Enquiry\Entity.Product.Select.cpp" /> + <ClCompile Include="..\project\business\Enquiry\PriceList.PurcharItemSelect.cpp" /> + <ClCompile Include="..\project\business\Enquiry\PriceList.PurcharItemSelectEx.cpp" /> + <ClCompile Include="..\project\business\Enquiry\ProductSchema.cpp" /> + <ClCompile Include="..\project\business\Enquiry\ProductSchemaSelect.cpp" /> + <ClCompile Include="..\project\business\Enquiry\QuoteFile.cpp" /> + <ClCompile Include="..\project\business\Enquiry\SKU.PictureView.Product3.cpp" /> + <ClCompile Include="..\project\business\Enquiry\ViewPictures.cpp" /> <ClCompile Include="..\project\business\Expense\BasicFare.cpp"> <ExcludedFromBuild Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">false</ExcludedFromBuild> </ClCompile> diff --git a/jrj/ext-jrj/ext-jrj.vcxproj.filters b/jrj/ext-jrj/ext-jrj.vcxproj.filters index 29c3548..7272430 100644 --- a/jrj/ext-jrj/ext-jrj.vcxproj.filters +++ b/jrj/ext-jrj/ext-jrj.vcxproj.filters @@ -106,6 +106,9 @@ <Filter Include="project\business\Expense"> <UniqueIdentifier>{50e3db89-5f6f-425b-8a5d-3cb86b80eacb}</UniqueIdentifier> </Filter> + <Filter Include="project\business\Enquiry"> + <UniqueIdentifier>{ac880186-5122-46db-b017-b44f7fdacc38}</UniqueIdentifier> + </Filter> </ItemGroup> <ItemGroup> <ClInclude Include="framework.h"> @@ -770,5 +773,35 @@ <ClCompile Include="..\project\business\Expense\TestExpenseBase2.cpp"> <Filter>project\business\Expense</Filter> </ClCompile> + <ClCompile Include="..\project\business\Enquiry\Enquiry.maint.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\EnquiryEx.quote.vx.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\Entity.Product.Select.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\PriceList.PurcharItemSelect.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\PriceList.PurcharItemSelectEx.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\ProductSchema.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\ProductSchemaSelect.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\QuoteFile.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\SKU.PictureView.Product3.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> + <ClCompile Include="..\project\business\Enquiry\ViewPictures.cpp"> + <Filter>project\business\Enquiry</Filter> + </ClCompile> </ItemGroup> </Project> \ No newline at end of file diff --git a/jrj/project/business/Enquiry/Enquiry.maint.cpp b/jrj/project/business/Enquiry/Enquiry.maint.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/Enquiry.maint.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp b/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/EnquiryEx.quote.vx.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/Entity.Product.Select.cpp b/jrj/project/business/Enquiry/Entity.Product.Select.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/Entity.Product.Select.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/PriceList.PurcharItemSelect.cpp b/jrj/project/business/Enquiry/PriceList.PurcharItemSelect.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/PriceList.PurcharItemSelect.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/PriceList.PurcharItemSelectEx.cpp b/jrj/project/business/Enquiry/PriceList.PurcharItemSelectEx.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/PriceList.PurcharItemSelectEx.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/ProductSchema.cpp b/jrj/project/business/Enquiry/ProductSchema.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/ProductSchema.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/ProductSchemaSelect.cpp b/jrj/project/business/Enquiry/ProductSchemaSelect.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/ProductSchemaSelect.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/QuoteFile.cpp b/jrj/project/business/Enquiry/QuoteFile.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/QuoteFile.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/SKU.PictureView.Product3.cpp b/jrj/project/business/Enquiry/SKU.PictureView.Product3.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/SKU.PictureView.Product3.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 diff --git a/jrj/project/business/Enquiry/ViewPictures.cpp b/jrj/project/business/Enquiry/ViewPictures.cpp new file mode 100644 index 0000000..6c3d5bb --- /dev/null +++ b/jrj/project/business/Enquiry/ViewPictures.cpp @@ -0,0 +1,542 @@ +#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) 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) + { + listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); + return pWin; + } + int OnRetrieve() + { + xml x; + + 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) + { + 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()); + } + //alert(x.GetXml()); + dw_list.Retrieve(x); + dw_list.Redraw(); + dw_list.SetReadOnly(true); + } + return 1; + } + + 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") + { + 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) + { + TypeWork = supplier_x.text(); + + if (TypeWork.find(L"采购") >= 0) + { + + 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); + + } + } + + } + + return 1; + } + + 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 -- Gitblit v1.9.3