Index: CHUI/Derde/KB/dlgActions.cls.xml
===================================================================
diff -u -r1074 -r2578
--- CHUI/Derde/KB/dlgActions.cls.xml	(.../dlgActions.cls.xml)	(revision 1074)
+++ CHUI/Derde/KB/dlgActions.cls.xml	(.../dlgActions.cls.xml)	(revision 2578)
@@ -3,8 +3,7 @@
 <Class name="CHUI.Derde.KB.dlgActions">
 <IncludeCode>BL.Derde.Kennis,CHUI.KB</IncludeCode>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%CHUI.TForm</Super>
-<ClassDefinitionError>0</ClassDefinitionError>
+<Super>TCHUI.TForm</Super>
 
 <UDLText name="T">
 <Content><![CDATA[
@@ -18,7 +17,7 @@
 ==========================================================================================================================
 PROPERTIES                                                                                                               .
 ==========================================================================================================================</Description>
-<Type>%CHUI.TLabel</Type>
+<Type>TCHUI.TLabel</Type>
 </Property>
 
 <UDLText name="T">
@@ -29,11 +28,11 @@
 </UDLText>
 
 <Property name="acSelect">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <Property name="acClose">
-<Type>%CHUI.TAction</Type>
+<Type>TCHUI.TAction</Type>
 </Property>
 
 <UDLText name="T">
@@ -44,7 +43,7 @@
 </UDLText>
 
 <Property name="btnClose">
-<Type>%CHUI.TButton</Type>
+<Type>TCHUI.TButton</Type>
 </Property>
 
 <UDLText name="T">
@@ -55,7 +54,7 @@
 </UDLText>
 
 <Property name="lstAction">
-<Type>%CHUI.TLijst</Type>
+<Type>TCHUI.TLijst</Type>
 </Property>
 
 <UDLText name="T">
@@ -66,7 +65,7 @@
 </UDLText>
 
 <Property name="dslAction">
-<Type>%CHUI.TDataSetList</Type>
+<Type>TCHUI.TDataSetList</Type>
 </Property>
 
 <Property name="KennisID">
@@ -114,22 +113,22 @@
 	Set ..Caption=..GetFormTitle("Acties")
 
 	//Actions
-	Do ##class(%CHUI.TAction).CreateSet(%this,"acClose","Close",1,$LB("-"))
+	Do ##class(TCHUI.TAction).CreateSet(%this,"acClose","Close",1,$LB("-"))
 	Set ..acClose.OnExecute=$LB(%this,"acCloseExecute")
-	Do ##class(%CHUI.TAction).CreateSet(%this, "acSelect", "Select", 1, $LB("S"))
+	Do ##class(TCHUI.TAction).CreateSet(%this, "acSelect", "Select", 1, $LB("S"))
 	Set ..acSelect.OnExecute=$LB(%this,"acSelectExecute")
 
 	//Label header
-	Do ##class(%CHUI.TLabel).CreateSet(%this,"lblHeader",..Caption,1,1,1,80,,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline))
+	Do ##class(TCHUI.TLabel).CreateSet(%this,"lblHeader",..Caption,1,1,1,80,,,,$LB($$$clUltraLight,$$$clUltraDark,$$$fsNoUnderline))
 	Set ..lblHeader.Sizing=$$$lsFixed
 	Set ..CaptionControl=..lblHeader
 
 	//Buttons
-	Do ##class(%CHUI.TButton).CreateSet(%this,"btnClose","Sluiten",23,68,,11,,,,,$$$alCenter)
+	Do ##class(TCHUI.TButton).CreateSet(%this,"btnClose","Sluiten",23,68,,11,,,,,$$$alCenter)
 	Set ..btnClose.Action=..acClose
 
 	//Lists
-	Do ##class(%CHUI.TLijst).CreateSet(%this,"lstAction","Action",3,3,%Screen.Height-5,%Screen.Width-4)
+	Do ##class(TCHUI.TLijst).CreateSet(%this,"lstAction","Action",3,3,%Screen.Height-5,%Screen.Width-4)
 	Set ..lstAction.OnKeyPress=$LB(%this,"lstActionKeyPress")
 	
 	Set rdHeaderlstAction=..lstAction.CreateRowDef("rdHeaderlstAction",$$$ftAddLijstHeader)
@@ -159,7 +158,7 @@
 	Do ..lstAction.AddLabelDBToRowDef(rdRowlstAction,..#colPropDiffs)
 	
 	//DataSetLists
-	Set ..dslAction=##class(%CHUI.TDataSetList).Create(..lstAction,"dslAction")
+	Set ..dslAction=##class(TCHUI.TDataSetList).Create(..lstAction,"dslAction")
 	Do ..dslAction.AddColDef(..#colKennisIDShow,$$$rsList,1)
 	Do ..dslAction.AddColDef(..#colActionType,$$$rsList,2)
 	Do ..dslAction.AddColDef(..#colUser,$$$rsList,3)
@@ -204,7 +203,7 @@
 ==========================================================================================================================
 EVENTs                                                                                                                   .
 ==========================================================================================================================</Description>
-<FormalSpec><![CDATA[Sender:%CHUI.TControlBasis,&KeyCode:%String]]></FormalSpec>
+<FormalSpec><![CDATA[Sender:TCHUI.TControlBasis,&KeyCode:%String]]></FormalSpec>
 <Implementation><![CDATA[
 	If KeyCode=$$$kcEnter Do
 	. Do ..acSelect.SendOnExecute()
@@ -213,13 +212,13 @@
 </Method>
 
 <Method name="acCloseExecute">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[	Do ..Close()
 ]]></Implementation>
 </Method>
 
 <Method name="acSelectExecute">
-<FormalSpec>Sender:%CHUI.TControlBasis</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis</FormalSpec>
 <Implementation><![CDATA[
 	Set KennisID=..lstAction.GetSelectedData(..#colDataKennisID)
 
@@ -242,7 +241,7 @@
 </Method>
 
 <Method name="dslActionQueryInit">
-<FormalSpec>Sender:%CHUI.TControlBasis,ResultStr:%String</FormalSpec>
+<FormalSpec>Sender:TCHUI.TControlBasis,ResultStr:%String</FormalSpec>
 <Implementation><![CDATA[
 	;-----------------------------------------------------------------------------------------
 	; QUERY