Merge branch 'master' of http://116.62.18.175:6699/r/mis-prj

xj qian

2024-07-15 4988c8950db8640eaeb2498b51aca2dfed2c685b

 jrj/project/business/Company/HrPersonAdd.cpp

¶Ô±ÈÐÂÎļþ
@@ -0,0 +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"

//unit vclient.vobject tpp
unit vbusiness.xpage
[
   HrPersonAdd is extend frame;
   about HrPersonAdd
      [
         field:
         [
            HrEmployee lw_obj;
            xdwgrid__   dw_list;

            xnode__   m_agentNode;   //Agent Condition
            string   m_agentCond;   //Agent Node
            string   m_sTxt;
         ]

            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;
            }

            //焦点激活处理函数
            int OnSetFocus(ref TEvent evt, int 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 OnOK(string comdid)
            {
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = win__::GetParam();
               arg.AddArg("comdid", comdid);

               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  alert("请选择人员!");
                  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 OnCmdDispatch(string comdid)
            {
               if (comdid == "xmOk")
                  OnOK(comdid);
               else if (comdid == "query")
                  OnRetrieve();
               else if (comdid == "xmCancel")
                  CloseWindow();
               return 0;
            }

            //命令处理事件
            int OnXCommand(ref TXCommandEvent evt, int param)
            {
               return OnCmdDispatch(evt.pStrID);
            }

            int OnAttachEvent()
            {
               //绑定工具条点击事件
               AttachEvent("WM_XCOMMAND", OnXCommand);
               //获取焦点事件，用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
            }

            int OnInitial()
            {
               SetAgent();
               OnAttachEvent();
               return 1;
            }

            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);

               OnInitial();
               OnRetrieve();

               return 1;
            }
         ]

      ]
]