Index: BL/PPS/TBX/OptiVHoss.cls.xml
===================================================================
diff -u -r1074 -r2509
--- BL/PPS/TBX/OptiVHoss.cls.xml	(.../OptiVHoss.cls.xml)	(revision 1074)
+++ BL/PPS/TBX/OptiVHoss.cls.xml	(.../OptiVHoss.cls.xml)	(revision 2509)
@@ -519,7 +519,7 @@
 	. . Else  Do 
 	. . . For J=1:1:$P(LRec,"\",3) Do ; qty
 	. . . . Set Count=Count+1
-	. . . . Set ..Products(Count)=$LB(PRNr,$$FABKEYT^HADOPV(TOENr,$P(LRec,"\",15)),Type,Diepte,Breedte,Count,..SlotCat(Type,Diepte),KlantOrdRef,KlantProdRef,TransportRef)
+	. . . . Set ..Products(Count)=$LB(PRNr,(TOENr_";"_$P(LRec,"\",15)),Type,Diepte,Breedte,Count,..SlotCat(Type,Diepte),KlantOrdRef,KlantProdRef,TransportRef)
 	. . . . ;w "product",$$ListToPieces^vhLib(..Products(Count)),!
 	;k %Products m %Products=..Skipped zw %Products
 ]]></Implementation>