Source position: googlegenomics.pp line 640
protected procedure TStatus.Setcode(
AIndex: Integer;
const AValue: Integer
); virtual;