Source position: googlecontent.pp line 4015
protected procedure TProductTax.Setrate(
AIndex: Integer;
const AValue: Double
); virtual;