Source position: googleqpxexpress.pp line 255
protected procedure TFareInfo.SetbasisCode(
AIndex: Integer;
const AValue: string
); virtual;