Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml =================================================================== diff -u -r30136 -r30322 --- vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 30136) +++ vhTest/Integratie/Productie/Planning/ActieveBatches/Common/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 30322) @@ -371,6 +371,14 @@ Quit Product.GeefPRNr() ]]> + + +IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Aantal:TECH.Integer +1 +vhTest.Integratie.Productie.Setup.ProductInfo + + Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml =================================================================== diff -u -r29059 -r30322 --- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 29059) +++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestBase.cls.xml (.../TestBase.cls.xml) (revision 30322) @@ -2,7 +2,7 @@ 1 -vhTest.Integratie.Productie.Planning.ActieveBatches.Common.Aansturing.TestBase +vhTest.Integratie.Productie.Planning.ActieveBatches.Common.Aansturing.TestBase,vhTest.DOM.PM.Maatwerk.TAX.Base 1 Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test007BodemFineerZijkantMelamine.cls.xml =================================================================== diff -u -r29059 -r30322 --- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test007BodemFineerZijkantMelamine.cls.xml (.../Test007BodemFineerZijkantMelamine.cls.xml) (revision 29059) +++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/Test007BodemFineerZijkantMelamine.cls.xml (.../Test007BodemFineerZijkantMelamine.cls.xml) (revision 30322) @@ -13,7 +13,7 @@ set Laden = ##class(vhTest.Integratie.Productie.Setup.ProductInfoLijst).%New() - #dim TaorboxPRNr As TECH.String = ..MaakProduct(..GeefIngegevenKenmerken()) + #dim TaorboxPRNr As TECH.String = ..MaakProduct(..GeefTAORIngegevenKenmerken()) do Laden.Insert( ##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(TaorboxPRNr,$$$Aantal) ) do LadenPerToeleveringArray.SetAt(Laden,$$$ToeleveringID) @@ -22,7 +22,7 @@ ]]> - + DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken - + DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken - + DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken @@ -106,7 +106,7 @@ Set IK.IsBinnenlade = $$$True Set IK.KoppelingType = ..KoppelingType.Schroef Do IK.NietMeeleveren.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAORRol).Koppeling()) - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> @@ -125,7 +125,7 @@ Set IK.FrontEindkapKleur = ..FrontEindkapKleur.ZwartAluminiumLook Set IK.IsBinnenlade = $$$True Set IK.KoppelingType = ..KoppelingType.Schroef - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> @@ -144,7 +144,7 @@ Set IK.FrontEindkapKleur = ..FrontEindkapKleur.AluminiumLook Set IK.IsBinnenlade = $$$False Set IK.KoppelingType = ..KoppelingType.Drevel - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> @@ -163,7 +163,7 @@ Set IK.FrontEindkapKleur = ..FrontEindkapKleur.ZwartAluminiumLook Set IK.IsBinnenlade = $$$True Set IK.KoppelingType = ..KoppelingType.Drevel - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> @@ -182,7 +182,7 @@ Set IK.FrontEindkapKleur = ..FrontEindkapKleur.AluminiumLook Set IK.IsBinnenlade = $$$True Set IK.KoppelingType = ..KoppelingType.Drevel - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> @@ -201,17 +201,9 @@ Set IK.FrontEindkapKleur = ..FrontEindkapKleur.AluminiumLook Set IK.IsBinnenlade = $$$True Set IK.KoppelingType = ..KoppelingType.Schroef - Quit ..GeefTaorLadeProductInfo(IK, Aantal) + Quit ..MaakProductInfo(IK, Aantal) ]]> - - -TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,Aantal:TECH.Integer -1 -vhTest.Integratie.Productie.Setup.ProductInfo - -