Index: APPS/Verpakking/Optimizer.cls.xml =================================================================== diff -u -r69658 -r69865 --- APPS/Verpakking/Optimizer.cls.xml (.../Optimizer.cls.xml) (revision 69658) +++ APPS/Verpakking/Optimizer.cls.xml (.../Optimizer.cls.xml) (revision 69865) @@ -113,7 +113,7 @@ #dim BreedtePlanoRecept As %Decimal = BasisDoos.K1 + BasisDoos.Height + BasisDoos.Width + BasisDoos.Height + BasisDoos.K1 + ..#MachineKant #dim DieptePlanoRecept As %Decimal = BasisDoos.Depth + BasisDoos.Height + BasisDoos.Depth + BasisDoos.Height + BasisDoos.K2 - If (BreedtePlanoRecept > 2400) { //Breedte grootste karton, als het te breed is wordt er geswapt -> Definitie van swap = 2 + 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 Set BreedtePlanoRecept = BasisDoos.K1 + BasisDoos.Height + BasisDoos.Depth + BasisDoos.Height + BasisDoos.K1 + ..#MachineKant Set DieptePlanoRecept = BasisDoos.Width + BasisDoos.Height + BasisDoos.Width + BasisDoos.Height + BasisDoos.K2 Set BasisDoos.Swap = 1 @@ -122,7 +122,7 @@ #dim BreedtePlanoAltRecept As %Decimal = BasisDoos.Width + BasisDoos.Height + BasisDoos.Width + BasisDoos.Height + BasisDoos.K2 + ..#MachineKant #dim DieptePlanoAltRecept As %Decimal = BasisDoos.K1 + BasisDoos.Height + BasisDoos.Depth + BasisDoos.Height + BasisDoos.K1 - If (BreedtePlanoAltRecept > 2400) { + If (BreedtePlanoAltRecept > ..#AfmetingBreedsteKarton) { //Breedte grootste karton, als het te breed is wordt er geswapt -> Definitie van swap = 2 Set BreedtePlanoRecept = BasisDoos.Depth + BasisDoos.Height + BasisDoos.Depth + BasisDoos.Height + BasisDoos.K2 + ..#MachineKant Set DieptePlanoRecept = BasisDoos.K1 + BasisDoos.Height + BasisDoos.Width + BasisDoos.Height + BasisDoos.K1 Set BasisDoos.Swap = 1