Index: VerpakkingsDefinitie/WS/ProductsAgent.pas =================================================================== diff -u -r596 -r597 --- VerpakkingsDefinitie/WS/ProductsAgent.pas (.../ProductsAgent.pas) (revision 596) +++ VerpakkingsDefinitie/WS/ProductsAgent.pas (.../ProductsAgent.pas) (revision 597) @@ -513,9 +513,9 @@ VolumeVanCaption := pxBoxDataObj.VolumeVanCaption; ID := pxBoxDataObj.ID; CutOrder := pxBoxDataObj.CutOrder; - Breedte := pxBoxDataObj.Breedte; - Diepte := pxBoxDataObj.Diepte; - Hoogte := pxBoxDataObj.Hoogte; + Breedte := StrToInt(ifthen(pxBoxDataObj.Breedte <> '', pxBoxDataObj.Breedte, '0')); + Diepte := StrToInt(ifthen(pxBoxDataObj.Diepte <> '', pxBoxDataObj.Diepte, '0')); + Hoogte := StrToInt(ifthen(pxBoxDataObj.Hoogte <> '', pxBoxDataObj.Hoogte, '0')); Aantal := pxBoxDataObj.Aantal; MaxCombinAantal := pxBoxDataObj.MaxCombinAantal; Plaatsing := pxBoxDataObj.Plaatsing; @@ -527,9 +527,9 @@ // Default data instellen als deze aanwezig is. if pxBoxDataObj.DefaultData <> nil then begin - DefaultBreedte := pxBoxDataObj.DefaultData.Breedte; - DefaultDiepte := pxBoxDataObj.DefaultData.Diepte; - DefaultHoogte := pxBoxDataObj.DefaultData.Hoogte; + DefaultBreedte := StrToInt(ifthen(pxBoxDataObj.DefaultData.Breedte <> '', pxBoxDataObj.DefaultData.Breedte, '0')); + DefaultDiepte := StrToInt(ifthen(pxBoxDataObj.DefaultData.Diepte <> '', pxBoxDataObj.DefaultData.Diepte, '0')); + DefaultHoogte := StrToInt(ifthen(pxBoxDataObj.DefaultData.Hoogte <> '', pxBoxDataObj.DefaultData.Hoogte, '0')); DefaultPlaatsing := pxBoxDataObj.DefaultData.Plaatsing; DefaultOptiType := pxBoxDataObj.DefaultData.OptiType;