LiFan
2024-07-16 c73702d600ef2d0843ec7e3ace65f8c63c6905c2
jrj/project/business/BasicCode/ProfitParam.cpp
@@ -1,38 +1,52 @@
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 ProfitParamList :  public frame
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
using xml = KXMLDOMDocument;
   class __declspec(dllexport) ProfitParamList :  public xframe
   {
   public:
      xdwgrid   dw_list;
      xnode   m_agentNode;   //Agent Condition
   public:
      ProfitParamList(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static ProfitParamList* CreateInstance(void* implPtr, void* hWnd)
      {
         ProfitParamList* pWin = new ProfitParamList(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();
@@ -41,37 +55,37 @@
      int OnSave()
      {
         xml x = new xml;
         x.setNativePointer(xml::CreateInstance());
         dw_list.AcceptText();
         dw_list.DwUpdateAllToEx(x.GetXmlDoc());
         xaserverarg arg = new xaserverarg;
         dw_list.DwUpdateAllToEx(x);
         xaserverarg arg;
         arg.setNativePointer(xaserverarg::CreateInstance());
         arg.AddArg("content",x.GetXml());
         if(url::get("/sale/data/Gdn/update/ProParamUpdate", arg.GetString(),x)!=1)
         arg.AddArg(L"content",x.xml());
         if(xurl::get(L"/sale/data/Gdn/update/ProParamUpdate", arg.GetString(),x)!=1)
         {
            string error = x.GetXmlDoc().text;
            alert("err:"+error);
            xstring error = x.text();
            alert(L"err:"+error);
            return 1;
         }
         string str = x.GetXmlDoc().documentElement.getAttribute("text");
         if(str == "true")
         xstring str = x.documentElement().getAttribute(L"text");
         if(str == L"true")
         {
            dw_list.ResetUpdateStatus();
            dw_list.Redraw();
            alert("保存成功!");
            alert(L"保存成功!");
         }else 
         {
            alert("保存失败!");
            alert(L"保存失败!");
         }
      }
      //命令发布函数
      int OnCmdDispatch(string comdid)
      int OnCmdDispatch(xstring comdid)
      {
         if(comdid == "xmsave")
         if(comdid == L"xmsave")
         {
            OnSave();
         }
         else if(comdid == "xmrefresh")
         else if(comdid == L"xmrefresh")
         {
            OnRetrieve();
         }
@@ -79,27 +93,28 @@
      }
      
      //命令处理事件
      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)&ProfitParamList::OnXCommand);
         //获取焦点事件,用于重置工具条
         AttachEvent("WM_SETFOCUS",OnSetFocus);
         AttachEvent(L"WM_SETFOCUS", (FEvent)&ProfitParamList::OnSetFocus);
         return 1;
      }
      
      
      int  OnRetrieve()
      {
         xml x = new xml;
         x = ViewObject::RetrieveData("/sale/data/Gdn/profit/profitParamList");
         x = ViewObject::RetrieveData(L"/sale/data/Gdn/profit/profitParamList");
         if(x)
         {
            //alert(x.GetXml());
            //alert(x.xml());
            dw_list.Retrieve(x);
            dw_list.Redraw();
         }
@@ -109,8 +124,8 @@
      int onload()
      {
         OnAttachEvent();   
         dw_list = GetControl("dw_list");
         dw_list.openUrl("/sale/view/VATNotify/template/profitparam/list");
         dw_list = GetControl(L"dw_list");
         dw_list.openUrl(L"/sale/view/VATNotify/template/profitparam/list");
         
         OnRetrieve();
         return 1;
@@ -123,4 +138,3 @@
         return 1;
      }      
   };
]