Source position: googlegan.pp line 640
protected procedure TLinkTypespecialOffers.SetfreeShipping(
AIndex: Integer;
AValue: Boolean
); virtual;