LiFan
2024-12-17 e3f724c9fd36995c207a6ed173849c20aaa2e3d7
jrj/project/business/Company/HrPersonMaint.cpp
@@ -1,371 +1,377 @@
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 "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
[
   HrPersonMaint is extend frame;
   about HrPersonMaint
      [
         control:
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
      method:
         [
            xdwtable__   dw_1;
            string      m_operate;
            string      m_sguid;
using xml = KXMLDOMDocument;
class __declspec(dllexport) HrPersonMaint : public xframe
{
public:
   xdwtable   dw_1;
   xstring      m_operate;
   xstring      m_sguid;
            xnode__   m_agentNode;   //Agent Condition
            string   m_agentCond;   //Agent Node
            int SetAgent()
   xnode   m_agentNode;   //Agent Condition
   xstring   m_agentCond;   //Agent Node
public:
   HrPersonMaint(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
public:
   static HrPersonMaint* CreateInstance(void* implPtr, void* hWnd)
   {
      HrPersonMaint* pWin = new HrPersonMaint(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(TEvent* evt, LPARAM param)
   {
      SetAgent();
      //重置工具条
      return 1;
   }
   int OnSave()
   {
      HCURSOR hIcon = xutil::SetCursorWait();
      xstring val;
      xml x;
      auto xdoc = x;
      dw_1.AcceptText();
      dw_1.DwUpdateAllTo(xdoc);
      val = xdoc.xml();
      //trace(val);
      xaserverarg args;
      args.AddArg(L"content", val);
      //trace(m_EntityValueEx);
      //trace(val);
      xml x1;
      if (xurl::post(L"OrganizationStruct/update.HrPerson", args.GetString(), x1) != 1)
      {
         xstring error = x1.text();
         trace(error);
         return 1;
      }
      else
      {
         trace(x1.xml());
         MessageBox(GetHWND(), L"保存成功!", L"提示", 0);
      }
      dw_1.ResetUpdateStatus();
      xutil::RestoreCursor(hIcon);
      return 1;
   }
   int OnAddRow()
   {
      xdwtable dw = new xdwtable;
      dw.setNativePointer(dw_1.GetCurTable());
      xstring dw_n = dw.GetDwName();
      if (dw_n == L"HrEmployee")
         dw.InsertRow(0);
      return 1;
   }
   int OnInsertRow()
   {
      xdwtable dw = new xdwtable;
      dw.setNativePointer(dw_1.GetCurTable());
      xstring dw_n = dw.GetDwName();
      if (dw_n == L"HrEmployee")
      {
         int row = dw.GetRow();
         dw.InsertRow(row);
      }
      return 1;
   }
   int OnDeleteRow()
   {
      xdwtable dw = new xdwtable;
      dw.setNativePointer(dw_1.GetCurTable());
      xstring dw_n = dw.GetDwName();
      if (dw_n == L"HrEmployee")
      {
         int row = dw.GetRow();
         dw.DeleteRow(row);
      }
      return 1;
   }
   int OnUpdateAssignmentView()
   {
      xml x1;
      if (xurl::post(L"OrganizationStruct/update.Assignmentview", L"", x1) != 1)
      {
         xstring error = x1.text();
         trace(error);
         return 1;
      }
      else
      {
         trace(x1.xml());
         MessageBox(GetHWND(), L"更新成功!", L"提示", 0);
      }
      return 1;
   }
   //命令发布函数
   int OnCmdDispatch(xstring comdid)
   {
      if (comdid == L"Save")  OnSave();
      else if (comdid == L"AddRow") OnAddRow();
      else if (comdid == L"InsertRow") OnInsertRow();
      else if (comdid == L"DeleteRow") OnDeleteRow();
      else if (comdid == L"Close") CloseWindow();
      else if (comdid == L"UpdateAssignmentView")
         OnUpdateAssignmentView();
      return 0;
   }
   int OnChildContent(TEvent* evt, int p)
   {
      DWNMHDR& dwhdr = *(DWNMHDR*)evt->notify.pnmh;
      xstring col = dwhdr.colname;
      if (col != L"") {
         xml x;
         xaserverarg arg;
         xstring query;
         query = L"[IResourceMSSql.xq]";
         if (col == L"PositionID") {
            arg.AddArg(L"ResourceType", L"HrPosition");
         }
         if (xaserver::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1)
            dwhdr.data = x.xml();
         //trace(x.GetXml());
      }
      return 1;
   }
   int OnItemChanged(TEvent* evt, int p)
   {
      DWNMHDR& dwhdr = *(DWNMHDR*)evt->notify.pnmh;
      HCURSOR HCursor = xutil::SetCursorWait();
      int row = dwhdr.row;
      xstring col = dwhdr.colname;
      xstring data = dwhdr.data;
      trace(xstring(row));
      if (col == L"Name")
      {
         xstring Name = dw_1.GetItemString(1, L"Name");
         xml xs;
         xaserverarg args;
         args.AddArg(L"Name", Name);
         if (xurl::get(L"/sale/data/ManpowerFile/GetUserName", args.GetString(), xs) != 1)
         {
            trace(xs.text());
            return -1;
         }
         else
         {
            KXMLDOMNodeList items = xs.selectNodes(L"data/Item");
            int len = items.length();
            if (len != 0)
            {
               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;
               KXMLDOMNode t = items.item(0);
               xstring english_name = L"";
               xstring sex = L"";
               xstring sexex = L"";
               xstring birth_date = L"";
               xstring contact = L"";
               xstring induction_time = L"";
               xstring household_register = L"";
               xstring EmailAddress = L"";
               if (t.selectSingleNode(L"english_name"))  english_name = t.selectSingleNode(L"english_name").text();
               if (t.selectSingleNode(L"sex"))  sex = t.selectSingleNode(L"sexex").text();
               if (t.selectSingleNode(L"sexex"))  sexex = t.selectSingleNode(L"sexex").text();
               if (t.selectSingleNode(L"birth_date"))  birth_date = t.selectSingleNode(L"birth_date").text();
               if (t.selectSingleNode(L"contact"))  contact = t.selectSingleNode(L"contact").text();
               if (t.selectSingleNode(L"induction_time"))  induction_time = t.selectSingleNode(L"induction_time").text();
               if (t.selectSingleNode(L"household_register"))  household_register = t.selectSingleNode(L"household_register").text();
               if (t.selectSingleNode(L"EmailAddress"))  EmailAddress = t.selectSingleNode(L"EmailAddress").text();
               dw_1.SetItemString(1, L"NickName", english_name);
               dw_1.SetItemDisplayString(1, L"Gender", sexex);
               dw_1.SetItemString(1, L"Gender", sex);
               dw_1.SetItemString(1, L"Birthday", birth_date);
               dw_1.SetItemString(1, L"Mobile", contact);
               dw_1.SetItemString(1, L"HireDate", induction_time);
               dw_1.SetItemString(1, L"BirthPlace", household_register);
               dw_1.SetItemString(1, L"Email", EmailAddress);
            }
         }
            //焦点激活处理函数
            int OnSetFocus(ref TEvent evt, int p)
            {
               SetAgent();
      }
      if (col == L"PositionID")
      {
         xdwtable dw_HrEmployee = new xdwtable;
         dw_HrEmployee.setNativePointer(dw_1.FindDwTable(L"HrEmployee"));
         xstring sPositionID = dw_HrEmployee.GetItemString(row, L"PositionID");
               //重置工具条
               return 1;
            }
         if (sPositionID == L"")
            return 1;
         xml x;
            int OnSave()
            {
               int hIcon = xutil__::SetCursorWait();
         xaserverarg arg;
               string val;
               xml__ x = new xml__;
               x.setNativePointer(x.CreateInstance());
               var xdoc = x.GetXmlDoc();
               dw_1.AcceptText();
               dw_1.DwUpdateAllTo(xdoc);
               val = xdoc.xml;
               //trace(val);
               xaserverarg__ args = new xaserverarg__;
               args.setNativePointer(args.CreateInstance());
               args.AddArg("content", val);
               //trace(m_EntityValueEx);
               //trace(val);
               xml__ x1 = new xml__;
               x1.setNativePointer(x1.CreateInstance());
               if (url::post("OrganizationStruct/update.HrPerson", args.GetString(), x1) != 1)
               {
                  string error = x1.GetXmlDoc().text;
                  trace(error);
                  return 1;
               }
               else
               {
                  trace(x1.GetXml());
                  win__::MessageBox(GetHWND(), "保存成功!", "提示", 0);
               }
               dw_1.ResetUpdateStatus();
               xutil__::RestoreCursor(hIcon);
               return 1;
            }
         arg.AddArg(L"guid", sPositionID);
         arg.AddArg(L"type", L"GetOrgIDJobID");
         //trace(arg.GetString());
         if (xurl::get(L"OrganizationStruct/GetOrgIDJobID", arg.GetString(), x) != 1)
         {
            trace(x.text());
            return -1;
         }
         else
         {
            KXMLDOMDocument xdoc = x;
            //IXMLDOMNodeList nlist = xdoc.getElementsByTagName(L"OrgID");
            KXMLDOMElement e = xdoc.documentElement();
            xstring sOrgID = e.selectSingleNode(L"@OrgID").text();
            xstring sJobID = e.selectSingleNode(L"@JobID").text();
            dw_HrEmployee.SetItemString(row, L"OrgID", sOrgID);
            dw_HrEmployee.SetItemString(row, L"JobID", sJobID);
            xstring sdate = publiccode::GetCurrentDate() + (xstring)L"";
            dw_HrEmployee.SetItemString(row, L"StartDate", sdate + L"");
            dw_HrEmployee.SetItemString(row, L"EndDate", L"2050-12-31");
         }
      }
            int OnAddRow()
            {
               xdwtable__ dw = new xdwtable__;
               dw.setNativePointer(dw_1.GetCurTable());
               string dw_n = dw.GetDwName();
               if (dw_n == "HrEmployee")
                  dw.InsertRow(0);
               return 1;
            }
      xutil::RestoreCursor(HCursor);
            int OnInsertRow()
            {
               xdwtable__ dw = new xdwtable__;
               dw.setNativePointer(dw_1.GetCurTable());
               string dw_n = dw.GetDwName();
               if (dw_n == "HrEmployee")
               {
                  int row = dw.GetRow();
                  dw.InsertRow(row);
               }
               return 1;
            }
      return 0;
   }
            int OnDeleteRow()
            {
               xdwtable__ dw = new xdwtable__;
               dw.setNativePointer(dw_1.GetCurTable());
               string dw_n = dw.GetDwName();
               if (dw_n == "HrEmployee")
               {
                  int row = dw.GetRow();
                  dw.DeleteRow(row);
               }
               return 1;
            }
   //命令处理事件
   int OnXCommand(TEvent* evt, LPARAM param)
   {
      return OnCmdDispatch(evt->xcommand.pStrID);
   }
            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 OnAttachEvent()
   {
      //绑定工具条点击事件
      AttachEvent(L"WM_XCOMMAND", (FEvent)&HrPersonMaint::OnXCommand);
      //获取焦点事件,用于重置工具条
      AttachEvent(L"WM_SETFOCUS", (FEvent)&HrPersonMaint::OnSetFocus);
      //下拉框  提供内容
      AttachEvent(L"dw_detail", L"DWV_CHILDCONTENT", (FEvent)&HrPersonMaint::OnChildContent);
      //内容改变
      AttachEvent(L"dw_detail", L"DWV_ITEMCHANGED", (FEvent)&HrPersonMaint::OnItemChanged);
      //
      //AttachEvent(L"dw_detail",L"DWV_ITEMFOCUSCHANGED",OnItemFocusChanged);
      return 1;
   }
            //命令发布函数
            int OnCmdDispatch(string comdid)
            {
               if (comdid == "Save")  OnSave();
               else if (comdid == "AddRow") OnAddRow();
               else if (comdid == "InsertRow") OnInsertRow();
               else if (comdid == "DeleteRow") OnDeleteRow();
               else if (comdid == "Close") CloseWindow();
               else if (comdid == "UpdateAssignmentView")
                  OnUpdateAssignmentView();
               return 0;
            }
   int  OnRetrieve()
   {
      xml x;
            int OnChildContent(ref TNotifyEvent evt, int p) {
               ref DWNMHDR dwhdr = evt.pnmh;
               string col = dwhdr.colname;
               if (col != "") {
                  xml__ x = new xml__;
                  x.setNativePointer(x.CreateInstance());
                  xaserverarg__ arg = new xaserverarg__;
                  arg.setNativePointer(arg.CreateInstance());
                  string query;
                  query = "[IResourceMSSql.xq]";
                  if (col == "PositionID") {
                     arg.AddArg("ResourceType", "HrPosition");
                  }
                  if (xaserver__::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1)
                     dwhdr.data = x.GetXml();
                  //trace(x.GetXml());
               }
               return 1;
            }
      xaserverarg arg;
            int OnItemChanged(ref TNotifyEvent evt, int p)
            {
               int HCursor = xutil__::SetCursorWait();
      arg.AddArg(L"guid", m_sguid);
      if (xurl::get(L"OrganizationStruct/detail.HrPerson", arg.GetString(), x) != 1)
      {
         trace(x.text());
         return -1;
      }
      else
      {
         dw_1.Retrieve(x);
         dw_1.Redraw();
         //trace(x.GetXml());
      }
               ref DWNMHDR dwhdr = evt.pnmh;
               int row = dwhdr.row;
               string col = dwhdr.colname;
               string data = dwhdr.data;
               trace(row);
      return 1;
   }
               if (col == "Name")
               {
                  string Name = dw_1.GetItemString(1, "Name", 0);
   int OnInitial()
   {
      SetAgent();
                  xml__ xs = new xml__;
                  xs.setNativePointer(xs.CreateInstance());
                  xaserverarg__ args = new xaserverarg__;
                  args.setNativePointer(args.CreateInstance());
                  args.AddArg("Name", Name);
                  if (url::get("/sale/data/ManpowerFile/GetUserName", args.GetString(), xs) != 1)
                  {
                     trace(xs.GetXmlDoc().text);
                     return -1;
                  }
                  else
                  {
                     msxml::IXMLDOMNodeList items = xs.GetXmlDoc().selectNodes("data/Item");
                     int len = items.length;
                     if (len != 0)
                     {
                        msxml::IXMLDOMNode t = items.item(0);
      OnAttachEvent();
                        string english_name = "";
                        string sex = "";
                        string sexex = "";
                        string birth_date = "";
                        string contact = "";
                        string induction_time = "";
                        string household_register = "";
                        string EmailAddress = "";
                        if (t.selectSingleNode("english_name"))  english_name = t.selectSingleNode("english_name").text;
                        if (t.selectSingleNode("sex"))  sex = t.selectSingleNode("sexex").text;
                        if (t.selectSingleNode("sexex"))  sexex = t.selectSingleNode("sexex").text;
                        if (t.selectSingleNode("birth_date"))  birth_date = t.selectSingleNode("birth_date").text;
                        if (t.selectSingleNode("contact"))  contact = t.selectSingleNode("contact").text;
                        if (t.selectSingleNode("induction_time"))  induction_time = t.selectSingleNode("induction_time").text;
                        if (t.selectSingleNode("household_register"))  household_register = t.selectSingleNode("household_register").text;
                        if (t.selectSingleNode("EmailAddress"))  EmailAddress = t.selectSingleNode("EmailAddress").text;
      return 1;
   }
                        dw_1.SetItemString(1, "NickName", english_name);
                        dw_1.SetItemDisplayString(1, "Gender", sexex);
                        dw_1.SetItemString(1, "Gender", sex);
                        dw_1.SetItemString(1, "Birthday", birth_date);
                        dw_1.SetItemString(1, "Mobile", contact);
                        dw_1.SetItemString(1, "HireDate", induction_time);
                        dw_1.SetItemString(1, "BirthPlace", household_register);
                        dw_1.SetItemString(1, "Email", EmailAddress);
                     }
                  }
   int onload()
   {
      SetArg();
      dw_1 = new xdwtable;
      dw_1.setNativePointer(GetControl(L"dw_detail"));
      dw_1.openUrl(L"组织架构.vface/template/HrPerson/maint");
      OnInitial();
               }
               if (col == "PositionID")
               {
                  xdwtable__ dw_HrEmployee = new xdwtable__;
                  dw_HrEmployee.setNativePointer(dw_1.FindDwTable("HrEmployee"));
                  string sPositionID = dw_HrEmployee.GetItemString(row, "PositionID");
      xaserverarg arg;
                  if (sPositionID == "" || sPositionID == nil)
                     return 1;
                  xml__ x = new xml__;
                  x.setNativePointer(x.CreateInstance());
                  xaserverarg__ arg = new xaserverarg__;
                  arg.setNativePointer(arg.CreateInstance());
                  arg.AddArg("guid", sPositionID);
                  arg.AddArg("type", "GetOrgIDJobID");
                  //trace(arg.GetString());
                  if (url::get("OrganizationStruct/GetOrgIDJobID", arg.GetString(), x) != 1)
                  {
                     trace(x.GetXmlDoc().text);
                     return -1;
                  }
                  else
                  {
                     msxml::IXMLDOMDocument xdoc = x.GetXmlDoc();
                     //IXMLDOMNodeList nlist = xdoc.getElementsByTagName("OrgID");
                     msxml::IXMLDOMElement e = xdoc.documentElement;
                     string sOrgID = e.SelectSingleNode("@OrgID").text;
                     string sJobID = e.SelectSingleNode("@JobID").text;
                     dw_HrEmployee.SetItemString(row, "OrgID", sOrgID);
                     dw_HrEmployee.SetItemString(row, "JobID", sJobID);
                     string sdate = publiccode::GetCurDate() + "";
                     dw_HrEmployee.SetItemString(row, "StartDate", sdate + "");
                     dw_HrEmployee.SetItemString(row, "EndDate", "2050-12-31");
                  }
               }
      arg = GetArg();
      if (arg)
      {
         m_operate = arg.GetArgString(L"operate");
         m_sguid = arg.GetArgString(L"guid");
      }
               xutil__::RestoreCursor(HCursor);
      /*if ( m_sguid == L"" || m_sguid == nil)
      {
         xstring val;
         xml x ;
               return 0;
            }
         var xdoc = x;
         dw_1.DwUpdateTo(xdoc);
         val = xdoc.xml ;
            //命令处理事件
            int OnXCommand(ref TXCommandEvent evt, int p)
            {
               return OnCmdDispatch(evt.pStrID);
            }
            int OnAttachEvent()
            {
               //绑定工具条点击事件
               AttachEvent("WM_XCOMMAND", OnXCommand);
               //获取焦点事件,用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
               //下拉框  提供内容
               AttachEvent("dw_detail", "DWV_CHILDCONTENT", OnChildContent);
               //内容改变
               AttachEvent("dw_detail", "DWV_ITEMCHANGED", OnItemChanged);
               //
               //AttachEvent("dw_detail","DWV_ITEMFOCUSCHANGED",OnItemFocusChanged);
            }
            int  OnRetrieve()
            {
               xml__ x = new xml__;
               x.setNativePointer(x.CreateInstance());
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg.AddArg("guid", m_sguid);
               if (url::get("OrganizationStruct/detail.HrPerson", arg.GetString(), x) != 1)
               {
                  trace(x.GetXmlDoc().text);
                  return -1;
               }
               else
               {
                  dw_1.Retrieve(x);
                  dw_1.Redraw();
                  //trace(x.GetXml());
               }
               return 1;
            }
            int OnInitial()
            {
               SetAgent();
               OnAttachEvent();
               return 1;
            }
            int onload()
            {
               dw_1 = new xdwtable__;
               dw_1.setNativePointer(this.GetControl("dw_detail"));
               dw_1.openUrl("组织架构.vface/template/HrPerson/maint");
               OnInitial();
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = this.GetParam();
               if (arg)
               {
                  m_operate = arg.GetArgString("operate");
                  m_sguid = arg.GetArgString("guid");
               }
               /*if ( m_sguid == "" || m_sguid == nil)
               {
                  string val;
                  xml__ x = new xml__;
                  x.setNativePointer(x.CreateInstance());
                  var xdoc = x.GetXmlDoc();
                  dw_1.DwUpdateTo(xdoc);
                  val = xdoc.xml ;
                  xml__ xx = new xml__;
                  xx.setNativePointer(xx.CreateInstance());
                  xx.loadXML(val);
                  msxml::IXMLDOMElement e;
                  e = xx.GetXmlDoc().selectSingleNode("HrPerson");
                  if (e)
                  {
                     string sguid = e.getAttribute("guid");
                     m_sguid = sguid;
                  }
                  //trace(m_sguid);
               }*/
               if (m_sguid != "")
                  OnRetrieve();
               return 1;
            }
         ]
      ]
]
         xml xx ;
         xx.loadXML(val);
         KXMLDOMElement e;
         e = xx.selectSingleNode(L"HrPerson");
         if (e)
         {
            xstring sguid = e.getAttribute(L"guid");
            m_sguid = sguid;
         }
         //trace(m_sguid);
      }*/
      if (m_sguid != L"")
         OnRetrieve();
      return 1;
   }
};