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