update

LiFan

3 天以前 d4726c427464d5fa50c9fce848831c4cec36d8d1

 jrj/project/business/AR/ExchageFile.cpp

@@ -1,542 +1,506 @@
#include <wobject/xstring.hpp>
#include <xcontrol/xtreeview.hpp>
#include <xcontrol/xdwgrid.hpp>
#include <xcontrol/xcell.hpp>
#include <adt/xarray.hpp>

#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp"
#include "viewobject/view.base.hpp"

using xml = KXMLDOMDocument;
class __declspec(dllexport) listSupplierv3 : public listwin
{
public:
   xdwgrid dw_goods;
   xtreeview tv_1;
   xcombobox ddlb_1;
   int   changeddlb;
   xstring TypeWork;
   xstring GoodsUrl;
   xstring m_sType; //type
   xstring m_sTypeTxt; //选中树的data
   //   xstring m_searchtxt;
   int PIndex;
   xnode   m_agentNode;   //Agent Condition
   xstring   m_agentCond;   //Agent Node

public:
   listSupplierv3(void* implPtr, HWND hWnd) :listwin(implPtr, hWnd) {}
public:
   static listSupplierv3* CreateInstance(void* implPtr, void* hWnd)
   class __declspec(dllexport) ExchangeFileView : public xframe
   {
      listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd);
      return pWin;
   }
   int OnRetrieve()
   {
      xml x;
   public:
      xcell   dw_exchangefile;
      xdwtable dw_arg;
      xdwgrid dw_exch;
      xstring filename;
      xnode   m_agentNode;   //Agent Condition

      xaserverarg arg;
      arg.AddArg(L"pageindex", xstring(PIndex)); //第几页
      arg.AddArg(L"pagenumber", xstring(listwin::m_pageNumber)); //每页数量
      arg.AddArg(L"QueryTxt", listwin::m_QueryTxt);
      arg.AddArg(L"sType", m_sType);
      arg.AddArg(L"sTypeTxt", m_sTypeTxt);
      trace(arg.GetString());
      //alert(L"xxxx");
      if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/list", arg.GetString(), x) != 1)
   public:
      ExchangeFileView(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {}
   public:
      static ExchangeFileView* CreateInstance(void* implPtr, void* hWnd)
      {
         return -1;
         ExchangeFileView* pWin = new ExchangeFileView(implPtr, (HWND)hWnd);
         return pWin;
      }
      else
      int SetAgent()
      {
         KXMLDOMElement e = x.documentElement();
         if (listwin::dw_pages && e.selectSingleNode(L"@TotalPage"))
         xstring xfNodeAgentArea = L"agentarea";
         xnode anode = GetAgentNode(xfNodeAgentArea);
         if (m_agentNode)
         {
            xstring s = e.selectSingleNode(L"@TotalPage").text(); //总数量				
            listwin::dw_pages.SetMaxPage(s.toInt());
            SetAgentNode(anode, m_agentNode);
         }
         //alert(x.GetXml());
         dw_list.Retrieve(x);
         dw_list.Redraw();
         dw_list.SetReadOnly(true);
      }
      return 1;
   }

   int SetEntityData(xaserverarg arg)
   {
      xstring strQueryTxt = arg.GetArgString(L"QueryTxt");
      xml x;

      arg.AddArg(L"sType", m_sType);
      arg.AddArg(L"sTypeTxt", m_sTypeTxt);
      trace(arg.GetString());
      if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/list", arg.GetString(), x) != 1)
      {
         alert(x.text());

         return -1;
      }
      else
      {
         KXMLDOMElement e = x.documentElement();
         if (listwin::dw_pages && e.selectSingleNode(L"@TotalPage"))
         else
         {

            xstring s = e.selectSingleNode(L"@TotalPage").text(); //总数量				
            listwin::dw_pages.SetMaxPage(s.toInt());
         }
         //trace(x.GetXml());
         listwin::dw_list.Retrieve(x);
         listwin::dw_list.Redraw();
         listwin::dw_list.SetReadOnly(true);
      }

      return 1;
   }

   int OnChangePages(TEvent* evt, LPARAM p)
   {
      PAGENMHDR* h = (PAGENMHDR*)evt->notify.pnmh;
      int c = h->cur;


      HCURSOR hCursor = xutil::SetCursorWait();
      OnRetrieve();
      PIndex = c;
      xutil::RestoreCursor(hCursor);
      return 1;


   }

   int ViewUpdate(int pr, xstring updateItem, xaserverarg  arg)
   {
      if (updateItem == L"refresh")
      {
         //trace(L"sd");
         xdwpages zz = GetControl(L"pages");
         int h = zz.SetCurPage(1);
         //trace(h);
         OnRetrieve();
      }
      return 1;
   }

   //树选择
   int OnTreeSelChanged(TEvent evt, LPARAM p)
   {
      if (changeddlb != 1)
      {
         //alert(L"1");

         HTREEITEM h = tv_1.GetSelectedItem();
         KXMLDOMElement& e = *(KXMLDOMElement*)tv_1.GetItemData(h);

         xstring t = e.selectSingleNode(L"@type").text();
         m_sType = t + L"";
         xstring txt = e.selectSingleNode(L"@code").text();
         if (txt == L"")
            txt = e.selectSingleNode(L"@name").text();
         m_sTypeTxt = txt + L"";

         //alert(m_sTypeTxt);

         PIndex = 1;
         OnRetrieve();
      }
      return 1;
   }

   int createSubTree(HTREEITEM h, KXMLDOMElement ele)
   {
      KXMLDOMNodeList nlist = ele.selectNodes(L"item");
      int i;
      int s = nlist.length();
      if (s > 0)
         for (i = 0; i < s; i++)
         {

            KXMLDOMElement* e = new KXMLDOMElement(nlist.item(i));
            xstring name = e->selectSingleNode(L"@name").text();
            HTREEITEM hw = tv_1.InsertChildItem(h, name, (LPARAM)e, 15);
            createSubTree(hw, *e);
         }
      return 1;
   }

   int OnCreateTree(xstring sType)
   {

      while (tv_1.GetRootItem())
         tv_1.DeleteItem(tv_1.GetRootItem());

      xml x;

      xaserverarg arg;

      arg.AddArg(L"sType", sType);
      //Tree.pref.supplier.xq
      //getUrl(GetEntityName(1)+L"/entity/list",arg.GetString(),x);
      //if (xaserver::ExecXQuery(GetServerUrl(),L"[Tree.pref.supplier.xq]",arg.GetString(),x)!=1)
      if (getUrl(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/pref/list/tree", arg.GetString(), x) != 1)
      {
         trace(x.text());
         return -1;
      }
      else
      {
         KXMLDOMNodeList nlist = x.selectNodes(L"root/item");
         int len = nlist.length();
         if (len > 0)
         {
            int i;
            for (i = 0; i < len; i++)
            KXMLDOMElement xframeElement = GetElement();
            KXMLDOMElement agent = xframeElement.selectSingleNode(L"agent/" + xfNodeAgentArea + L"[1]/*");
            if (agent)
            {

               KXMLDOMElement* e = new KXMLDOMElement(nlist.item(i));
               xstring name = e->selectSingleNode(L"@name").text();
               HTREEITEM hw = tv_1.InsertChildItem(0, name, (LPARAM)e, 15);

               createSubTree(hw, *e);
               tv_1.ExpandItem(hw);
               xstring s = agent.xml();
               m_agentNode = SetAgentNode(anode, s);
            }
            tv_1.ExpandItem(0);
         }
         return 1;
      }

      return 1;
   }
      int OnCellClicked(TEvent* evt, LPARAM p)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         //if(hdr.col ==1)hdr.idFrom = -1;
         //if(hdr.col ==2)hdr.idFrom = -1;
         if (hdr.row == 1)hdr.idFrom = -1;
         return 2;
      }

   //xcombobox下拉
   int OnSelectDdlb(TEvent evt, LPARAM p)
   {
      changeddlb = 1;
      int OnValid()
      {
         int row = dw_exchangefile.GetValidRow();
         int col = dw_exchangefile.GetValidCol();
         for (int i = 2; i < row; i++)
         {

      int CB_GETCURSEL = 0x0147;
      int nIndex = SendMessageW(ddlb_1.GetHWND(), CB_GETCURSEL, 0, 0);
      KXMLDOMElement e = ddlb_1.GetElement();//GetitemData(wid,nIndex);//ddlb_1.GetElement();
      KXMLDOMElement e2 = e.selectSingleNode(L"item[" + xstring((nIndex + 1)) + L"]");
      xstring text = e2.selectSingleNode(L"@element").text();
      OnCreateTree(text);
      changeddlb = 0;
      return 1;
   }
         }
         return 1;
      }

   int OnDeleteRow()
   {
      int row = listwin::dw_list.GetNextSelectRow(1);
      if (row < 1) {
         row = listwin::dw_list.GetRow();
         if (row < 1) {
            //win::MessageBox(GetHWND(),L"请选中要删除的行！",L"提示",0);
      int OnCellItemChanged(TEvent* evt, LPARAM p)
      {
         DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
         /*int currentrow;
         int currentcol;
         const xstring data;
         int anchorrow;
         int anchorcol;*/
         if (hdr.col == 1 && hdr.data != L"")
         {
            //dw_exchangefile.SetItemString(hdr.currentrow,hdr.currentcol, L"");
         }
         return 1;
      }

      //焦点激活处理函数
      int OnSetFocus(TEvent* evt, LPARAM param)
      {
         //重置工具条
         SetAgent();
         return 1;
      }

      int OnDeleteRow()
      {
         dw_exch.DeleteRow(0);
         return 1;
      }

      int OnInsertRow()
      {
         int row = dw_exch.InsertRow(0);
         xstring sdate = publiccode::GetCurrentDate();
         dw_exch.SetItemString(row, L"CreateDate", sdate);
         dw_exch.SetItemString(row, L"SEDate", sdate);
         dw_exch.SetItemString(row, L"CurrencyCode", L"USD");
         xstring suserid = publiccode::GetUser().id;
         xstring susername = publiccode::GetUser().name;
         dw_exch.SetItemString(row, L"CreatorID", suserid);
         dw_exch.SetItemDisplayString(row, L"CreatorID", susername);

         if (row > 1)
         {
            xstring exchrate = dw_exch.GetItemString(row - 1, L"ExchRate");
            if (exchrate != L"") dw_exch.SetItemString(row, L"ExchRate", exchrate);
         }
         return 1;
      }


      int OnTran()
      {
         //get head
         xstring head = L"";
         xstring val = L"";
         int cols = dw_exchangefile.GetValidCol(1);
         for (int col = 1; col <= cols; ++col)
         {
            val = dw_exchangefile.GetItemString(1, col);
            val = val.trim();
            if (val == L"")continue;
            if (val.find(L"(") >= 0) val = val.left(val.find(L"("));
            if (val.find(L"（") >= 0) val = val.left(val.find(L"（"));
            if (val.find(L"[") >= 0) val = val.left(val.find(L"["));
            if (val.find(L"【") >= 0) val = val.left(val.find(L"【"));
            if (val.find(L"/") >= 0) val = val.left(val.find(L"/"));
            if (val.find(L"\r") >= 0) val = val.left(val.find(L"\r"));
            if (val.find(L"\n") >= 0) val = val.left(val.find(L"\n"));
            if (head == L"") head = val; else head += L"," + val;
         }

         xml x;
			
         xaserverarg arg ;
         arg.AddArg(L"head", head);
         //alert(head);
         if (getUrl(L"/sale/data/AR/match/bank", arg.GetString(), x) != 1)return 1;
         KXMLDOMNode n = x.selectSingleNode(L"data/Bank");
         if (!n)
         {
            alert(L"未匹配到合适的银行，请先配置数据转换信息");
            return 1;
         }

         KXMLDOMNodeList items = n.selectNodes(L"Item");
         int len = items.length();
         xarray<int> indexs;
         xarray<xstring> columns;
         xstring bank = n.selectSingleNode(L"@name").text();
         for (int i = 0; i < len; i++)
         {
            KXMLDOMElement e = items.item(i);
            xstring str = e.getAttribute(L"index");
            indexs.push_back(str.toInt());
            columns.push_back(e.selectSingleNode(L"DataColumn").text());
         }

         if (MessageBox(GetHWND(), L"是否载入" + bank + L"结汇数据!", L"提示", 1) == 2)  return 1;

         SwitchLayer(L"sheet2", L"frame");
         //set bank account
         xml xb = ViewObject::RetrieveData(L"/sale/data/AR/tran/bank/info", L"bank", bank);
         if (xb)
         {
            KXMLDOMNode nt = xb.selectSingleNode(L"/data/Item/Account");
            if (nt)
            {
               dw_arg.SetItemString(1, L"Bank", nt.text());
               if (nt.selectSingleNode(L"@_displaystring"))
                  dw_arg.SetItemDisplayString(1, L"Bank", nt.selectSingleNode(L"@_displaystring").text());
            }

         }

         //clear data
         for (int m = dw_exch.GetRowCount(); m > 0; m--)   dw_exch.DeleteRow(m);


         //读取客户转换信息
         xml xc;
			
         if (getUrl(L"/sale/data/AR/tran/customer", L"", xc) != 1)
         {
            trace(xc.text());
            return -1;
         }
      }

      KXMLDOMElement e = listwin::dw_list.GetRowElement(row);
      //xstring sguid = e.SelectSingleNode(L"@guid").text;
      //xstring sName = e.selectSingleNode(L"Name").text+L"";
      xstring sguid = dw_list.GetItemString(dw_list.GetRow(), L"SupplierID");
      xstring sName = dw_list.GetItemString(dw_list.GetRow(), L"Name");
      int  MB_YESNO = 0x00000004;
      int  IDYES = 6;
      if (MessageBoxW(GetHWND(), L"确认要删除供应商 " + sName + L" 的信息吗？", L"提示", MB_YESNO) != IDYES) return 1;
      xml x;
         HCURSOR  hCursor = xutil::SetCursorWait();
         KXMLDOMDocument xdoc = xc;

      xaserverarg arg;
      arg.setNativePointer(arg.CreateInstance());
      arg.AddArg(L"guid", sguid);
      arg.AddArg(L"EntityID", sguid);
      //   trace(sguid);
      if (xurl::post(GetServerUrl(), L"/sale/data/" + GetEntityName(1) + L"/entity/delete", arg.GetString(), x) != 1)
      {
         xstring error = x.text();
         trace(error);
      }
      else
      {
         KXMLDOMElement msg = x.selectNodes(L"process").item(0);
         xstring success = msg.selectSingleNode(L"@finished").text();
         if (success == L"0")
         int rows = dw_exchangefile.GetValidRow();
         for (int row = 2; row <= rows; ++row)
         {
            alert(msg.selectSingleNode(L"@errInfo").text());
         }
         else
         {
            MessageBoxW(GetHWND(), L"删除成功！", L"提示", 0);
            listwin::dw_list.DeleteRow(row);
         }
      }
      return 1;
   }
            val = dw_exchangefile.GetItemString(row, indexs.item(0));
            if (val.trim() == L"") continue;
            int curRow = dw_exch.InsertRow(0);

   int OnRowChangedEx(TEvent* evt, LPARAM p)
   {
      DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh;
      int row = hdr.row;
      //if(row < 1 or row > dw_list.GetRowCount()) return 1;
      KXMLDOMElement ele = listwin::dw_list.GetRowElement(row);
      xstring entity = ele.selectSingleNode(L"SupplierID").text();
      xml x;
            //init
            xstring sdate = publiccode::GetCurrentDate();
            dw_exch.SetItemString(curRow, L"CreateDate", sdate);
            dw_exch.SetItemString(curRow, L"SEDate", sdate);
            xstring suserid = publiccode::GetUser().id;
            xstring susername = publiccode::GetUser().name;
            dw_exch.SetItemString(curRow, L"CreatorID", suserid);
            dw_exch.SetItemDisplayString(curRow, L"CreatorID", susername);

      xaserverarg arg;
      arg.setNativePointer(arg.CreateInstance());
      arg.AddArg(L"EntityID", entity);


      xstring no1 = publiccode::GetUser().no;
      if (no1 != L"00201")
      {

         if (TypeWork.find(L"采购") >= 0)
         {
            GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritemEx";
         }
         else
         {
            GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritem";
         }
      }
      else
      {
         GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritem";
      }
      if (getUrl(GetServerUrl(), GoodsUrl, arg.GetString(), x) != 1)
      {
         trace(x.text());
         return -1;
      }
      else
      {
         dw_goods.Retrieve(x);
         dw_goods.Redraw();
         dw_goods.SetReadOnly(true);
      }
      SetAgent(L"list", entity);
      return 1;
   }

   int GridSearch()
   {
      //alert(L"你好");
#if 0

      xstring m_config = L"view.Supplier.v3.config";
      xdwgrid dw = listwin::dw_list;
      xaserverarg& arg = *new xaserverarg;
      arg.setNativePointer(arg.CreateInstance());
      xstring str = TFile::node(m_config, L"config", L"search");
      if (str != L"") {
         arg.AddArg(L"sheet", str);
      }
      else
         arg.AddArg(L"sheet", L"dev:sheet[Supplier.v3.tpl/list]");
      arg.AddArg(L"search", listwin::m_QueryTxt);
      openUrl(L"view.dlg.vface/xpage/grid/column/search", &arg);
      xstring ok = arg.GetArgString(L"return");
      if (ok == L"ok") {
         xstring txt = arg.GetArgString(L"search");
         if (txt != L"") {
            listwin::m_QueryTxt = txt;
            //trace(txt);
            OnRetrieve();
         }
      }
#endif 
      return 0;
   }

   int OnSelectAllRow()
   {
      int rows = listwin::dw_list.GetRowCount();
      if (rows < 1) return -1;
      listwin::dw_list.SelectRow(1, rows, true);
      listwin::dw_list.Redraw();
      return 1;
   }

   int OnRClick(TEvent evt, LPARAM p)
   {
      return 1;
   }
   int OnLogOff()
   {
      return 1;
   }
   int OnChecked()
   {
      xstring partyno = dw_list.GetItemString(dw_list.GetRow(), L"PartyNo");
      if (partyno.find(L"N") < 0)
      {
         alert(L"已经是正式供应商");
         return 0;
      }
      xstring entityid = GetEntityID(dw_list.GetRow());
      int MB_OKCANCEL = 1;
      int IDOK = 1;
      int ret = MessageBoxW(GetHWND(), L"是否转成正式供应商?", L"提示", MB_OKCANCEL);
      if (ret == IDOK)
      {
         xml x = ViewObject::RetrieveData(GetServerUrl(), L"/sale/data/SupplierV3/entity/updateno", L"entityid", entityid);

         if (xstring(x.xml()).find(L"success") > 0)
         {
            alert(L"处理成功");
            OnRetrieve();
         }
      }
      return 1;
   }
   int PreOnCmdDispatch(xstring comdid)
   {
      //alert(comdid);

      if (comdid.find(L"action:LogOff", 0) >= 0) return OnLogOff();
      if (comdid.find(L"action:bill.delete", 0) >= 0)
      {
         OnDeleteRow();
         return 0;
      }
      if (comdid == L"action:search1") return GridSearch();
      if (comdid == L"action:bill.refresh")
      {
         return OnRetrieve();
      }
      if (comdid == L"action:bill.xmSaveAs")
      {
         xstring  userno = publiccode::GetUser().no;
         if (userno == L"00701" || userno == L"00601" || userno == L"admin")
         {
            dw_list.SaveAs(L"");
         }
         return 1;
      }
      if (comdid == L"action:bill.Annex")
      {
         xaserverarg& arg = *new xaserverarg;
         arg.setNativePointer(arg.CreateInstance());
         arg.AddArg(L"entityid", dw_list.GetItemString(dw_list.GetRow(), L"SupplierID"));
         arg.AddArg(L"ApplyStatus", dw_list.GetItemString(dw_list.GetRow(), L"ApplyStatus"));

         OpenWindow(L"dev:xpage[maint.Document.Supplier.v3.vx]", (LPARAM)&arg);
         return 1;
      }
      if (comdid == L"action:bill.AnnexEx")
      {
         xaserverarg& arg4 = *new xaserverarg;
         arg4.setNativePointer(arg4.CreateInstance());
         arg4.AddArg(L"entityid", dw_list.GetItemString(dw_list.GetRow(), L"SupplierID"));
         //arg4.AddArg(L"ApplyStatus",dw_list.GetItemString(dw_list.GetRow(),L"ApplyStatus"));

         //OpenWindow(L"dev:xpage[maint.Document.Customer.v3.vx]", p4);
         OpenWindow(L"dev:xpage[maint.Document.SupplierSD.v3.vx]", (LPARAM)&arg4);
         return 1;
      }
      if (comdid == L"action:bill.checked")
         return OnChecked();
      //   if(comdid==L"action:bill.import") return OnImport();
      //   if(comdid.find(L"action:",0)>=0) return ProcessFlowAction(comdid,1);					
         //if(comdid==L"search") return GridSearch(L"view.dlg.vface/xpage/grid/column/edit");
         //if(comdid==L"showall")    return ShowAll();	

      return 1;
   }


   int PostOnAttachEvent()
   {
      //获得树的选择事件
      AttachEvent(L"tv_1", L"TVN_SELCHANGED", (FEvent)&listSupplierv3::OnTreeSelChanged);
      AttachEvent(L"cbx_1", L"CBN_SELCHANGE", (FEvent)&listSupplierv3::OnSelectDdlb);
      AttachEvent(L"pages", L"PAGE_CLICK", (FEvent)&listSupplierv3::OnChangePages);
      AttachEvent(L"dw_list", L"DWV_RCLICKED", (FEvent)&listSupplierv3::OnRClick);//鼠标右键		
      //AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&listSupplierv3::OnDoubleClicked);

      return 1;
   }

   int onload()
   {
      PIndex = 1;
      listwin::m_QueryTxt = L""; //查询条件
      m_sType = L""; //type
      m_sTypeTxt = L""; //选中树的data

      listwin::onload();

      tv_1 = GetControl(L"tv_1");
      ddlb_1 = GetControl(L"cbx_1");

      changeddlb = 0;
      OnCreateTree(L"GoodsCates");
      dw_list.SetColumnState(L"SupplierID", false);
      dw_list.SetColumnState(L"userNo", false);
      dw_list.SetColumnState(L"YearEstablished", false);
      dw_list.SetColumnState(L"LegalPerson", false);
      dw_list.SetColumnState(L"ThirdPartyReport", false);
      dw_list.SetColumnState(L"bAddress", false);
      dw_list.SetColumnState(L"PayType", false);
      dw_list.SetColumnState(L"PicPath", false);
      dw_list.SetColumnState(L"SDID", false);
      dw_list.SetColumnState(L"AdvantageProduct", false);
      //dw_list.SetColumnState(L"ApplyStatus",false);

      dw_goods = GetControl(L"dw_goods");
      dw_goods.openUrl(GetServerUrl(), L"/sale/view/SupplierV3/template/supplier/supplieritem");

      if (publiccode::GetUser().name != L"admin")
      {
         xstring s = publiccode::GetUser().id;

         xml supplier_x = ViewObject::RetrieveData(GetServerUrl(), L"/sale/data/SupplierV3/entity/FindBySaleType", L"id", s);
         if (supplier_x)
         {
            TypeWork = supplier_x.text();

            if (TypeWork.find(L"采购") >= 0)
            for (int k = 0; k < indexs.length(); k++)
            {

               dw_list.SetColumnState(L"DateEx", false);
               dw_list.SetColumnState(L"DateExS", false);
               dw_list.SetColumnState(L"Name", false);
               dw_list.SetColumnState(L"ProvinceCode", false);
               dw_list.SetColumnState(L"City", false);
               dw_list.SetColumnState(L"District", false);
               dw_list.SetColumnState(L"Address", false);
               dw_list.SetColumnState(L"CName", false);
               dw_list.SetColumnState(L"TEL", false);
               dw_list.SetColumnState(L"Mob", false);
               dw_list.SetColumnState(L"AreaCode", false);
               dw_list.SetColumnState(L"Fax", false);
               dw_goods.SetColumnState(L"Price", false);
               dw_goods.SetColumnState(L"PackRMBPrice", false);
               dw_goods.SetColumnState(L"PartRMBPrice", false);
               dw_goods.SetColumnState(L"PaperRMBPrice", false);
               dw_goods.SetColumnState(L"ETD", false);
               dw_goods.SetColumnState(L"InvoiceNo", false);

               val = dw_exchangefile.GetItemString(row, indexs.item(k));
               if (columns.item(k) == L"ExchRate")
               {
                  double d = val.toDouble();
                  if (d > 100.0) d = d / 100.0;
                  dw_exch.SetItemDouble(curRow, L"ExchRate", d);
               }
               else if (columns.item(k) == L"CurrencyCode")
               {
                  if (val == L"美元") val = L"USD";
               }
               else if (columns.item(k) == L"CustomerID")
               {
                  if (xdoc)
                  {
                     KXMLDOMNode n1 = xdoc.selectSingleNode(L"/data/Item[contains(\"" + val + L"\",RawColumn)]");
                     if (n1)
                     {
                        //alert(n1.xml);
                        if (n1.selectSingleNode(L"DataColumn"))dw_exch.SetItemString(curRow, columns.item(k).c_str(), n1.selectSingleNode(L"DataColumn").text());
                        if (n1.selectSingleNode(L"DataColumn/@_displaystring"))dw_exch.SetItemDisplayString(curRow, columns.item(k).c_str(), n1.selectSingleNode(L"DataColumn/@_displaystring").text());
                     }
                  }
               }
               else
                  dw_exch.SetItemString(curRow, columns.item(k).c_str(), val);
            }
         }
         xutil::RestoreCursor(hCursor);
         alert(L"转换完成!");

         return 1;
      }

      return 1;
   }
      int OnSaveData()
      {
         xstring exchRate = dw_arg.GetItemString(1, L"ExchRate");
         xstring Bank = dw_arg.GetItemString(1, L"Bank");
         if (Bank == L"")
         {
            alert(L"请输入结汇银行!");
            return 1;
         }
         if (exchRate == L"")
         {
            alert(L"请输入汇率!");
            return 1;
         }
         for (int row = 1; row <= dw_exch.GetRowCount(); row++)
         {
            if (dw_exch.GetItemString(row, L"ExchRate") == L"")
            {
               dw_exch.SetItemString(row, L"ExchRate", exchRate);
            }
            /*else
            {

   int onloaded()
   {
      AttachEvent(L"dw_list", L"DWV_ROWFOCUSCHANGED", (FEvent)&listSupplierv3::OnRowChangedEx);
            }*/
            if (dw_exch.GetItemString(row, L"Bank") == L"")
            {
               dw_exch.SetItemString(row, L"Bank", Bank);
               dw_exch.SetItemDisplayString(row, L"Bank", dw_arg.GetItemDisplayString(1, L"Bank"));
            }
         }
         dw_exch.Redraw();

      listwin::onloaded();
      xstring EntityID;
      int row = dw_list.GetRow();
      if (row<0 || row>dw_list.GetRowCount()) return 1;
      KXMLDOMElement ele = dw_list.GetRowElement(row);
      xstring id = listwin::m_configDoc.selectSingleNode(L"//entity/EntityID[1]").text();
      if (ele.selectSingleNode(id))
         EntityID = ele.selectSingleNode(id).text();
      listwin::SetAgent(L"list", EntityID);
      return 1;
   }
         xml x;
			
         dw_exch.AcceptText();
         dw_exch.DwUpdateAllToEx(x);
         xaserverarg arg ;
			
         arg.AddArg(L"content", x.xml());

};



         //trace(x.xml());
         if (xurl::get(L"/sale/data/AR/update", arg.GetString(), x) != 1)
         {
            xstring error = x.text();
            alert(L"err:" + error);
            return 1;
         }
         xstring str = x.documentElement().getAttribute(L"text");
         if (str == L"true")
         {
            dw_exch.ResetUpdateStatus();
            alert(L"保存成功!");
         }
         else
         {
            alert(L"保存失败!");
         }
         return 1;
      }

      int OnSave(bool saveas = false)
      {

         xstring myurl = L"data/SettleExchange";
         xstring sfilename = filename;
         if (filename == L"" || saveas)
         {
            xaserverarg arg ;
				
            arg.AddArg(L"src", L"data/SettleExchange");
            OpenWindow(L"dev:xpage[trade.document.saveas.vx]",arg);
            if (arg.GetArgString(L"result") == L"ok")
            {
               sfilename = arg.GetArgString(L"filename");
            }
            else
               return 1;
         }

         xstring content = dw_exchangefile.GetData();

         xstring sguid = publiccode::GetGuid();
         xstring sname = sguid;
         xstring str = sname.mid(0, 2);
         str = str.toUpper();
         xstring suri = L"attachment" + str;
         int ret = xaserver::UploadData(suri, sguid + L".jpg", content);
         if (ret < 0)
         {
            alert(L"上传文件出错!");
            return 0;
         }

         xml x;
			
         xaserverarg args ;
			
         args.AddArg(L"myurl", myurl);
         args.AddArg(L"name", sfilename);
         args.AddArg(L"filepath", sname);
         args.AddArg(L"fileext", L"xdoc");
         args.AddArg(L"filesource", sfilename);



         if (xurl::get(L"/sale/data/TDocument3/attachment/add", args.GetString(), x) != 1)
         {
            alert(L"保存出错了!");
            return 0;
         }
         else
         {
            filename = sfilename;
            SetWindowText(GetHWND(), L"结汇文件:" + filename);
            alert(x.text());
         }

         return 1;
      }

      int SendCtrlCmd(xcontrol xc, xstring cmd)
      {
         SendMessage(xc.GetHWND(), 0x401, (WPARAM)cmd.c_str(), 0);
         return 1;
      }



      //命令发布函数
      int OnCmdDispatch(xstring comdid)
      {
         if (comdid == L"xmFileOpen")
         {
            xaserverarg args ;
			
            args.AddArg(L"src", L"data/SettleExchange");
            args.AddArg(L"process", L"path");
            OpenWindow(L"dev:xpage[trade.document.selectdlg.vx]",args);
            if (args.GetArgString(L"result") == L"ok")
            {
               xstring u = args.GetArgString(L"src");
               xml x;
					
               xaserver::LoadUrl(GetServerUrl(), u, L"", x);
               dw_exchangefile.LoadTemplateEx(x.documentElement());
               dw_exchangefile.Redraw();
               filename = args.GetArgString(L"filename");
               SetWindowText(GetHWND(), L"结汇文件:" + filename);
            }
            return 1;
         }
         else if (comdid == L"xmFileNew")
         {
            dw_exchangefile.openUrl(L"/sale/view/AR/template/file");
            dw_exchangefile.Redraw();
            filename = L"";
            SetWindowText(GetHWND(), L"结汇文件:[new]");
            return 1;
         }
         else if (comdid == L"xmFileSave")
         {
            return OnSave();
         }
         if (comdid == L"xmAddRow")
         {
            return OnInsertRow();
         }
         else if (comdid == L"xmDeleteRow")
         {
            return OnDeleteRow();
         }
         else if (comdid == L"xmSave")
         {
            return OnSaveData();
         }
         else if (comdid == L"xmFileSaveAs")
         {
            return OnSave(/*saveas*/true);
         }
         else if (comdid.left(3) == L"IK_")
         {
            xstring cmd = comdid.mid(3, comdid.length());
            SendCtrlCmd(GetControl(L"dw_raw"), cmd);
            return 1;
         }
         else if (comdid == L"xmTrans")
         {
            OpenWindow(L"dev:xpage[ExchangeColumnTran.vx]");
            return 1;
         }
         else if (comdid == L"xmClient")
         {
            OpenWindow(L"dev:xpage[CustomerTran.AR.vx]");
            return 1;
         }
         else if (comdid == L"xmBank")
         {
            OpenWindow(L"dev:xpage[ExchangeBankTran.vx]");
            return 1;
         }
         else if (comdid == L"xmTran")
         {
            return OnTran();
         }
         return 0;
      }

      //命令处理事件
      int OnXCommand(TEvent* evt, LPARAM param)
      {
         return OnCmdDispatch(evt->xcommand.pStrID);
      }

      int OnAttachEvent()
      {
         //绑定工具条点击事件
         AttachEvent(L"WM_XCOMMAND", (FEvent)&ExchangeFileView::OnXCommand);
         //获取焦点事件，用于重置工具条
         AttachEvent(L"WM_SETFOCUS", (FEvent)&ExchangeFileView::OnSetFocus);
         AttachEvent(L"dw_exchangefile", L"CELL_ITEMCHANGED", (FEvent)&ExchangeFileView::OnCellItemChanged);
         AttachEvent(L"dw_exchangefile", L"DWV_CLICKED", (FEvent)&ExchangeFileView::OnCellClicked);
         return 1;
      }



      int onload()
      {
         dw_arg = GetControl(L"dw_arg");
         dw_arg.openUrl(L"/sale/view/AR/template/import/arg");
         dw_arg.SetColHeaderHeight(0);
         dw_arg.SetRowSelectorWidth(0);
         dw_arg.SetHScrollState(false);
         dw_arg.SetVScrollState(false);

         dw_exchangefile = GetControl(L"dw_raw");
         dw_exch = GetControl(L"dw_exch");
         dw_exch.openUrl(L"/sale/view/AR/template/listex");
         OnAttachEvent();


         filename = L"";
         return 1;
      }

      int onloaded()
      {
         SetAgent();
         SetWindowText(GetHWND(), L"结汇文件:[new]");

         return 1;
      }
   };