LiFan
2024-07-15 871adf001724fb4af2552ab4f580939b9bbc2dda
jrj/project/business/Company/HrPersonAdd.cpp
@@ -1,51 +1,53 @@
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:
         [
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
using xml = KXMLDOMDocument;
class __declspec(dllexport) HrPersonAdd : public xframe
{
public:
            HrEmployee lw_obj;
            xdwgrid__   dw_list;
   xdwgrid   dw_list;
            xnode__   m_agentNode;   //Agent Condition
            string   m_agentCond;   //Agent Node
            string   m_sTxt;
         ]
            method:
         [
   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()
            {
               string xfNodeAgentArea = "agentarea";
               xnode__ anode = new xnode__;
               anode.setNativePointer(GetAgentNode(xfNodeAgentArea));
               var xframeElement = GetElement();
               var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*");
      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)
               {
                  string s = agent.xml;
                  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();
               //重置工具条
@@ -54,17 +56,17 @@
            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)
      control xc = new control;
      xc.setNativePointer(GetControl(L"QueryTxt"));
      m_sTxt = xc.GetText() + L"";
      xml x;
      xaserverarg arg;
      arg.AddArg(L"sTxt", m_sTxt);
      if (xurl::post(L"OrganizationStruct/select.Person", arg.GetString(), x) != 1)
               {
                  trace(x.GetXmlDoc().text);
         trace(x.text());
                  return -1;
               }
               else
@@ -76,27 +78,27 @@
               return 1;
            }
            int OnOK(string comdid)
   int OnOK(xstring comdid)
            {
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = win__::GetParam();
               arg.AddArg("comdid", comdid);
      xaserverarg arg;
      arg = GetArg();
      arg.AddArg(L"comdid", comdid);
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  alert("请选择人员!");
         alert(L"请选择人员!");
                  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);
         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();
@@ -104,29 +106,29 @@
            }
            //命令发布函数
            int OnCmdDispatch(string comdid)
   int OnCmdDispatch(xstring comdid)
            {
               if (comdid == "xmOk")
      if (comdid == L"xmOk")
                  OnOK(comdid);
               else if (comdid == "query")
      else if (comdid == L"query")
                  OnRetrieve();
               else if (comdid == "xmCancel")
      else if (comdid == L"xmCancel")
                  CloseWindow();
               return 0;
            }
            //命令处理事件
            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)&HrPersonAdd::OnXCommand);
               //获取焦点事件,用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
      AttachEvent(L"WM_SETFOCUS", (FEvent)&HrPersonAdd::OnSetFocus);
      return 1;
            }
            int OnInitial()
@@ -138,9 +140,10 @@
            int onload()
            {
               dw_list = new xdwgrid__;
               dw_list.setNativePointer(this.GetControl("dw_list"));
               dw_list.openUrl("组织架构.vface/template/HrEmployee/PersonSel");
      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);
@@ -149,7 +152,4 @@
               return 1;
            }
         ]
      ]
]
};