|  |  | 
 |  |  | #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" | 
 |  |  | #include "viewobject/view.base.hpp" | 
 |  |  |  | 
 |  |  |       using xml = KXMLDOMDocument; | 
 |  |  |       class __declspec(dllexport) CompanyList : public xwin | 
 |  |  | using xml = KXMLDOMDocument; | 
 |  |  | 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) | 
 |  |  |    { | 
 |  |  |       CompanyList* pWin = new CompanyList(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); | 
 |  |  |       } | 
 |  |  |       else | 
 |  |  |       { | 
 |  |  |          KXMLDOMElement xframeElement = GetElement(); | 
 |  |  |          KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*"); | 
 |  |  |          if (agent) | 
 |  |  |          { | 
 |  |  |             CompanyList* pWin = new CompanyList(implPtr, (HWND)hWnd); | 
 |  |  |             return pWin; | 
 |  |  |             xstring s = agent.xml(); | 
 |  |  |             m_agentNode = SetAgentNode(anode, s); | 
 |  |  |          } | 
 |  |  |          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) | 
 |  |  |                { | 
 |  |  |                   xstring s = agent.xml(); | 
 |  |  |                   m_agentNode = SetAgentNode(anode, s); | 
 |  |  |                } | 
 |  |  |             } | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |          //焦点激活处理函数 | 
 |  |  |          int OnSetFocus(TEvent* evt, LPARAM param) | 
 |  |  |          { | 
 |  |  |             //重置工具条 | 
 |  |  |             SetAgent(); | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |       } | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |    //焦点激活处理函数 | 
 |  |  |    int OnSetFocus(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       //重置工具条 | 
 |  |  |       SetAgent(); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |          int  OnRetrieve() | 
 |  |  |    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) | 
 |  |  |          { | 
 |  |  |             xml x; | 
 |  |  |  | 
 |  |  |             xaserverarg arg; | 
 |  |  |  | 
 |  |  |             //arg.AddArg(L"sType",c_type); | 
 |  |  |             if (xurl::get(L"OrganizationStruct/list.CompanyInfo", arg.GetString(), x) != 1) | 
 |  |  |             row = dw_list.GetRow(); | 
 |  |  |             if (row < 1) | 
 |  |  |             { | 
 |  |  |                trace(x.text()); | 
 |  |  |                MessageBox(GetHWND(), L"请选中要修改的公司行!", L"提示", 0); | 
 |  |  |                return -1; | 
 |  |  |             } | 
 |  |  |             else | 
 |  |  |          } | 
 |  |  |          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) | 
 |  |  |             { | 
 |  |  |                //trace(x.GetXml()); | 
 |  |  |                dw_list.Retrieve(x); | 
 |  |  |                dw_list.Redraw(); | 
 |  |  |                MessageBox(GetHWND(), L"请选中要删除的公司行!", L"提示", 0); | 
 |  |  |                return -1; | 
 |  |  |             } | 
 |  |  |             dw_list.SetReadOnly(true); | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |          e = dw_list.GetRowElement(row); | 
 |  |  |  | 
 |  |  |          //xgridex双击 | 
 |  |  |          int OnDoubleClicked(TEvent* evt, LPARAM p) | 
 |  |  |          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) | 
 |  |  |          { | 
 |  |  |             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 error = x1.text(); | 
 |  |  |             trace(error); | 
 |  |  |          } | 
 |  |  |  | 
 |  |  |          //命令发布函数 | 
 |  |  |          int OnCmdDispatch(xstring comdid) | 
 |  |  |          else | 
 |  |  |          { | 
 |  |  |             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; | 
 |  |  |             MessageBox(GetHWND(), L"删除成功!", L"提示", 0); | 
 |  |  |             dw_list.DeleteRow(row); | 
 |  |  |          } | 
 |  |  |  | 
 |  |  |          //命令处理事件 | 
 |  |  |          int OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |          { | 
 |  |  |             return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |          } | 
 |  |  |       } | 
 |  |  |       else if (comdid == L"Refresh") | 
 |  |  |       { | 
 |  |  |          OnRetrieve(); | 
 |  |  |       } | 
 |  |  |       return 0; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |          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 OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |    { | 
 |  |  |       return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |          int OnInitial() | 
 |  |  |          { | 
 |  |  |             SetAgent(); | 
 |  |  |             OnAttachEvent(); | 
 |  |  |    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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |    int OnInitial() | 
 |  |  |    { | 
 |  |  |       SetAgent(); | 
 |  |  |       OnAttachEvent(); | 
 |  |  |  | 
 |  |  |          int onload() | 
 |  |  |          { | 
 |  |  |             dw_list = new xdwgrid; | 
 |  |  |             dw_list.setNativePointer(GetControl(L"dw_list")); | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |             //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); | 
 |  |  |    int onload() | 
 |  |  |    { | 
 |  |  |       dw_list = new xdwgrid; | 
 |  |  |       dw_list.setNativePointer(GetControl(L"dw_list")); | 
 |  |  |  | 
 |  |  |             OnInitial(); | 
 |  |  |             OnRetrieve(); | 
 |  |  |       //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); | 
 |  |  |  | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |       OnInitial(); | 
 |  |  |       OnRetrieve(); | 
 |  |  |  | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  | }; |