| | |
| | | use "frame.vl" |
| | | use "dev:vm[xdwtable.vm]" |
| | | use "file.vl" |
| | | use "dev:vm[xutil.vm]" |
| | | #include <wobject/xstring.hpp> |
| | | #include <xcontrol/xtreeview.hpp> |
| | | #include <xcontrol/xdwgrid.hpp> |
| | | #include <wobject/xdouble.hpp> |
| | | #include <xcontrol/xlayersheet.hpp> |
| | | |
| | | unit vbusiness.entity |
| | | [ |
| | | brand_regtype is extend frame; |
| | | about brand_regtype |
| | | [ |
| | | method: |
| | | [ |
| | | xdwtable__ dw_list; |
| | | |
| | | int SetAgent() |
| | | { |
| | | string xfNodeAgentArea = "agentarea"; |
| | | xnode__ anode = new xnode__; |
| | | anode.setNativePointer(GetAgentNode(xfNodeAgentArea)); |
| | | var xframeElement = GetElement(); |
| | | var agent = xframeElement.selectSingleNode("agent/"+xfNodeAgentArea+"[1]/*"); |
| | | if(agent){ |
| | | SetAgentNodeContent (anode,agent.xml); |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | xdwtable__ getDw() |
| | | { |
| | | xdwtable__ dw1 = new xdwtable__; |
| | | dw1.setNativePointer(dw_list.FindDwTable("item")); |
| | | return dw1; |
| | | } |
| | | |
| | | int addRow() |
| | | { |
| | | xdwtable__ dw = getDw(); |
| | | int row = dw.InsertRow(0); |
| | | string no = "2"; |
| | | if(row > 1) |
| | | no = dw.GetItemString(row - 1, "RegTypeID"); |
| | | int n = no.toInt(); |
| | | int h = n + 1; |
| | | dw.SetItemString(row, "RegTypeID", h.toString()); |
| | | return 1; |
| | | } |
| | | int deleteRow() |
| | | { |
| | | xdwtable__ dw = getDw(); |
| | | int row = dw.GetRow(); |
| | | if(row < 1 || row > dw.GetRowCount()) return -1; |
| | | if (win__::MessageBox(this.GetHWND(),"是否删除选择的记录行?","提示",4) == 7) |
| | | return 1; |
| | | dw.DeleteRow(row); |
| | | return 1; |
| | | } |
| | | int save() |
| | | { |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(xml__ ::CreateInstance()); |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | dw_list.AcceptText(); |
| | | dw_list.DwUpdateAllTo(x.GetXmlDoc()); |
| | | msxml::IXMLDOMElement e = x.GetXmlDoc().documentElement; |
| | | //trace(e.xml); |
| | | arg.AddArg("content", e.xml); |
| | | if(getUrl("/workflow/action/BrandRegType.dbmap/bill.update", arg.GetString(), x) != 1) |
| | | { |
| | | alert("保存失败!"); |
| | | return -1; |
| | | } |
| | | //trace(x.GetXml()); |
| | | string str = x.GetXml(); |
| | | if(str.find("保存成功", 0) > 0) |
| | | { |
| | | alert("保存成功"); |
| | | dw_list.ResetUpdateStatus(); |
| | | dw_list.Redraw(); |
| | | } |
| | | else |
| | | alert("保存失败0!"); |
| | | return 1; |
| | | } |
| | | |
| | | //命令发布函数 |
| | | int OnCmdDispatch(string comdid) |
| | | { |
| | | int hCursor = xutil__::SetCursorWait(); |
| | | if(comdid == "xmNew") addRow(); |
| | | else if(comdid == "xmDelete") deleteRow(); |
| | | else if(comdid == "xmSave") save(); |
| | | xutil__::RestoreCursor(hCursor); |
| | | return 0; |
| | | } |
| | | |
| | | //命令处理事件 |
| | | int OnXCommand(ref TXCommandEvent evt,int p) |
| | | { |
| | | return OnCmdDispatch(evt.pStrID); |
| | | } |
| | | |
| | | int OnSetFocus(ref TEvent evt,int p) |
| | | { |
| | | SetAgent() ; |
| | | return 1; |
| | | } |
| | | int OnAttachEvent() |
| | | { |
| | | AttachEvent("WM_XCOMMAND",OnXCommand); |
| | | AttachEvent("WM_SETFOCUS",OnSetFocus); |
| | | |
| | | return 1; |
| | | } |
| | | int Initail() |
| | | { |
| | | xaserverarg__ arg = new xaserverarg__; |
| | | arg.setNativePointer(arg.CreateInstance()); |
| | | xml__ x = new xml__; |
| | | x.setNativePointer(xml__ ::CreateInstance()); |
| | | if(getUrl("/sale/data/brand/entity/regtype", arg.GetString(), x) != 1) |
| | | { |
| | | alert("初始化查询失败!"); |
| | | return -1; |
| | | } |
| | | //trace(x.GetXml()); |
| | | dw_list.Retrieve(x); |
| | | dw_list.Redraw(); |
| | | return 1; |
| | | } |
| | | #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" |
| | | #include "viewobject/view.base.hpp" |
| | | |
| | | int onload() |
| | | using xml = KXMLDOMDocument; |
| | | class __declspec(dllexport) brand_regtype : public xframe |
| | | { |
| | | public: |
| | | xdwtable dw_list; |
| | | xnode m_agentNode; |
| | | public: |
| | | brand_regtype(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} |
| | | public: |
| | | static brand_regtype* CreateInstance(void* implPtr, void* hWnd) |
| | | { |
| | | brand_regtype* pWin = new brand_regtype(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) |
| | | { |
| | | dw_list = new xdwtable__; |
| | | dw_list.setNativePointer(GetControl("dw_list")); |
| | | dw_list.openUrl("/sale/view/brand/template/regtype"); |
| | | //dw_list.SetColHeaderHeight(0); |
| | | dw_list.SetRowSelectorWidth(0); |
| | | |
| | | OnAttachEvent(); |
| | | SetAgent(); |
| | | Initail(); |
| | | return -1; |
| | | xstring s = agent.xml(); |
| | | m_agentNode = SetAgentNode(anode, s); |
| | | } |
| | | ] |
| | | ] |
| | | ] |
| | | } |
| | | return 1; |
| | | } |
| | | |
| | | xdwtable getDw() |
| | | { |
| | | xdwtable dw1 = new xdwtable; |
| | | dw1.setNativePointer(dw_list.FindDwTable(L"item")); |
| | | return dw1; |
| | | } |
| | | |
| | | int addRow() |
| | | { |
| | | xdwtable dw = getDw(); |
| | | int row = dw.InsertRow(0); |
| | | xstring no = L"2"; |
| | | if (row > 1) |
| | | no = dw.GetItemString(row - 1, L"RegTypeID"); |
| | | int n = no.toInt(); |
| | | int h = n + 1; |
| | | dw.SetItemString(row, L"RegTypeID", xstring(h)); |
| | | return 1; |
| | | } |
| | | int deleteRow() |
| | | { |
| | | xdwtable dw = getDw(); |
| | | int row = dw.GetRow(); |
| | | if (row < 1 || row > dw.GetRowCount()) return -1; |
| | | if (MessageBox(GetHWND(), L"是否删除选择的记录行?", L"提示", 4) == 7) |
| | | return 1; |
| | | dw.DeleteRow(row); |
| | | return 1; |
| | | } |
| | | int save() |
| | | { |
| | | xml x; |
| | | |
| | | xaserverarg arg; |
| | | |
| | | dw_list.AcceptText(); |
| | | dw_list.DwUpdateAllTo(x); |
| | | KXMLDOMElement e = x.documentElement(); |
| | | //trace(e.xml); |
| | | arg.AddArg(L"content", e.xml()); |
| | | if (getUrl(L"/workflow/action/BrandRegType.dbmap/bill.update", arg.GetString(), x) != 1) |
| | | { |
| | | alert(L"保存失败!"); |
| | | return -1; |
| | | } |
| | | //trace(x.xml()); |
| | | xstring str = x.xml(); |
| | | if (str.find(L"保存成功", 0) > 0) |
| | | { |
| | | alert(L"保存成功"); |
| | | dw_list.ResetUpdateStatus(); |
| | | dw_list.Redraw(); |
| | | } |
| | | else |
| | | alert(L"保存失败0!"); |
| | | return 1; |
| | | } |
| | | |
| | | //命令发布函数 |
| | | int OnCmdDispatch(xstring comdid) |
| | | { |
| | | HCURSOR hCursor = xutil::SetCursorWait(); |
| | | if (comdid == L"xmNew") addRow(); |
| | | else if (comdid == L"xmDelete") deleteRow(); |
| | | else if (comdid == L"xmSave") save(); |
| | | xutil::RestoreCursor(hCursor); |
| | | return 0; |
| | | } |
| | | |
| | | //命令处理事件 |
| | | int OnXCommand(TEvent* evt, LPARAM param) |
| | | { |
| | | return OnCmdDispatch(evt->xcommand.pStrID); |
| | | } |
| | | |
| | | int OnSetFocus(TEvent* evt, LPARAM p) |
| | | { |
| | | SetAgent(); |
| | | return 1; |
| | | } |
| | | int OnAttachEvent() |
| | | { |
| | | AttachEvent(L"WM_XCOMMAND", (FEvent)&brand_regtype::OnXCommand); |
| | | AttachEvent(L"WM_SETFOCUS", (FEvent)&brand_regtype::OnSetFocus); |
| | | |
| | | return 1; |
| | | } |
| | | int Initail() |
| | | { |
| | | xaserverarg arg; |
| | | |
| | | xml x; |
| | | if (getUrl(L"/sale/data/brand/entity/regtype", arg.GetString(), x) != 1) |
| | | { |
| | | alert(L"初始化查询失败!"); |
| | | return -1; |
| | | } |
| | | //trace(x.xml()); |
| | | dw_list.Retrieve(x); |
| | | dw_list.Redraw(); |
| | | return 1; |
| | | } |
| | | |
| | | int onload() |
| | | { |
| | | dw_list = new xdwtable; |
| | | dw_list.setNativePointer(GetControl(L"dw_list")); |
| | | dw_list.openUrl(L"/sale/view/brand/template/regtype"); |
| | | //dw_list.SetColHeaderHeight(0); |
| | | dw_list.SetRowSelectorWidth(0); |
| | | |
| | | OnAttachEvent(); |
| | | SetAgent(); |
| | | Initail(); |
| | | return -1; |
| | | } |
| | | }; |