LiFan
2024-07-16 c73702d600ef2d0843ec7e3ace65f8c63c6905c2
jrj/project/business/BasicCode/FreightExpenseType.cpp
@@ -1,30 +1,45 @@
use "xcontrol.vframe.vbusiness.vd"
use "xbase.vframe.vbusiness.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 FreightExpenseTypeWin :  public xframe
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
using xml = KXMLDOMDocument;
   class __declspec(dllexport) FreightExpenseTypeWin :  public xframe
   {
   public:
      xdwgrid   dw_list;
      xnode   m_agentNode;   //Agent Condition
      int       seqno;
   public:
      FreightExpenseTypeWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static FreightExpenseTypeWin* CreateInstance(void* implPtr, void* hWnd)
      {
         FreightExpenseTypeWin* pWin = new FreightExpenseTypeWin(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;
@@ -35,11 +50,11 @@
         seqno = -1;
         for(int i=1; i<dw_list.GetRowCount();i++)
         {
            string val = dw_list.GetItemString(i,"FieldName");
            if(val.find("OtherFee")==0) continue;
            if(val.find("Other")==0)
            xstring val = dw_list.GetItemString(i,L"FieldName");
            if(val.find(L"OtherFee")==0) continue;
            if(val.find(L"Other")==0)
            {
               string no = val.mid(5,99999);
               xstring no = val.mid(5,99999);
               if(no.toInt()>seqno) seqno = no.toInt();
            }
         }
@@ -47,7 +62,7 @@
      }
            
      //焦点激活处理函数
      int OnSetFocus(ref TEvent evt,int param)
      int OnSetFocus(TEvent* evt, LPARAM param)
      {
         //重置工具条
         SetAgent();
@@ -58,52 +73,52 @@
      {
         dw_list.AcceptText();
         xml x= new xml;
         x.setNativePointer(xml::CreateInstance());
         dw_list.DwUpdateAllToEx(x.GetXmlDoc());
         
         xaserverarg arg = new xaserverarg;
         dw_list.DwUpdateAllToEx(x);
         xaserverarg arg;
         arg.setNativePointer(xaserverarg::CreateInstance());
         arg.AddArg("content",x.GetXml());
         arg.AddArg(L"content",x.xml());
         
         //trace(x.GetXml());
         //trace(x.xml());
         
         if(url::get("/sale/data/LogisticsCode/entity/freightexpensetype/update", arg.GetString(),x)!=1)
         if(xurl::get(L"/sale/data/LogisticsCode/entity/freightexpensetype/update", arg.GetString(),x)!=1)
         {
            string error = x.GetXmlDoc().text;
            alert("err:"+error);
            xstring error = x.text();
            alert(L"err:"+error);
            return 1;
         }
         //alert(x.GetXml());
         string str = x.GetXmlDoc().documentElement.getAttribute("text");
         trace(x.GetXml());
         if(str == "true")
         //alert(x.xml());
         xstring str = x.documentElement().getAttribute(L"text");
         trace(x.xml());
         if(str == L"true")
         {
            dw_list.ResetUpdateStatus();
            alert("保存成功!");
            alert(L"保存成功!");
         }else 
         {
            alert("保存失败!");
            alert(L"保存失败!");
         }
         return 1;
      }
            
      //命令发布函数
      int OnCmdDispatch(string comdid)
      int OnCmdDispatch(xstring comdid)
      {
         if(comdid=="xmAddRow")
         if(comdid==L"xmAddRow")
         {
            dw_list.InsertRow(0);
            if(seqno==-1) CalcSeqNo();
            seqno++;
            dw_list.SetItemString(dw_list.GetRowCount(),"FieldName", "Other"+seqno.toString());
            dw_list.SetItemString(dw_list.GetRowCount(),L"FieldName", L"Other"+xstring(seqno));
            return 1;
         }
         else if(comdid=="xmDeleteRow")
         else if(comdid==L"xmDeleteRow")
         {
            dw_list.DeleteRow(0);
            return 1;
         }
         else if(comdid=="xmSave")
         else if(comdid==L"xmSave")
         {
            return OnSave();
         }
@@ -111,26 +126,27 @@
      }
      
      //命令处理事件
      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)&FreightExpenseTypeWin::OnXCommand);
         //获取焦点事件,用于重置工具条
         AttachEvent("WM_SETFOCUS",OnSetFocus);
         AttachEvent(L"WM_SETFOCUS", (FEvent)&FreightExpenseTypeWin::OnSetFocus);
         return 1;
      }
      
      int  OnRetrieve()
      {
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         if (getUrl("/sale/data/LogisticsCode/entity/freightexpensetype/list","",x)!=1)
         if (getUrl(L"/sale/data/LogisticsCode/entity/freightexpensetype/list",L"",x)!=1)
         {
            trace(x.GetXmlDoc().text);
            trace(x.text());
            return -1;
         }else   
         {
@@ -142,9 +158,9 @@
      
      int onload()
      {
         dw_list = GetControl("dw_list");
         dw_list.openUrl("/sale/view/LogisticsCode/template/freightexpensetype/list");
         dw_list.SetColumnState("ID",false);
         dw_list = GetControl(L"dw_list");
         dw_list.openUrl(L"/sale/view/LogisticsCode/template/freightexpensetype/list");
         dw_list.SetColumnState(L"ID",false);
         OnAttachEvent();   
         seqno = -1;
         
@@ -157,5 +173,4 @@
         OnRetrieve();
         return 1;
      }      
   };
]
   };