| | |
| | | #include <wobject/xstring.hpp> |
| | | #include <xcontrol/xtreeview.hpp> |
| | | #include <xcontrol/xdwgrid.hpp> |
| | | 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 "frame.vl" |
| | | use "publiccode.vl" |
| | | |
| | | #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" |
| | | #include "viewobject/view.base.hpp" |
| | | //unit vclient.vobject tpp |
| | | unit vbusiness.xpage |
| | | [ |
| | | HrPersonMaint is extend frame; |
| | | about HrPersonMaint |
| | | [ |
| | | control: |
| | | |
| | | using xml = KXMLDOMDocument; |
| | | class __declspec(dllexport) Deduction : public xframe |
| | | { |
| | | public: |
| | | xdwgrid dw_list; |
| | | xstring EntityID; |
| | | xstring InvoiceNo; |
| | | method: |
| | | [ |
| | | xdwtable__ dw_1; |
| | | string m_operate; |
| | | string m_sguid; |
| | | |
| | | xnode m_agentNode; //Agent Condition |
| | | |
| | | public: |
| | | Deduction(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} |
| | | public: |
| | | static Deduction* CreateInstance(void* implPtr, void* hWnd) |
| | | { |
| | | Deduction* pWin = new Deduction(implPtr, (HWND)hWnd); |
| | | return pWin; |
| | | } |
| | | 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) |
| | | xnode__ m_agentNode; //Agent Condition |
| | | string m_agentCond; //Agent Node |
| | | int SetAgent() |
| | | { |
| | | xstring s = agent.xml(); |
| | | m_agentNode = SetAgentNode(anode, s); |
| | | string xfNodeAgentArea = "agentarea"; |
| | | xnode__ anode = new xnode__; |
| | | anode.setNativePointer(GetAgentNode(xfNodeAgentArea)); |
| | | var xframeElement = GetElement(); |
| | | var agent = xframeElement.selectSingleNode("agent/" + xfNodeAgentArea + "[1]/*"); |
| | | if (agent) |
| | | { |
| | | string s = agent.xml; |
| | | SetAgentNodeContent(anode, s); |
| | | } |
| | | return 1; |
| | | } |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | int OnRowChanged(TEvent* evt, LPARAM p) |
| | | { |
| | | DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; |
| | | int row = hdr.row; |
| | | SetAgent(); |
| | | return 1; |
| | | } |
| | | //焦点激活处理函数 |
| | | int OnSetFocus(ref TEvent evt, int p) |
| | | { |
| | | SetAgent(); |
| | | |
| | | //焦点激活处理函数 |
| | | int OnSetFocus(TEvent* evt, LPARAM param) |
| | | { |
| | | //重置工具条 |
| | | SetAgent(); |
| | | return 1; |
| | | } |
| | | //重置工具条 |
| | | 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 OnSave() |
| | | { |
| | | int hIcon = xutil__::SetCursorWait(); |
| | | |
| | | //命令处理事件 |
| | | int OnXCommand(TEvent* evt, LPARAM param) |
| | | { |
| | | return OnCmdDispatch(evt->xcommand.pStrID); |
| | | } |
| | | string val; |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | var xdoc = x.GetXmlDoc(); |
| | | dw_1.AcceptText(); |
| | | dw_1.DwUpdateAllTo(xdoc); |
| | | val = xdoc.xml; |
| | | //trace(val); |
| | | xaserverarg__ args = new xaserverarg__; |
| | | args.setNativePointer(args.CreateInstance()); |
| | | args.AddArg("content", val); |
| | | //trace(m_EntityValueEx); |
| | | //trace(val); |
| | | xml__ x1 = new xml__; |
| | | x1.setNativePointer(x1.CreateInstance()); |
| | | if (url::post("OrganizationStruct/update.HrPerson", args.GetString(), x1) != 1) |
| | | { |
| | | string error = x1.GetXmlDoc().text; |
| | | trace(error); |
| | | return 1; |
| | | } |
| | | else |
| | | { |
| | | trace(x1.GetXml()); |
| | | win__::MessageBox(GetHWND(), "保存成功!", "提示", 0); |
| | | } |
| | | dw_1.ResetUpdateStatus(); |
| | | xutil__::RestoreCursor(hIcon); |
| | | return 1; |
| | | } |
| | | |
| | | xstring GetGuid() |
| | | { |
| | | return publiccode::GetGuid(); |
| | | } |
| | | int OnAddRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | dw.InsertRow(0); |
| | | return 1; |
| | | } |
| | | |
| | | 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 OnInsertRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | { |
| | | int row = dw.GetRow(); |
| | | dw.InsertRow(row); |
| | | } |
| | | 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.Redraw(); |
| | | return 1; |
| | | } |
| | | int OnDeleteRow() |
| | | { |
| | | xdwtable__ dw = new xdwtable__; |
| | | dw.setNativePointer(dw_1.GetCurTable()); |
| | | string dw_n = dw.GetDwName(); |
| | | if (dw_n == "HrEmployee") |
| | | { |
| | | int row = dw.GetRow(); |
| | | dw.DeleteRow(row); |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | 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 OnUpdateAssignmentView() |
| | | { |
| | | xml__ x1 = new xml__; |
| | | x1.setNativePointer(x1.CreateInstance()); |
| | | if (url::post("OrganizationStruct/update.Assignmentview", "", x1) != 1) |
| | | { |
| | | string error = x1.GetXmlDoc().text; |
| | | trace(error); |
| | | return 1; |
| | | } |
| | | else |
| | | { |
| | | trace(x1.GetXml()); |
| | | win__::MessageBox(GetHWND(), "更新成功!", "提示", 0); |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | //命令发布函数 |
| | | int OnCmdDispatch(string comdid) |
| | | { |
| | | if (comdid == "Save") OnSave(); |
| | | else if (comdid == "AddRow") OnAddRow(); |
| | | else if (comdid == "InsertRow") OnInsertRow(); |
| | | else if (comdid == "DeleteRow") OnDeleteRow(); |
| | | else if (comdid == "Close") CloseWindow(); |
| | | else if (comdid == "UpdateAssignmentView") |
| | | OnUpdateAssignmentView(); |
| | | return 0; |
| | | } |
| | | |
| | | 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 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"); |
| | | } |
| | | if (xaserver__::ExecXQuery(GetServerUrl(), query, arg.GetString(), x) == 1) |
| | | dwhdr.data = x.GetXml(); |
| | | //trace(x.GetXml()); |
| | | } |
| | | 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 OnItemChanged(ref TNotifyEvent evt, int p) |
| | | { |
| | | int HCursor = xutil__::SetCursorWait(); |
| | | |
| | | int onload() |
| | | { |
| | | SetArg(); |
| | | dw_list = GetControl(L"dw_list"); |
| | | dw_list.openUrl(L"/sale/view/AR/template/Deduction"); |
| | | ref DWNMHDR dwhdr = evt.pnmh; |
| | | int row = dwhdr.row; |
| | | string col = dwhdr.colname; |
| | | string data = dwhdr.data; |
| | | trace(row); |
| | | |
| | | dw_list.SetColumnState(L"ID", false); |
| | | dw_list.SetColumnState(L"GDNLineID", false); |
| | | dw_list.SetColumnState(L"SettlementAdjustID", false); |
| | | if (col == "Name") |
| | | { |
| | | string Name = dw_1.GetItemString(1, "Name", 0); |
| | | |
| | | xml__ xs = new xml__; |
| | | xs.setNativePointer(xs.CreateInstance()); |
| | | xaserverarg__ args = new xaserverarg__; |
| | | args.setNativePointer(args.CreateInstance()); |
| | | args.AddArg("Name", Name); |
| | | if (url::get("/sale/data/ManpowerFile/GetUserName", args.GetString(), xs) != 1) |
| | | { |
| | | trace(xs.GetXmlDoc().text); |
| | | return -1; |
| | | } |
| | | else |
| | | { |
| | | msxml::IXMLDOMNodeList items = xs.GetXmlDoc().selectNodes("data/Item"); |
| | | int len = items.length; |
| | | if (len != 0) |
| | | { |
| | | msxml::IXMLDOMNode t = items.item(0); |
| | | |
| | | if (GetWinParam()) |
| | | { |
| | | xaserverarg arg = GetArg(); |
| | | EntityID = arg.GetArgString(L"EntityID"); |
| | | InvoiceNo = arg.GetArgString(L"InvoiceNo"); |
| | | } |
| | | trace(InvoiceNo); |
| | | OnRetrieve(InvoiceNo, EntityID); |
| | | OnAttachEvent(); |
| | | return 1; |
| | | } |
| | | string english_name = ""; |
| | | string sex = ""; |
| | | string sexex = ""; |
| | | string birth_date = ""; |
| | | string contact = ""; |
| | | string induction_time = ""; |
| | | string household_register = ""; |
| | | string EmailAddress = ""; |
| | | if (t.selectSingleNode("english_name")) english_name = t.selectSingleNode("english_name").text; |
| | | if (t.selectSingleNode("sex")) sex = t.selectSingleNode("sexex").text; |
| | | if (t.selectSingleNode("sexex")) sexex = t.selectSingleNode("sexex").text; |
| | | if (t.selectSingleNode("birth_date")) birth_date = t.selectSingleNode("birth_date").text; |
| | | if (t.selectSingleNode("contact")) contact = t.selectSingleNode("contact").text; |
| | | if (t.selectSingleNode("induction_time")) induction_time = t.selectSingleNode("induction_time").text; |
| | | if (t.selectSingleNode("household_register")) household_register = t.selectSingleNode("household_register").text; |
| | | if (t.selectSingleNode("EmailAddress")) EmailAddress = t.selectSingleNode("EmailAddress").text; |
| | | |
| | | int onloaded() |
| | | { |
| | | SetAgent(); |
| | | dw_1.SetItemString(1, "NickName", english_name); |
| | | dw_1.SetItemDisplayString(1, "Gender", sexex); |
| | | dw_1.SetItemString(1, "Gender", sex); |
| | | dw_1.SetItemString(1, "Birthday", birth_date); |
| | | dw_1.SetItemString(1, "Mobile", contact); |
| | | dw_1.SetItemString(1, "HireDate", induction_time); |
| | | dw_1.SetItemString(1, "BirthPlace", household_register); |
| | | dw_1.SetItemString(1, "Email", EmailAddress); |
| | | } |
| | | } |
| | | |
| | | return 1; |
| | | } |
| | | }; |
| | | } |
| | | if (col == "PositionID") |
| | | { |
| | | xdwtable__ dw_HrEmployee = new xdwtable__; |
| | | dw_HrEmployee.setNativePointer(dw_1.FindDwTable("HrEmployee")); |
| | | string sPositionID = dw_HrEmployee.GetItemString(row, "PositionID"); |
| | | |
| | | if (sPositionID == "" || sPositionID == nil) |
| | | 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"); |
| | | //trace(arg.GetString()); |
| | | if (url::get("OrganizationStruct/GetOrgIDJobID", arg.GetString(), x) != 1) |
| | | { |
| | | trace(x.GetXmlDoc().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 sJobID = e.SelectSingleNode("@JobID").text; |
| | | dw_HrEmployee.SetItemString(row, "OrgID", sOrgID); |
| | | dw_HrEmployee.SetItemString(row, "JobID", sJobID); |
| | | string sdate = publiccode::GetCurDate() + ""; |
| | | dw_HrEmployee.SetItemString(row, "StartDate", sdate + ""); |
| | | dw_HrEmployee.SetItemString(row, "EndDate", "2050-12-31"); |
| | | } |
| | | } |
| | | |
| | | xutil__::RestoreCursor(HCursor); |
| | | |
| | | return 0; |
| | | } |
| | | |
| | | //命令处理事件 |
| | | int OnXCommand(ref TXCommandEvent evt, int p) |
| | | { |
| | | return OnCmdDispatch(evt.pStrID); |
| | | } |
| | | |
| | | int OnAttachEvent() |
| | | { |
| | | //绑定工具条点击事件 |
| | | AttachEvent("WM_XCOMMAND", OnXCommand); |
| | | //获取焦点事件,用于重置工具条 |
| | | AttachEvent("WM_SETFOCUS", OnSetFocus); |
| | | //下拉框 提供内容 |
| | | AttachEvent("dw_detail", "DWV_CHILDCONTENT", OnChildContent); |
| | | //内容改变 |
| | | AttachEvent("dw_detail", "DWV_ITEMCHANGED", OnItemChanged); |
| | | // |
| | | //AttachEvent("dw_detail","DWV_ITEMFOCUSCHANGED",OnItemFocusChanged); |
| | | } |
| | | |
| | | int OnRetrieve() |
| | | { |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | arg.AddArg("guid", m_sguid); |
| | | if (url::get("OrganizationStruct/detail.HrPerson", arg.GetString(), x) != 1) |
| | | { |
| | | trace(x.GetXmlDoc().text); |
| | | return -1; |
| | | } |
| | | else |
| | | { |
| | | dw_1.Retrieve(x); |
| | | dw_1.Redraw(); |
| | | //trace(x.GetXml()); |
| | | } |
| | | |
| | | return 1; |
| | | } |
| | | |
| | | int OnInitial() |
| | | { |
| | | SetAgent(); |
| | | |
| | | OnAttachEvent(); |
| | | |
| | | return 1; |
| | | } |
| | | |
| | | int onload() |
| | | { |
| | | |
| | | dw_1 = new xdwtable__; |
| | | dw_1.setNativePointer(this.GetControl("dw_detail")); |
| | | dw_1.openUrl("组织架构.vface/template/HrPerson/maint"); |
| | | OnInitial(); |
| | | |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | arg = this.GetParam(); |
| | | if (arg) |
| | | { |
| | | m_operate = arg.GetArgString("operate"); |
| | | m_sguid = arg.GetArgString("guid"); |
| | | } |
| | | |
| | | /*if ( m_sguid == "" || m_sguid == nil) |
| | | { |
| | | string val; |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(x.CreateInstance()); |
| | | var xdoc = x.GetXmlDoc(); |
| | | dw_1.DwUpdateTo(xdoc); |
| | | val = xdoc.xml ; |
| | | |
| | | xml__ xx = new xml__; |
| | | xx.setNativePointer(xx.CreateInstance()); |
| | | xx.loadXML(val); |
| | | msxml::IXMLDOMElement e; |
| | | e = xx.GetXmlDoc().selectSingleNode("HrPerson"); |
| | | if (e) |
| | | { |
| | | string sguid = e.getAttribute("guid"); |
| | | m_sguid = sguid; |
| | | } |
| | | //trace(m_sguid); |
| | | }*/ |
| | | if (m_sguid != "") |
| | | OnRetrieve(); |
| | | return 1; |
| | | } |
| | | ] |
| | | |
| | | ] |
| | | ] |