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