Source position: googleqpxexpress.pp line 550
protected procedure TSegmentPricing.SetsegmentId(
AIndex: Integer;
const AValue: string
); virtual;