Source position: googlepartners.pp line 656
protected procedure TListCompaniesResponse.Setcompanies(
AIndex: Integer;
const AValue: TListCompaniesResponseTypecompaniesArray
); virtual;