LiFan
2024-07-16 f087a50629e95666db2e0b0ba4373834e2b9593b
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
use "system.vl"
use "win.vl"
use "maint.vl"
use "file.vl"
use "dev:vm[xcell.vm]"
use "publiccode.vl"
use "dev:vm[pagecontrol.vm]"
unit vbusiness.entity
[
    BrandInforMaint is extend maint;
    about BrandInforMaint
    [
        field:
        [
            msxml::IXMLDOMDocument m_configDoc;
            string m_userid;
            string m_username;
            string ContactID;
            xdwtable__ dw_base;
            xcell__ dw_cell;            
        ]
        
        method:
        [
            int alert(string str)
            {
                //win__::MessageBox(this.GetHWND(),str,"Ìáʾ22:",0);
                TApp::alert(this,str);
                return 0;
            }
            int ViewUpdate(param pr,string updateItem,xaserverarg__  arg)
            {
                if(updateItem=="update")
                {
                
                    dw_base.ResetUpdateStatus();                
                    return 1;
                }
            }                    
            string GetEntityData(param pr)
            {
                xml__ x = new xml__;
                x.setNativePointer(xml__::CreateInstance());
                dw_base.DwUpdateAllTo(x.GetXmlDoc());
                //trace("------x");
                trace(x.GetXml());
                return x.GetXml();
            }                    
            int onload()
            {    
                maint::onload();
                dw_base = new xdwtable__;
                dw_base.setNativePointer(GetControl("dw_base"));
                
                dw_base.SetColHeaderHeight(0);
                dw_base.SetRowSelectorWidth(0);
 
                dw_base.SetScrollState(false);
 
        
                /*if (!maint::m_EntityID)
                {                    
                    //string suserid = TApp::GetUserInfo().id;
                    string suserid = xaserver__::GetUserId();                
                    string susername = TApp::GetUserInfo().name;
                    string sdate = TApp::GetCurDate();        
                    dw_base.SetItemString(dw_base.GetRow(),"CreatorID",suserid);//Party
                    dw_base.SetItemDisplayString(dw_base.GetRow(),"CreatorID",susername);                
                    dw_base.SetItemString(dw_base.GetRow(),"CreateDate",sdate);
                    xml__ x=new xml__;
                    x.setNativePointer(xml__::CreateInstance());            
                    xaserverarg__ arg=new xaserverarg__;
                    arg.setNativePointer(arg.CreateInstance());        
                    arg.AddArg("id", suserid);            
                    if(xaserver__::ExecXQuery("","[OrgInfo.xq]",arg.GetString(),x)!=1)
                    {
                        trace(x.GetXml());
                        return nil;
                    }
                    //alert(x.GetXml());
                    msxml::IXMLDOMElement e= x.GetXmlDoc().documentElement;
                    trace(e.xml);
                    if(e.selectSingleNode("orgid"))
                    {    
                        string orgid= e.selectSingleNode("orgid").text;    
                        dw_base.SetItemString(1,"OrgID",orgid);                
                    }    
 
                    if(e.selectSingleNode("orgname"))
                    {    
                        string orgname = e.selectSingleNode("orgname").text;
                        dw_base.SetItemDisplayString(1,"OrgID",orgname);                        
                    }                
                }*/                
            }
        ]
    ]
]