Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Tandembox/Aansturing/Test001.cls.xml =================================================================== diff -u -r30041 -r64784 --- vhTest/Integratie/Productie/Planning/ActieveBatches/Tandembox/Aansturing/Test001.cls.xml (.../Test001.cls.xml) (revision 30041) +++ vhTest/Integratie/Productie/Planning/ActieveBatches/Tandembox/Aansturing/Test001.cls.xml (.../Test001.cls.xml) (revision 64784) @@ -24,13 +24,43 @@ set Tandemboxen = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() - do Tandemboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New($$$Tandembox1,$$$Aantal) ) + do Tandemboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefSifonLadeType3(), "775965", "A3YD"),$$$Aantal) ) do TandemboxenPerToeleveringArray.SetAt(Tandemboxen,$$$ToeleveringID) quit TandemboxenPerToeleveringArray ]]> + + + +