Index: CHUI/FOP/Print/MainForm.cls.xml
===================================================================
diff -u -r1074 -r2578
--- CHUI/FOP/Print/MainForm.cls.xml	(.../MainForm.cls.xml)	(revision 1074)
+++ CHUI/FOP/Print/MainForm.cls.xml	(.../MainForm.cls.xml)	(revision 2578)
@@ -3,7 +3,7 @@
 <Class name="CHUI.FOP.Print.MainForm">
 <IncludeCode>BL.Sys.FOP.Common</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%CHUI.TForm</Super>
+<Super>TCHUI.TForm</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <UDLText name="T">
@@ -18,107 +18,107 @@
 ==========================================================================================================================
 PROPERTIES                                                                                                               .
 ==========================================================================================================================</Description>
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acPrintSelected">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acPrint">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acResetSel">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acReset">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acReprintSel">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acReprint">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acSetAddendum">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acRefresh">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="lblHeader">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblSelectedType">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfDocsHdr">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfDocs">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfPagesHdr">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfPages">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfSendings">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblNrOfSendingsHdr">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblAddendumHdr">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="lblAddendum">
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <Property name="btnPrintAll">
-<Type>%CHUI.TButton</Type>
+<Type>TCHUI.TButton</Type>
 </Property>
 
 <Property name="btnPrint">
-<Type>%CHUI.TButton</Type>
+<Type>TCHUI.TButton</Type>
 </Property>
 
 <Property name="btnPrintSelected">
-<Type>%CHUI.TButton</Type>
+<Type>TCHUI.TButton</Type>
 </Property>
 
 <Property name="lstWaiting">
-<Type>%CHUI.TLijst</Type>
+<Type>TCHUI.TLijst</Type>
 </Property>
 
 <Property name="dslWaiting">
-<Type>%CHUI.TDataSetList</Type>
+<Type>TCHUI.TDataSetList</Type>
 </Property>
 
 <Property name="lstLog">
-<Type>%CHUI.TLijst</Type>
+<Type>TCHUI.TLijst</Type>
 </Property>
 
 <Property name="dslLog">
-<Type>%CHUI.TDataSetList</Type>
+<Type>TCHUI.TDataSetList</Type>
 </Property>
 
 <Property name="frmDetailView">
@@ -137,75 +137,75 @@
 </Property>
 
 <Property name="cmWaiting">
-<Type>%CHUI.TContextMenu</Type>
+<Type>TCHUI.TContextMenu</Type>
 </Property>
 
 <Property name="cmLog">
-<Type>%CHUI.TContextMenu</Type>
+<Type>TCHUI.TContextMenu</Type>
 </Property>
 
 <Property name="hmiPrint">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miPrintToFile">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miPrintToDefaultPrinter">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miPrintToUserDefinedPrinter">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miMaxPagesPerEnvelope">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miAddendumEdit">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miAddendumNew">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miAddendumSelect">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="hmiExtra">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miSearchDocRef">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="miExtractDoc">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="pmiSetAddendum">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="pmiResetSel">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="pmiReset">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="pmiReprintSel">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="pmiReprint">
-<Type>%CHUI.TMenuItem</Type>
+<Type>TCHUI.TMenuItem</Type>
 </Property>
 
 <Property name="FUserDefinedPrinter">
@@ -346,47 +346,47 @@
 	Set ..OnCloseQuery=$LB(%this,"MainFormCloseQuery")
 
 	//Actions
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acPrint","Print",1,$LB("P"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acPrint","Print",1,$LB("P"))
 	Set ..acPrint.OnExecute=$LB(%this,"acPrintExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acResetSel","Reset from selected",1,$LB("W"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acResetSel","Reset from selected",1,$LB("W"))
 	Set ..acResetSel.OnExecute=$LB(%this,"acResetSelExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acReset","Reset completed...",1)
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acReset","Reset completed...",1)
 	Set ..acReset.OnExecute=$LB(%this,"acResetExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acReprint","Reprint browse...",1,$LB("B"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acReprint","Reprint browse...",1,$LB("B"))
 	Set ..acReprint.OnExecute=$LB(%this,"acReprintExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acReprintSel","Reprint selected",1,$LB("R"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acReprintSel","Reprint selected",1,$LB("R"))
 	Set ..acReprintSel.OnExecute=$LB(%this,"acReprintSelExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acPrintSelected","Print Sel",1,$LB("S"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acPrintSelected","Print Sel",1,$LB("S"))
 	Set ..acPrintSelected.OnExecute=$LB(%this,"acPrintSelectedExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acPrintAll","PrintAll",1,$LB(""))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acPrintAll","PrintAll",1,$LB(""))
 	Set ..acPrintAll.OnExecute=$LB(%this,"acPrintAllExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acSetAddendum","Addendum toevoegen",1,$LB("A"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acSetAddendum","Addendum toevoegen",1,$LB("A"))
 	Set ..acSetAddendum.OnExecute=$LB(%this,"acSetAddendumExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acRefresh","Vernieuwen",1,$LB($$$kcF5))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acRefresh","Vernieuwen",1,$LB($$$kcF5))
 	Set ..acRefresh.OnExecute=$LB(%this,"acRefreshExecute")
 
 	//Labels
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblHeader","",1,1,,,,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblHeader","",1,1,,,,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline))
 	Set ..lblHeader.Sizing=$$$lsFixed
 	Set ..CaptionControl=..lblHeader
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblSelectedType","Type",9,66)
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfSendingsHdr","Zendingen",10,70,,,,,,$LB(,,$$$fsNoUnderline))
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfPagesHdr","Pagina's",12,71,,,,,,$LB(,,$$$fsNoUnderline))
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfDocsHdr","Documenten",14,69,,,,,,$LB(,,$$$fsNoUnderline))
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfSendings",,11,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblSelectedType","Type",9,66)
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfSendingsHdr","Zendingen",10,70,,,,,,$LB(,,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfPagesHdr","Pagina's",12,71,,,,,,$LB(,,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfDocsHdr","Documenten",14,69,,,,,,$LB(,,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfSendings",,11,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
 	Set ..lblNrOfSendings.Sizing=$$$lsFixed
 	Set ..lblNrOfSendings.DataType=$$$edtInteger
 	Set ..lblNrOfSendings.Format=".0"
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfPages",,13,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfPages",,13,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
 	Set ..lblNrOfPages.Sizing=$$$lsFixed
 	Set ..lblNrOfPages.DataType=$$$edtInteger
 	Set ..lblNrOfPages.Format=".0"
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblNrOfDocs",,15,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblNrOfDocs",,15,65,,14,,,,$LB($$$clUltraDark,,$$$fsNoUnderline),$$$alRight)
 	Set ..lblNrOfDocs.Sizing=$$$lsFixed
 	Set ..lblNrOfDocs.DataType=$$$edtInteger
 	Set ..lblNrOfDocs.Format=".0"
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblAddendumHdr","Addendum",24,3)
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblAddendum","",24,12,,,,,,$LB($$$clUltraDark,,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblAddendumHdr","Addendum",24,3)
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblAddendum","",24,12,,,,,,$LB($$$clUltraDark,,$$$fsNoUnderline))
 	
 	//Laatste addendum terug actief maken
 	Set GetLastUsedAddendum=##class(FOP.Addendum).GetLastUsedAddendum()
@@ -397,13 +397,13 @@
 	. Set ..FActiveAddendumName=""
 
 	//Buttons
-	Do ##class(%CHUI.TButton).CreateSet(%this,"btnPrint","Print",3,66,,13,,,,,$$$alCenter)
+	Do ##class(TCHUI.TButton).CreateSet(%this,"btnPrint","Print",3,66,,13,,,,,$$$alCenter)
 	Set ..btnPrint.Action=..acPrint
-	;Do ##class(%CHUI.TButton).CreateSet(%this,"btnRePrint","Reprint",17,70,,9,,,,,$$$alCenter)
+	;Do ##class(TCHUI.TButton).CreateSet(%this,"btnRePrint","Reprint",17,70,,9,,,,,$$$alCenter)
 	;Set ..btnRePrint.Action=..acRePrint
-	Do ##class(%CHUI.TButton).CreateSet(%this,"btnPrintSelected","Print sel",5,66,,13,,,,,$$$alCenter)
+	Do ##class(TCHUI.TButton).CreateSet(%this,"btnPrintSelected","Print sel",5,66,,13,,,,,$$$alCenter)
 	Set ..btnPrintSelected.Action=..acPrintSelected
-	Do ##class(%CHUI.TButton).CreateSet(%this,"btnPrintAll","Print alles",7,66,,13,,,,,$$$alCenter)
+	Do ##class(TCHUI.TButton).CreateSet(%this,"btnPrintAll","Print alles",7,66,,13,,,,,$$$alCenter)
 	Set ..btnPrintAll.Action=..acPrintAll
 
 	//HoofdMenuItem
@@ -432,7 +432,7 @@
 	Set ..miExtractDoc=..hmiExtra.AddItem(%this,"miExtractDoc","Forceer regio...",1,,$LB(%this,"miExtractDocClick"))
 
 	//List waiting
-	Do ##class(%CHUI.TLijst).CreateSet(%this,"lstWaiting","",3,3,13,61)
+	Do ##class(TCHUI.TLijst).CreateSet(%this,"lstWaiting","",3,3,13,61)
 	Set ..lstWaiting.OnKeyPress=$LB(%this,"lstWaitingKeyPress")
 	Set ..lstWaiting.OnSelect=$LB(%this,"lstWaitingSelect")
 
@@ -473,7 +473,7 @@
 	Do ..lstWaiting.AddCheckBoxDBToRowDef(rdRowlstWaiting,..#colWAddAddendum)
 
 	//List Log
-	Do ##class(%CHUI.TLijst).CreateSet(%this,"lstLog","",17,3,6,76)
+	Do ##class(TCHUI.TLijst).CreateSet(%this,"lstLog","",17,3,6,76)
 	Set ..lstLog.OnKeyPress=$LB(%this,"lstLogKeyPress")
 
 	Set rdHeaderlstLog=..lstLog.CreateRowDef("rdHeaderlstLog",$$$ftAddLijstHeader)
@@ -503,7 +503,7 @@
 	Do ..lstLog.AddLabelDBToRowDef(rdRowlstLog,..#colLUserName)
 	
 	//DataSetList waiting
-	Set ..dslWaiting=##class(%CHUI.TDataSetList).Create(..lstWaiting,"dslWaiting")
+	Set ..dslWaiting=##class(TCHUI.TDataSetList).Create(..lstWaiting,"dslWaiting")
 	Set ..dslWaiting.OnQueryInit=$LB(%this,"dslWaitingQueryInit")
 
 	Do ..dslWaiting.AddColDef(..#colWType)
@@ -519,7 +519,7 @@
 	Do ..dslWaiting.AddColDef(..#colWAddendumInfo)
 
 	//DataSetList Log
-	Set ..dslLog=##class(%CHUI.TDataSetList).Create(..lstLog,"dslLog")
+	Set ..dslLog=##class(TCHUI.TDataSetList).Create(..lstLog,"dslLog")
 	Set ..dslLog.OnQueryInit=$LB(%this,"dslLogQueryInit")
 
 	Do ..dslLog.AddColDef(..#colLMsg)
@@ -536,11 +536,11 @@
 	Do ..lstLog.InitSpec(..dslLog,rdHeaderlstLog,rdRowlstLog)
 
 	//Menu
-	Set ..cmWaiting=##class(%CHUI.TContextMenu).Create(%this,"cmWaiting")
+	Set ..cmWaiting=##class(TCHUI.TContextMenu).Create(%this,"cmWaiting")
 	Set ..pmiSetAddendum=..cmWaiting.AddItem(%this,"pmiSetAddendum","Addendum...",1,,,..acSetAddendum)
 	Set ..lstWaiting.ContextMenu=..cmWaiting
 
-	Set ..cmLog=##class(%CHUI.TContextMenu).Create(%this,"cmLog")
+	Set ..cmLog=##class(TCHUI.TContextMenu).Create(%this,"cmLog")
 	Set ..pmiResetSel=..cmLog.AddItem(%this,"pmiResetSel","Reset from selected",1,,,..acResetSel)
 	Set ..pmiReset=..cmLog.AddItem(%this,"pmiReset","Reset completed...",1,,,..acReset)
 	Do ..cmLog.AddItem(%this,"pmiLogSep","-File",1)
@@ -629,7 +629,7 @@
 
 	;Form aanmaken om bijhorende bestanden in weer te geven
 	Set Msg=$S(PrintOneFile:"Selecteer een bestand:",1:"Selecteer een of meerdere bestanden:")
-	Set frmList=##class(%CHUI.Dlg.TList).CreateAndPrepare(..Caption,Msg,,60,18,"Reprint",'PrintOneFile)    ;'PrintOneFile=checkboxlist
+	Set frmList=##class(TCHUI.Dlg.TList).CreateAndPrepare(..Caption,Msg,,60,18,"Reprint",'PrintOneFile)    ;'PrintOneFile=checkboxlist
 
 	;Bijhorende bestanden aan lijst toevoegen
 	Do areAddReprintFilesToList(frmList,PrintGroup,$$$OMRPrintDirNtw)
@@ -808,7 +808,7 @@
 ==========================================================================================================================
 EVENTs                                                                                                                   .
 ==========================================================================================================================</Description>
-<FormalSpec><![CDATA[Sender:%CHUI.TControlBasis,&Result:%String]]></FormalSpec>
+<FormalSpec><![CDATA[Sender:TCHUI.TControlBasis,&Result:%String]]></FormalSpec>
 <Implementation><![CDATA[
 	Set Query="BL.FOP.Print:QGetWaitingPrintGroups"
 	Set RS=##class(%ResultSet).%New(Query)
@@ -839,7 +839,7 @@
 </Method>
 
 <Method name="dslLogQueryInit">
-<FormalSpec><![CDATA[Sender:%CHUI.TControlBasis,&Result:%String]]></FormalSpec>
+<FormalSpec><![CDATA[Sender:TCHUI.TControlBasis,&Result:%String]]></FormalSpec>
 <Implementation><![CDATA[
 	Set Query="BL.FOP.Print:QGetLog"
 	Set RS=##class(%ResultSet).%New(Query)
@@ -862,17 +862,17 @@
 </Method>
 
 <Method name="MainMenuShow">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[	Set ..miMaxPagesPerEnvelope.Caption="Maximum aantal papieren in envelop: "_$$$cmPrint.GetMaximumPapersInEnvelope()
 ]]></Implementation>
 </Method>
 
 <Method name="miPrintToUDPrinterClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set UserDefinedPrinter=..FUserDefinedPrinter
 	
-	Do InputBox^%CHUI.System(..Caption,"Geef de naam van de printer op:",.UserDefinedPrinter)
+	Do InputBox^TCHUI.System(..Caption,"Geef de naam van de printer op:",.UserDefinedPrinter)
 	
 	If UserDefinedPrinter="" Do
 	. Do $$$ShowMsgBoxSimple(..Caption,"Er is geen printer opgegeven, standaard printer wordt geselecteerd.")
@@ -885,7 +885,7 @@
 </Method>
 
 <Method name="miMaxPagesPerEnvelopeClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set MaximumPapersInEnvelope=$$$cmPrint.GetMaximumPapersInEnvelope()
 
@@ -898,7 +898,7 @@
 </Method>
 
 <Method name="miSearchDocRefClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set SearchStr=""
 	
@@ -907,7 +907,7 @@
 </Method>
 
 <Method name="miExtractDocClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set DocRef=""
 	Set ppodID=""
@@ -944,7 +944,7 @@
 </Method>
 
 <Method name="miAddendumNewClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Do ..FInitAddendumForm()
 	
@@ -959,7 +959,7 @@
 </Method>
 
 <Method name="miAddendumSelectClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set Query="FOP.Addendum:GetAllNames"
 	Set RS=##class(%ResultSet).%New(Query)
@@ -970,7 +970,7 @@
 	If $$$ISERR(tmpStatus) Do  Quit
 	. Do $$$ShowMsgBoxSimple(..Caption,"Fout bij het uitvoeren van de query '"_Query_"': "_$C(13,10)_$$ParseStatus^vhLib(tmpStatus))
 
-	Set frmList=##class(%CHUI.Dlg.TList).CreateAndPrepare(..Caption,"Selecteer een addendum:",,60,18)    ;'PrintOneFile=checkboxlist
+	Set frmList=##class(TCHUI.Dlg.TList).CreateAndPrepare(..Caption,"Selecteer een addendum:",,60,18)    ;'PrintOneFile=checkboxlist
 
 	For  Quit:('RS.Next())  Do
 	. Do frmList.AddItem(RS.Get("Name"))
@@ -984,7 +984,7 @@
 </Method>
 
 <Method name="miAddendumEditClick">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Do ..FInitAddendumForm()
 	
@@ -1001,7 +1001,7 @@
 </Method>
 
 <Method name="acRefreshExecute">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Do ..lstWaiting.Refresh()
 	Do ..lstLog.Refresh()
@@ -1011,7 +1011,7 @@
 <Method name="acPrintSelectedExecute">
 <Description>
 =================================================================================================================================================</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set ..FPrintSelected=1
 	
@@ -1022,7 +1022,7 @@
 <Method name="acPrintAllExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Quit:($$InDevelop^vhLib && ..miPrintToFile.Checked && ($$$MsgBox(..Caption,"Info: de groep wordt enkel naar een bestand afgedrukt (<F11> PRINT om te wijzigen).",$$$mbOkCancel)=$$$mrCancel))
 
@@ -1081,7 +1081,7 @@
 <Method name="acPrintExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Quit:($$InDevelop^vhLib && ..miPrintToFile.Checked && ($$$MsgBox(..Caption,"Info: de groep wordt enkel naar een bestand afgedrukt (<F11> PRINT om te wijzigen).",$$$mbOkCancel)=$$$mrCancel))
 
@@ -1124,7 +1124,7 @@
 <Method name="acResetSelExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set lbID=..lstLog.GetSelectedData(..#colLIDs)
 	Quit:($LL(lbID)=0)
@@ -1142,7 +1142,7 @@
 <Method name="acResetExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set DetailCaption="Reset Completed"
 	
@@ -1157,7 +1157,7 @@
 <Method name="acReprintSelExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set PrintGroup=..lstLog.GetSelectedData(..#colLMsg)
 	Quit:(PrintGroup="")
@@ -1169,15 +1169,15 @@
 <Method name="acReprintExecute">
 <Description>
 -------------------------------------------------------------------------------------------------------------------------------------------------</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[	Do ..FReprintFiles("*.ps",0)
 ]]></Implementation>
 </Method>
 
 <Method name="acSetAddendumExecute">
 <Description>
 =================================================================================================================================================</Description>
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set Type=..dslWaiting.Get(..#colWType)
 	Quit:(Type="")
@@ -1198,7 +1198,7 @@
 </Method>
 
 <Method name="lstWaitingKeyPress">
-<FormalSpec>Sender:%CHUI.TControlBasis,KeyCode:%String</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis,KeyCode:%String</FormalSpec>
 <Implementation><![CDATA[
 	If KeyCode=$$$kcEnter Do
 	.	Set KeyCode=$$$kcNone
@@ -1214,7 +1214,7 @@
 </Method>
 
 <Method name="lstWaitingSelect">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set Type=..lstWaiting.GetSelectedData(..#colWType)
 	Quit:(Type="")
@@ -1236,7 +1236,7 @@
 </Method>
 
 <Method name="lstLogKeyPress">
-<FormalSpec>Sender:%CHUI.TControlBasis,KeyCode:%String</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis,KeyCode:%String</FormalSpec>
 <Implementation><![CDATA[
 	If KeyCode=$$$kcEnter Do
 	.	Set KeyCode=$$$kcNone
@@ -1249,7 +1249,7 @@
 </Method>
 
 <Method name="MainFormCloseQuery">
-<FormalSpec>Sender:%CHUI.TControlBasis,CanClose:%Boolean</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis,CanClose:%Boolean</FormalSpec>
 <Implementation><![CDATA[
 	Set LastUsedAddendum=##class(FOP.Addendum).GetLastUsedAddendum()
 	If LastUsedAddendum'=..FActiveAddendumName Do