ÿþ#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) PremiumRateList : public xframe { public: xdwgrid dw_list; int hSignWin; xnode m_agentNode; //Agent Condition xstring CustomerID; xstring CustomerName; public: PremiumRateList(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static PremiumRateList* CreateInstance(void* implPtr, void* hWnd) { PremiumRateList* pWin = new PremiumRateList(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) { xstring s = agent.xml(); m_agentNode = SetAgentNode(anode, s); } } return 1; } //&q¹pÀo;mYtýQpe int OnSetFocus(TEvent* evt, LPARAM param) { //͑nå]wQag SetAgent(); return 1; } int OnSave() { xml x; dw_list.AcceptText(); dw_list.DwUpdateAllToEx(x); xml x0; x0.loadXML(L"<data/>"); KXMLDOMNodeList t = x.selectNodes(L"data/Item[@update.modify='1' or @update.delete ='1']"); KXMLDOMElement e1 = x0.documentElement(); int len = t.length(); for (int i = 0; i < len; i++) { e1.appendChild(t.item(i)); } xaserverarg arg; arg.AddArg(L"content", x0.xml()); if(xurl::get(L"/sale/data/expense3/Update/PremiumRate", 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"ÝOX[bŸR!"); } else { alert(L"ÝOX[1Y%!"); } return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(xstring comdid) { if(comdid==L"xmAddRow") { xstring sdate = publiccode::GetCurrentDate(); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; int row =dw_list.GetRowCount(); dw_list.InsertRow(0); dw_list.SetItemString(row+1,L"CreatorID",suserid); dw_list.SetItemDisplayString(row+1,L"CreatorID",susername); dw_list.SetItemString(row+1,L"CreateDate",sdate); dw_list.SetItemString(row+1,L"CustomerID",CustomerID); dw_list.SetItemDisplayString(row+1,L"CustomerID",CustomerName); return 1; } else if(comdid==L"xmDeleteRow") { dw_list.DeleteRow(0); return 1; } else if (comdid == L"xmSave") { OnSave(); } else if (comdid == L"xmRefresh") { OnRetrieve(CustomerID); } else if(comdid ==L"ToUpdate") { ToUpdate(); } return 0; } int ToUpdate() { xstring Months = dw_list.GetItemString(dw_list.GetRow(), L"Months"); int MB_OKCANCEL = 1; int IDOK = 1; int ret = MessageBox(GetHWND(), L"nx¤‹ôf°e" + Months + L"ÈvNGl‡s?", L"Ðc:y", MB_OKCANCEL); if (ret == IDOK) { xml x = ViewObject::RetrieveData(L"/sale/data/Expense3/ExchangeRateUpdateEx", L"Months", Months); xstring status = x.xml(); if (status.find(L"ok") == 1) { alert(L"ôf°ebŸR"); } else { alert(L"ôf°e1Y%"); } } return 1; } //æ‰ÑS Ÿh»y_Ttran‹NöN ÿÇåg~bÐg*NÂSpe—_0Rù[”^„vR //æ‰ÑS Ÿh»y_Ttran‹NöN ÿÇåg~bÐg*NÂSpe—_0Rù[”^„vR int OnBaseItemChanged(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname = hdr.colname; xstring value = hdr.data; xstring dwname = L"dw_list"; if (value != L"") { KXMLDOMNodeList nlist = GetElement().selectNodes(L"//*[@name='" + dwname + L"']/trans[@for='" + colname + L"']"); ViewObject::TransData(nlist, dw_list, hdr.row, colname, value); } return 1; } //}TäNYt‹NöN int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnAttachEvent() { //Ñ~š[å]wQag¹pûQ‹NöN AttachEvent(L"WM_XCOMMAND", (FEvent)&PremiumRateList::OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent(L"WM_SETFOCUS", (FEvent)&PremiumRateList::OnSetFocus); AttachEvent(L"dw_list",L"DWV_ITEMCHANGED", (FEvent)&PremiumRateList::OnBaseItemChanged); return 1; } int OnRetrieve(xstring CustomerID) { xml x; xaserverarg arg; arg.AddArg(L"CustomerID",CustomerID); if (getUrl(L"/sale/data/Expense3/PremiumRateList",arg.GetString(),x)!=1) { trace(x.text()); return -1; }else { dw_list.Retrieve(x); dw_list.Redraw(); } return 1; } int onload() { SetArg(); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/Expense3/PremiumRateList"); if(GetWinParam()) { xaserverarg arg = GetArg(); CustomerID=arg.GetArgString(L"CustomerID"); CustomerName=arg.GetArgString(L"CustomerName"); } OnRetrieve(CustomerID); OnAttachEvent(); return 1; } int onloaded() { SetAgent(); return 1; } };