Index: AX/Uitgaand/EC/DataAX/impl/Translator.cls.xml
===================================================================
diff -u -r50282 -r50322
--- AX/Uitgaand/EC/DataAX/impl/Translator.cls.xml	(.../Translator.cls.xml)	(revision 50282)
+++ AX/Uitgaand/EC/DataAX/impl/Translator.cls.xml	(.../Translator.cls.xml)	(revision 50322)
@@ -22,11 +22,8 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	Set AXPRNr=..SoprConvertor.GeefVervangProductDoorSOPRInAX(PRNr)
-	Set:AXPRNr'="" PRNr=AXPRNr
-	Quit:'PRNr ""
-	Set IdentNr=$P($G(^KPR(PRNr,2)),"\",25)
-	Set:IdentNr="" IdentNr=$P($G(^KPRO(PRNr,2)),"\",25)
-	Quit IdentNr
+	Set:AXPRNr="" AXPRNr=PRNr
+	Quit $P(^KPR(PRNr,2),"\",25) ; identnr
 ]]></Implementation>
 </Method>