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

xj qian

2024-07-15 4988c8950db8640eaeb2498b51aca2dfed2c685b

 jrj/project/business/Company/HRPerson.cpp

¶Ô±ÈÐÂÎļþ
@@ -0,0 +1,275 @@
use "win.vl"
use "dev:vm[xdwgrid.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"
//unit vclient.vobject tpp
unit vbusiness.xpage
[
   HrPerson is extend frame;
   about HrPerson
   [
      control:
		
      method:
      [
         xdwgrid__   dw_list;
         xdwgrid__   dw_HrEmployee;
         string      m_sTxt;

         xnode__   m_agentNode;   //Agent Condition
         string   m_agentCond;   //Agent Node
         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 p)
         {
            SetAgent();

            //重置工具条
            return 1;
         }

         //xgridex双击
         int OnDoubleClicked(ref TNotifyEvent evt,int p)
         {
            ref DWNMHDR  hdr = evt.pnmh;
            int row = hdr.row;
            if(row < 1 || row > dw_list.GetRowCount()) 
               return 1;
            msxml::IXMLDOMElement e = dw_list.GetRowElement(row);
            string sguid =  e.SelectSingleNode("@guid").text;
            xaserverarg__ arg = new xaserverarg__; 
            arg.setNativePointer(arg.CreateInstance());	
            arg.AddArg("operate","modify");
            arg.AddArg("guid",sguid);
            //trace(sguid);
            //xwin::OpenWindow("dev:xpage[HrPersonMaint.xpage]",arg);
            openUrl("组织架构.vface/xpage/Hr/HrPersonMaint", arg);		
            return 1;
         }
         //行改变
         int OnRowFocusChanged(ref TNotifyEvent evt,int p)
         {
            ref DWNMHDR  hdr = evt.pnmh;
            int row = hdr.row;
            if(row < 1 || row > dw_list.GetRowCount()) 
               return 1;
            msxml::IXMLDOMElement e = dw_list.GetRowElement(row);
            string sPersonID =  e.SelectSingleNode("@guid").text;
            xml__ x = new xml__;
            x.setNativePointer(x.CreateInstance());
            xaserverarg__ arg = new xaserverarg__;
            arg.setNativePointer(arg.CreateInstance());	
            arg.AddArg("guid",sPersonID);
				
            if (url::get("OrganizationStruct/Person.HrEmployee",arg.GetString(),x) != 1)
            {
               trace(x.GetXmlDoc().text);
               return -1;
            }else	
            {
               dw_HrEmployee.Retrieve(x);
               dw_HrEmployee.Redraw();
            }
				
            return 1;
         }

         int  OnRetrieve()
         {
            xml__ x = new xml__;
            x.setNativePointer(x.CreateInstance());
            xaserverarg__ arg = new xaserverarg__;
            arg.setNativePointer(arg.CreateInstance());
            arg.AddArg("sTxt",m_sTxt);
            if (url::get("OrganizationStruct/list.HrPerson",arg.GetString(),x) != 1)
            {
               trace(x.GetXmlDoc().text);
               return -1;
            }
            else	
            {
               dw_list.Retrieve(x);
               dw_list.Redraw();
            }
      //      if (dw_list.GetRowCount() >0)
      //         OnRowFocusChanged();
            dw_list.SetReadOnly(true);
            return 1;
         }

         int OnSearch()
         {
            control__ xc = new control__;
            xc.setNativePointer(this.GetControl("QueryTxt"));		
            m_sTxt= xc.GetText();
            OnRetrieve();
            return 1;
         }

         int OnUpdateAssignmentView()
         {
            xml__ x1 = new xml__;
            x1.setNativePointer(x1.CreateInstance());
            if (url::post("OrganizationStruct/update.Assignmentview","",x1) != 1)
            {
               string error = x1.GetXmlDoc().text;
               trace(error);
               return 1;
            }	
            else
            {
               trace(x1.GetXml());
               win__::MessageBox(GetHWND(),"更新成功！","提示",0);			
            }
            return 1;
         }
				
         //命令发布函数
         int OnCmdDispatch(string comdid)
         {
            xaserverarg__ arg = new xaserverarg__; 
            arg.setNativePointer(arg.CreateInstance());
            msxml::IXMLDOMElement e;	
            string sPersonID;
            string sName;				
            if (comdid =="AddPerson") 
            {
               arg.AddArg("operate","new0");
               arg.AddArg("guid","");
               openUrl("组织架构.vface/xpage/Hr/HrPersonMaint", arg);			
            }
            else if(comdid=="UpdateAssignmentView")
               OnUpdateAssignmentView();
            else if (comdid =="ModifyPerson")
            {
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  row = dw_list.GetRow();
                  if (row < 1) 
                  {
                     win__::MessageBox(GetHWND(),"请选中要修改的人员行！","提示",0);
                     return -1;
                  }
               }
               e = dw_list.GetRowElement(row);
               sPersonID = e.SelectSingleNode("@guid").text;
               arg.AddArg("operate","modify");
               arg.AddArg("guid",sPersonID);
               openUrl("组织架构.vface/xpage/Hr/HrPersonMaint", arg);		
            }
            else if (comdid =="DeletePerson")
            {
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  row = dw_list.GetRow();
                  if (row < 1) 
                  {
                     win__::MessageBox(GetHWND(),"请选中要删除的人员行！","提示",0);
                     return -1;
                  }
               }

               e = dw_list.GetRowElement(row);
               sPersonID =  e.SelectSingleNode("@guid").text;
               sName = e.selectSingleNode("Name").text;					
               sName += "";
               int  MB_YESNO = 0x00000004;
               int  IDYES =  6;			
               if(win__::MessageBox(GetHWND(),"确认要删除 "+sName+" çš„信息吗？","提示",MB_YESNO)!=IDYES) return 1;


               arg.AddArg("guid",sPersonID);

					
               xml__ x1 = new xml__;
               x1.setNativePointer(x1.CreateInstance());
               if (url::post("OrganizationStruct/delete.HrPerson",arg.GetString(),x1) != 1)
               {
                  string error = x1.GetXmlDoc().text;
                  trace(error);
               }
               else
               {
                  //win32::MessageBox(GetHWND(),"删除成功！","提示",0);
                  dw_list.DeleteRow(row);
               }
            }
            else if (comdid =="Refresh")
            {
               OnRetrieve();
            }					
            else if (comdid =="search" || comdid=="query")
            {
               OnSearch();
            }					
            return 0;
         }
			
         //命令处理事件
         int OnXCommand(ref TXCommandEvent evt,int param)
         {
            return OnCmdDispatch(evt.pStrID);
         }
			
         int OnAttachEvent()
         {
            //绑定工具条点击事件
            AttachEvent("WM_XCOMMAND",OnXCommand);
            //获取焦点事件，用于重置工具条
            AttachEvent("WM_SETFOCUS",OnSetFocus);
            AttachEvent("dw_list","DWV_CLICKED",OnRowFocusChanged);
            AttachEvent("dw_list","DWV_DOUBLECLICKED",OnDoubleClicked);
         }

         int OnInitial()
         {
            SetAgent();

            OnAttachEvent();
				
            return 1;
         }
			
         int onload()
         {
            m_sTxt="";
            dw_list =  new xdwgrid__;
            dw_list.setNativePointer(this.GetControl("dw_list"));						
            dw_list.openUrl("组织架构.vface/template/HrPerson/list");					
            dw_list.SetReadOnly(true);
            dw_list.SetSelectionMode(1);

            dw_HrEmployee =  new xdwgrid__;
            dw_HrEmployee.setNativePointer(this.GetControl("dw_HrEmployee"));						
            dw_HrEmployee.openUrl("组织架构.vface/template/HrPerson/listemp");		
            //dw_HrEmployee.openUrl("组织架构.vface/template/HrEmployee/list");		
            OnInitial();

            OnRetrieve();
				
            return 1;
         }
      ]
		
   ]
]