#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) CustomerMarketMaint : public xframe
{
public:
	KXMLDOMDocument m_configDoc;
	xstring m_userid;
	xstring m_username;
	xstring ContactID;
	xdwtable dw_base;
	xcell dw_cell;
	xstring m_EntityID = L"";
public:
	CustomerMarketMaint(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
public:
	static CustomerMarketMaint* CreateInstance(void* implPtr, void* hWnd)
	{
		CustomerMarketMaint* pWin = new CustomerMarketMaint(implPtr, (HWND)hWnd);
		return pWin;
	}
	int alert(xstring str)
	{
		//win::MessageBox(GetHWND(),str,L"Ìáʾ22:",0);
		TApp::alert(this, str);
		return 0;
	}
	int ViewUpdate(param pr, xstring updateItem, xaserverarg  arg)
	{
		if (updateItem == L"update")
		{

			dw_base.ResetUpdateStatus();
			return 1;
		}
	}
	xstring GetEntityData(param pr)
	{
		xml x;

		dw_base.DwUpdateAllTo(x);
		//trace(L"------x");
		trace(x.xml());
		return x.xml();
	}
	int onload()
	{
		maint::onload();
		dw_base = new xdwtable;
		dw_base.setNativePointer(GetControl(L"dw_base"));
		if (!maint::m_EntityID)
		{
			//xstring suserid = publiccode::GetUser().id;
			xstring suserid = xaserver::GetUserId();
			xstring susername = publiccode::GetUser().name;
			xstring sdate = publiccode::GetCurrentDate();
			dw_base.SetItemString(dw_base.GetRow(), L"CreatorID", suserid);//Party
			dw_base.SetItemDisplayString(dw_base.GetRow(), L"CreatorID", susername);
			dw_base.SetItemString(dw_base.GetRow(), L"CreateDate", sdate);
			xml x;

			xaserverarg arg;

			arg.AddArg(L"id", suserid);
			if (xaserver::ExecXQuery(L"", L"[OrgInfo.xq]", arg.GetString(), x) != 1)
			{
				trace(x.xml());
				return nil;
			}
			//alert(x.xml());
			KXMLDOMElement e = x.documentElement();
			trace(e.xml());
			if (e.selectSingleNode(L"orgid"))
			{
				xstring orgid = e.selectSingleNode(L"orgid").text();
				dw_base.SetItemString(1, L"OrgID", orgid);
			}

			if (e.selectSingleNode(L"orgname"))
			{
				xstring orgname = e.selectSingleNode(L"orgname").text();
				dw_base.SetItemDisplayString(1, L"OrgID", orgname);
			}
		}
	}
};