use "xcontrol.vframe.vbusiness.vd"
|
use "xbase.vframe.vbusiness.vd"
|
|
unit trade
|
[
|
class ViewLogList : public xwin
|
{
|
xdwgrid dw_list;
|
xoffice dw_office;
|
xcell dw_cell;
|
xnode m_agentNode; //Agent Condition
|
string m_category;
|
string argStr;
|
string searchStr;
|
|
int SetAgent()
|
{
|
string xfNodeAgentArea = "agentarea";
|
xnode anode = GetAgentNode(xfNodeAgentArea);
|
if(m_agentNode)
|
{
|
SetAgentNodeContent (anode,m_agentNode);
|
}
|
else
|
{
|
msxml::IXMLDOMElement xframeElement = GetElement();
|
msxml::IXMLDOMElement agent = xframeElement.selectSingleNode("agent/"+xfNodeAgentArea+"[1]/*");
|
if(agent)
|
{
|
string s = agent.xml;
|
m_agentNode = SetAgentNodeContent (anode,s);
|
}
|
}
|
return 1;
|
}
|
|
//½¹µã¼¤»î´¦Àíº¯Êý
|
int OnSetFocus(ref TEvent evt,int param)
|
{
|
//ÖØÖù¤¾ßÌõ
|
SetAgent();
|
return 1;
|
}
|
|
//ÃüÁî·¢²¼º¯Êý
|
int OnCmdDispatch(string comdid)
|
{
|
int hCursor = 0;
|
if(comdid=="xmQuery")
|
{
|
xaserverarg ar = new xaserverarg;
|
ar.setNativePointer(ar.CreateInstance());
|
ar.AddArg("argurl","/sale/view/Total3/arg/LogListItem");
|
if(argStr !="")
|
ar.AddArg("arg",argStr);
|
OpenWindow("dev:xpage[view.total.arg.vx]",cast(ar as int));
|
string arstr = ar.GetArgString("arg");
|
if(arstr != "" && ar.GetArgString("action")=="ok")
|
{
|
argStr = arstr;
|
hCursor = xutil::SetCursorWait();
|
OnRetrieve("/sale/data/Total3/total/GDNTotal/Item/LogList",argStr);
|
|
xutil::RestoreCursor(hCursor);
|
}
|
|
else
|
{
|
argStr="";
|
OnRetrieve("/sale/data/Total3/total/GDNTotal/Item/LogList",argStr);
|
}
|
|
return 1;
|
}
|
if(comdid=="xmAnalysis")
|
{
|
hCursor = xutil::SetCursorWait();
|
string str = dw_list.DataAnalysis("");
|
xaserverarg arg=new xaserverarg;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("html", str);
|
int obj = cast(dw_list as int);
|
arg.AddArg("obj",obj.toString());
|
OpenWindow("dev:xpage[data.vanalysis.vx]", cast(arg as int));
|
xutil::RestoreCursor(hCursor);
|
return 1;
|
}
|
if(comdid=="xmSearch") return OnSearch();
|
return 0;
|
}
|
|
int OnSearch()
|
{
|
xaserverarg arg=new xaserverarg;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("text", searchStr);
|
OpenWindow("dev:xpage[search.dialog.vx]", cast(arg as int));
|
string str = arg.GetArgString("text");
|
if(str != searchStr)
|
{
|
searchStr = str;
|
dw_list.Filter("*",searchStr);
|
return 1;
|
}
|
return 1;
|
}
|
|
|
|
int OnCombboChanged(ref TCommandEvent evt,int lParam)
|
{
|
int h = xcombobox::GetCurSel(evt.hCtrl);
|
if(h > -1)
|
{
|
int hCursor = xutil::SetCursorWait();
|
msxml::IXMLDOMElement e = xcombobox::GetItemData(evt.hCtrl, h);
|
|
win32::PostMessage(GetHWND(),0x401,"xmQuery",0);
|
//OnCmdDispatch("xmQuery");
|
xutil::RestoreCursor(hCursor);
|
}
|
return 1;
|
}
|
|
|
|
//ÃüÁî´¦Àíʼþ
|
int OnXCommand(ref TXCommandEvent evt,int param)
|
{
|
return OnCmdDispatch(evt.pStrID);
|
}
|
|
int OnDWClick(ref TNotifyEvent evt,int p)
|
{
|
ref DWNMHDR hdr = trust(evt.pnmh as ref DWNMHDR);
|
string value = hdr.data;
|
string colname = hdr.colname;
|
int row = hdr.row;
|
|
if(row < 1) return 1;
|
|
return 1;
|
}
|
|
int OnAttachEvent()
|
{
|
//°ó¶¨¹¤¾ßÌõµã»÷ʼþ
|
AttachEvent("WM_XCOMMAND",OnXCommand);
|
//»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ
|
AttachEvent("WM_SETFOCUS",OnSetFocus);
|
AttachEvent("cb_report","CBN_SELCHANGE",OnCombboChanged);
|
AttachEvent("dw_report","DWV_CLICKED",OnDWClick);
|
}
|
|
int OnRetrieve(string dataurl, string argstr)
|
{
|
dw_list.Reset();
|
|
xml x = new xml;
|
x.setNativePointer(xml::CreateInstance());
|
xaserverarg arg = new xaserverarg;
|
arg.setNativePointer(arg.CreateInstance());
|
arg.AddArg("arg",argstr);
|
//alert(argstr);
|
|
if (url::get(dataurl,arg.GetString(),x)!=1)
|
{
|
//alert(x.GetXml());
|
trace(x.GetXmlDoc().text);
|
dw_list.Redraw();
|
return -1;
|
}
|
//alert(x.GetXml());
|
dw_list.Retrieve(x);
|
dw_list.Redraw();
|
dw_list.SetReadOnly(true);
|
|
return 1;
|
}
|
|
int onload()
|
{
|
dw_list = GetControl("dw_report");
|
dw_office = GetControl("dw_office");
|
dw_cell = GetControl("dw_cell");
|
dw_list.openUrl("/sale/view/Total3/template/business/gdn/LogList/ship/full");
|
|
argStr ="";
|
xcombobox xc = GetControl("cb_report");
|
|
|
OnAttachEvent();
|
return 1;
|
}
|
|
int onloaded()
|
{
|
SetAgent();
|
OnCmdDispatch("xmQuery");
|
return 1;
|
}
|
};
|
]
|
