Index: APPS/Verpakking/Optimizer.cls.xml =================================================================== diff -u -r69872 -r69898 --- APPS/Verpakking/Optimizer.cls.xml (.../Optimizer.cls.xml) (revision 69872) +++ APPS/Verpakking/Optimizer.cls.xml (.../Optimizer.cls.xml) (revision 69898) @@ -107,7 +107,7 @@ #dim BreedtePlanoRecept As %Decimal = BasisDoos.K1 + BasisDoos.CardBoardThickness + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.Width + 5 + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.K1 + BasisDoos.CardBoardThickness #dim DieptePlanoRecept As %Decimal = BasisDoos.Depth + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.Depth + 10 + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.K2 - If (BreedtePlanoRecept > 1200) { //Er is een rariteitje waarbij het karton van de kaderdeur precies niet altijd kan gemaakt worden op de panotec, hopelijk is dit een fix //Breedte grootste karton, als het te breed is wordt er geswapt -> Definitie van swap = 2 + If (BreedtePlanoRecept > 1100) { //Er is een rariteitje waarbij het karton van de kaderdeur precies niet altijd kan gemaakt worden op de panotec, hopelijk is dit een fix //Breedte grootste karton, als het te breed is wordt er geswapt -> Definitie van swap = 2 Set BreedtePlanoRecept = BasisDoos.K1 + BasisDoos.CardBoardThickness + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.Depth + 5 + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.K1 + BasisDoos.CardBoardThickness Set DieptePlanoRecept = BasisDoos.Width + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.Width + 10 + BasisDoos.Height + BasisDoos.CardBoardThickness + BasisDoos.K2 Set BasisDoos.Swap = 1