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[