#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>

#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"

using xml = KXMLDOMDocument;
	class __declspec(dllexport) APSelectDlg : public xframe
	{
	public:
		xdwgrid	dw_list;
		xcontrol query;

		xnode	m_agentNode;	//Agent Condition

	public:
		APSelectDlg(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
	public:
		static APSelectDlg* CreateInstance(void* implPtr, void* hWnd)
		{
			APSelectDlg* pWin = new APSelectDlg(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;
		}

		//½¹µã¼¤»î´¦Àíº¯Êý
		int OnSetFocus(TEvent* evt, LPARAM param)
		{
			//ÖØÖù¤¾ßÌõ
			SetAgent();
			return 1;
		}
		int onOk()
		{
			xaserverarg arg = GetArg();
			arg.AddArg(L"items", L"");
			KXMLDOMElement ele = dw_list.GetRowElement(dw_list.GetRow());
			arg.AddArg(L"items", L"<data>" + xstring(ele.xml()) + L"</data>");
			CloseWindow();
			return 1;
		}
		//ÃüÁî·¢²¼º¯Êý
		int OnCmdDispatch(xstring comdid)
		{
			if (comdid == L"xmCancel")
			{
				CloseWindow();
				return 1;
			}
			else if (comdid == L"xmQuery")
			{
				RetrieveData();
				return 1;
			}
			else if (comdid == L"xmOk")
			{
				onOk();
				return 1;
			}
			return 0;
		}

		//ÃüÁî´¦Àíʼþ
		int OnXCommand(TEvent* evt, LPARAM param)
		{
			return OnCmdDispatch(evt->xcommand.pStrID);
		}

		int OnAttachEvent()
		{
			//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
			AttachEvent(L"WM_XCOMMAND", (FEvent)&APSelectDlg::OnXCommand);
			//»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ
			AttachEvent(L"WM_SETFOCUS", (FEvent)&APSelectDlg::OnSetFocus);
			AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&APSelectDlg::onOk);
		}

		int RetrieveData()
		{
			xstring keyword = query.GetText();
			trace(keyword);
			xml x = ViewObject::RetrieveData(L"/sale/data/PurchaseOrder/po/searchadvance", L"PONo", keyword);
			if (x)
				dw_list.Retrieve(x);
			dw_list.Redraw();
			dw_list.SetReadOnly(true);
			return 1;
		}

		int onload()
		{
			dw_list = GetControl(L"dw_list");
			dw_list.openUrl(L"/sale/view/PurchaseOrder/template/purchaseorder/POAdvance");
			OnAttachEvent();
			dw_list.SetColumnState(L"POID", false);
			dw_list.SetColumnState(L"PartyID", false);
			xaserverarg arg = GetArg();
			xstring PONo;
			if (arg)
			{
				PONo = arg.GetArgString(L"PONo");
			}
			query = GetControl(L"sle_search");
			query.SetText(PONo);
			RetrieveData();
			return 1;
		}

		int onloaded()
		{
			SetAgent();

			return 1;
		}
	};