xj qian
2024-07-17 0b8444d0eef50d1ee4e0d0b51e174fa5b447d802
jrj/project/business/Company/HrOrgMaint.cpp
@@ -1,211 +1,274 @@
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <wobject/xdouble.hpp>
#include <xcontrol/xlayersheet.hpp>
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
using xml = KXMLDOMDocument;
   class __declspec(dllexport) Deduction : public xframe
class __declspec(dllexport) HrOrgMaint : public xwin
{
public:
   xdwtable   dw_detail;
   xstring      m_operate;
   xstring      m_sguid;
   xstring      m_tvOrgID;
   xstring      m_tvOrgName;
   xstring      m_tvRootOrgID;
   xstring      m_tvRootOrgName;
   xnode   m_agentNode;   //Agent Condition
   xstring   m_agentCond;   //Agent Node
public:
   HrOrgMaint(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {}
public:
   static HrOrgMaint* CreateInstance(void* implPtr, void* hWnd)
   {
   public:
      xdwgrid   dw_list;
      xstring EntityID;
      xstring InvoiceNo;
      xnode   m_agentNode;   //Agent Condition
   public:
      Deduction(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static Deduction* CreateInstance(void* implPtr, void* hWnd)
      HrOrgMaint* pWin = new HrOrgMaint(implPtr, (HWND)hWnd);
      return pWin;
   }
   int SetAgent()
   {
      xstring xfNodeAgentArea = L"agentarea";
      xnode anode = GetAgentNode(xfNodeAgentArea);
      if (m_agentNode)
      {
         Deduction* pWin = new Deduction(implPtr, (HWND)hWnd);
         return pWin;
         SetAgentNode(anode, m_agentNode);
      }
      int SetAgent()
      else
      {
         xstring xfNodeAgentArea = L"agentarea";
         xnode anode = GetAgentNode(xfNodeAgentArea);
         if (m_agentNode)
         KXMLDOMElement xframeElement = GetElement();
         KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*");
         if (agent)
         {
            SetAgentNode(anode, m_agentNode);
            xstring s = agent.xml();
            m_agentNode = SetAgentNode(anode, s);
         }
         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;
      }
      return 1;
   }
      int OnRowChanged(TEvent* evt, LPARAM p)
   //焦点激活处理函数
   int OnSetFocus(TEvent* evt, LPARAM param)
   {
      SetAgent();
      //重置工具条
      return 1;
   }
   int  OnRetrieve()
   {
      xml x;
      xaserverarg arg;
      arg.AddArg(L"guid", m_sguid);
      if (xurl::get(L"OrganizationStruct/detail.HrOrg", arg.GetString(), x) != 1)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         int row = hdr.row;
         SetAgent();
         return 1;
         trace(x.text());
         return -1;
      }
      //焦点激活处理函数
      int OnSetFocus(TEvent* evt, LPARAM param)
      else
      {
         //重置工具条
         SetAgent();
         return 1;
      }
      //命令发布函数
      int OnCmdDispatch(xstring comdid)
      {
         if (comdid == L"xmSave")
         {
            OnSave();
            return 1;
         }
         if (comdid == L"xmSearch")
         {
            OnRetrieve(InvoiceNo, EntityID);
            return 1;
         }
         if (comdid == L"xmClose")
         {
            CloseWindow();
            return 1;
         }
         return 0;
      }
      //命令处理事件
      int OnXCommand(TEvent* evt, LPARAM param)
      {
         return OnCmdDispatch(evt->xcommand.pStrID);
      }
      xstring GetGuid()
      {
         return publiccode::GetGuid();
      }
      int OnSave()
      {
         xml x;
         dw_list.AcceptText();
         dw_list.DwUpdateAllToEx(x);
         xaserverarg arg ;
         arg.AddArg(L"content", x.xml());
         trace(x.xml());
         if (xurl::get(L"/sale/data/AR/update/ARDeduction", arg.GetString(), x) != 1)
         {
            xstring error = x.text();
            alert(L"err:" + error);
            return 1;
         }
         xstring str = x.documentElement().getAttribute(L"text");
         if (str == L"true")
         {
            dw_list.ResetUpdateStatus();
            alert(L"保存成功!");
         }
         else
         {
            alert(L"保存失败!");
         }
         return 1;
         dw_detail.Retrieve(x);
         dw_detail.Redraw();
      }
      return 1;
   }
      int OnItemChanged(TEvent* evt, LPARAM p)
   int OnSave()
   {
      HCURSOR hIcon = xutil::SetCursorWait();
      //dw_detail.AcceptText();
      xstring val;
      xml x;
      auto xdoc = x;
      dw_detail.DwUpdateAllTo(xdoc);
      val = xdoc.xml();
      //trace(val);
      //return 1;
      xaserverarg args;
      args.setNativePointer(args.CreateInstance());
      args.AddArg(L"content", val);
      //trace(val);
      xml x1;
      if (xurl::post(L"OrganizationStruct/update.HrOrg", args.GetString(), x1) != 1)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         xstring colname = hdr.colname;
         xstring value = hdr.data;
         int row = hdr.row;
         xstring dwname = L"dw_list";
         if (colname == L"DeductionAmount")
         {
            dw_list.SetItemString(row, L"SettlementAdjustID", EntityID);
            xstring id = publiccode::GetGuid();
            KXMLDOMElement ele = dw_list.GetRowElement(row);
            ele.setAttribute(L"guid", id);
            //dw_list.SetGuid(row,id);
            //alert(ele.xml);
            //alert(dw_list.GetGuid(row));
         }
         dw_list.Redraw();
         return 1;
         xstring error = x1.text();
         trace(error);
      }
      int OnAttachEvent()
      else
      {
         //绑定工具条点击事件
         AttachEvent(L"WM_XCOMMAND", (FEvent)&Deduction::OnXCommand);
         //获取焦点事件,用于重置工具条
         AttachEvent(L"WM_SETFOCUS", (FEvent)&Deduction::OnSetFocus);
         AttachEvent(L"dw_list", L"DWV_ROWFOCUSCHANGED", (FEvent)&Deduction::OnRowChanged);
         AttachEvent(L"dw_list", L"DWV_ITEMCHANGED", (FEvent)&Deduction::OnItemChanged);
         return 1;
         MessageBox(GetHWND(), L"保存成功!", L"提示", 0);
      }
      dw_detail.ResetUpdateStatus();
      xutil::RestoreCursor(hIcon);
      return 1;
   }
      int  OnRetrieve(xstring InvoiceNo, xstring EntityID)
   int OnNew()
   {
      dw_detail.openUrl(L"组织架构.vface/template/HrOrg/detail");
      if (m_operate == L"new0")
      {
         dw_detail.SetItemString(1, L"ParentOrgID", m_tvOrgID);
         dw_detail.SetItemDisplayString(1, L"ParentOrgID", m_tvOrgName);
      }
      dw_detail.SetItemString(1, L"Status", L"Y");
      //dw_detail.SetItemDisplayString(1,L"Status",L"有效");
      return 1;
   }
   //命令发布函数
   int OnCmdDispatch(xstring comdid)
   {
      if (comdid == L"New") OnNew();
      if (comdid == L"Save") OnSave();
      if (comdid == L"xmOk") OnSave();
      if (comdid == L"xmCancel") CloseWindow();
      return 0;
   }
   //命令处理事件
   int OnXCommand(TEvent* evt, LPARAM param)
   {
      return OnCmdDispatch(evt->xcommand.pStrID);
   }
   int OnChildContent(TEvent* evt, LPARAM p)
   {
      DWNMHDR& dwhdr = *(DWNMHDR*)evt->notify.pnmh;
      xstring col = dwhdr.colname;
      if (col != L"") {
         xml x;
         xaserverarg arg ;
         arg.AddArg(L"InvoiceNo", InvoiceNo);
         arg.AddArg(L"InvoiceNoEx", xcontrol(GetControl(L"search")).GetText());
         arg.AddArg(L"EntityID", EntityID);
         //trace(GetControl(L"search").GetText());
         if (getUrl(L"/sale/data/AR/DeductionList", arg.GetString(), x) != 1)
         {
            trace(x.text());
            return -1;
         xaserverarg arg;
         xstring query;
         query = L"[IResourceMSSql.xq]";
         if (col == L"OrgTypeID") {
            arg.AddArg(L"ResourceType", L"HrOrgType");//组织类型
         }
         else
         {
            dw_list.Retrieve(x);
            dw_list.Redraw();
         else if (col == L"OrgAddress000") {
            arg.AddArg(L"ResourceType", L"HR_Address");//组织地址
         }
         dw_list.SetSelectionMode(1);
         return 1;
         else if (col == L"CompanyID") {
            arg.AddArg(L"ResourceType", L"CompanyInfo");//所属法人
         }
         else if (col == L"OrgProLine") {
            arg.AddArg(L"ResourceType", L"OrgProLine");//产品线
         }
         if (xaserver::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1)
            dwhdr.data = x.xml();
         //trace(x.GetXml());
      }
      return 1;
   }
   int OnClicked(TEvent* evt, LPARAM p)
   {
      DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
      int onload()
      xaserverarg& arg = *new xaserverarg;
      xstring colname = hdr.colname;
      if (colname == L"ParentOrgID")
      {
         SetArg();
         dw_list = GetControl(L"dw_list");
         dw_list.openUrl(L"/sale/view/AR/template/Deduction");
         dw_list.SetColumnState(L"ID", false);
         dw_list.SetColumnState(L"GDNLineID", false);
         dw_list.SetColumnState(L"SettlementAdjustID", false);
         if (GetWinParam())
         openUrl(L"组织架构.vface/xpage/HrOrg/Chart", &arg);
         //trace(arg.GetString());
         xstring comdid = arg.GetArgString(L"comdid");
         if (comdid == L"xmOk")
         {
            xaserverarg arg = GetArg();
            EntityID = arg.GetArgString(L"EntityID");
            InvoiceNo = arg.GetArgString(L"InvoiceNo");
            xstring OrgName = arg.GetArgString(L"OrgName");
            xstring OrgID = arg.GetArgString(L"OrgId");
            dw_detail.SetItemDisplayString(1, L"ParentOrgID", OrgName);
            dw_detail.SetItemString(1, L"ParentOrgID", OrgID);
            dw_detail.Redraw();
         }
         trace(InvoiceNo);
         OnRetrieve(InvoiceNo, EntityID);
         OnAttachEvent();
         return 1;
      }
      int onloaded()
      if (colname == L"LeaderID")
      {
         SetAgent();
         return 1;
         openUrl(L"组织架构.vface/xpage/hremployee/select", &arg);
         xstring comdid = arg.GetArgString(L"comdid");
         if (comdid == L"xmOk")
         {
            xstring sPersonID = arg.GetArgString(L"sPersonID");
            //trace(sPersonID);
            xstring sPersonName = arg.GetArgString(L"sPersonName");
            dw_detail.SetItemDisplayString(1, colname.c_str(), sPersonName);
            dw_detail.SetItemString(1, colname.c_str(), sPersonID);
            dw_detail.Redraw();
         }
      }
   };
      return 1;
   }
   int OnAttachEvent()
   {
      //绑定工具条点击事件
      AttachEvent(L"WM_XCOMMAND", (FEvent)&HrOrgMaint::OnXCommand);
      //获取焦点事件,用于重置工具条
      AttachEvent(L"WM_SETFOCUS", (FEvent)&HrOrgMaint::OnSetFocus);
      //下拉框  提供内容
      AttachEvent(L"dw_detail", L"DWV_CHILDCONTENT", (FEvent)&HrOrgMaint::OnChildContent);
      AttachEvent(L"dw_detail", L"DWV_ITEMFOCUSCHANGED", (FEvent)&HrOrgMaint::OnClicked);
      return 1;
   }
   int OnInitial()
   {
      SetAgent();
      OnAttachEvent();
      return 1;
   }
   int onload()
   {
      SetArg();
      dw_detail = new xdwtable;
      dw_detail.setNativePointer(GetControl(L"dw_detail"));
      dw_detail.openUrl(L"组织架构.vface/template/HrOrg/detail");
      OnInitial();
      xaserverarg arg;
      arg = GetArg();
      if (arg)
      {
         m_operate = arg.GetArgString(L"operate");
         m_sguid = arg.GetArgString(L"guid");
         m_tvOrgID = arg.GetArgString(L"tvOrgID");//组织树的ID
         m_tvOrgName = arg.GetArgString(L"tvOrgName");//组织树的Name
         m_tvRootOrgID = arg.GetArgString(L"tvRootOrgID");//组织树的ID
         m_tvRootOrgName = arg.GetArgString(L"tvRootOrgName");//组织树的Name
         //alert(m_tvRootOrgName);
      }
      /*if ( m_sguid == L"" || m_sguid == nil)
      {
         m_sguid = GetGuid();//错误
         trace(m_sguid);
      }*/
      if (m_sguid != L"") {
         OnRetrieve();
      };
      if (m_operate == L"new0")
      {
         //trace(m_tvOrgID);
         dw_detail.SetItemString(1, L"ParentOrgID", m_tvOrgID);
         dw_detail.SetItemDisplayString(1, L"ParentOrgID", m_tvOrgName);
         dw_detail.SetItemString(1, L"CompanyID", m_tvRootOrgID);
         dw_detail.SetItemDisplayString(1, L"CompanyID", m_tvRootOrgName);
         dw_detail.SetItemString(1, L"Status", L"Y");
         //dw_detail.SetItemDisplayString(1,L"Status",L"有效");
      }
      return 1;
   }
};