ÿþuse "xcontrol.vframe.vbusiness.vd" use "xbase.vframe.vbusiness.vd" use "base.view.vd" use "publiccode.vutil.vbusiness.vd" unit trade [ class SampleAbnormal : public xframe { xdwgrid dw_list; xdwtable dw_arg; xnode m_agentNode; //Agent Condition 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; } //&q¹pÀo;mYtýQpe int OnSetFocus(ref TEvent evt,int param) { //͑nå]wQag SetAgent(); return 1; } int OnRelation() { int MB_OKCANCEL = 1; int IDOK = 1; int ret = win32::MessageBox(GetHWND(),"nx¤‹ôf°e?","Ðc:y",MB_OKCANCEL); if(ret == IDOK) { xml x = ViewObject::RetrieveData("/sale/data/Sample/entity/UpdateSampleAbnormal"); string status = x.GetXml(); if(status.find("ok") == 1) { alert("ôf°ebŸRÿ"); OnRetrieve(); }else { alert("ôf°e1Y%ÿ"); } } return 1; } //}TäNÑS^ýQpe int OnCmdDispatch(string comdid) { int hCursor = 0; if (comdid == "xmRefresh") { OnRetrieve(); } if (comdid == "Relation") { OnRelation(); } return 0; } //æ‰ÑS Ÿh»y_Ttran‹NöN ÿÇåg~bÐg*NÂSpe—_0Rù[”^„vR int OnBaseItemChanged(ref TNotifyEvent evt,int p) { ref DWNMHDR hdr = trust(evt.pnmh as ref DWNMHDR); string colname=hdr.colname; string value = hdr.data; string dwname = "dw_list"; if(value != "") { msxml::IXMLDOMNodeList nlist = GetElement().selectNodes("//*[@name='"+dwname+"']/trans[@for='"+colname+"']"); ViewObject::TransData(nlist, dw_list, hdr.row, colname, value); } return 1; } //}TäNYt‹NöN int OnXCommand(ref TXCommandEvent evt,int param) { return OnCmdDispatch(evt.pStrID); } int OnAttachEvent() { //Ñ~š[å]wQag¹pûQ‹NöN AttachEvent("WM_XCOMMAND",OnXCommand); //·ƒÖS&q¹p‹NöN ÿ(uŽN͑nå]wQag AttachEvent("WM_SETFOCUS",OnSetFocus); AttachEvent("dw_list","DWV_ITEMCHANGED",OnBaseItemChanged); } string GetQueryArg() { dw_arg.AcceptText(); xml x = new xml; x.setNativePointer(xml::CreateInstance()); dw_arg.DwUpdateAllTo(x.GetXmlDoc()); return x.GetXml(); } int OnRetrieve() { xml x = new xml; x.setNativePointer(xml::CreateInstance()); xaserverarg arg = new xaserverarg; arg.setNativePointer(arg.CreateInstance()); arg.AddArg("QueryTxt",GetControl("search").GetText()); arg.AddArg("QueryArg",GetQueryArg()); trace(GetQueryArg()); if (getUrl("/sale/data/Sample/entity/SampleAbnormalList",arg.GetString(),x)!=1) { alert(x.GetXml()); trace(x.GetXmlDoc().text); return -1; }else { dw_list.Retrieve(x); dw_list.Redraw(); } dw_list.SetSelectionMode(1); dw_list.SetReadOnly(true); return 1; } int onload() { dw_list = GetControl("dw_list"); dw_list.openUrl("/sale/view/Sample/template/Sample/list"); dw_arg = GetControl("dw_arg"); dw_arg.openUrl("/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,"DateType"," N¾‹š["); OnRetrieve(); OnAttachEvent(); return 1; } int onloaded() { SetAgent(); return 1; } }; ]