update

LiFan

2024-07-15 1b1a2e68cfd02074fc3300a0cc0fa40888a92f10

 jrj/project/business/Company/HrOrgChart.cpp

@@ -1,211 +1,142 @@
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
use "win.vl"
use "treeview.vm"
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]"

#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"
unit vbusiness.xpage
[
   HrOrgChart is extend win__;
   about HrOrgChart
      [
         control:

using xml = KXMLDOMDocument;
   class __declspec(dllexport) Deduction : public xframe
   {
   public:
      xdwgrid   dw_list;
      xstring EntityID;
      xstring InvoiceNo;
      method:
         [
            treeview__    tv_org;
            xdwtable__   dw_parent;
            int      m_bCanDestroy;

      xnode   m_agentNode;   //Agent Condition
            xnode__   m_agentNode;   //Agent Condition
            string   m_agentCond;   //Agent Node

   public:
      Deduction(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static Deduction* CreateInstance(void* implPtr, void* hWnd)
      {
         Deduction* pWin = new Deduction(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)
            int OnTreeSelChanged(ref TNotifyEvent evt, int p)
            {
               xstring s = agent.xml();
               m_agentNode = SetAgentNode(anode, s);
               ref NMTREEVIEW nmtv = evt.pnmh;
               int hitem = nmtv.itemNew.hItem;
               if (hitem == 0)
                  hitem = treeview__::GetRootItem(tv_org.GetId());
               string label = treeview__::GetItemLabel(tv_org.GetId(), hitem);
               string pUnit;
               pUnit = treeview__::GetItemLabel(tv_org.GetId(), hitem) + "\\";
               int pitem = treeview__::GetParentItem(tv_org.GetId(), hitem);
               while (pitem > 0)
               {
                  pUnit = treeview__::GetItemLabel(tv_org.GetId(), pitem) + "\\" + pUnit;
                  pitem = treeview__::GetParentItem(tv_org.GetId(), pitem);
               }
               msxml::IXMLDOMElement ele = treeview__::GetItemData(tv_org.GetId(), hitem);
               string guid = ele.SelectSingleNode("@guid").text;

               //CloseWindow();
               return 1;
            }
         }
         return 1;
      }

      int OnRowChanged(TEvent* evt, LPARAM p)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         int row = hdr.row;
         SetAgent();
         return 1;
      }
            int OnActive(ref TEvent evt, int p)
            {
               /*int WA_INACTIVE   =  0;
               int WA_ACTIVE     =  1;
               int WA_CLICKACTIVE = 2;
               int lw = evt.wParam & 0xffff;
               if( lw ==WA_INACTIVE && m_bCanDestroy==1 )
               {
                  win__::CloseWindow();
                  return 1;
               }
               if(lw !=WA_INACTIVE)m_bCanDestroy = 1;
               return 1;*/
            }

      //焦点激活处理函数
      int OnSetFocus(TEvent* evt, LPARAM param)
      {
         //重置工具条
         SetAgent();
         return 1;
      }
            //焦点激活处理函数
            int OnSetFocus(ref TEvent evt, int p)
            {
               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 OnOK(string comdid)
            {
               xaserverarg__ arg = new xaserverarg__;
               arg.setNativePointer(arg.CreateInstance());
               arg = win__::GetParam();
               arg.AddArg("comdid", comdid);
               int hitem = treeview__::GetSelectedItem(tv_org.GetId());
               if (hitem > 0)
               {
                  msxml::IXMLDOMElement ele = treeview__::GetItemData(tv_org.GetId(), hitem);
                  string guid = ele.SelectSingleNode("@guid").text;
                  string label = ele.selectSingleNode("OrgName").text;
                  arg.AddArg("OrgName", label);
                  arg.AddArg("OrgId", guid);
                  win__::CloseWindow();
               }
               else
                  win__::MessageBox(GetHWND(), "请选择组织！", "提示", 0);
               return 1;
            }

      //命令处理事件
      int OnXCommand(TEvent* evt, LPARAM param)
      {
         return OnCmdDispatch(evt->xcommand.pStrID);
      }
            //命令发布函数
            int OnCmdDispatch(string comdid)
            {
               int hCursor = xutil__::SetCursorWait();
               if (comdid == "xmOk")
                  OnOK(comdid);
               else if (comdid == "xmCancel")
                  CloseWindow();
               xutil__::RestoreCursor(hCursor);
               return 0;
            }

      xstring GetGuid()
      {
         return publiccode::GetGuid();
      }
            //命令处理事件
            int OnXCommand(ref TXCommandEvent evt, int p)
            {
               return OnCmdDispatch(evt.pStrID);
            }

      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;
      }
            int OnAttachEvent()
            {
               //绑定工具条点击事件
               AttachEvent("WM_XCOMMAND", OnXCommand);
               //获取焦点事件，用于重置工具条
               AttachEvent("WM_SETFOCUS", OnSetFocus);
               AttachEvent("tv_org", "TVN_SELCHANGED", OnTreeSelChanged);
               //AttachEvent("WM_ACTIVATE",OnActive);
            }

      int OnItemChanged(TEvent* evt, LPARAM p)
      {
         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;
      }
            int OnInitial()
            {
               OnAttachEvent();

      int OnAttachEvent()
      {
         //绑定工具条点击事件
         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;
      }
               return 1;
            }

            int onload()
            {
               m_bCanDestroy = 1;
               tv_org = new treeview__;
               tv_org.setNativePointer(this.GetControl("tv_org"));
               OnInitial();

               int root = treeview__::GetRootItem(tv_org.GetId());
               treeview__::ExpandItemEx(tv_org.GetId(), root);


      int  OnRetrieve(xstring InvoiceNo, xstring EntityID)
      {
         xml x;
			
         xaserverarg arg ;
		
         arg.AddArg(L"InvoiceNo", InvoiceNo);
         arg.AddArg(L"InvoiceNoEx", xcontrol(GetControl(L"search")).GetText());
         arg.AddArg(L"EntityID", EntityID);
               return 1;
            }
         ]

         //trace(GetControl(L"search").GetText());
         if (getUrl(L"/sale/data/AR/DeductionList", arg.GetString(), x) != 1)
         {
            trace(x.text());
            return -1;
         }
         else
         {
            dw_list.Retrieve(x);
            dw_list.Redraw();
         }
         dw_list.SetSelectionMode(1);
         return 1;
      }

      int onload()
      {
         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())
         {
            xaserverarg arg = GetArg();
            EntityID = arg.GetArgString(L"EntityID");
            InvoiceNo = arg.GetArgString(L"InvoiceNo");
         }
         trace(InvoiceNo);
         OnRetrieve(InvoiceNo, EntityID);
         OnAttachEvent();
         return 1;
      }

      int onloaded()
      {
         SetAgent();

         return 1;
      }
   };
      ]
]