Index: CHUI/Derde/EC/Logging/dlgStatistics.cls.xml =================================================================== diff -u -r1074 -r2578 --- CHUI/Derde/EC/Logging/dlgStatistics.cls.xml (.../dlgStatistics.cls.xml) (revision 1074) +++ CHUI/Derde/EC/Logging/dlgStatistics.cls.xml (.../dlgStatistics.cls.xml) (revision 2578) @@ -3,8 +3,7 @@ BL.EC.Common 1 -%CHUI.TForm -0 +TCHUI.TForm -%CHUI.TLabel +TCHUI.TLabel -%CHUI.TLabel +TCHUI.TLabel -%CHUI.TLabel +TCHUI.TLabel @@ -37,7 +36,7 @@ -%CHUI.TKader +TCHUI.TKader @@ -48,7 +47,7 @@ -%CHUI.TButton +TCHUI.TButton @@ -59,7 +58,7 @@ -%CHUI.TLijst +TCHUI.TLijst @@ -70,11 +69,11 @@ -%CHUI.TPopup +TCHUI.TPopup -%CHUI.TPopup +TCHUI.TPopup @@ -85,7 +84,7 @@ -%CHUI.TDataSetList +TCHUI.TDataSetList @@ -147,24 +146,24 @@ Do ..Center() //Labels - ;Do ##class(%CHUI.TLabel).CreateSet(%this,"lblHeader","",1,1,,,$$$alLeft,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline)) + ;Do ##class(TCHUI.TLabel).CreateSet(%this,"lblHeader","",1,1,,,$$$alLeft,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline)) ;Set ..lblHeader.Sizing=$$$lsFixed ;Set ..CaptionControl=..lblHeader - Do ##class(%CHUI.TLabel).CreateSet(%this,"lblTimeInterval","Weergave:",3,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) - Do ##class(%CHUI.TLabel).CreateSet(%this,"lblSortGrouping","Groepering:",4,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) + Do ##class(TCHUI.TLabel).CreateSet(%this,"lblTimeInterval","Weergave:",3,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) + Do ##class(TCHUI.TLabel).CreateSet(%this,"lblSortGrouping","Groepering:",4,3,,,$$$alLeft,,,$LB(,,$$$fsNoUnderline)) //Kaders - Do ##class(%CHUI.TKader).CreateSet(%this,"kdrMain","",1,1,..Height,..Width,10,,,) + Do ##class(TCHUI.TKader).CreateSet(%this,"kdrMain","",1,1,..Height,..Width,10,,,) Set ..kdrMain.Fill=0 Set ..CaptionControl=..kdrMain //Buttons - Do ##class(%CHUI.TButton).CreateSet(%this,"btnClose","Sluiten",3,..Width-10,,9,,,,,$$$alCenter) + Do ##class(TCHUI.TButton).CreateSet(%this,"btnClose","Sluiten",3,..Width-10,,9,,,,,$$$alCenter) Set ..btnClose.OnClick=$LB(%this,"btnCloseClick") //Lists - Do ##class(%CHUI.TLijst).CreateSet(%this,"lstStat","lstStat",6,3,16,..Width-4) + Do ##class(TCHUI.TLijst).CreateSet(%this,"lstStat","lstStat",6,3,16,..Width-4) Set rdHeaderlstStat=..lstStat.CreateRowDef("rdHeaderlstStat",,$LB($$$clBlue,$$$clMedDark)) Do ..lstStat.AddLabelToRowDef(rdHeaderlstStat,16,"Datum",1) @@ -186,7 +185,7 @@ Do ..lstStat.AddLabelDBToRowDef(rdRowlstStat,..#colCntIntern,5,$$$alRight) //Popups - Set ..pmTimeInterval=##class(%CHUI.TPopup).Create(%this,"pmTimeInterval","",3,15,,16) + Set ..pmTimeInterval=##class(TCHUI.TPopup).Create(%this,"pmTimeInterval","",3,15,,16) Set ..pmTimeInterval.opDefaultContextMenu=0 Do ..pmTimeInterval.InitSpec(,,,10) Do ..pmTimeInterval.AddItem($$$tiDaily,"Dagelijks") @@ -195,7 +194,7 @@ Set ..pmTimeInterval.OnLostFocus=$LB(%this,"pmTimeIntervalLostFocus") Set ..pmTimeInterval.Value=$$$tiHourly - Set ..pmSortGrouping=##class(%CHUI.TPopup).Create(%this,"pmSortGrouping","",4,15,,16) + Set ..pmSortGrouping=##class(TCHUI.TPopup).Create(%this,"pmSortGrouping","",4,15,,16) Set ..pmSortGrouping.opDefaultContextMenu=0 Do ..pmSortGrouping.InitSpec(,,,10) Do ..pmSortGrouping.AddItem($$$statReq,"Request") @@ -207,7 +206,7 @@ Set ..pmSortGrouping.Value=$$$statReq //DataSetLists - Set ..dslStat=##class(%CHUI.TDataSetList).Create(..lstStat,"dslStat") + Set ..dslStat=##class(TCHUI.TDataSetList).Create(..lstStat,"dslStat") Do ..dslStat.AddColDef(..#colTime,$$$rsList) Do ..dslStat.AddColDef(..#colDate,$$$rsList) Do ..dslStat.AddColDef(..#colCntKlanten,$$$rsList) @@ -227,13 +226,13 @@ ========================================================================================================================== EVENTs . ========================================================================================================================== -Sender:%CHUI.TControlBasis +Sender:TCHUI.TControlBasis -Sender:%CHUI.TControlBasis +Sender:TCHUI.TControlBasis -Sender:%CHUI.TControlBasis +Sender:TCHUI.TControlBasis - +