#include <wobject/xwin.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <xcontrol/xoffice.hpp>
#include <xcontrol/xcell.hpp>
#include <xcontrol/xflowchart.hpp>
#include <xcontrol/ximageview.hpp>
#include <xcontrol/xcombobox.hpp>

#include <vbusiness/vutil/publiccode.vutil.vbusiness.hpp>
#include "viewobject/view.base.hpp"


using xml = KXMLDOMDocument;

	class __declspec(dllexport)  ViewEx1TotalWin :  public xwin
	{
	public:
		ViewEx1TotalWin(void* implPtr, HWND hWnd) :xwin(implPtr, hWnd) {}
	public:
		static ViewEx1TotalWin* CreateInstance(void* implPtr, void* hWnd)
		{
			ViewEx1TotalWin* pWin = new ViewEx1TotalWin(implPtr, (HWND)hWnd);
			return pWin;
		}
	public:
		xdwgrid	dw_list;
		xoffice 	dw_office;
		xcell		dw_cell;
		xnode	m_agentNode;	//Agent Condition
		KXMLDOMElement rptEle;
		xstring m_category;
		xstring argStr;
	
		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, int param)
		{
			//ÖØÖù¤¾ßÌõ
			SetAgent();
			return 1;
		}

		//ÃüÁî·¢²¼º¯Êý
		int OnCmdDispatch(xstring comdid)
		{
			HCURSOR hCursor =  0;
			 if(comdid==L"xmAnalysis")
			{
				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;
			 }
			 if(comdid==L"xmTrans")
				 return OnTransData();
			 if(comdid==L"xmQuery")
			{
				if(rptEle)
				{
					xstring argUrl = rptEle.getAttribute(L"arg");
					if(argUrl !=L"")
					{
						xaserverarg ar ;
						
						ar.AddArg(L"argurl",argUrl);
						if(argStr !=L"") 
							ar.AddArg(L"arg",argStr);
						OpenWindow(L"dev:xpage[view.total.arg.vx]",ar);
						xstring arstr = ar.GetArgString(L"arg");
						if(arstr != L"" && ar.GetArgString(L"action")==L"ok")
						{
							argStr = arstr;
							hCursor = xutil::SetCursorWait();
							OnRetrieve(rptEle.getAttribute(L"data"),argStr);
							xutil::RestoreCursor(hCursor);
						}
					}
					else
					{
						argStr=L"";
						OnRetrieve(rptEle.getAttribute(L"data"),argStr);
					}
				}
				return 1;
			 }
			if(comdid==L"xmSaveAs")
			{
				dw_list.SaveAs(L"");
				return 1;
			}
			return 0;
		}
		
		int SwitchReport(KXMLDOMElement e)
		{
			xstring dwname = e.getAttribute(L"template");
			xstring dataurl = e.getAttribute(L"data");
			xstring sheettype = e.getAttribute(L"reporttype");
			if(rptEle != e)
			{
				argStr = L"";
				rptEle = e;
			}
			if(sheettype==L"") sheettype=L"report";
			SwitchLayer(L"dw_"+sheettype,L"report");
			if(sheettype==L"report")dw_list.openUrl(dwname);
			
			SetAgent();
			return 1;
		}
		
		int OnCombboChanged(TEvent* evt, int lParam)
		{
			int h = xcombobox::GetCurSel(evt->command.hCtrl);
			if(h > -1) 
			{
				HCURSOR hCursor = xutil::SetCursorWait();
				KXMLDOMElement e = xcombobox::GetItemData(evt->command.hCtrl, h);
				SwitchReport(e);
				PostMessage(GetHWND(),0x401,(LPARAM)L"xmQuery",0);
				//OnCmdDispatch(L"xmQuery");
				xutil::RestoreCursor(hCursor);
			}
			return 1;
		}

		int OnTransData()
		{
			int ret =  MessageBox(GetHWND(),L"ÊÇ·ñ¸üÐÂÊý¾Ý?\n¸üйý³ÌÔ¤¼ÆÐèÒªËÄÊ®·ÖÖÓ£¬Èç¹ûÖм䵯³öµÈ´ýʱ¼ä¹ý³¤µÄÌáʾ£¬Çëµã»÷ÖмäÖØÊÔ°´Å¥£¬»òµÈ´ýµ½Ò»¶¨Ê±¼äÔÙµã»÷",L"Ìáʾ",0x4 /*yesno*/);
			if(ret != 6 /*IDYES */ ) return 1;

			xml x ;
			
			HCURSOR hCursor = xutil::SetCursorWait();
			if (xurl::get(L"/sale/data/Total3/total/transdata",L"",x)!=1)
			{
				xutil::RestoreCursor(hCursor);
				return 1;
			}else	
			{
				xutil::RestoreCursor(hCursor);
				alert(L"Êý¾Ý´«ÊäÍê³É!");
				return 1;
			}
			
			return 1;
		}
			
		//ÃüÁî´¦Àíʼþ
		int OnXCommand(TEvent* evt, int param)
		{
			return OnCmdDispatch(evt->xcommand.pStrID);
		}
		
		int OnDWClick(TEvent* evt, int p)
		{
			DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
			xstring value = hdr.data;
			xstring colname = hdr.colname;
			int row = hdr.row;
			
			if(row < 1) return 1;
			
			xaserverarg arg;
			/*
			if(colname==L"SONo")
			{
				xstring SONo = dw_list.GetItemString(row,colname);
				arg=new xaserverarg;
				arg.setNativePointer(arg.CreateInstance());						
				arg.AddArg(L"EntityNo",SONo);
				arg.AddArg(L"ReadOnly",L"true");
				OpenWindow(L"dev:xpage[base.maint.so.vx]",arg.getNativePointer());
			}
			if(colname==L"InvoiceNo")
			{
				xstring InvoiceNo= dw_list.GetItemString(row,colname);
				arg=new xaserverarg;
				arg.setNativePointer(arg.CreateInstance());						
				arg.AddArg(L"EntityNo",InvoiceNo);
				arg.AddArg(L"ReadOnly",L"true");
				OpenWindow(L"dev:xpage[maint.GDN3.vx]",arg.getNativePointer());
			}
			if(colname==L"InvoiceNoEx")
			{
				xstring InvoiceNoEx= dw_list.GetItemString(row,colname);
				arg=new xaserverarg;
				arg.setNativePointer(arg.CreateInstance());						
				arg.AddArg(L"EntityNo",InvoiceNoEx);
				arg.AddArg(L"invoiceno",InvoiceNoEx);
				arg.AddArg(L"ReadOnly",L"true");
				OpenWindow(L"dev:xpage[maint.vatnotify.vx]",arg.getNativePointer());
			}
			*/
			return 1;
		}

		int OnAttachEvent()
		{
			//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
			AttachEvent(L"WM_XCOMMAND", (FEvent)&ViewEx1TotalWin::OnXCommand);
			//»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ
			AttachEvent(L"WM_SETFOCUS", (FEvent)&ViewEx1TotalWin::OnSetFocus);
			AttachEvent(L"cb_report",L"CBN_SELCHANGE", (FEvent)&ViewEx1TotalWin::OnCombboChanged);
			AttachEvent(L"dw_report",L"DWV_CLICKED", (FEvent)&ViewEx1TotalWin::OnDWClick);
			return 1;
		}
		
		int  OnRetrieve(xstring dataurl, xstring argstr)
		{
			if(!rptEle) return 0;
			
			dw_list.Reset();
			
			xml x ;
			
			xaserverarg arg ;
			
			arg.AddArg(L"arg",argstr);
			
			xstring sheettype = rptEle.getAttribute(L"reporttype");
			if(sheettype==L"") sheettype=L"report";
			if (xurl::get(dataurl,arg.GetString(),x)!=1)
			{
				trace(L"\r\n--------"+(xstring)x.text());
				dw_list.Redraw();
				return -1;
			}else	
			{
				//xutil::SaveToFile(L"C:\\Temp\\Total3.xml()",x.GetXml(),L"",L"",L"");
				if(sheettype==L"report")
				{
					dw_list.Retrieve(x);
					dw_list.Redraw();
					dw_list.SetReadOnly(true);
				 }
				else if(sheettype==L"cell")
				{
				}
				else if(sheettype==L"office")
				{
					dw_office.LoadTemplate(x,0);
					for(int i=0; i<dw_office.GetSheetCount();i++)
					{
						xcell sheet = dw_office.GetSheet(i);
						sheet.SetReadOnly(true);
					}
				}
			}
			return 1;
		}

		xml getReportSet(xstring category)
		{
			xml x ;
			
			xaserverarg arg ;
			
			arg.AddArg(L"category",category);
			if (xurl::get(L"/sale/data/Total3/reportset",arg.GetString(),x)!=1)
			{
				return 0;
			}
			return x;
		}
		
		int onload()
		{
			SetArg();
			dw_list = GetControl(L"dw_report");
			dw_office  = GetControl(L"dw_office");
			dw_cell = GetControl(L"dw_cell");
			dw_list.openUrl(L"/sale/view/Total3/template/sodetail");
			
			argStr =L"";
			//rptEle = 0;
			xcombobox xc = GetControl(L"cb_report");
			
			//m_category = L"total/business";
			m_category = L"total/sample";
			if(GetWinParam()) {
				xaserverarg arg =GetArg();
			
				m_category = arg.GetArgString(L"category");
			}
			xml x = getReportSet(m_category);
			if(x)
			{
				KXMLDOMNodeList nlist =x.selectNodes(L"//reports/report");
				int len = nlist.length();
				for(int i=0; i<len; i++)
				{
					KXMLDOMElement rpt = nlist.item(i);
					xstring name = rpt.getAttribute(L"name");
					xc.AddItem(name, rpt);
					if(i==0) xc.SetText(name);
					if(i==0) rptEle = rpt;
				}
			}
			OnAttachEvent();	
			return 1;
		}
		
		int onloaded()
		{
			SetAgent();
			
			if(rptEle)
			{
				SwitchReport(rptEle);
				//OnCmdDispatch(L"xmQuery");
			}
			
			return 1;
		}		
	};