| | |
| | | use "win.vl" |
| | | use "dev:vm[xdwgrid.vm]" |
| | | use "dev:vm[xdwtable.vm]" |
| | | use "pref.vl" |
| | | use "dev:vm[xml.vm]" |
| | | use "dev:vm[xaserverarg.vm]" |
| | | use "dev:vm[xaserver.vm]" |
| | | use "dev:vm[xutil.vm]" |
| | | use "list.vl" |
| | | use "treeview.vm" |
| | | //unit vclient.vobject tpp |
| | | unit vbusiness.xpage |
| | | [ |
| | | HrEmployeex is extend list; |
| | | about HrEmployeex |
| | | [ |
| | | field: |
| | | [ |
| | | treeview__ tv_org; |
| | | xdwtable__ dw_1; |
| | | xnode__ m_agentNode; |
| | | string is_orgid |
| | | string is_orgname; |
| | | string is_inflag; |
| | | xdwtable__ dw_empmaint; |
| | | ] |
| | | #include <wobject/xstring.hpp> |
| | | #include <xcontrol/xtreeview.hpp> |
| | | #include <xcontrol/xdwgrid.hpp> |
| | | #include <wobject/xdouble.hpp> |
| | | #include <xcontrol/xlayersheet.hpp> |
| | | |
| | | method: |
| | | [ |
| | | #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" |
| | | #include "viewobject/view.base.hpp" |
| | | |
| | | using xml = KXMLDOMDocument; |
| | | |
| | | class __declspec(dllexport) HrEmployeex : public xwin |
| | | { |
| | | public: |
| | | xtreeview tv_org; |
| | | xdwtable dw_1; |
| | | xnode m_agentNode; |
| | | xstring is_orgid; |
| | | xstring is_orgname; |
| | | xstring is_inflag; |
| | | xdwtable dw_empmaint; |
| | | public: |
| | | HrEmployeex(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {} |
| | | public: |
| | | static HrEmployeex* CreateInstance(void* implPtr, void* hWnd) |
| | | { |
| | | HrEmployeex* pWin = new HrEmployeex(implPtr, (HWND)hWnd); |
| | | return pWin; |
| | | } |
| | | int SetAgent() |
| | | { |
| | | string xfNodeAgentArea = "agentarea"; |
| | | xnode__ anode = new xnode__; |
| | | anode.setNativePointer(GetAgentNode(xfNodeAgentArea)); |
| | | var xframeElement = GetElement(); |
| | | var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "/*[1]"); |
| | | 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) |
| | | { |
| | | string s = agent.xml; |
| | | SetAgentNodeContent(anode, s); |
| | | xstring s = agent.xml(); |
| | | m_agentNode = SetAgentNode(anode, s); |
| | | } |
| | | } |
| | | return 1; |
| | | } |
| | | //焦点激活处理函数 |
| | | int OnSetFocus(ref TEvent evt, int p) |
| | | int OnSetFocus(TEvent* evt, LPARAM param) |
| | | { |
| | | SetAgent(); |
| | | //重置工具条 |
| | |
| | | |
| | | int OnSave() |
| | | { |
| | | int hIcon = xutil__::SetCursorWait(); |
| | | HCURSOR hIcon = xutil::SetCursorWait(); |
| | | |
| | | string val; |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | var xdoc = x.GetXmlDoc(); |
| | | xstring val; |
| | | xml x; |
| | | |
| | | var xdoc = x; |
| | | dw_1.AcceptText(); |
| | | dw_1.DwUpdateAllTo(xdoc); |
| | | val = xdoc.xml; |
| | | //trace(val); |
| | | //return 1; |
| | | xaserverarg__ args = new xaserverarg__; |
| | | args.setNativePointer(args.CreateInstance()); |
| | | args.AddArg("content", val); |
| | | xml__ x1 = new xml__; |
| | | x1.setNativePointer(x1.CreateInstance()); |
| | | if (url::post("OrganizationStruct/update.Employee", args.GetString(), x1) != 1) |
| | | xaserverarg args; |
| | | |
| | | args.AddArg(L"content", val); |
| | | xml x1; |
| | | |
| | | if (xurl::post(L"OrganizationStruct/update.Employee", args.GetString(), x1) != 1) |
| | | { |
| | | string error = x1.GetXmlDoc().text; |
| | | xstring error = x1.text(); |
| | | trace(error); |
| | | } |
| | | else |
| | | { |
| | | win__::MessageBox(GetHWND(), "保存成功!", "提示", 0); |
| | | MessageBox(GetHWND(), L"保存成功!", L"提示", 0); |
| | | } |
| | | |
| | | xutil__::RestoreCursor(hIcon); |
| | | xutil::RestoreCursor(hIcon); |
| | | return 1; |
| | | } |
| | | |
| | | int OnRetrieve(string ls_orgid) |
| | | int OnRetrieve(xstring ls_orgid) |
| | | { |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | arg.AddArg("OrgID", ls_orgid); |
| | | xml x; |
| | | |
| | | xaserverarg arg; |
| | | |
| | | arg.AddArg(L"OrgID", ls_orgid); |
| | | //trace(ls_orgid); |
| | | //if (xaserver__::ExecXQuery(GetServerUrl(),"[MSSqlHrEmployee.xq]",arg.GetString(),x) == 1) |
| | | if (url::get("OrganizationStruct/detail.Employee", arg.GetString(), x) == 1) |
| | | //if (xaserver::ExecXQuery(GetServerUrl(),L"[MSSqlHrEmployee.xq]",arg.GetString(),x) == 1) |
| | | if (xurl::get(L"OrganizationStruct/detail.Employee", arg.GetString(), x) == 1) |
| | | { |
| | | dw_1.openUrl("组织架构.vface/template/HrEmployee/detail"); |
| | | dw_1.openUrl(L"组织架构.vface/template/HrEmployee/detail"); |
| | | dw_1.Retrieve(x); |
| | | dw_1.Redraw(); |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | int OnTreeSelChanged(ref TXCommandEvent evt, int p) |
| | | int OnTreeSelChanged(TEvent* evt, int p) |
| | | { |
| | | int wid = tv_org.GetId(); |
| | | int hitem = treeview__::GetSelectedItem(wid); |
| | | msxml::IXMLDOMElement ele = treeview__::GetItemData(wid, hitem); |
| | | string ls_orgid = ele.SelectSingleNode("@guid").text; |
| | | //int wid = tv_org.GetId(); |
| | | HTREEITEM hitem = tv_org.GetSelectedItem(); |
| | | KXMLDOMElement ele = tv_org.GetItemData(hitem); |
| | | xstring ls_orgid = ele.selectSingleNode(L"@guid").text(); |
| | | is_orgid = ls_orgid; |
| | | //trace(is_orgid); |
| | | OnRetrieve(ls_orgid); |
| | |
| | | |
| | | int OnAddRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | xdwtable dw = new xdwtable; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | xstring dw_n = dw.GetDwName(); |
| | | if (dw_n == L"HrEmployee") |
| | | dw.InsertRow(0); |
| | | return 1; |
| | | } |
| | | |
| | | int OnInsertRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | xdwtable dw = new xdwtable; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | xstring dw_n = dw.GetDwName(); |
| | | if (dw_n == L"HrEmployee") |
| | | { |
| | | int row = dw.GetRow(); |
| | | dw.InsertRow(row); |
| | |
| | | |
| | | int OnDeleteRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | xdwtable dw = new xdwtable; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | xstring dw_n = dw.GetDwName(); |
| | | if (dw_n == L"HrEmployee") |
| | | { |
| | | int row = dw.GetRow(); |
| | | dw.DeleteRow(row); |
| | |
| | | return 1; |
| | | } |
| | | |
| | | int OnChildContent(ref TNotifyEvent evt, int p) { |
| | | ref DWNMHDR dwhdr = evt.pnmh; |
| | | string col = dwhdr.colname; |
| | | if (col != "") { |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | string query; |
| | | query = "[IResourceMSSql.xq]"; |
| | | if (col == "PositionID") { |
| | | arg.AddArg("ResourceType", "HrPosition"); |
| | | int OnChildContent(TEvent* evt, LPARAM p) |
| | | { |
| | | DWNMHDR& dwhdr = *(DWNMHDR*)evt->notify.pnmh; |
| | | xstring col = dwhdr.colname; |
| | | if (col != L"") { |
| | | xml x; |
| | | |
| | | xaserverarg arg; |
| | | |
| | | xstring query; |
| | | query = L"[IResourceMSSql.xq]"; |
| | | if (col == L"PositionID") { |
| | | arg.AddArg(L"ResourceType", L"HrPosition"); |
| | | } |
| | | else if (col == "PersonID") { |
| | | arg.AddArg("ResourceType", "HrPerson"); |
| | | else if (col == L"PersonID") { |
| | | arg.AddArg(L"ResourceType", L"HrPerson"); |
| | | } |
| | | else if (col == "OrgID") { |
| | | arg.AddArg("ResourceType", "HrOrg"); |
| | | else if (col == L"OrgID") { |
| | | arg.AddArg(L"ResourceType", L"HrOrg"); |
| | | } |
| | | else if (col == "JobID") { |
| | | arg.AddArg("ResourceType", "HrJob"); |
| | | else if (col == L"JobID") { |
| | | arg.AddArg(L"ResourceType", L"HrJob"); |
| | | } |
| | | if (xaserver__::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1) |
| | | dwhdr.data = x.GetXml(); |
| | | if (xaserver::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1) |
| | | dwhdr.data = x.xml(); |
| | | //trace(x.GetXml()); |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | int OnItemChanged(ref TNotifyEvent evt, int p) |
| | | int OnItemChanged(TEvent* evt, LPARAM p) |
| | | { |
| | | int HCursor = xutil__::SetCursorWait(); |
| | | DWNMHDR& dwhdr = *(DWNMHDR*)evt->notify.pnmh; |
| | | HCURSOR HCursor = xutil::SetCursorWait(); |
| | | |
| | | ref DWNMHDR dwhdr = evt.pnmh; |
| | | |
| | | int row = dwhdr.row; |
| | | string col = dwhdr.colname; |
| | | string data = dwhdr.data; |
| | | trace(row); |
| | | if (col == "PositionID") |
| | | xstring col = dwhdr.colname; |
| | | xstring data = dwhdr.data; |
| | | trace(xstring(row)); |
| | | if (col == L"PositionID") |
| | | { |
| | | xdwtable__ dw_HrEmployee = new xdwtable__; |
| | | dw_HrEmployee.setNativePointer(dw_1.FindDwTable("HrEmployee")); |
| | | string sPositionID = dw_HrEmployee.GetItemString(row, "PositionID"); |
| | | xdwtable dw_HrEmployee = new xdwtable; |
| | | dw_HrEmployee.setNativePointer(dw_1.FindDwTable(L"HrEmployee")); |
| | | xstring sPositionID = dw_HrEmployee.GetItemString(row, L"PositionID"); |
| | | |
| | | if (sPositionID == "" || sPositionID == nil) |
| | | if (sPositionID == L"") |
| | | return 1; |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | arg.AddArg("guid", sPositionID); |
| | | arg.AddArg("type", "GetOrgIDJobID"); |
| | | xml x; |
| | | |
| | | xaserverarg arg; |
| | | |
| | | arg.AddArg(L"guid", sPositionID); |
| | | arg.AddArg(L"type", L"GetOrgIDJobID"); |
| | | //trace(arg.GetString()); |
| | | if (url::get("OrganizationStruct/GetOrgIDJobID", arg.GetString(), x) != 1) |
| | | if (xurl::get(L"OrganizationStruct/GetOrgIDJobID", arg.GetString(), x) != 1) |
| | | { |
| | | trace(x.GetXmlDoc().text); |
| | | trace(x.text()); |
| | | return -1; |
| | | } |
| | | else |
| | | { |
| | | msxml::IXMLDOMDocument xdoc = x.GetXmlDoc(); |
| | | //IXMLDOMNodeList nlist = xdoc.getElementsByTagName("OrgID"); |
| | | msxml::IXMLDOMElement e = xdoc.documentElement; |
| | | string sOrgID = e.SelectSingleNode("@OrgID").text; |
| | | string sOrgName = e.SelectSingleNode("@OrgName").text; |
| | | string sJobID = e.SelectSingleNode("@JobID").text; |
| | | string sJobName = e.SelectSingleNode("@JobName").text; |
| | | dw_HrEmployee.SetItemString(row, "OrgID", sOrgID); |
| | | dw_HrEmployee.SetItemDisplayString(row, "OrgID", sOrgName); |
| | | dw_HrEmployee.SetItemString(row, "JobID", sJobID); |
| | | dw_HrEmployee.SetItemDisplayString(row, "JobID", sJobName); |
| | | KXMLDOMDocument xdoc = x; |
| | | //IXMLDOMNodeList nlist = xdoc.getElementsByTagName(L"OrgID"); |
| | | KXMLDOMElement e = xdoc.documentElement(); |
| | | xstring sOrgID = e.selectSingleNode(L"@OrgID").text(); |
| | | xstring sOrgName = e.selectSingleNode(L"@OrgName").text(); |
| | | xstring sJobID = e.selectSingleNode(L"@JobID").text(); |
| | | xstring sJobName = e.selectSingleNode(L"@JobName").text(); |
| | | dw_HrEmployee.SetItemString(row, L"OrgID", sOrgID); |
| | | dw_HrEmployee.SetItemDisplayString(row, L"OrgID", sOrgName); |
| | | dw_HrEmployee.SetItemString(row, L"JobID", sJobID); |
| | | dw_HrEmployee.SetItemDisplayString(row, L"JobID", sJobName); |
| | | } |
| | | } |
| | | xutil__::RestoreCursor(HCursor); |
| | | xutil::RestoreCursor(HCursor); |
| | | return 0; |
| | | } |
| | | |
| | | int OnImportData() |
| | | { |
| | | openUrl("组织架构.vface/xpage/Hr/HrPersonSel", this); |
| | | openUrl(L"组织架构.vface/xpage/Hr/HrPersonSel", this); |
| | | return 1; |
| | | } |
| | | //命令发布函数 |
| | | int OnCmdDispatch(string comdid) |
| | | int OnCmdDispatch(xstring comdid) |
| | | { |
| | | if (comdid == "AddRow") return OnAddRow(); |
| | | else if (comdid == "InsertRow") return OnInsertRow(); |
| | | else if (comdid == "DeleteRow") return OnDeleteRow(); |
| | | else if (comdid == "Save") return OnSave(); |
| | | else if (comdid == "ImportData") return OnImportData(); |
| | | if (comdid == L"AddRow") return OnAddRow(); |
| | | else if (comdid == L"InsertRow") return OnInsertRow(); |
| | | else if (comdid == L"DeleteRow") return OnDeleteRow(); |
| | | else if (comdid == L"Save") return OnSave(); |
| | | else if (comdid == L"ImportData") return OnImportData(); |
| | | return 0; |
| | | } |
| | | |
| | | //命令处理事件 |
| | | int OnXCommand(ref TXCommandEvent evt, int p) |
| | | int OnXCommand(TEvent* evt, LPARAM param) |
| | | { |
| | | return OnCmdDispatch(evt.pStrID); |
| | | return OnCmdDispatch(evt->xcommand.pStrID); |
| | | } |
| | | |
| | | int OnAttachEvent() |
| | | { |
| | | //绑定工具条点击事件 |
| | | AttachEvent("WM_XCOMMAND", OnXCommand); |
| | | AttachEvent(L"WM_XCOMMAND", (FEvent)&HrEmployeex::OnXCommand); |
| | | //获取焦点事件,用于重置工具条 |
| | | AttachEvent("WM_SETFOCUS", OnSetFocus); |
| | | AttachEvent(L"WM_SETFOCUS", (FEvent)&HrEmployeex::OnSetFocus); |
| | | //获得树的选择事件 |
| | | AttachEvent("tv_org", "TVN_SELCHANGED", OnTreeSelChanged); |
| | | AttachEvent(L"tv_org", L"TVN_SELCHANGED", (FEvent)&HrEmployeex::OnTreeSelChanged); |
| | | //下拉框 提供内容 |
| | | AttachEvent("dw_1", "DWV_CHILDCONTENT", OnChildContent); |
| | | AttachEvent("dw_1", "DWV_ITEMCHANGED", OnItemChanged); |
| | | AttachEvent(L"dw_1", L"DWV_CHILDCONTENT", (FEvent)&HrEmployeex::OnChildContent); |
| | | AttachEvent(L"dw_1", L"DWV_ITEMCHANGED", (FEvent)&HrEmployeex::OnItemChanged); |
| | | return 1; |
| | | } |
| | | |
| | | int OnInitial() |
| | |
| | | |
| | | int onload() |
| | | { |
| | | tv_org = new treeview__; |
| | | tv_org.setNativePointer(this.GetControl("tv_org")); |
| | | dw_1 = new xdwtable__; |
| | | dw_1.setNativePointer(this.GetControl("dw_1")); |
| | | dw_1.openUrl("组织架构.vface/template/HrEmployee/detail"); |
| | | tv_org = new treeview; |
| | | tv_org.setNativePointer(GetControl(L"tv_org")); |
| | | dw_1 = new xdwtable; |
| | | dw_1.setNativePointer(GetControl(L"dw_1")); |
| | | dw_1.openUrl(L"组织架构.vface/template/HrEmployee/detail"); |
| | | |
| | | OnInitial(); |
| | | int wid = tv_org.GetId(); |
| | | int root = treeview__::GetRootItem(wid); |
| | | treeview__::ExpandItem(wid, root); |
| | | //int wid = tv_org.GetId(); |
| | | HTREEITEM root = tv_org.GetRootItem(); |
| | | tv_org.ExpandItem( root); |
| | | return 1; |
| | | } |
| | | ] |
| | | |
| | | ] |
| | | ] |
| | | }; |