Source position: googlecontent.pp line 2119
protected procedure TLoyaltyPoints.Setratio(
AIndex: Integer;
const AValue: Double
); virtual;