Source position: googlegan.pp line 646
protected procedure TLinkTypespecialOffers.SetpromotionCodes(
AIndex: Integer;
AValue: TStringArray
); virtual;