|  |  | 
 |  |  | #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" | 
 |  |  | //#include "HrEmployee.cpp" | 
 |  |  |  | 
 |  |  | using xml = KXMLDOMDocument; | 
 |  |  |    class __declspec(dllexport) Deduction : public xframe | 
 |  |  | class __declspec(dllexport) HrPersonAdd : public xframe | 
 |  |  | { | 
 |  |  | public: | 
 |  |  |    //HrEmployee* lw_obj; | 
 |  |  |    xdwgrid   dw_list; | 
 |  |  |  | 
 |  |  |    xnode   m_agentNode;   //Agent Condition | 
 |  |  |    xstring   m_agentCond;   //Agent Node | 
 |  |  |    xstring   m_sTxt; | 
 |  |  | public: | 
 |  |  |    HrPersonAdd(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} | 
 |  |  | public: | 
 |  |  |    static HrPersonAdd* 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) | 
 |  |  |       HrPersonAdd* pWin = new HrPersonAdd(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() | 
 |  |  |    { | 
 |  |  |       xcontrol xc = GetControl(L"QueryTxt"); | 
 |  |  |       m_sTxt = xc.GetText() + L""; | 
 |  |  |       xml x; | 
 |  |  |  | 
 |  |  |       xaserverarg arg; | 
 |  |  |  | 
 |  |  |       arg.AddArg(L"sTxt", m_sTxt); | 
 |  |  |       if (xurl::post(L"OrganizationStruct/select.Person", 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; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       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.Retrieve(x); | 
 |  |  |          dw_list.Redraw(); | 
 |  |  |          return 1; | 
 |  |  |          dw_list.SetReadOnly(true); | 
 |  |  |       } | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       int OnAttachEvent() | 
 |  |  |    int OnOK(xstring comdid) | 
 |  |  |    { | 
 |  |  |       xaserverarg arg; | 
 |  |  |  | 
 |  |  |       arg = GetArg(); | 
 |  |  |       arg.AddArg(L"comdid", comdid); | 
 |  |  |  | 
 |  |  |       int row = dw_list.GetNextSelectRow(1); | 
 |  |  |       if (row < 1) | 
 |  |  |       { | 
 |  |  |          //绑定工具条点击事件 | 
 |  |  |          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); | 
 |  |  |          alert(L"请选择人员!"); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |  | 
 |  |  |       int  OnRetrieve(xstring InvoiceNo, xstring EntityID) | 
 |  |  |       while (row > 0) | 
 |  |  |       { | 
 |  |  |          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; | 
 |  |  |          } | 
 |  |  |          else | 
 |  |  |          { | 
 |  |  |             dw_list.Retrieve(x); | 
 |  |  |             dw_list.Redraw(); | 
 |  |  |          } | 
 |  |  |          dw_list.SetSelectionMode(1); | 
 |  |  |          return 1; | 
 |  |  |          KXMLDOMElement e = dw_list.GetRowElement(row); | 
 |  |  |          xstring sPersonID = e.selectSingleNode(L"PersonID").text() + (xstring)L""; | 
 |  |  |          xstring sPersonName = e.selectSingleNode(L"Name").text() + (xstring)L""; | 
 |  |  |          arg.AddArg(L"sPersonID", sPersonID); | 
 |  |  |          arg.AddArg(L"sPersonName", sPersonName); | 
 |  |  |          row = dw_list.GetNextSelectRow(row + 1); | 
 |  |  |       } | 
 |  |  |       CloseWindow(); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       int onload() | 
 |  |  |       { | 
 |  |  |          SetArg(); | 
 |  |  |          dw_list = GetControl(L"dw_list"); | 
 |  |  |          dw_list.openUrl(L"/sale/view/AR/template/Deduction"); | 
 |  |  |    //命令发布函数 | 
 |  |  |    int OnCmdDispatch(xstring comdid) | 
 |  |  |    { | 
 |  |  |       if (comdid == L"xmOk") | 
 |  |  |          OnOK(comdid); | 
 |  |  |       else if (comdid == L"query") | 
 |  |  |          OnRetrieve(); | 
 |  |  |       else if (comdid == L"xmCancel") | 
 |  |  |          CloseWindow(); | 
 |  |  |       return 0; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |          dw_list.SetColumnState(L"ID", false); | 
 |  |  |          dw_list.SetColumnState(L"GDNLineID", false); | 
 |  |  |          dw_list.SetColumnState(L"SettlementAdjustID", false); | 
 |  |  |    //命令处理事件 | 
 |  |  |    int OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |    } | 
 |  |  |    int OnAttachEvent() | 
 |  |  |    { | 
 |  |  |       //绑定工具条点击事件 | 
 |  |  |       AttachEvent(L"WM_XCOMMAND", (FEvent)&HrPersonAdd::OnXCommand); | 
 |  |  |       //获取焦点事件,用于重置工具条 | 
 |  |  |       AttachEvent(L"WM_SETFOCUS", (FEvent)&HrPersonAdd::OnSetFocus); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int OnInitial() | 
 |  |  |    { | 
 |  |  |       SetAgent(); | 
 |  |  |       OnAttachEvent(); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |          if (GetWinParam()) | 
 |  |  |          { | 
 |  |  |             xaserverarg arg = GetArg(); | 
 |  |  |             EntityID = arg.GetArgString(L"EntityID"); | 
 |  |  |             InvoiceNo = arg.GetArgString(L"InvoiceNo"); | 
 |  |  |          } | 
 |  |  |          trace(InvoiceNo); | 
 |  |  |          OnRetrieve(InvoiceNo, EntityID); | 
 |  |  |          OnAttachEvent(); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |    int onload() | 
 |  |  |    { | 
 |  |  |       SetArg(); | 
 |  |  |       dw_list = new xdwgrid; | 
 |  |  |       dw_list.setNativePointer(GetControl(L"dw_list")); | 
 |  |  |       dw_list.openUrl(L"组织架构.vface/template/HrEmployee/PersonSel"); | 
 |  |  |       dw_list.SetSelectionMode(4); //3 | 
 |  |  |       dw_list.SetReadOnly(true); | 
 |  |  |  | 
 |  |  |       int onloaded() | 
 |  |  |       { | 
 |  |  |          SetAgent(); | 
 |  |  |       OnInitial(); | 
 |  |  |       OnRetrieve(); | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |    }; | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  | }; |