Source position: googlecontent.pp line 3867
protected procedure TProductShippingDimension.Setvalue(
AIndex: Integer;
const AValue: Double
); virtual;