#include <wobject/xstring.hpp> 
 | 
#include <xcontrol/xtreeview.hpp> 
 | 
#include <xcontrol/xdwgrid.hpp> 
 | 
  
 | 
#include "vbusiness/vframe/listwin.vframe.vbusiness.hpp" 
 | 
#include "viewobject/view.base.hpp" 
 | 
  
 | 
using xml = KXMLDOMDocument; 
 | 
class __declspec(dllexport) APSelectDlg : public xframe 
 | 
{ 
 | 
public: 
 | 
        xdwgrid    dw_list; 
 | 
        xcontrol query; 
 | 
  
 | 
        xnode    m_agentNode;    //Agent Condition 
 | 
  
 | 
    public: 
 | 
        APSelectDlg(void* implPtr, HWND hWnd) :xframe(implPtr, hWnd), query(0){} 
 | 
    public: 
 | 
        static APSelectDlg* CreateInstance(void* implPtr, void* hWnd) 
 | 
        { 
 | 
            APSelectDlg* pWin = new APSelectDlg(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; 
 | 
        } 
 | 
  
 | 
        //½¹µã¼¤»î´¦Àíº¯Êý 
 | 
        int OnSetFocus(TEvent* evt, LPARAM param) 
 | 
        { 
 | 
            //ÖØÖù¤¾ßÌõ 
 | 
            SetAgent(); 
 | 
            return 1; 
 | 
        } 
 | 
        int onOk() 
 | 
        { 
 | 
            xaserverarg arg = GetArg(); 
 | 
            arg.AddArg(L"items", L""); 
 | 
            KXMLDOMElement ele = dw_list.GetRowElement(dw_list.GetRow()); 
 | 
            arg.AddArg(L"items", L"<data>" + xstring(ele.xml()) + L"</data>"); 
 | 
            CloseWindow(); 
 | 
            return 1; 
 | 
        } 
 | 
        //ÃüÁî·¢²¼º¯Êý 
 | 
        int OnCmdDispatch(xstring comdid) 
 | 
        { 
 | 
            if (comdid == L"xmCancel") 
 | 
            { 
 | 
                CloseWindow(); 
 | 
                return 1; 
 | 
            } 
 | 
            else if (comdid == L"xmQuery") 
 | 
            { 
 | 
                RetrieveData(); 
 | 
                return 1; 
 | 
            } 
 | 
            else if (comdid == L"xmOk") 
 | 
            { 
 | 
                onOk(); 
 | 
                return 1; 
 | 
            } 
 | 
            return 0; 
 | 
        } 
 | 
  
 | 
        //ÃüÁî´¦Àíʼþ 
 | 
        int OnXCommand(TEvent* evt, LPARAM param) 
 | 
        { 
 | 
            return OnCmdDispatch(evt->xcommand.pStrID); 
 | 
        } 
 | 
  
 | 
        int OnAttachEvent() 
 | 
        { 
 | 
            //°ó¶¨¹¤¾ßÌõµã»÷ʼþ 
 | 
            AttachEvent(L"WM_XCOMMAND", (FEvent)&APSelectDlg::OnXCommand); 
 | 
            //»ñÈ¡½¹µãʼþ£¬ÓÃÓÚÖØÖù¤¾ßÌõ 
 | 
            AttachEvent(L"WM_SETFOCUS", (FEvent)&APSelectDlg::OnSetFocus); 
 | 
            AttachEvent(L"dw_list", L"DWV_DOUBLECLICKED", (FEvent)&APSelectDlg::onOk); 
 | 
            return 1; 
 | 
        } 
 | 
  
 | 
        int RetrieveData() 
 | 
        { 
 | 
            xstring keyword = query.GetText(); 
 | 
            trace(keyword); 
 | 
            xml x = ViewObject::RetrieveData(L"/sale/data/PurchaseOrder/po/searchadvance", L"PONo", keyword); 
 | 
            if (x) 
 | 
                dw_list.Retrieve(x); 
 | 
            dw_list.Redraw(); 
 | 
            dw_list.SetReadOnly(true); 
 | 
            return 1; 
 | 
        } 
 | 
  
 | 
        int onload() 
 | 
        { 
 | 
            SetArg(); 
 | 
            dw_list = GetControl(L"dw_list"); 
 | 
            dw_list.openUrl(L"/sale/view/PurchaseOrder/template/purchaseorder/POAdvance"); 
 | 
            OnAttachEvent(); 
 | 
            dw_list.SetColumnState(L"POID", false); 
 | 
            dw_list.SetColumnState(L"PartyID", false); 
 | 
            xaserverarg arg = GetArg(); 
 | 
            xstring PONo; 
 | 
            if (arg) 
 | 
            { 
 | 
                PONo = arg.GetArgString(L"PONo"); 
 | 
            } 
 | 
            query = GetControl(L"sle_search"); 
 | 
            query.SetText(PONo); 
 | 
            RetrieveData(); 
 | 
            return 1; 
 | 
        } 
 | 
  
 | 
        int onloaded() 
 | 
        { 
 | 
            SetAgent(); 
 | 
  
 | 
            return 1; 
 | 
        } 
 | 
    }; 
 |