Index: BL/PPS/TBX/OptiBox.cls.xml =================================================================== diff -u -r35150 -r35151 --- BL/PPS/TBX/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 35150) +++ BL/PPS/TBX/OptiBox.cls.xml (.../OptiBox.cls.xml) (revision 35151) @@ -999,14 +999,17 @@ . . . Set Params("LODIEPTE")=Params("DIEPTE") ;-(2*$$$KartonDikte) . . . If (Reling && ((DC = "A")||(LC="B"))) Do ; Antaro reling . . . . Set Params("LOHOOGTE")= Params("LOHOOGTE") + 10 ; extra plaats voor dikkere reling + . . . . Set Params("LOCP")=$CASE(DK,25:30,30:31,50:32,65:40,80:36,:31)+$S(BM="T":10,1:0) + . . // Formaat V1-doos uitbreiden met plaats voor hulsdoos voor losse onderdelen. . If (Params("LOBREEDTE")+(2*$$$KartonDikte)) > Params("ZIJHOOGTE") Do ; lage rug . . Set Params("DIEPTE")=Params("DIEPTE")+(2*$$$KartonDikte) . . Set Params("BREEDTE")=Params("BREEDTE")+Params("LOBREEDTE")+(3*$$$KartonDikte) . Else Do . . Set Params("DIEPTE")=Params("DIEPTE")+(2*$$$KartonDikte) . . Set Params("BREEDTE")=Params("BREEDTE")+Params("LOHOOGTE")+(3*$$$KartonDikte) + . . If (LD=500) && ( ( RH = "N" ) || ( RH = "M" ) ) Do ; Op vraag van halux LadeDiepte 500 en indien N en M dan 20mm erbij . . Set Params("ZIJHOOGTE") = Params("ZIJHOOGTE") + 20