Index: AXimpl/PM/Kenmerk/Kenmerken.cls.xml
===================================================================
diff -u -r54529 -r55609
--- AXimpl/PM/Kenmerk/Kenmerken.cls.xml	(.../Kenmerken.cls.xml)	(revision 54529)
+++ AXimpl/PM/Kenmerk/Kenmerken.cls.xml	(.../Kenmerken.cls.xml)	(revision 55609)
@@ -29,17 +29,17 @@
 </Property>
 
 <Property name="CorpusBreedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>CorpusBreedte</SqlFieldName>
 </Property>
 
 <Property name="CorpusWandDikte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>CorpusWandDikte</SqlFieldName>
 </Property>
 
 <Property name="Depth">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Depth</SqlFieldName>
 </Property>
 
@@ -49,7 +49,7 @@
 </Property>
 
 <Property name="Draagkracht">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Draagkracht</SqlFieldName>
 </Property>
 
@@ -89,7 +89,7 @@
 </Property>
 
 <Property name="Height">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Height</SqlFieldName>
 </Property>
 
@@ -109,7 +109,7 @@
 </Property>
 
 <Property name="LadeDiepte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>LadeDiepte</SqlFieldName>
 </Property>
 
@@ -229,7 +229,7 @@
 </Property>
 
 <Property name="UitsparingMBreedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_M_Breedte</SqlFieldName>
 </Property>
 
@@ -249,7 +249,7 @@
 </Property>
 
 <Property name="UitsparingXBreedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_X_Breedte</SqlFieldName>
 </Property>
 
@@ -264,7 +264,7 @@
 </Property>
 
 <Property name="UitsparingYBreedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_Y_Breedte</SqlFieldName>
 </Property>
 
@@ -279,12 +279,12 @@
 </Property>
 
 <Property name="UitsparingZ1Breedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_Z1_Breedte</SqlFieldName>
 </Property>
 
 <Property name="UitsparingZ1Diepte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_Z1_Diepte</SqlFieldName>
 </Property>
 
@@ -304,12 +304,12 @@
 </Property>
 
 <Property name="UitsparingZ2Breedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_Z2_Breedte</SqlFieldName>
 </Property>
 
 <Property name="UitsparingZ2Diepte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Uitsparing_Z2_Diepte</SqlFieldName>
 </Property>
 
@@ -424,7 +424,7 @@
 </Property>
 
 <Property name="Internebreedte">
-<Type>%String</Type>
+<Type>%Decimal</Type>
 <SqlFieldName>Internebreedte</SqlFieldName>
 </Property>
 
Index: AXimpl/PM/Kenmerk/ConvertAll.cls.xml
===================================================================
diff -u -r55526 -r55609
--- AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 55526)
+++ AXimpl/PM/Kenmerk/ConvertAll.cls.xml	(.../ConvertAll.cls.xml)	(revision 55609)
@@ -55,6 +55,29 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ShowOne">
+<Description>
+D ##class(AXimpl.PM.Kenmerk.ConvertAll).%New().ShowOne(PRNr)</Description>
+<FormalSpec>PRNr:%String</FormalSpec>
+<Implementation><![CDATA[
+		Set GenTyp=$P($$GENTYP^HAD(PRNr),"\")
+		Write PRNr, " : ",$P(^KPR(PRNr,0),"\",1)," = ",GenTyp,!
+		If GenTyp="TBX"
+		{   ;w !,PRNr," TBX"
+			Do ##class(ConvertTBX).%New().Show(PRNr)
+		}
+		ElseIf GenTyp="LBX"
+		{	;w !,PRNr," LBX"
+			Do ##class(ConvertLBX).%New().Show(PRNr)
+		}
+		ElseIf GenTyp="TAO"
+		{
+			;w !,PRNr," TAX"
+			Do ##class(ConvertTAX).%New().Show(PRNr)
+		}
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerOne">
 <FormalSpec>ProductID:%String,PRNr:%String,RecID:%String</FormalSpec>
 <Implementation><![CDATA[
Index: AXimpl/PM/Kenmerk/ConvertTBX.cls.xml
===================================================================
diff -u -r54529 -r55609
--- AXimpl/PM/Kenmerk/ConvertTBX.cls.xml	(.../ConvertTBX.cls.xml)	(revision 54529)
+++ AXimpl/PM/Kenmerk/ConvertTBX.cls.xml	(.../ConvertTBX.cls.xml)	(revision 55609)
@@ -7,7 +7,7 @@
 <FormalSpec>Key:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-  Set:Key="Bodemkleur" Property="BodemKleur"
+ Set:Key="Bodemkleur" Property="BodemKleur"
  Set:Key="Corpusbreedte" Property="CorpusBreedte"
  Set:Key="Corpuswanddikte" Property="CorpusWandDikte"
  Set:Key="Draagkracht" Property="Draagkracht"
Index: AXimpl/PM/Kenmerk/ConvertLBX.cls.xml
===================================================================
diff -u -r54529 -r55609
--- AXimpl/PM/Kenmerk/ConvertLBX.cls.xml	(.../ConvertLBX.cls.xml)	(revision 54529)
+++ AXimpl/PM/Kenmerk/ConvertLBX.cls.xml	(.../ConvertLBX.cls.xml)	(revision 55609)
@@ -144,8 +144,6 @@
  Set:Key="Voorwandtypevanmbinnenlade" SQLName="VoorWandTypeVanMBinnenlade"
  Set:Key="Zijwandtype" SQLName="ZijWandType"
 
-
- 
  Quit $G(SQLName)
 ]]></Implementation>
 </Method>
Index: AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml
===================================================================
diff -u -r54529 -r55609
--- AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml	(.../ConvertProductAbstract.cls.xml)	(revision 54529)
+++ AXimpl/PM/Kenmerk/ConvertProductAbstract.cls.xml	(.../ConvertProductAbstract.cls.xml)	(revision 55609)
@@ -26,20 +26,22 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-// s x=##class(APPS.VKP.Maatwerk.impl.ConfiguratorService).%New().GeefOnverwerkteKenmerkenVanProduct(1821000)
+<Method name="Show">
+<FormalSpec>PRNr</FormalSpec>
+<Implementation><![CDATA[
+	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.IngegevenKenmerken = ..ConfiguratorService.GeefOnverwerkteKenmerkenVanProduct(PRNr)
+	Do DumpObject^%apiOBJ(IngegevenKenmerken)
+	#dim arKenmerken As %ArrayOfDataTypes = ..AppsNaarEconConverter.ConverteerAppsNaarEcon(IngegevenKenmerken).ToArray()
+	#dim Key as %String=""
+	While arKenmerken.GetNext(.Key)'=""
+	{
+		#dim Property as %String=..ConverteerKeyToProperty(Key)
+		#dim Value as %String=arKenmerken.GetAt(Key)
+		Write "  ",Key," = ",Value," (",Property,")",!
+	}
+]]></Implementation>
+</Method>
 
-]]></Content>
-</UDLText>
-
-<UDLText name="T">
-<Content><![CDATA[
-// s y=##class(ECONimpl.PM.Maatwerk.AppsConverter).%New().ConverteerAppsNaarEcon(x).ToArray()
-
-]]></Content>
-</UDLText>
-
 <Method name="Converteer">
 <FormalSpec>QlikProductID:%String,PRNr:%String,RecID</FormalSpec>
 <ReturnType>WS.Vhisie4.QRcodeNaarKenmerkenResponse</ReturnType>