|  |  | 
 |  |  | #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) CompanyList : public xwin | 
 |  |  | { | 
 |  |  | 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) | 
 |  |  |    { | 
 |  |  |    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) | 
 |  |  |       CompanyList* pWin = new CompanyList(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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int  OnRetrieve() | 
 |  |  |    { | 
 |  |  |       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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    //xgridex双击 | 
 |  |  |    int OnDoubleClicked(TEvent* evt, LPARAM 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); | 
 |  |  |       //trace(row.toString()); | 
 |  |  |       //win::OpenWindow(L"dev:xpage[CompanyMaint.vx]",arg); | 
 |  |  |       openUrl(L"组织架构.vface/xpage/CompanyInfo/maint", &arg); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    //命令发布函数 | 
 |  |  |    int OnCmdDispatch(xstring comdid) | 
 |  |  |    { | 
 |  |  |       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) | 
 |  |  |          { | 
 |  |  |             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); | 
 |  |  |          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); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnRowChanged(TEvent* evt, LPARAM p) | 
 |  |  |       else if (comdid == L"DeleteRow") | 
 |  |  |       { | 
 |  |  |          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; | 
 |  |  |       } | 
 |  |  |          e = dw_list.GetRowElement(row); | 
 |  |  |  | 
 |  |  |       //命令处理事件 | 
 |  |  |       int OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |       { | 
 |  |  |          return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |       } | 
 |  |  |          sguid = e.selectSingleNode(L"@guid").text(); | 
 |  |  |          sName = e.selectSingleNode(L"Name").text(); | 
 |  |  |  | 
 |  |  |       xstring GetGuid() | 
 |  |  |       { | 
 |  |  |          return publiccode::GetGuid(); | 
 |  |  |       } | 
 |  |  |          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; | 
 |  |  |  | 
 |  |  |       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) | 
 |  |  |          if (xurl::post(L"OrganizationStruct/delete.CompanyInfo", 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"保存失败!"); | 
 |  |  |             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(); | 
 |  |  |       } | 
 |  |  |       return 0; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       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 OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int OnAttachEvent() | 
 |  |  |    { | 
 |  |  |       //绑定工具条点击事件 | 
 |  |  |       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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       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 OnInitial() | 
 |  |  |    { | 
 |  |  |       SetAgent(); | 
 |  |  |       OnAttachEvent(); | 
 |  |  |  | 
 |  |  |          //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; | 
 |  |  |       } | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |       int onload() | 
 |  |  |       { | 
 |  |  |          SetArg(); | 
 |  |  |          dw_list = GetControl(L"dw_list"); | 
 |  |  |          dw_list.openUrl(L"/sale/view/AR/template/Deduction"); | 
 |  |  |    int onload() | 
 |  |  |    { | 
 |  |  |       dw_list = new xdwgrid; | 
 |  |  |       dw_list.setNativePointer(GetControl(L"dw_list")); | 
 |  |  |  | 
 |  |  |          dw_list.SetColumnState(L"ID", false); | 
 |  |  |          dw_list.SetColumnState(L"GDNLineID", false); | 
 |  |  |          dw_list.SetColumnState(L"SettlementAdjustID", false); | 
 |  |  |       //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(); | 
 |  |  |  | 
 |  |  |          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; | 
 |  |  |       } | 
 |  |  |    }; | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  | }; |