Source position: googlecontent.pp line 1940
protected procedure TInventory.SetloyaltyPoints(
AIndex: Integer;
const AValue: TLoyaltyPoints
); virtual;