Source position: googlepeople.pp line 295
protected procedure TFieldMetadata.Setprimary(
AIndex: Integer;
const AValue: Boolean
); virtual;