þÿ#include <wobject/xstring.hpp> #include <xcontrol/xtreeview.hpp> #include <xcontrol/xdwgrid.hpp> #include <wobject/xdouble.hpp> #include <xcontrol/xlayersheet.hpp> #include <xcontrol/xdatetimepick.hpp> #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" #include "viewobject/view.base.hpp" using xml = KXMLDOMDocument; class __declspec(dllexport) BasicFareList : public xframe { public: xdwgrid dw_list; xdatetimepick sdate; xdatetimepick edate; xdwtable dw_arg; xnode m_agentNode; //Agent Condition xstring DatePicker; public: BasicFareList(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static BasicFareList* CreateInstance(void* implPtr, void* hWnd) { BasicFareList* pWin = new BasicFareList(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; } //T}NäSÑ^Qýep int OnCmdDispatch(xstring comdid) { if (comdid == L"xmRefresh") { OnRetrieve(DatePicker); } else if (comdid == L"xmAdd") { xaserverarg arg; arg.AddArg(L"HWND", xstring((__int64)GetHWND())); OpenWindow(L"dev:xpage[maint.basicfare.vx]", arg); } else if (comdid == L"xmEdit") { xaserverarg arg; xstring BasicFareID = dw_list.GetGuid(dw_list.GetRow()); arg.AddArg(L"BasicFareID", BasicFareID); arg.AddArg(L"HWND", xstring((__int64)GetHWND())); OpenWindow(L"dev:xpage[maint.basicfare.vx]", arg); } else if (comdid == L"xmDelete") { xstring EntityID = dw_list.GetGuid(dw_list.GetRow()); int MB_OKCANCEL = 1; int IDOK = 1; int ret = MessageBox(GetHWND(), L"xn‹¤R –dWúg,9u(?", L"cÐy:", MB_OKCANCEL); if (ret == IDOK) { ViewObject::RetrieveData(L"/sale/data/expense3/delete/basicfare", L"EntityID", EntityID); OnRetrieve(DatePicker); } } else if (comdid == L"xmAnalysis") { OnAnalysis(); return 1; } return 0; } int OnAnalysis() { HCURSOR hCursor = 0; hCursor = xutil::SetCursorWait(); xstring str = dw_list.DataAnalysis(L""); xaserverarg arg; arg.AddArg(L"html", str); OpenWindow(L"dev:xpage[data.vanalysis.vx]",arg); xutil::RestoreCursor(hCursor); return 1; } int OnDoubleClicked(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname = hdr.colname; int row = hdr.row; HCURSOR hCursor = xutil::SetCursorWait(); xaserverarg arg; xstring BasicFareID = dw_list.GetGuid(row); arg.AddArg(L"BasicFareID", BasicFareID); OpenWindow(L"dev:xpage[maint.basicfare.vx]", arg); xutil::RestoreCursor(hCursor); return 1; } //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)&BasicFareList::OnXCommand); //ƒ·SÖq&p¹N‹Nöÿ u(NŽ‘Ín]åQwga AttachEvent(L"WM_SETFOCUS", (FEvent)&BasicFareList::OnSetFocus); AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&BasicFareList::OnDoubleClicked); AttachEvent(L"cbx_state", L"CBN_SELCHANGE", (FEvent)&BasicFareList::OnDatePicker); return 1; } int OnDatePicker(TEvent* evt, LPARAM lParam) { int h = xcombobox::GetCurSel(evt->command.hCtrl); if (h > -1) { xstring txt = (string)xcombobox::GetLBText(evt->command.hCtrl, h); if (txt == L"b¥•eåg") { DatePicker = L"BasicFareID"; OnRetrieve(DatePicker); } else if (txt == L"_UQeeåg") { DatePicker = L"CreateDate"; OnRetrieve(DatePicker); } } return 1; } xstring GetQueryArg() { dw_arg.AcceptText(); xml x ; dw_arg.DwUpdateAllTo(x); return x.xml(); } int OnRetrieve(xstring DatePicker) { /*xml x ; xaserverarg arg; xstring sdatetxt = L""; xstring edatetxt = L""; if(sdate.IsChecked()) sdatetxt = sdate.GetText(); if(edate.IsChecked()) edatetxt = edate.GetText() xcontrol query = GetControl(L"sl_search"); xstring keyword = query.GetText(); //arg.AddArg(L"keyword",keyword); //arg.AddArg(L"sdate",sdatetxt); //arg.AddArg(L"edate",edatetxt); arg.AddArg(L"QueryTxt",keyword); arg.AddArg(L"QueryArg",GetQueryArg()); arg.AddArg(L"DatePicker",DatePicker); trace(keyword+L"=====L"+GetQueryArg()+L"=====L"+DatePicker); int hCursor = xutil::SetCursorWait();;*/ xml x ; xaserverarg arg; arg.AddArg(L"QueryTxt", xcontrol(GetControl(L"sle_search")).GetText()); arg.AddArg(L"QueryArg", GetQueryArg()); arg.AddArg(L"DatePicker", DatePicker); trace(GetQueryArg() + DatePicker); if (getUrl(L"/sale/data/expense3/view/basicFare", arg.GetString(), x) != 1) { trace(x.text()); return -1; } else { dw_list.Retrieve(x); dw_list.Redraw(); dw_list.SetReadOnly(true); } //xutil::RestoreCursor(hCursor); return 1; } int onload() { dw_arg = GetControl(L"dw_arg"); dw_arg.openUrl(L"/sale/view/AR/template/queryarg"); dw_arg.SetColHeaderHeight(0); dw_arg.SetRowSelectorWidth(0); dw_arg.SetHScrollState(false); dw_arg.SetVScrollState(false); dw_arg.SetItemString(1, L"DateType", L"g,g"); sdate = GetControl(L"sdate"); edate = GetControl(L"edate"); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/expense3/BasicFare/list"); xstring currdate = publiccode::GetCurrentDate(); int curryear = currdate.mid(0, 4).toInt(); //sdate.SetDatetime(curryear - 1,1,1); OnAttachEvent(); OnRetrieve(DatePicker); dw_list.SetReadOnly(true); return 1; } int onloaded() { SetAgent(); return 1; } };