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