Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Legrabox/Aansturing/Test008.cls.xml =================================================================== diff -u -r64811 -r74042 --- vhTest/Integratie/Productie/Planning/ActieveBatches/Legrabox/Aansturing/Test008.cls.xml (.../Test008.cls.xml) (revision 64811) +++ vhTest/Integratie/Productie/Planning/ActieveBatches/Legrabox/Aansturing/Test008.cls.xml (.../Test008.cls.xml) (revision 74042) @@ -20,17 +20,17 @@ set LegraboxenPerToeleveringArray = ##class(vhTest.Integratie.Productie.Setup.ProductenPerToeleveringArray).%New() set Legraboxen = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() + + do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxMLade(),$$$Legrabox1,"ASR", "DummyCID8_1"),$$$Aantal) ) + do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxCLade(),$$$Legrabox2,"ASP", "DummyCID8_2"),$$$Aantal) ) + do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLade(),$$$Legrabox3,"ASJ", "DummyCID8_3"),$$$Aantal) ) + do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxFLade(),$$$Legrabox4,"ASC", "DummyCID8_4"),$$$Aantal) ) - do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxMLade(),$$$Legrabox1,"ASR"),$$$Aantal) ) - do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxCLade(),$$$Legrabox2,"ASP"),$$$Aantal) ) - do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxKLade(),$$$Legrabox3,"ASJ"),$$$Aantal) ) - do Legraboxen.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxFLade(),$$$Legrabox4,"ASC"),$$$Aantal) ) - do LegraboxenPerToeleveringArray.SetAt(Legraboxen,$$$ToeleveringID) set Legraboxen2 = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() - do Legraboxen2.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxC2Lade(),$$$Legrabox5,"ASQ"),$$$Aantal) ) + do Legraboxen2.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..MaakProduct(..GeefLbxC2Lade(),$$$Legrabox5,"ASQ", "DummyCID8_5"),$$$Aantal) ) do LegraboxenPerToeleveringArray.SetAt(Legraboxen2,$$$ToeleveringID2) @@ -113,7 +113,7 @@ Set LBXKenmerken.InterneBreedte = 562 Set LBXKenmerken.LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).F() Set LBXKenmerken.LadeKleur = ##class(DOM.PM.enu.LBXLadeKleur).Oriongrijs() - Set LBXKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.LBXOpvullijstKleur).Lichtgrijs() + Set LBXKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.LBXOpvullijstKleur).Wit() Set LBXKenmerken.RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).F() Set LBXKenmerken.GUIKenmerken.IsBinnenbreedte = 0 Set LBXKenmerken.GUIKenmerken.WandDikte = 19 Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test008/StartBatch/15000_0001.xml =================================================================== diff -u -r73814 -r74042 --- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test008/StartBatch/15000_0001.xml (.../15000_0001.xml) (revision 73814) +++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Legrabox.Aansturing/Test008/StartBatch/15000_0001.xml (.../15000_0001.xml) (revision 74042) @@ -473,7 +473,7 @@ LADE 001 001-Opvullijstkleur - LG + WI LADE 001