Source position: googlecontent.pp line 2607
protected procedure TOrderPromotionBenefit.SetsubType(
AIndex: Integer;
const AValue: string
); virtual;