update

lifan

2025-09-11 9459286625f095613a7074c1cfd9cf95d88091f3

 jrj/project/business/BasicCode/TypeList.maint.supplier.cpp

@@ -1,39 +1,53 @@
use "xcontrol.vframe.vbusiness.vd"
use "xbase.vframe.vbusiness.vd"
use "base.view.vd"
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <wobject/xdouble.hpp>
#include <xcontrol/xlayersheet.hpp>
#include <xcontrol/xdatetimepick.hpp>

unit trade 
[
   class TypeListMaintWin :  public xframe

#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"

using xml = KXMLDOMDocument;
   class  __declspec(dllexport) TypeListMaintWin :  public xframe
   {
   public:
      xdwgrid   dw_list;
      xtreeview tv_folder;

      xnode   m_agentNode;   //Agent Condition

   public:
      TypeListMaintWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static TypeListMaintWin* CreateInstance(void* implPtr, void* hWnd)
      {
         TypeListMaintWin* pWin = new TypeListMaintWin(implPtr, (HWND)hWnd);
         return pWin;
      }
      int SetAgent()
      {
         string xfNodeAgentArea  = "agentarea";
         xstring xfNodeAgentArea  = L"agentarea";
         xnode anode = GetAgentNode(xfNodeAgentArea);
         if(m_agentNode)
         {
            SetAgentNodeContent (anode,m_agentNode);
            SetAgentNode (anode,m_agentNode);
         }
         else
         {
            msxml::IXMLDOMElement xframeElement =  GetElement();
            msxml::IXMLDOMElement agent = xframeElement.selectSingleNode("agent/"+xfNodeAgentArea+"[1]/*");
            KXMLDOMElement xframeElement =  GetElement();
            KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/"+xfNodeAgentArea+L"[1]/*");
            if(agent)
            {
               string s = agent.xml;
               m_agentNode =  SetAgentNodeContent (anode,s);
               xstring s = agent.xml();
               m_agentNode =  SetAgentNode (anode,s);
            }
         }
         return 1;
      }

      //焦点激活处理函数
      int OnSetFocus(ref TEvent evt,int param)
      int OnSetFocus(TEvent* evt, LPARAM param)
      {
         //重置工具条
         SetAgent();
@@ -42,47 +56,47 @@

      int OnSave()
      {
         xml x = ViewObject::MakeXml();
         xaserverarg arg = ViewObject::MakeArg();
         xml x;
         xaserverarg arg ;
         
         xml x1 = ViewObject::MakeXml();
         x1.LoadXml("<root/>");
         xml x1;
         x1.loadXML(L"<root/>");
         
         dw_list.DwUpdateAllToEx(x.GetXmlDoc());
         msxml::IXMLDOMNodeList t = x.GetXmlDoc().selectNodes("root/Supplier[@update.modify]");
         msxml::IXMLDOMElement e1= x1.GetXmlDoc().documentElement;
         int len = t.length;
         dw_list.DwUpdateAllToEx(x);
         KXMLDOMNodeList t = x.selectNodes(L"root/Supplier[@update.modify]");
         KXMLDOMElement e1= x1.documentElement();
         int len = t.length();
         for(int i=0;i<len;i++)
         {
            e1.appendChild(t.item(i));
         }
         arg.AddArg("content",x1.GetXml());
         if(url::get("/sale/data/SupplierV3/entity/save/v3", arg.GetString(),x)!=1)
         arg.AddArg(L"content",x1.xml());
         if(xurl::get(L"/sale/data/SupplierV3/entity/save/v3", arg.GetString(),x)!=1)
         {
            string error = x.GetXmlDoc().text;
            xstring error = x.text();
            alert(error);
            return 1;
         }else
         {
            
            if( x.GetXmlDoc().selectSingleNode("ok"))
            if( x.selectSingleNode(L"ok"))
            {
               alert("保存成功");
               alert(L"保存成功");
               dw_list.ResetUpdateStatus();
            }else
            {
               alert("保存失败!");
               alert(L"保存失败!");
            }
         }
         return 1;
      }
            
      //命令发布函数
      int OnCmdDispatch(string comdid)
      int OnCmdDispatch(xstring comdid)
      {
         if(comdid=="xmSave")
         if(comdid==L"xmSave")
            return OnSave();
         else if(comdid=="xmSearch")
         else if(comdid==L"xmSearch")
            return OnRetrieve();
         
         return 0;
@@ -90,12 +104,12 @@
      
      int OnRetrieve()
      {
         int hItem =tv_folder.GetSelectedItem();
         string typ = tv_folder.GetItemData(hItem);
         string searchStr = GetControl("SearchContent").GetText();
         HTREEITEM hItem =tv_folder.GetSelectedItem();
         xstring typ = tv_folder.GetItemData(hItem);
         xstring searchStr = xcontrol(GetControl(L"SearchContent")).GetText();
         
         int hCursor = xutil::SetCursorWait();
         xml x = ViewObject::RetrieveData("/sale/data/SupplierV3/type/list", "sType",typ,"SearchText",searchStr);
         HCURSOR hCursor = xutil::SetCursorWait();
         xml x = ViewObject::RetrieveData(L"/sale/data/SupplierV3/type/list", L"sType",typ,L"SearchText",searchStr);
         if(x) 
            dw_list.Retrieve(x);
         else
@@ -107,39 +121,40 @@
      }
      
      //树选择
      int OnTreeSelChanged(ref TNotifyEvent evt,int p)
      int OnTreeSelChanged(TEvent* evt, int p)
      {
         ref NMTREEVIEW nmtv = cast(evt.pnmh as NMTREEVIEW);
         int hItem = nmtv.itemNew.hItem;
         NMTREEVIEW& nmtv = *(NMTREEVIEW*)evt->notify.pnmh;
			
         HTREEITEM hItem = nmtv.itemNew.hItem;
         return OnRetrieve();
      }
				
         //命令处理事件
      int OnXCommand(ref TXCommandEvent evt,int param)
      int OnXCommand(TEvent* evt, LPARAM param)
      {
         return OnCmdDispatch(evt.pStrID);
         return OnCmdDispatch(evt->xcommand.pStrID);
      }
      
      int OnAttachEvent()
      {
         //绑定工具条点击事件
         AttachEvent("WM_XCOMMAND",OnXCommand);
         AttachEvent(L"WM_XCOMMAND", (FEvent)&TypeListMaintWin::OnXCommand);
         //获取焦点事件，用于重置工具条
         AttachEvent("WM_SETFOCUS",OnSetFocus);
         AttachEvent("tv_folder", "TVN_SELCHANGED",OnTreeSelChanged);
         AttachEvent(L"WM_SETFOCUS", (FEvent)&TypeListMaintWin::OnSetFocus);
         AttachEvent(L"tv_folder", L"TVN_SELCHANGED", (FEvent)&TypeListMaintWin::OnTreeSelChanged);
         return 1;
      }
      
      /*
      int  OnRetrieve()
      {
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         xaserverarg arg = new xaserverarg;
         arg.setNativePointer(arg.CreateInstance());	
         arg.AddArg("xxx","xxx");
         if (getUrl("",arg.GetString(),x)!=1)
         xml x ;
			
         xaserverarg arg;
			
         arg.AddArg(L"xxx",L"xxx");
         if (getUrl(L"",arg.GetString(),x)!=1)
         {
            trace(x.GetXmlDoc().text);
            trace(x.text);
            return -1;
         }else   
         {
@@ -152,12 +167,12 @@
      
      int onload()
      {
         dw_list = GetControl("dw_list");
         dw_list.openUrl("/sale/view/SupplierV3/template/supplier/mainttypelist");
         dw_list = GetControl(L"dw_list");
         dw_list.openUrl(L"/sale/view/SupplierV3/template/supplier/mainttypelist");
         
         tv_folder = GetControl("tv_folder");
         tv_folder = GetControl(L"tv_folder");
         OnAttachEvent();   
         xtreeview::ExpandItem(tv_folder.GetId(),xtreeview::GetRootItem(tv_folder.GetId()));
         tv_folder.ExpandItem(tv_folder.GetRootItem());
         
         return 1;
      }
@@ -168,5 +183,4 @@
         
         return 1;
      }      
   };
]
   };