LiFan
2024-07-15 ff3a1ed12e84447954c8ac76ba8712f209504f04
jrj/project/business/Company/CompanyList.cpp
@@ -1,212 +1,217 @@
#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
   {
   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)
      using xml = KXMLDOMDocument;
      class __declspec(dllexport) CompanyList : public xwin
      {
         Deduction* pWin = new Deduction(implPtr, (HWND)hWnd);
         return pWin;
      }
      int SetAgent()
      {
         xstring xfNodeAgentArea = L"agentarea";
         xnode anode = GetAgentNode(xfNodeAgentArea);
         if (m_agentNode)
      public:
         xdwgrid   dw_list;
         xstring   m_agentCond;   //Agent Node
         xnode   m_agentNode;
      public:
         CompanyList(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {}
      public:
         static CompanyList* CreateInstance(void* implPtr, void* hWnd)
         {
            SetAgentNode(anode, m_agentNode);
            CompanyList* pWin = new CompanyList(implPtr, (HWND)hWnd);
            return pWin;
         }
         else
         int SetAgent()
         {
            KXMLDOMElement xframeElement = GetElement();
            KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*");
            if (agent)
            xstring xfNodeAgentArea = L"agentarea";
            xnode anode = GetAgentNode(xfNodeAgentArea);
            if (m_agentNode)
            {
               xstring s = agent.xml();
               m_agentNode = SetAgentNode(anode, s);
               SetAgentNode(anode, m_agentNode);
            }
         }
         return 1;
      }
      int OnRowChanged(TEvent* evt, LPARAM p)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         int row = hdr.row;
         SetAgent();
         return 1;
      }
      //焦点激活处理函数
      int OnSetFocus(TEvent* evt, LPARAM param)
      {
         //重置工具条
         SetAgent();
         return 1;
      }
      //命令发布函数
      int OnCmdDispatch(xstring comdid)
      {
         if (comdid == L"xmSave")
         {
            OnSave();
            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;
         }
         if (comdid == L"xmSearch")
         //焦点激活处理函数
         int OnSetFocus(TEvent* evt, LPARAM param)
         {
            OnRetrieve(InvoiceNo, EntityID);
            //重置工具条
            SetAgent();
            return 1;
         }
         if (comdid == L"xmClose")
         int  OnRetrieve()
         {
            CloseWindow();
            xml x;
            xaserverarg arg;
            //arg.AddArg(L"sType",c_type);
            if (xurl::get(L"OrganizationStruct/list.CompanyInfo", arg.GetString(), x) != 1)
            {
               trace(x.text());
               return -1;
            }
            else
            {
               //trace(x.GetXml());
               dw_list.Retrieve(x);
               dw_list.Redraw();
            }
            dw_list.SetReadOnly(true);
            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)
         //xgridex双击
         int OnDoubleClicked(TEvent* evt, LPARAM p)
         {
            xstring error = x.text();
            alert(L"err:" + error);
            DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
            int row = hdr.row;
            if (row < 1 || row > dw_list.GetRowCount())
               return 1;
            KXMLDOMElement e = dw_list.GetRowElement(row);
            xstring sguid = e.selectSingleNode(L"@guid").text();
            xaserverarg& arg = *new xaserverarg;
            arg.AddArg(L"operate", L"modify");
            arg.AddArg(L"guid", sguid);
            //trace(sguid);
            //trace(row.toString());
            //win::OpenWindow(L"dev:xpage[CompanyMaint.vx]",arg);
            openUrl(L"组织架构.vface/xpage/CompanyInfo/maint", &arg);
            return 1;
         }
         xstring str = x.documentElement().getAttribute(L"text");
         if (str == L"true")
         //命令发布函数
         int OnCmdDispatch(xstring comdid)
         {
            dw_list.ResetUpdateStatus();
            alert(L"保存成功!");
            xaserverarg& arg = *new xaserverarg;
            KXMLDOMElement e;
            xstring sguid;
            xstring sName;
            if (comdid == L"AddRow")
            {
               arg.AddArg(L"operate", L"new0");
               arg.AddArg(L"guid", L"");
               //win::OpenWindow(L"dev:xpage[CompanyMaint.vx]",arg);
               openUrl(L"组织架构.vface/xpage/CompanyInfo/maint", &arg);
            }
            else if (comdid == L"ModifyRow")
            {
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  row = dw_list.GetRow();
                  if (row < 1)
                  {
                     MessageBox(GetHWND(), L"请选中要修改的公司行!", L"提示", 0);
                     return -1;
                  }
               }
               e = dw_list.GetRowElement(row);
               sguid = e.selectSingleNode(L"@guid").text();
               arg.AddArg(L"operate", L"modify");
               arg.AddArg(L"guid", sguid);
               //win::OpenWindow(L"dev:xpage[CompanyMaint.vx]",arg);
               openUrl(L"组织架构.vface/xpage/CompanyInfo/maint", &arg);
            }
            else if (comdid == L"DeleteRow")
            {
               int row = dw_list.GetNextSelectRow(1);
               if (row < 1)
               {
                  row = dw_list.GetRow();
                  if (row < 1)
                  {
                     MessageBox(GetHWND(), L"请选中要删除的公司行!", L"提示", 0);
                     return -1;
                  }
               }
               e = dw_list.GetRowElement(row);
               sguid = e.selectSingleNode(L"@guid").text();
               sName = e.selectSingleNode(L"Name").text();
               sName += L"";
               int  MB_YESNO = 0x00000004;
               int  IDYES = 6;
               if (MessageBox(GetHWND(), L"确认要删除公司 " + sName + L" 的信息吗?", L"提示", MB_YESNO) != IDYES) return 1;
               arg.AddArg(L"guid", sguid);
               trace(sguid);
               xml x1;
               if (xurl::post(L"OrganizationStruct/delete.CompanyInfo", arg.GetString(), x1) != 1)
               {
                  xstring error = x1.text();
                  trace(error);
               }
               else
               {
                  MessageBox(GetHWND(), L"删除成功!", L"提示", 0);
                  dw_list.DeleteRow(row);
               }
            }
            else if (comdid == L"Refresh")
            {
               OnRetrieve();
            }
            return 0;
         }
         else
         //命令处理事件
         int OnXCommand(TEvent* evt, LPARAM param)
         {
            alert(L"保存失败!");
            return OnCmdDispatch(evt->xcommand.pStrID);
         }
         return 1;
      }
      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")
         int OnAttachEvent()
         {
            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));
            //绑定工具条点击事件
            AttachEvent(L"WM_XCOMMAND", (FEvent)&CompanyList::OnXCommand);
            //获取焦点事件,用于重置工具条
            AttachEvent(L"WM_SETFOCUS", (FEvent)&CompanyList::OnSetFocus);
            //双击
            AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&CompanyList::OnDoubleClicked);
            return 1;
         }
         dw_list.Redraw();
         return 1;
      }
      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;
      }
      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);
         //trace(GetControl(L"search").GetText());
         if (getUrl(L"/sale/data/AR/DeductionList", arg.GetString(), x) != 1)
         int OnInitial()
         {
            trace(x.text());
            return -1;
            SetAgent();
            OnAttachEvent();
            return 1;
         }
         else
         int onload()
         {
            dw_list.Retrieve(x);
            dw_list.Redraw();
            dw_list = new xdwgrid;
            dw_list.setNativePointer(GetControl(L"dw_list"));
            //xaserverarg args;
            //args.setNativePointer(args.CreateInstance());
            //args.AddArg(L"type",L"CompanyList");
            //dw_list.SetDataObject(GetServerUrl(),pref::getPref(L"HumanResource/GetHrObject",args.GetString()));
            dw_list.openUrl(L"组织架构.vface/template/company/list");
            dw_list.SetSelectionMode(1);
            dw_list.SetReadOnly(true);
            OnInitial();
            OnRetrieve();
            return 1;
         }
         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;
      }
   };
};