Source position: googlereseller.pp line 295
protected procedure TSubscription.Setplan(
AIndex: Integer;
const AValue: TSubscriptionTypeplan
); virtual;