LiFan
2024-07-15 ff3a1ed12e84447954c8ac76ba8712f209504f04
jrj/project/business/Company/HrPersonAdd.cpp
@@ -1,155 +1,155 @@
use "win.vl"
use "dev:vm[xdwgrid.vm]"
use "dev:vm[xdwtable.vm]"
use "pref.vl"
use "dev:vm[xml.vm]"
use "dev:vm[xaserverarg.vm]"
use "dev:vm[xaserver.vm]"
use "dev:vm[xutil.vm]"
use "frame.vl"
use "treeview.vm"
use "dev:code[HrEmployee.vx]"
use "publiccode.vl"
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <wobject/xdouble.hpp>
#include <xcontrol/xlayersheet.hpp>
//unit vclient.vobject tpp
unit vbusiness.xpage
[
   HrPersonAdd is extend frame;
   about HrPersonAdd
      [
         field:
         [
            HrEmployee lw_obj;
            xdwgrid__   dw_list;
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
            xnode__   m_agentNode;   //Agent Condition
            string   m_agentCond;   //Agent Node
            string   m_sTxt;
         ]
using xml = KXMLDOMDocument;
class __declspec(dllexport) HrPersonAdd : public xframe
{
public:
   HrEmployee lw_obj;
   xdwgrid   dw_list;
            method:
         [
            int SetAgent()
            {
               string xfNodeAgentArea = "agentarea";
               xnode__ anode = new xnode__;
               anode.setNativePointer(GetAgentNode(xfNodeAgentArea));
               var xframeElement = GetElement();
               var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*");
               if (agent)
               {
                  string s = agent.xml;
                  SetAgentNodeContent(anode, s);
               }
               return 1;
            }
   xnode   m_agentNode;   //Agent Condition
   xstring   m_agentCond;   //Agent Node
   xstring   m_sTxt;
public:
   HrPersonAdd(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
public:
   static HrPersonAdd* CreateInstance(void* implPtr, void* hWnd)
   {
      HrPersonAdd* pWin = new HrPersonAdd(implPtr, (HWND)hWnd);
      return pWin;
   }
   int SetAgent()
   {
      xstring xfNodeAgentArea = L"agentarea";
      xnode anode = GetAgentNode(xfNodeAgentArea);
      if (m_agentNode)
      {
         SetAgentNode(anode, m_agentNode);
      }
      else
      {
         KXMLDOMElement xframeElement = GetElement();
         KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*");
         if (agent)
         {
            xstring s = agent.xml();
            m_agentNode = SetAgentNode(anode, s);
         }
      }
      return 1;
   }
            //焦点激活处理函数
            int OnSetFocus(ref TEvent evt, int param)
            {
               SetAgent();
               //重置工具条
               return 1;
            }
   //焦点激活处理函数
   int OnSetFocus(TEvent* evt, LPARAM param)
   {
      SetAgent();
      //重置工具条
      return 1;
   }
            int  OnRetrieve()
            {
               control__ xc = new control__;
               xc.setNativePointer(this.GetControl("QueryTxt"));
               m_sTxt = xc.GetText() + "";
               xml__ x = new xml__;
               x.setNativePointer(x.CreateInstance());
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg.AddArg("sTxt", m_sTxt);
               if (url::post("OrganizationStruct/select.Person", arg.GetString(), x) != 1)
               {
                  trace(x.GetXmlDoc().text);
                  return -1;
               }
               else
               {
                  dw_list.Retrieve(x);
                  dw_list.Redraw();
                  dw_list.SetReadOnly(true);
               }
               return 1;
            }
   int  OnRetrieve()
   {
      control xc = new control;
      xc.setNativePointer(GetControl(L"QueryTxt"));
      m_sTxt = xc.GetText() + L"";
      xml x;
            int OnOK(string comdid)
            {
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = win__::GetParam();
               arg.AddArg("comdid", comdid);
      xaserverarg arg;
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  alert("请选择人员!");
                  return 1;
               }
      arg.AddArg(L"sTxt", m_sTxt);
      if (xurl::post(L"OrganizationStruct/select.Person", arg.GetString(), x) != 1)
      {
         trace(x.text());
         return -1;
      }
      else
      {
         dw_list.Retrieve(x);
         dw_list.Redraw();
         dw_list.SetReadOnly(true);
      }
      return 1;
   }
               while (row > 0)
               {
                  msxml::IXMLDOMElement e = dw_list.GetRowElement(row);
                  string sPersonID = e.selectSingleNode("PersonID").text + "";
                  string sPersonName = e.selectSingleNode("Name").text + "";
                  arg.AddArg("sPersonID", sPersonID);
                  arg.AddArg("sPersonName", sPersonName);
                  row = dw_list.GetNextSelectRow(row + 1);
               }
               CloseWindow();
               return 1;
            }
   int OnOK(xstring comdid)
   {
      xaserverarg arg;
            //命令发布函数
            int OnCmdDispatch(string comdid)
            {
               if (comdid == "xmOk")
                  OnOK(comdid);
               else if (comdid == "query")
                  OnRetrieve();
               else if (comdid == "xmCancel")
                  CloseWindow();
               return 0;
            }
      arg = GetArg();
      arg.AddArg(L"comdid", comdid);
            //命令处理事件
            int OnXCommand(ref TXCommandEvent evt, int param)
            {
               return OnCmdDispatch(evt.pStrID);
            }
      int row = dw_list.GetNextSelectRow(1);
      if (row < 1)
      {
         alert(L"请选择人员!");
         return 1;
      }
            int OnAttachEvent()
            {
               //绑定工具条点击事件
               AttachEvent("WM_XCOMMAND", OnXCommand);
               //获取焦点事件,用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
            }
      while (row > 0)
      {
         KXMLDOMElement e = dw_list.GetRowElement(row);
         xstring sPersonID = e.selectSingleNode(L"PersonID").text() + (xstring)L"";
         xstring sPersonName = e.selectSingleNode(L"Name").text() + (xstring)L"";
         arg.AddArg(L"sPersonID", sPersonID);
         arg.AddArg(L"sPersonName", sPersonName);
         row = dw_list.GetNextSelectRow(row + 1);
      }
      CloseWindow();
      return 1;
   }
            int OnInitial()
            {
               SetAgent();
               OnAttachEvent();
               return 1;
            }
   //命令发布函数
   int OnCmdDispatch(xstring comdid)
   {
      if (comdid == L"xmOk")
         OnOK(comdid);
      else if (comdid == L"query")
         OnRetrieve();
      else if (comdid == L"xmCancel")
         CloseWindow();
      return 0;
   }
            int onload()
            {
               dw_list = new xdwgrid__;
               dw_list.setNativePointer(this.GetControl("dw_list"));
               dw_list.openUrl("组织架构.vface/template/HrEmployee/PersonSel");
               dw_list.SetSelectionMode(4); //3
               dw_list.SetReadOnly(true);
   //命令处理事件
   int OnXCommand(TEvent* evt, LPARAM param)
   {
      return OnCmdDispatch(evt->xcommand.pStrID);
   }
   int OnAttachEvent()
   {
      //绑定工具条点击事件
      AttachEvent(L"WM_XCOMMAND", (FEvent)&HrPersonAdd::OnXCommand);
      //获取焦点事件,用于重置工具条
      AttachEvent(L"WM_SETFOCUS", (FEvent)&HrPersonAdd::OnSetFocus);
      return 1;
   }
               OnInitial();
               OnRetrieve();
   int OnInitial()
   {
      SetAgent();
      OnAttachEvent();
      return 1;
   }
               return 1;
            }
         ]
   int onload()
   {
      SetArg();
      dw_list = new xdwgrid;
      dw_list.setNativePointer(GetControl(L"dw_list"));
      dw_list.openUrl(L"组织架构.vface/template/HrEmployee/PersonSel");
      dw_list.SetSelectionMode(4); //3
      dw_list.SetReadOnly(true);
      ]
]
      OnInitial();
      OnRetrieve();
      return 1;
   }
};