Source position: googlegan.pp line 641
protected procedure TLinkTypespecialOffers.SetfreeShippingMin(
AIndex: Integer;
AValue: TMoney
); virtual;