þÿ#include <wobject/xstring.hpp> #include <xcontrol/xtreeview.hpp> #include <xcontrol/xdwgrid.hpp> #include <wobject/xdouble.hpp> #include <xcontrol/xlayersheet.hpp> #include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" #include "viewobject/view.base.hpp" using xml = KXMLDOMDocument; class __declspec(dllexport) FreightExpenseItemWin : public xframe { public: xdwtable dw_base; xdwtable dw_base2; xdwgrid dw_list; xdwgrid dw_list2; xdwgrid dw_list3; xdwgrid dw_list4; xdwtable dw_item; xml fields; xstring isupdate; xnode m_agentNode; //Agent Condition public: FreightExpenseItemWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} public: static FreightExpenseItemWin* CreateInstance(void* implPtr, void* hWnd) { FreightExpenseItemWin* pWin = new FreightExpenseItemWin(implPtr, (HWND)hWnd); return pWin; } 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; } //q&p¹oÀm;YtQýep int OnSetFocus(TEvent* evt, LPARAM param) { //‘Ín]åQwga //SetAgent(); return 1; } int OnSave() { dw_base.AcceptText(); dw_base2.AcceptText(); dw_list.AcceptText(); xstring UserID = publiccode::GetUser().id; xstring UserNo = publiccode::GetUser().no; if (UserNo != L"00601" && UserNo != L"00502") { if (dw_base.GetItemString(1, L"CreatorID") != UserID) { alert(L"_SRMNºTXN f/_UQeNºTXÿ eàlÕOÝ[Xÿ"); return 1; } } if (dw_base.GetItemString(1, L"Vol") == L"") { alert(L"‹÷“QeOSyï!"); return 1; } /*if(dw_base.GetItemString(1,L"Container")==L"") { alert(L"{±W‹Oá`o‹÷W(QúÐSUN ˆeŸP!"); return 1; } if(dw_base.GetItemString(1,L"ShipAgentID")==L"") { alert(L"‹÷“Qe'Nã!"); return 1; }*/ xml x ; xaserverarg arg; dw_list.DwUpdateAllToEx(x); dw_base.DwUpdateAllTo(x); //trace(x.xml()); //return 1; xstring error = L""; arg.AddArg(L"content", x.xml()); if (xurl::get(L"/sale/data/expense3/update/freight", arg.GetString(), x) != 1) { error = x.text(); alert(error); } else { xstring str = x.documentElement().getAttribute(L"text"); if (str == L"true") { dw_list.ResetUpdateStatus(); dw_base.ResetUpdateStatus(); dw_base2.ResetUpdateStatus(); alert(L"OÝ[XbRŸ!"); } else { alert(L"OÝ[XY1%!"); } } return 1; } int OnItemChanged(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname = hdr.colname; xstring value = hdr.data; xstring dwname = L"dw_base"; if (value != L"") { KXMLDOMNodeList nlist = GetElement().selectNodes(L"//*[@name='" + dwname + L"']/trans[@for='" + colname + L"']"); ViewObject::TransData(nlist, dw_base, hdr.row, colname, value); } if (colname == L"InvoiceNo") { /*xml x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/items",L"container",dw_base.GetItemString(1,L"Container")); if(x) { dw_list.Retrieve(x); dw_list.Redraw(); }*/ return 0; } if (colname == L"Type") { xml x; if (value == L"1") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/shipAgentFee"); x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"'Nã"); if (x) dw_list.Retrieve(x); } if (value == L"2") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/warehouseFee"); x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"NÓ^“"); if (x) dw_list.Retrieve(x); } if (value == L"3") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/formaFee"); x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"FormA"); if (x) dw_list.Retrieve(x); } if (value == L"4") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/inspectionFee"); x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"UFhÀ"); if (x) dw_list.Retrieve(x); } if (value == L"5") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/customsBrokerFee"); x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"b¥Qs"); if (x) dw_list.Retrieve(x); } for (int row = 1; row <= dw_list.GetRowCount(); ++row) { dw_list.SetItemString(row, L"CurrencyCode", L"RMB"); } dw_base.SetItemString(1, L"AgentInvoNo", L""); dw_base.SetItemString(1, L"FreightExpense", L""); dw_base.SetItemString(1, L"LCLFCL", L""); dw_base.SetItemString(1, L"FormaDate", L""); dw_base.SetItemString(1, L"CertificateNo", L""); dw_base.SetItemString(1, L"SerialNo", L""); dw_base.SetItemString(1, L"InspectionDate", L""); dw_base.SetItemString(1, L"InspectionNo", L""); dw_base.SetItemString(1, L"CustomsBroker", L""); dw_list.Redraw(); dw_base2.SetColHeaderHeight(0); dw_base2.SetRowSelectorWidth(0); dw_base2.SetHScrollState(false); dw_base2.SetVScrollState(false); } /*if(fields) { if(fields.selectSingleNode(L"/data/Field/FieldName[.='"+colname+L"']")) { KXMLDOMNodeList items= fields.selectNodes(L"/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) !=L"") { amt += dw_item.GetItemDouble(1,items.item(i).text()); } } dw_item.SetItemDouble(1,L"Amount",amt); } }*/ return 1; } int OnItemChanged2(TEvent* evt, LPARAM p) { DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; xstring colname = hdr.colname; xstring value = hdr.data; dw_base.SetItemString(1, colname.c_str(), value); dw_base.Redraw(); return 1; } //T}NäSÑ^Qýep int OnCmdDispatch(xstring comdid) { if (comdid == L"xmAddRow") { if (isupdate == L"false") return 0; dw_list.InsertRow(0); return 1; } else if (comdid == L"xmDeleteRow") { if (isupdate == L"false") return 0; dw_list.DeleteRow(0); return 1; } else if (comdid == L"xmClose") { CloseWindow(); return 1; } else if (comdid == L"xmSave") { if (isupdate == L"false") return 0; OnSave(); return 1; } return 0; } //T}NäYtN‹Nö int OnXCommand(TEvent* evt, LPARAM param) { return OnCmdDispatch(evt->xcommand.pStrID); } int OnAttachEvent() { //~Ñ[š]åQwgap¹QûN‹Nö AttachEvent(L"WM_XCOMMAND", (FEvent)&FreightExpenseItemWin::OnXCommand); //ƒ·SÖq&p¹N‹Nöÿ u(NŽ‘Ín]åQwga AttachEvent(L"WM_SETFOCUS", (FEvent)&FreightExpenseItemWin::OnSetFocus); AttachEvent(L"dw_base", L"DWV_ITEMCHANGED", (FEvent)&FreightExpenseItemWin::OnItemChanged); AttachEvent(L"dw_base2", L"DWV_ITEMCHANGED", (FEvent)&FreightExpenseItemWin::OnItemChanged2); return 1; } int OnRetrieve(xstring FreightExpenseID) { xml x ; xaserverarg arg; arg.AddArg(L"FreightExpenseID", FreightExpenseID); if (getUrl(L"/sale/data/Expense3/view/freight/maint", arg.GetString(), x) != 1) { trace(x.text()); return -1; } else { dw_base.Retrieve(x); dw_base.Redraw(); xstring Type = dw_base.GetItemString(1, L"Type"); if (Type == L"1") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/shipAgentFee"); } if (Type == L"2") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/warehouseFee"); } if (Type == L"3") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/formaFee"); } if (Type == L"4") { dw_base2.openUrl(L"/sale/view/Expense3/freight/maint/inspectionFee"); } if (Type == L"5") { dw_base2.openUrl(L"/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, L"Type", L"1"); dw_base.SetItemDisplayString(1, L"Type", L"'Nã9u("); xml x = ViewObject::RetrieveData(L"/sale/data/Expense3/freight/initail/itemsex", L"type", L"'Nã"); if (x) dw_list.Retrieve(x); for (int row = 1; row <= dw_list.GetRowCount(); ++row) { dw_list.SetItemString(row, L"CurrencyCode", L"RMB"); } return 0; } int onload() { SetArg(); dw_base = GetControl(L"dw_base"); dw_base.openUrl(L"/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(L"dw_base2"); dw_base2.openUrl(L"/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); xstring sdate = publiccode::GetCurrentDate(); dw_base.SetItemString(1, L"CreateDate", sdate); xstring suserid = publiccode::GetUser().id; xstring susername = publiccode::GetUser().name; dw_base.SetItemString(1, L"CreatorID", suserid); dw_base.SetItemDisplayString(1, L"CreatorID", susername); OnAttachEvent(); dw_list = GetControl(L"dw_list"); dw_list.openUrl(L"/sale/view/Expense3/freight/maint/item"); dw_list.SetColumnWidth(0, 0); xstring jobname = publiccode::GetUser().jobname; if (jobname == L"NR¡TX") { dw_list.SetReadOnly(true); dw_base.SetReadOnly(true); dw_base2.SetReadOnly(true); } if (GetWinParam()) { xaserverarg arg = GetArg(); xstring FreightExpenseID = arg.GetArgString(L"FreightExpenseID"); if (FreightExpenseID) OnRetrieve(FreightExpenseID); else initail(); } else { initail(); } xstring positionname = publiccode::GetUser().positionname; if (positionname.find(L"NR¡") >= 0) { isupdate = L"false"; } else { isupdate = L"true"; } return 1; } int onloaded() { //SetAgent(); return 1; } };