þÿ#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) BasicFareEdit : public xframe { public: xdwtable dw_base; xnode m_agentNode; //Agent Condition HWND hObject; bool updated; public: BasicFareEdit(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static BasicFareEdit* CreateInstance(void* implPtr, void* hWnd) { BasicFareEdit* pWin = new BasicFareEdit(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Àm;YtQýep int OnSetFocus(TEvent* evt, LPARAM param) { //‘Ín]åQwga SetAgent(); return 1; } int OnSave() { xml x ; dw_base.AcceptText(); dw_base.DwUpdateAllTo(x); xaserverarg arg; arg.AddArg(L"content", x.xml()); if (xurl::get(L"/sale/data/expense3/update/basicfare", 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_base.ResetUpdateStatus(); dw_base.Redraw(); updated = true; alert(L"OÝ[XbRŸ!"); } else { alert(L"OÝ[XY1%!"); } return 1; } //T}NäSÑ^Qýep int OnCmdDispatch(xstring comdid) { if (comdid == L"xmClose") { if (updated) SendMessage(hObject, 0x401, (LPARAM)L"xmRefresh", 0); CloseWindow(); return 1; } else if (comdid == L"xmSave") { OnSave(); } return 0; } //T}NäYtN‹Nö int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnAttachEvent() { //~Ñ[š]åQwgap¹QûN‹Nö AttachEvent(L"WM_XCOMMAND", (FEvent)&BasicFareEdit::OnXCommand); //ƒ·SÖq&p¹N‹Nöÿ u(NŽ‘Ín]åQwga AttachEvent(L"WM_SETFOCUS", (FEvent)&BasicFareEdit::OnSetFocus); return 1; } int OnRetrieve(xstring BasicFareID) { xml x ; xaserverarg arg; arg.AddArg(L"BasicFareID", BasicFareID); if (getUrl(L"/sale/data/expense3/view/getBasicFareByID", arg.GetString(), x) != 1) { trace(x.text()); return -1; } else { dw_base.Retrieve(x); dw_base.Redraw(); } return 1; } int onload() { SetArg(); dw_base = GetControl(L"dw_base"); dw_base.openUrl(L"/sale/view/expense3/BasicFare/Base"); dw_base.SetColHeaderHeight(0); dw_base.SetRowSelectorWidth(0); dw_base.SetHScrollState(false); dw_base.SetVScrollState(false); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; xstring sdate = publiccode::GetCurrentDate(); xstring BasicFareID = L""; hObject = 0; if (GetWinParam()) { xaserverarg arg=GetArg(); BasicFareID = arg.GetArgString(L"BasicFareID"); hObject = (HWND)arg.GetParam(L"HWND"); } if (BasicFareID != L"") { OnRetrieve(BasicFareID); dw_base.SetItemString(1, L"LastEditManID", suserid); dw_base.SetItemString(1, L"LastEditDate", sdate); } else { dw_base.SetItemString(1, L"BasicDate", sdate); dw_base.SetItemString(1, L"BasicFareDate", sdate); dw_base.SetItemString(1, L"CreateDate", sdate); dw_base.SetItemString(1, L"CreatorID", suserid); } OnAttachEvent(); updated = false; return 1; } int onloaded() { SetAgent(); return 1; } };