þÿuse "xcontrol.vframe.vbusiness.vd" use "xbase.vframe.vbusiness.vd" use "base.view.vd" unit trade [ class FreightExpenseItemWin : public xframe { xdwtable dw_base; xdwtable dw_base2; xdwgrid dw_list; xdwgrid dw_list2; xdwgrid dw_list3; xdwgrid dw_list4; xdwtable dw_item; xml fields; string isupdate; 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() { dw_base.AcceptText(); dw_base2.AcceptText(); dw_list.AcceptText(); string UserID = publiccode::GetUser().id; string UserNo = publiccode::GetUser().no; if (UserNo != "00601" && UserNo != "00502") { if (dw_base.GetItemString(1, "CreatorID") != UserID) { alert("_SRMNºTXN f/_UQeNºTXÿ eàlÕOÝ[Xÿ"); return 1; } } if (dw_base.GetItemString(1, "Vol") == "") { alert("‹÷“QeOSyï!"); return 1; } /*if(dw_base.GetItemString(1,"Container")=="") { alert("{±W‹Oá`o‹÷W(QúÐSUN ˆeŸP!"); return 1; } if(dw_base.GetItemString(1,"ShipAgentID")=="") { alert("‹÷“Qe'Nã!"); return 1; }*/ xml x = new xml; x.setNativePointer(xml::CreateInstance()); xaserverarg arg = new xaserverarg; arg.setNativePointer(arg.CreateInstance()); dw_list.DwUpdateAllToEx(x.GetXmlDoc()); dw_base.DwUpdateAllTo(x.GetXmlDoc()); //trace(x.GetXml()); //return 1; string error = ""; arg.AddArg("content", x.GetXml()); if (url::get("/sale/data/expense3/update/freight", arg.GetString(), x) != 1) { error = x.GetXmlDoc().text; alert(error); } else { string str = x.GetXmlDoc().documentElement.getAttribute("text"); if (str == "true") { dw_list.ResetUpdateStatus(); dw_base.ResetUpdateStatus(); dw_base2.ResetUpdateStatus(); alert("OÝ[XbRŸ!"); } else { alert("OÝ[XY1%!"); } } return 1; } int OnItemChanged(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_base"; if (value != "") { msxml::IXMLDOMNodeList nlist = GetElement().selectNodes("//*[@name='" + dwname + "']/trans[@for='" + colname + "']"); ViewObject::TransData(nlist, dw_base, hdr.row, colname, value); } if (colname == "InvoiceNo") { /*xml x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/items","container",dw_base.GetItemString(1,"Container")); if(x) { dw_list.Retrieve(x); dw_list.Redraw(); }*/ return 0; } if (colname == "Type") { xml x; if (value == "1") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/shipAgentFee"); x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "'Nã"); if (x) dw_list.Retrieve(x); } if (value == "2") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/warehouseFee"); x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "NÓ^“"); if (x) dw_list.Retrieve(x); } if (value == "3") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/formaFee"); x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "FormA"); if (x) dw_list.Retrieve(x); } if (value == "4") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/inspectionFee"); x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "UFhÀ"); if (x) dw_list.Retrieve(x); } if (value == "5") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/customsBrokerFee"); x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "b¥Qs"); if (x) dw_list.Retrieve(x); } for (int row = 1; row <= dw_list.GetRowCount(); ++row) { dw_list.SetItemString(row, "CurrencyCode", "RMB"); } dw_base.SetItemString(1, "AgentInvoNo", ""); dw_base.SetItemString(1, "FreightExpense", ""); dw_base.SetItemString(1, "LCLFCL", ""); dw_base.SetItemString(1, "FormaDate", ""); dw_base.SetItemString(1, "CertificateNo", ""); dw_base.SetItemString(1, "SerialNo", ""); dw_base.SetItemString(1, "InspectionDate", ""); dw_base.SetItemString(1, "InspectionNo", ""); dw_base.SetItemString(1, "CustomsBroker", ""); dw_list.Redraw(); dw_base2.SetColHeaderHeight(0); dw_base2.SetRowSelectorWidth(0); dw_base2.SetHScrollState(false); dw_base2.SetVScrollState(false); } /*if(fields) { if(fields.GetXmlDoc().selectSingleNode("/data/Field/FieldName[.='"+colname+"']")) { msxml::IXMLDOMNodeList items= fields.GetXmlDoc().selectNodes("/data/Field/FieldName"); int len = items.length; double amt = 0; for(int i=0;i<len;i++) { if(dw_item.GetItemString(1,items.item(i).text) !="") { amt += dw_item.GetItemDouble(1,items.item(i).text); } } dw_item.SetItemDouble(1,"Amount",amt); } }*/ return 1; } int OnItemChanged2(ref TNotifyEvent evt, int p) { ref DWNMHDR hdr = trust(evt.pnmh as ref DWNMHDR); string colname = hdr.colname; string value = hdr.data; dw_base.SetItemString(1, colname, value); dw_base.Redraw(); return 1; } //T}NäSÑ^Qýep int OnCmdDispatch(string comdid) { if (comdid == "xmAddRow") { if (isupdate == "false") return 0; dw_list.InsertRow(0); return 1; } else if (comdid == "xmDeleteRow") { if (isupdate == "false") return 0; dw_list.DeleteRow(0); return 1; } else if (comdid == "xmClose") { CloseWindow(); return 1; } else if (comdid == "xmSave") { if (isupdate == "false") return 0; OnSave(); 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); AttachEvent("dw_base", "DWV_ITEMCHANGED", OnItemChanged); AttachEvent("dw_base2", "DWV_ITEMCHANGED", OnItemChanged2); } int OnRetrieve(string FreightExpenseID) { xml x = new xml; x.setNativePointer(xml::CreateInstance()); xaserverarg arg = new xaserverarg; arg.setNativePointer(arg.CreateInstance()); arg.AddArg("FreightExpenseID", FreightExpenseID); if (getUrl("/sale/data/Expense3/view/freight/maint", arg.GetString(), x) != 1) { trace(x.GetXmlDoc().text); return -1; } else { dw_base.Retrieve(x); dw_base.Redraw(); string Type = dw_base.GetItemString(1, "Type"); if (Type == "1") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/shipAgentFee"); } if (Type == "2") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/warehouseFee"); } if (Type == "3") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/formaFee"); } if (Type == "4") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/inspectionFee"); } if (Type == "5") { dw_base2.openUrl("/sale/view/Expense3/freight/maint/customsBrokerFee"); } dw_base2.SetColHeaderHeight(0); dw_base2.SetRowSelectorWidth(0); dw_base2.SetHScrollState(false); dw_base2.SetVScrollState(false); dw_base2.Retrieve(x); dw_base2.Redraw(); dw_list.Retrieve(x); dw_list.Redraw(); } return 1; } int initail() { dw_base.SetItemString(1, "Type", "1"); dw_base.SetItemDisplayString(1, "Type", "'Nã9u("); xml x = ViewObject::RetrieveData("/sale/data/Expense3/freight/initail/itemsex", "type", "'Nã"); if (x) dw_list.Retrieve(x); for (int row = 1; row <= dw_list.GetRowCount(); ++row) { dw_list.SetItemString(row, "CurrencyCode", "RMB"); } return 0; } int onload() { dw_base = GetControl("dw_base"); dw_base.openUrl("/sale/view/Expense3/freight/maint/base"); dw_base.SetColHeaderHeight(0); dw_base.SetRowSelectorWidth(0); dw_base.SetHScrollState(false); dw_base.SetVScrollState(false); dw_base2 = GetControl("dw_base2"); dw_base2.openUrl("/sale/view/Expense3/freight/maint/shipAgentFee"); dw_base2.SetColHeaderHeight(0); dw_base2.SetRowSelectorWidth(0); dw_base2.SetHScrollState(false); dw_base2.SetVScrollState(false); //dw_base.SetReadOnly(true); string sdate = publiccode::GetCurrentDate(); dw_base.SetItemString(1, "CreateDate", sdate); string suserid = publiccode::GetUser().id; string susername = publiccode::GetUser().name; dw_base.SetItemString(1, "CreatorID", suserid); dw_base.SetItemDisplayString(1, "CreatorID", susername); OnAttachEvent(); dw_list = GetControl("dw_list"); dw_list.openUrl("/sale/view/Expense3/freight/maint/item"); dw_list.SetColumnWidth(0, 0); string jobname = publiccode::GetUser().jobname; if (jobname == "NR¡TX") { dw_list.SetReadOnly(true); dw_base.SetReadOnly(true); dw_base2.SetReadOnly(true); } if (GetParam()) { xaserverarg arg = GetParam(); string FreightExpenseID = arg.GetArgString("FreightExpenseID"); if (FreightExpenseID) OnRetrieve(FreightExpenseID); else initail(); } else { initail(); } string positionname = publiccode::GetUser().positionname; if (positionname.find("NR¡") >= 0) { isupdate = "false"; } else { isupdate = "true"; } return 1; } int onloaded() { //SetAgent(); return 1; } }; ]