Index: vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u -r44207 -r44554
--- vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44207)
+++ vhTest/Mock/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44554)
@@ -43,6 +43,20 @@
]]>
+
+PRNr:%Integer
+%Boolean
+
+
+
+
+PRNr:%Integer
+%Boolean
+
+
+
PRNr:%String
%Boolean
Index: AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u -r44207 -r44554
--- AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44207)
+++ AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44554)
@@ -115,31 +115,21 @@
]]>
-
-PRNr:%String
-1
+
+
+Alleen het product waarvan het identnummer begin met een 0 is geschikt als SOPR in AX
+De test neemt alleen de eerste uit de lijst omdat SOMS "K" producten op hun eentje bestaan zonder een product met identnr beginnend met 0
+PRNr:%Integer
+%Boolean
1)&&($LI(lbBLIDs)=PRNr)
]]>
PRNr:%Integer
-1
%Boolean
-
-
-Alleen het product waarvan het identnummer begin met een 0 is geschikt als SOPR in AX
-De test neemt alleen de eerste uit de lijst omdat SOMS "K" producten op hun eentje bestaan zonder een product met identnr beginnend met 0
-PRNr:%Integer
-1
+
+PRNr:%String
%Boolean
+1)
+]]>
+
+
+
+PRNr:%String
+%Integer
1)&&($LI(lbBLIDs)=PRNr)
+ Quit:'..IsSOPRInCache(PRNr) ""
+
+ #dim BLID, IdentNr As %String
+ #dim BI As %Integer
+ Set BLID=$$GetBlumID^BLPROD(PRNr)
+ Set BI="6"
+ Set IdentNr=BI_$S($L(BLID)=8:$E(BLID,2,8),1:BLID)_" "
+ Quit:'$D(^KPR2(IdentNr)) ""
+ Quit $P(^KPR2(IdentNr),"\")
]]>
@@ -182,26 +181,25 @@
]]>
-
+
PRNr:%String
-%Boolean
-1)
-]]>
-
-
-
-PRNr:%String
-%Integer
+1
Index: vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml
===================================================================
diff -u -r44207 -r44554
--- vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44207)
+++ vhTest/Fake/AX/Uitgaand/PM/impl/Convertor/Sopr/ProductConvertor.cls.xml (.../ProductConvertor.cls.xml) (revision 44554)
@@ -42,6 +42,20 @@
]]>
+
+PRNr:%Integer
+%Boolean
+
+
+
+
+PRNr:%Integer
+%Boolean
+
+
+
PRNr:%String
%Boolean