xj qian
2024-07-09 69b7db403da8d663f388c61c37567f357fbd9236
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
þÿuse "xcontrol.vframe.vbusiness.vd"
use "xbase.vframe.vbusiness.vd"
use "base.view.vd"
unit trade
[
    class CommissionExpenseItem : public xframe
    {
        xdwgrid    dw_list;
 
        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 onOk()
        {
 
            xaserverarg arg = GetParam();
            arg.AddArg("items", "");
            string str = "";
            int row = dw_list.GetNextSelectRow(1);
            while (row > 0 && row <= dw_list.GetRowCount())
            {
                msxml::IXMLDOMElement ele = dw_list.GetRowElement(row);
                str += ele.xml;
                ele.Release();
                row = dw_list.GetNextSelectRow(row + 1);
            }
            if (str != "")
                arg.AddArg("items", "<data>" + str + "</data>");
            CloseWindow();
            return 1;
        }
        //T}NäSÑ^Qýep
        int OnCmdDispatch(string comdid)
        {
            if (comdid == "xmCancel")
            {
                CloseWindow();
                return 1;
            }
            else if (comdid == "xmQuery")
            {
                RetrieveData();
                return 1;
            }
            else if (comdid == "xmOk")
            {
                onOk();
                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_list", "DWV_DOUBLECLICKED", onOk);
        }
 
        int RetrieveData()
        {
            xcontrol query = GetControl("sl_search");
            string queryTxt = query.GetText();
            xml x = ViewObject::RetrieveData("/sale/data/Expense3/CommissionExpenseItem", "InvoiceNo", queryTxt);
 
            if (x)dw_list.Retrieve(x);
 
            dw_list.SetReadOnly(true);
            dw_list.SetSelectionMode(3);
            return 1;
        }
 
        int onload()
        {
            dw_list = GetControl("dw_list");
            dw_list.openUrl("/sale/view/Expense3/CommissionItem");
            OnAttachEvent();
 
            RetrieveData();
            return 1;
        }
 
        int onloaded()
        {
            SetAgent();
 
            return 1;
        }
    };
]