þÿuse "xcontrol.vframe.vbusiness.vd" use "xbase.vframe.vbusiness.vd" use "base.view.vd" unit trade [ class SelectSalaryslip : public frame { xdwgrid dw_list; 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Àm;YtQýep int OnSetFocus(ref TEvent evt, int param) { //‘Ín]åQwga SetAgent(); return 1; } int OnSave() { xml x = new xml; x.setNativePointer(xml::CreateInstance()); dw_list.AcceptText(); dw_list.DwUpdateAllToEx(x.GetXmlDoc()); xaserverarg arg = new xaserverarg; arg.setNativePointer(xaserverarg::CreateInstance()); arg.AddArg("content", x.GetXml()); if (url::get("/sale/data/expense3/update/salaryslip", arg.GetString(), x) != 1) { string error = x.GetXmlDoc().text; alert("err:" + error); return 1; } string str = x.GetXmlDoc().documentElement.getAttribute("text"); if (str == "true") { dw_list.Redraw(); } else { alert("OÝ[XY1%!"); } return 1; } int xmOk() { OnSave(); xaserverarg arg = GetParam(); double amount = 0.0; for (int row = 1; row <= dw_list.GetRowCount(); row++) { if (dw_list.GetItemString(row, "IsSelected") == "Y") { amount += dw_list.GetItemDouble(row, "SalaryAmount"); } } string amount2 = amount.toString(); arg.AddArg("amount", amount2); CloseWindow(); return 1; } //T}NäSÑ^Qýep int OnCmdDispatch(string comdid) { if (comdid == "xmOk") { xmOk(); return 1; } else if (comdid == "xmCancel") { CloseWindow(); return 1; } return 0; } //T}NäYtN‹Nö int OnXCommand(ref TXCommandEvent evt, int param) { return OnCmdDispatch(evt.pStrID); } int OnAttachEvent() { //~Ñ[š]åQwgap¹QûN‹Nö AttachEvent("WM_XCOMMAND", OnXCommand); //ƒ·SÖq&p¹N‹Nöÿ u(NŽ‘Ín]åQwga AttachEvent("WM_SETFOCUS", OnSetFocus); } /* int OnRetrieve() { xml x = new xml; x.setNativePointer(xml::CreateInstance()); xaserverarg arg = new xaserverarg; arg.setNativePointer(arg.CreateInstance()); arg.AddArg("xxx","xxx"); if (getUrl("",arg.GetString(),x)!=1) { trace(x.GetXmlDoc().text); return -1; }else { //dw_list.Retrieve(x); //dw_list.Redraw(); } return 1; } */ int onload() { OnAttachEvent(); dw_list = GetControl("dw_list"); dw_list.openUrl("/sale/view/expense3/Salaryslip/Select"); if (GetParam()) { xaserverarg arg = GetParam(); string SalaryslipDate = arg.GetArgString("SalaryslipDate"); string PersonID = arg.GetArgString("PersonID"); trace(SalaryslipDate + "******" + PersonID); xml x = ViewObject::RetrieveData("/sale/data/expense3/view/salaryslipSelect", "PersonID", PersonID, "SalaryslipDate", SalaryslipDate); if (x) { dw_list.Retrieve(x); dw_list.Redraw(); } } return 1; } int onloaded() { SetAgent(); return 1; } }; ]