Index: BL/Prod/OptiBox/Optimize.cls.xml =================================================================== diff -u -r11517 -r11547 --- BL/Prod/OptiBox/Optimize.cls.xml (.../Optimize.cls.xml) (revision 11517) +++ BL/Prod/OptiBox/Optimize.cls.xml (.../Optimize.cls.xml) (revision 11547) @@ -800,7 +800,7 @@ Set VolumeVanID=oData.VolumeVanGetObjectId() Quit:VolumeVanID="" pxParent If '$D(..VolumeVan(VolumeVanID)) Do ; eerste keer dan BOX creƫeren - . Set pxBox=..AddOptiBox(pxParent, VolumeVanID, , , 1, .BasisRef, , , , , ,0) + . Set pxBox=..AddOptiBox(pxParent, VolumeVanID, , , 1, .BasisRef, , , , , , 0, 1) . Set ..VolumeVan(VolumeVanID)=pxBox Quit ..VolumeVan(VolumeVanID) ]]>