Source position: googlecompute.pp line 5592
protected procedure TTargetPoolsScopedList.Setwarning(
AIndex: Integer;
const AValue: TTargetPoolsScopedListTypewarning
); virtual;