|  |  | 
 |  |  | #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) listvatnotifyWin : public xframe | 
 |  |  |    { | 
 |  |  |       listSupplierv3* pWin = new listSupplierv3(implPtr, (HWND)hWnd); | 
 |  |  |       return pWin; | 
 |  |  |    } | 
 |  |  |    int OnRetrieve() | 
 |  |  |    { | 
 |  |  |       xml x; | 
 |  |  |    public: | 
 |  |  |       xdwgrid   dw_list; | 
 |  |  |       xdwpages dw_pages; | 
 |  |  |       xdwtable dw_arg; | 
 |  |  |  | 
 |  |  |       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) | 
 |  |  |       xnode   m_agentNode;   //Agent Condition | 
 |  |  |  | 
 |  |  |       int    m_pageindex; | 
 |  |  |       int   m_pagenumber; | 
 |  |  |       xstring    m_QueryTxt; | 
 |  |  |       xstring DatePicker; | 
 |  |  |  | 
 |  |  |    public: | 
 |  |  |       listvatnotifyWin(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd) {} | 
 |  |  |    public: | 
 |  |  |       static listvatnotifyWin* CreateInstance(void* implPtr, void* hWnd) | 
 |  |  |       { | 
 |  |  |          return -1; | 
 |  |  |          listvatnotifyWin* pWin = new listvatnotifyWin(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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    //xcombobox下拉 | 
 |  |  |    int OnSelectDdlb(TEvent evt, LPARAM p) | 
 |  |  |    { | 
 |  |  |       changeddlb = 1; | 
 |  |  |  | 
 |  |  |       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; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    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); | 
 |  |  |             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; | 
 |  |  |  | 
 |  |  |       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) | 
 |  |  |       //焦点激活处理函数 | 
 |  |  |       int OnSetFocus(TEvent* evt, LPARAM param) | 
 |  |  |       { | 
 |  |  |          xstring error = x.text(); | 
 |  |  |          trace(error); | 
 |  |  |          //重置工具条 | 
 |  |  |          SetAgent(); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       else | 
 |  |  |  | 
 |  |  |       int OnDWClick(TEvent* evt, LPARAM p) | 
 |  |  |       { | 
 |  |  |          KXMLDOMElement msg = x.selectNodes(L"process").item(0); | 
 |  |  |          xstring success = msg.selectSingleNode(L"@finished").text(); | 
 |  |  |          if (success == L"0") | 
 |  |  |          DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; | 
 |  |  |          xstring value = hdr.data; | 
 |  |  |          xstring colname = hdr.colname; | 
 |  |  |          int row = hdr.row; | 
 |  |  |  | 
 |  |  |          if (row < 1) return 1; | 
 |  |  |  | 
 |  |  |          xaserverarg arg; | 
 |  |  |          if (colname == L"SONo") | 
 |  |  |          { | 
 |  |  |             alert(msg.selectSingleNode(L"@errInfo").text()); | 
 |  |  |             xstring SONo = dw_list.GetItemString(row, colname.c_str()); | 
 |  |  | 				 | 
 |  |  |             arg.AddArg(L"EntityNo", SONo); | 
 |  |  |             arg.AddArg(L"ReadOnly", L"true"); | 
 |  |  |             OpenWindow(L"dev:xpage[base.maint.so.vx]", arg); | 
 |  |  |          } | 
 |  |  |          else | 
 |  |  |          if (colname == L"InvoiceNo") | 
 |  |  |          { | 
 |  |  |             MessageBoxW(GetHWND(), L"删除成功!", L"提示", 0); | 
 |  |  |             listwin::dw_list.DeleteRow(row); | 
 |  |  |             xstring InvoiceNo = dw_list.GetItemString(row, colname.c_str()); | 
 |  |  | 				 | 
 |  |  |             arg.AddArg(L"EntityNo", InvoiceNo); | 
 |  |  |             arg.AddArg(L"ReadOnly", L"true"); | 
 |  |  |             OpenWindow(L"dev:xpage[maintex.GDN3.vx]", arg); | 
 |  |  |          } | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    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; | 
 |  |  |  | 
 |  |  |       xaserverarg arg; | 
 |  |  |       arg.setNativePointer(arg.CreateInstance()); | 
 |  |  |       arg.AddArg(L"EntityID", entity); | 
 |  |  |  | 
 |  |  |  | 
 |  |  |       xstring no1 = publiccode::GetUser().no; | 
 |  |  |       if (no1 != L"00201") | 
 |  |  |       int OnPrint() | 
 |  |  |       { | 
 |  |  |          xaserverarg arg ; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"EntityName", L"VATNotify"); | 
 |  |  |          arg.AddArg(L"EntityID", L"", L""); | 
 |  |  |          xstring InvoiceNo = dw_list.GetItemString(dw_list.GetRow(), L"NInvoiceNo"); | 
 |  |  |          if (InvoiceNo == L"") InvoiceNo = dw_list.GetItemString(dw_list.GetRow(), L"InvoiceNo"); | 
 |  |  |  | 
 |  |  |          if (TypeWork.find(L"采购") >= 0) | 
 |  |  |          xstring NInvoiceNoEx = dw_list.GetItemString(dw_list.GetRow(), L"NInvoiceNo"); | 
 |  |  |          xstring InvoiceNoEx = dw_list.GetItemString(dw_list.GetRow(), L"InvoiceNo"); | 
 |  |  |          xstring SupplierName = dw_list.GetItemString(dw_list.GetRow(), L"ShortName"); | 
 |  |  |          if (NInvoiceNoEx != InvoiceNoEx) | 
 |  |  |          { | 
 |  |  |             GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritemEx"; | 
 |  |  |             NInvoiceNoEx = InvoiceNoEx; | 
 |  |  |          } | 
 |  |  |          else | 
 |  |  |          xstring SupplierID = dw_list.GetItemString(dw_list.GetRow(), L"SupplierID"); | 
 |  |  |          arg.AddArg(L"EntityNo", InvoiceNo, L""); | 
 |  |  |          arg.AddArg(L"EntityNoEx", NInvoiceNoEx, L""); | 
 |  |  |          arg.AddArg(L"SupplierID", SupplierID); | 
 |  |  |          arg.AddArg(L"VATNotifyID", L""); | 
 |  |  |          arg.AddArg(L"SupplierName", SupplierName); | 
 |  |  |          trace(InvoiceNo + L"==1" + NInvoiceNoEx + L"==2" + SupplierID + L"==3" + dw_list.GetGuid(dw_list.GetRow())); | 
 |  |  | 			 | 
 |  |  |          openUrl(L"/sale/view/view.base/xpage/Template/PrintViewEx", arg); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnPrintItem() | 
 |  |  |       { | 
 |  |  |          xaserverarg arg; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"EntityName", L"VATNotify"); | 
 |  |  |          arg.AddArg(L"EntityID", L"", L""); | 
 |  |  |          xstring InvoiceNo = dw_list.GetItemString(dw_list.GetRow(), L"NInvoiceNo"); | 
 |  |  |          if (InvoiceNo == L"") InvoiceNo = dw_list.GetItemString(dw_list.GetRow(), L"InvoiceNo"); | 
 |  |  |  | 
 |  |  |          xstring NInvoiceNoEx = dw_list.GetItemString(dw_list.GetRow(), L"NInvoiceNo"); | 
 |  |  |          xstring InvoiceNoEx = dw_list.GetItemString(dw_list.GetRow(), L"InvoiceNo"); | 
 |  |  |          if (NInvoiceNoEx != InvoiceNoEx) | 
 |  |  |          { | 
 |  |  |             GoodsUrl = L"/sale/data/SupplierV3/entity/supplieritem"; | 
 |  |  |             NInvoiceNoEx = InvoiceNoEx; | 
 |  |  |          } | 
 |  |  |          xstring SupplierID = dw_list.GetItemString(dw_list.GetRow(), L"SupplierID"); | 
 |  |  |          xstring SupplierName = dw_list.GetItemString(dw_list.GetRow(), L"ShortName"); | 
 |  |  |          arg.AddArg(L"EntityNo", InvoiceNo, L""); | 
 |  |  |          arg.AddArg(L"EntityNoEx", NInvoiceNoEx, L""); | 
 |  |  |          arg.AddArg(L"SupplierID", SupplierID); | 
 |  |  |          arg.AddArg(L"VATNotifyID", dw_list.GetGuid(dw_list.GetRow())); | 
 |  |  |          arg.AddArg(L"SupplierName", SupplierName); | 
 |  |  |          trace(L"=====L" + InvoiceNo + L"=====L" + SupplierID + L"=====L" + dw_list.GetGuid(dw_list.GetRow())); | 
 |  |  | 			 | 
 |  |  |          openUrl(L"/sale/view/view.base/xpage/Template/PrintViewEx", arg); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       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); | 
 |  |  |       int OnOpen() { | 
 |  |  |          int row = dw_list.GetRow(); | 
 |  |  |          if (row < 1) return 0; | 
 |  |  |          KXMLDOMElement ele = dw_list.GetRowElement(row); | 
 |  |  |          xstring entityid = ele.selectSingleNode(L"InvoiceNo").text(); | 
 |  |  |          xaserverarg arg; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"invoiceno", entityid); | 
 |  |  | 			 | 
 |  |  |          OpenWindow(L"dev:xpage[simple.maint.vatnotify.vx]", arg); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       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(); | 
 |  |  |          } | 
 |  |  |  | 
 |  |  |       int OnPapercardOpen() { | 
 |  |  |          int row = dw_list.GetRow(); | 
 |  |  |          if (row < 1) return 0; | 
 |  |  |          KXMLDOMElement ele = dw_list.GetRowElement(row); | 
 |  |  |          xstring entityid = ele.selectSingleNode(L"InvoiceNo").text(); | 
 |  |  |          xstring classifyID = ele.selectSingleNode(L"ClassifyID").text(); | 
 |  |  |          xstring supplierID = ele.selectSingleNode(L"SupplierID").text(); | 
 |  |  |          xstring cname = ele.selectSingleNode(L"CName").text(); | 
 |  |  |  | 
 |  |  |          xaserverarg arg; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"invoiceno", entityid); | 
 |  |  |          arg.AddArg(L"ClassifyID", classifyID); | 
 |  |  |          arg.AddArg(L"SupplierID", supplierID); | 
 |  |  |          arg.AddArg(L"CName", cname); | 
 |  |  | 			 | 
 |  |  |          OpenWindow(L"dev:xpage[maint.papercard.vatnotify.vx]", arg); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  | #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 OnModify() { | 
 |  |  |          int row = dw_list.GetRow(); | 
 |  |  |          if (row < 1) return 0; | 
 |  |  |          KXMLDOMElement ele = dw_list.GetRowElement(row); | 
 |  |  |          xstring entityid = ele.selectSingleNode(L"InvoiceNo").text(); | 
 |  |  |          xaserverarg arg; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"invoiceno", entityid); | 
 |  |  | 			 | 
 |  |  |          OpenWindow(L"dev:xpage[update.vatnotify.vx]", arg); | 
 |  |  |          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) | 
 |  |  |       int Onfinish() { | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnDeleteRow() | 
 |  |  |       { | 
 |  |  |          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) | 
 |  |  |          if (dw_list.GetRow() < 1) return 1; | 
 |  |  |          int row = dw_list.GetRow(); | 
 |  |  |          xstring InvoiceNo = dw_list.GetItemString(row, L"InvoiceNo"); | 
 |  |  |          int res = MessageBox(GetHWND(), L"是否确认删除" + InvoiceNo + L"的开票通知?", L"提示", 4); | 
 |  |  |          if (res == 6) | 
 |  |  |          { | 
 |  |  |             alert(L"处理成功"); | 
 |  |  |             OnRetrieve(); | 
 |  |  |             xml x = ViewObject::RetrieveData(L"/sale/data/VATNotify/entity/delete", L"invoiceno", InvoiceNo); | 
 |  |  |             if (!x) | 
 |  |  |             { | 
 |  |  |                alert(L"删除错误"); | 
 |  |  |                return 1; | 
 |  |  |             } | 
 |  |  |             //dw_list.DeleteRow(row); | 
 |  |  |             alert(x.text()); | 
 |  |  |             OnRetrieve(DatePicker); | 
 |  |  |          } | 
 |  |  |       } | 
 |  |  |       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; | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       if (comdid == L"action:search1") return GridSearch(); | 
 |  |  |       if (comdid == L"action:bill.refresh") | 
 |  |  |  | 
 |  |  |       //命令发布函数 | 
 |  |  |       int OnCmdDispatch(xstring comdid) | 
 |  |  |       { | 
 |  |  |          return OnRetrieve(); | 
 |  |  |       } | 
 |  |  |       if (comdid == L"action:bill.xmSaveAs") | 
 |  |  |       { | 
 |  |  |          xstring  userno = publiccode::GetUser().no; | 
 |  |  |          if (userno == L"00701" || userno == L"00601" || userno == L"admin") | 
 |  |  |          if (comdid == L"xm:import") { | 
 |  |  |             OpenWindow(L"dev:xpage[import.vatnotify.vx]", 0); | 
 |  |  |          } | 
 |  |  |          if (comdid == L"action:bill.open") { | 
 |  |  |             OnOpen(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xm:notify") { | 
 |  |  |             OnOpen(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xm:papercardnotify") { | 
 |  |  |             OnPapercardOpen(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xm:modify") { | 
 |  |  |             OnModify(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xm:finish") { | 
 |  |  |             Onfinish(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xm:ratecalc") { | 
 |  |  |  | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"find") | 
 |  |  |          { | 
 |  |  |             m_QueryTxt = xcontrol(GetControl(L"txt")).GetText(); | 
 |  |  |             return OnRetrieve(DatePicker); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xmRefresh") | 
 |  |  |          { | 
 |  |  |             return OnRetrieve(DatePicker); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xmDeleteRow") | 
 |  |  |          { | 
 |  |  |             return OnDeleteRow(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xmPrint") { | 
 |  |  |             return OnPrint(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xmPrintItem") { | 
 |  |  |             return OnPrintItem(); | 
 |  |  |          } | 
 |  |  |          else if (comdid == L"xmSaveAs") | 
 |  |  |          { | 
 |  |  |             dw_list.SaveAs(L""); | 
 |  |  |             return 1; | 
 |  |  |          } | 
 |  |  |          return 0; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       //命令处理事件 | 
 |  |  |       int OnXCommand(TEvent* evt, LPARAM param) | 
 |  |  |       { | 
 |  |  |          return OnCmdDispatch(evt->xcommand.pStrID); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnAttachEvent() | 
 |  |  |       { | 
 |  |  |          //绑定工具条点击事件 | 
 |  |  |          AttachEvent(L"WM_XCOMMAND", (FEvent)&listvatnotifyWin::OnXCommand); | 
 |  |  |          //获取焦点事件,用于重置工具条 | 
 |  |  |          AttachEvent(L"WM_SETFOCUS", (FEvent)&listvatnotifyWin::OnSetFocus); | 
 |  |  |          AttachEvent(L"dw_list", L"DWV_CLICKED", (FEvent)&listvatnotifyWin::OnDWClick); | 
 |  |  |          AttachEvent(L"cbx_state", L"CBN_SELCHANGE", (FEvent)&listvatnotifyWin::OnDatePicker); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |       if (comdid == L"action:bill.Annex") | 
 |  |  |  | 
 |  |  |       int OnDatePicker(TEvent* evt, int lParam) | 
 |  |  |       { | 
 |  |  |          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")); | 
 |  |  | 			 | 
 |  |  |          DWNMHDR& hdr = *(DWNMHDR*)evt->notify.pnmh; | 
 |  |  |  | 
 |  |  |          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) | 
 |  |  |          int h = xcombobox::GetCurSel(evt->command.hCtrl); | 
 |  |  |          if (h > -1) | 
 |  |  |          { | 
 |  |  |             TypeWork = supplier_x.text(); | 
 |  |  |  | 
 |  |  |             if (TypeWork.find(L"采购") >= 0) | 
 |  |  |             xstring txt = (string)xcombobox::GetLBText(evt->command.hCtrl, h); | 
 |  |  |             if (txt == L"通知日期") | 
 |  |  |             { | 
 |  |  |  | 
 |  |  |                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); | 
 |  |  |                DatePicker = L"NotifyDate"; | 
 |  |  |                OnRetrieve(DatePicker); | 
 |  |  |             } | 
 |  |  |             else if (txt == L"出运日期") | 
 |  |  |             { | 
 |  |  |  | 
 |  |  |                DatePicker = L"ETD"; | 
 |  |  |                OnRetrieve(DatePicker); | 
 |  |  |             } | 
 |  |  |          } | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       return 1; | 
 |  |  |    } | 
 |  |  |  | 
 |  |  |    int onloaded() | 
 |  |  |    { | 
 |  |  |       AttachEvent(L"dw_list", L"DWV_ROWFOCUSCHANGED", (FEvent)&listSupplierv3::OnRowChangedEx); | 
 |  |  |       xstring GetQueryArg() | 
 |  |  |       { | 
 |  |  |          dw_arg.AcceptText(); | 
 |  |  |          xml x ; | 
 |  |  | 			 | 
 |  |  |          dw_arg.DwUpdateAllTo(x); | 
 |  |  |          return x.xml(); | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       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; | 
 |  |  |    } | 
 |  |  |       int  OnRetrieve(xstring DatePicker) | 
 |  |  |       { | 
 |  |  |          HCURSOR  hCursor = xutil::SetCursorWait(); | 
 |  |  |          xml x ; | 
 |  |  | 			 | 
 |  |  |          xaserverarg arg; | 
 |  |  | 			 | 
 |  |  |          arg.AddArg(L"pageindex", xstring(m_pageindex)); | 
 |  |  |          arg.AddArg(L"pagenumber", xstring(m_pagenumber)); | 
 |  |  |          arg.AddArg(L"QueryTxt", m_QueryTxt); | 
 |  |  |          arg.AddArg(L"QueryArg", GetQueryArg()); | 
 |  |  |          arg.AddArg(L"DatePicker", DatePicker); | 
 |  |  |          if (getUrl(L"/sale/data/VATNotify/entity/listOne", arg.GetString(), x) != 1) | 
 |  |  |          { | 
 |  |  |             trace(x.text()); | 
 |  |  |             xutil::RestoreCursor(hCursor); | 
 |  |  |             return -1; | 
 |  |  |          } | 
 |  |  |          else | 
 |  |  |          { | 
 |  |  |             //trace(x.xml); | 
 |  |  |             KXMLDOMElement ele = x.documentElement(); | 
 |  |  |             if (dw_pages.getNativePointer()) | 
 |  |  |             { | 
 |  |  |                if (ele.selectSingleNode(L"@TotalPage")) | 
 |  |  |                { | 
 |  |  |                   xstring s = ele.selectSingleNode(L"@TotalPage").text(); //总数量				 | 
 |  |  |                   dw_pages.SetMaxPage(s.toInt()); | 
 |  |  |                } | 
 |  |  |             } | 
 |  |  |             dw_list.Retrieve(x); | 
 |  |  |             dw_list.Redraw(); | 
 |  |  |             dw_list.SetReadOnly(true); | 
 |  |  |          } | 
 |  |  |          xutil::RestoreCursor(hCursor); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  | }; | 
 |  |  |       int OnChangePages(TEvent* evt, LPARAM p) | 
 |  |  |       { | 
 |  |  |          PAGENMHDR& h = *(PAGENMHDR*)evt->notify.pnmh; | 
 |  |  |          int c = h.cur; | 
 |  |  |          HCURSOR hCursor = xutil::SetCursorWait(); | 
 |  |  |          m_pageindex = c; | 
 |  |  |          OnRetrieve(DatePicker); | 
 |  |  |          xutil::RestoreCursor(hCursor); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int OnDoubleClicked(TEvent* evt, LPARAM p) | 
 |  |  |       { | 
 |  |  |          HCURSOR hCursor = xutil::SetCursorWait(); | 
 |  |  |          OnCmdDispatch(L"action:bill.open"); | 
 |  |  |          xutil::RestoreCursor(hCursor); | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int onload() | 
 |  |  |       { | 
 |  |  |          dw_list = GetControl(L"dw_list"); | 
 |  |  |          dw_list.openUrl(L"/sale/view/VATNotify/template/VATNotify/list"); | 
 |  |  |          dw_list.SetColumnState(L"ShortName", false); | 
 |  |  |  | 
 |  |  |          dw_arg = GetControl(L"dw_arg"); | 
 |  |  |          dw_arg.openUrl(L"/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, L"DateType", L"本月"); | 
 |  |  |          //dw_arg.SetItemString(1,L"DateType",L""); | 
 |  |  |          AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&listvatnotifyWin::OnDoubleClicked);//行双击 | 
 |  |  |          dw_pages = GetControl(L"pages"); | 
 |  |  |          AttachEvent(L"pages", L"PAGE_CLICK", (FEvent)&listvatnotifyWin::OnChangePages); | 
 |  |  |  | 
 |  |  |  | 
 |  |  |          OnAttachEvent(); | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |  | 
 |  |  |       int onloaded() | 
 |  |  |       { | 
 |  |  |          SetAgent(); | 
 |  |  |  | 
 |  |  |          m_pageindex = 1; | 
 |  |  |          m_pagenumber = 10000; | 
 |  |  |          m_QueryTxt = L""; | 
 |  |  |  | 
 |  |  |          //OnRetrieve(); | 
 |  |  |  | 
 |  |  |          return 1; | 
 |  |  |       } | 
 |  |  |    }; |