|  |  | 
 |  |  | #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) HrPerson : public xframe | 
 |  |  | { | 
 |  |  | public: | 
 |  |  |    xdwgrid   dw_list; | 
 |  |  |    xdwgrid   dw_HrEmployee; | 
 |  |  |    xstring      m_sTxt; | 
 |  |  |  | 
 |  |  |    xnode   m_agentNode;   //Agent Condition | 
 |  |  |    xstring   m_agentCond;   //Agent Node | 
 |  |  | public: | 
 |  |  |    HrPerson(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} | 
 |  |  | public: | 
 |  |  |    static HrPerson* 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) | 
 |  |  |       HrPerson* pWin = new HrPerson(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 | 
 |  |  |       } | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |    //焦点激活处理函数 | 
 |  |  |    int OnSetFocus(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       SetAgent(); | 
 |  |  |  | 
 |  |  |       //重置工具条 | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    //xgridex双击 | 
 |  |  |    int OnDoubleClicked(TEvent* evt, int p) | 
 |  |  |    { | 
 |  |  |       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); | 
 |  |  |       //xwin::OpenWindow(L"dev:xpage[HrPersonMaint.xpage]",arg); | 
 |  |  |       openUrl(L"组织架构.vface/xpage/Hr/HrPersonMaint", &arg); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |    //行改变 | 
 |  |  |    int OnRowFocusChanged(TEvent* evt, int p) | 
 |  |  |    { | 
 |  |  |       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 sPersonID = e.selectSingleNode(L"@guid").text(); | 
 |  |  |       xml x; | 
 |  |  |  | 
 |  |  |       xaserverarg arg; | 
 |  |  |  | 
 |  |  |       arg.AddArg(L"guid", sPersonID); | 
 |  |  |  | 
 |  |  |       if (xurl::get(L"OrganizationStruct/Person.HrEmployee", arg.GetString(), x) != 1) | 
 |  |  |       { | 
 |  |  |          trace(x.text()); | 
 |  |  |          return -1; | 
 |  |  |       } | 
 |  |  |       else | 
 |  |  |       { | 
 |  |  |          dw_HrEmployee.Retrieve(x); | 
 |  |  |          dw_HrEmployee.Redraw(); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int  OnRetrieve() | 
 |  |  |    { | 
 |  |  |       xml x; | 
 |  |  |  | 
 |  |  |       xaserverarg arg; | 
 |  |  |  | 
 |  |  |       arg.AddArg(L"sTxt", m_sTxt); | 
 |  |  |       if (xurl::get(L"OrganizationStruct/list.HrPerson", arg.GetString(), x) != 1) | 
 |  |  |       { | 
 |  |  |          trace(x.text()); | 
 |  |  |          return -1; | 
 |  |  |       } | 
 |  |  |       else | 
 |  |  |       { | 
 |  |  |          dw_list.Retrieve(x); | 
 |  |  |          dw_list.Redraw(); | 
 |  |  |       } | 
 |  |  |       //      if (dw_list.GetRowCount() >0) | 
 |  |  |       //         OnRowFocusChanged(); | 
 |  |  |       dw_list.SetReadOnly(true); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int OnSearch() | 
 |  |  |    { | 
 |  |  |       xcontrol xc = GetControl(L"QueryTxt"); | 
 |  |  |       m_sTxt = xc.GetText(); | 
 |  |  |       OnRetrieve(); | 
 |  |  |       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) | 
 |  |  |    { | 
 |  |  |       xaserverarg& arg = *new xaserverarg; | 
 |  |  |  | 
 |  |  |       KXMLDOMElement e; | 
 |  |  |       xstring sPersonID; | 
 |  |  |       xstring sName; | 
 |  |  |       if (comdid == L"AddPerson") | 
 |  |  |       { | 
 |  |  |          arg.AddArg(L"operate", L"new0"); | 
 |  |  |          arg.AddArg(L"guid", L""); | 
 |  |  |          openUrl(L"组织架构.vface/xpage/Hr/HrPersonMaint", &arg); | 
 |  |  |       } | 
 |  |  |       else if (comdid == L"UpdateAssignmentView") | 
 |  |  |          OnUpdateAssignmentView(); | 
 |  |  |       else if (comdid == L"ModifyPerson") | 
 |  |  |       { | 
 |  |  |          int row = dw_list.GetNextSelectRow(1); | 
 |  |  |          if (row < 1) | 
 |  |  |          { | 
 |  |  |             KXMLDOMElement xframeElement = GetElement(); | 
 |  |  |             KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*"); | 
 |  |  |             if (agent) | 
 |  |  |             row = dw_list.GetRow(); | 
 |  |  |             if (row < 1) | 
 |  |  |             { | 
 |  |  |                xstring s = agent.xml(); | 
 |  |  |                m_agentNode = SetAgentNode(anode, s); | 
 |  |  |                MessageBox(GetHWND(), L"请选中要修改的人员行!", L"提示", 0); | 
 |  |  |                return -1; | 
 |  |  |             } | 
 |  |  |          } | 
 |  |  |          return 1; | 
 |  |  |          e = dw_list.GetRowElement(row); | 
 |  |  |          sPersonID = e.selectSingleNode(L"@guid").text(); | 
 |  |  |          arg.AddArg(L"operate", L"modify"); | 
 |  |  |          arg.AddArg(L"guid", sPersonID); | 
 |  |  |          openUrl(L"组织架构.vface/xpage/Hr/HrPersonMaint", &arg); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnRowChanged(TEvent* evt, LPARAM p) | 
 |  |  |       else if (comdid == L"DeletePerson") | 
 |  |  |       { | 
 |  |  |          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") | 
 |  |  |          int row = dw_list.GetNextSelectRow(1); | 
 |  |  |          if (row < 1) | 
 |  |  |          { | 
 |  |  |             OnSave(); | 
 |  |  |             return 1; | 
 |  |  |             row = dw_list.GetRow(); | 
 |  |  |             if (row < 1) | 
 |  |  |             { | 
 |  |  |                MessageBox(GetHWND(), L"请选中要删除的人员行!", L"提示", 0); | 
 |  |  |                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); | 
 |  |  |       } | 
 |  |  |          e = dw_list.GetRowElement(row); | 
 |  |  |          sPersonID = 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; | 
 |  |  |  | 
 |  |  |       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) | 
 |  |  |          arg.AddArg(L"guid", sPersonID); | 
 |  |  |  | 
 |  |  |  | 
 |  |  |          xml x1; | 
 |  |  |  | 
 |  |  |          if (xurl::post(L"OrganizationStruct/delete.HrPerson", arg.GetString(), x1) != 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"保存成功!"); | 
 |  |  |             xstring error = x1.text(); | 
 |  |  |             trace(error); | 
 |  |  |          } | 
 |  |  |          else | 
 |  |  |          { | 
 |  |  |             alert(L"保存失败!"); | 
 |  |  |             //win32::MessageBox(GetHWND(),L"删除成功!",L"提示",0); | 
 |  |  |             dw_list.DeleteRow(row); | 
 |  |  |          } | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnItemChanged(TEvent* evt, LPARAM p) | 
 |  |  |       else if (comdid == L"Refresh") | 
 |  |  |       { | 
 |  |  |          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; | 
 |  |  |          OnRetrieve(); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnAttachEvent() | 
 |  |  |       else if (comdid == L"search" || comdid == L"query") | 
 |  |  |       { | 
 |  |  |          //绑定工具条点击事件 | 
 |  |  |          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; | 
 |  |  |          OnSearch(); | 
 |  |  |       } | 
 |  |  |       return 0; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    //命令处理事件 | 
 |  |  |    int OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       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); | 
 |  |  |    int OnAttachEvent() | 
 |  |  |    { | 
 |  |  |       //绑定工具条点击事件 | 
 |  |  |       AttachEvent(L"WM_XCOMMAND", (FEvent)&HrPerson::OnXCommand); | 
 |  |  |       //获取焦点事件,用于重置工具条 | 
 |  |  |       AttachEvent(L"WM_SETFOCUS", (FEvent)&HrPerson::OnSetFocus); | 
 |  |  |       AttachEvent(L"dw_list", L"DWV_CLICKED", (FEvent)&HrPerson::OnRowFocusChanged); | 
 |  |  |       AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&HrPerson::OnDoubleClicked); | 
 |  |  |       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 OnInitial() | 
 |  |  |    { | 
 |  |  |       SetAgent(); | 
 |  |  |  | 
 |  |  |       int onload() | 
 |  |  |       { | 
 |  |  |          SetArg(); | 
 |  |  |          dw_list = GetControl(L"dw_list"); | 
 |  |  |          dw_list.openUrl(L"/sale/view/AR/template/Deduction"); | 
 |  |  |       OnAttachEvent(); | 
 |  |  |  | 
 |  |  |          dw_list.SetColumnState(L"ID", false); | 
 |  |  |          dw_list.SetColumnState(L"GDNLineID", false); | 
 |  |  |          dw_list.SetColumnState(L"SettlementAdjustID", false); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int onload() | 
 |  |  |    { | 
 |  |  |       m_sTxt = L""; | 
 |  |  |       dw_list = new xdwgrid; | 
 |  |  |       dw_list.setNativePointer(GetControl(L"dw_list")); | 
 |  |  |       dw_list.openUrl(L"组织架构.vface/template/HrPerson/list"); | 
 |  |  |       dw_list.SetReadOnly(true); | 
 |  |  |       dw_list.SetSelectionMode(1); | 
 |  |  |  | 
 |  |  |          if (GetWinParam()) | 
 |  |  |          { | 
 |  |  |             xaserverarg arg = GetArg(); | 
 |  |  |             EntityID = arg.GetArgString(L"EntityID"); | 
 |  |  |             InvoiceNo = arg.GetArgString(L"InvoiceNo"); | 
 |  |  |          } | 
 |  |  |          trace(InvoiceNo); | 
 |  |  |          OnRetrieve(InvoiceNo, EntityID); | 
 |  |  |          OnAttachEvent(); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       dw_HrEmployee = new xdwgrid; | 
 |  |  |       dw_HrEmployee.setNativePointer(GetControl(L"dw_HrEmployee")); | 
 |  |  |       dw_HrEmployee.openUrl(L"组织架构.vface/template/HrPerson/listemp"); | 
 |  |  |       //dw_HrEmployee.openUrl(L"组织架构.vface/template/HrEmployee/list");		 | 
 |  |  |       OnInitial(); | 
 |  |  |  | 
 |  |  |       int onloaded() | 
 |  |  |       { | 
 |  |  |          SetAgent(); | 
 |  |  |       OnRetrieve(); | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |    }; | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  | }; |