my $self = shift;
  $self->{'ccds_status'} = shift if ( @_ );
  return $self->{'ccds_status'};
}



1;

  my $self = shift;

  if( ! exists $self->{'_groupversion_array'} ) {
    if( defined $self->adaptor() ) {
      my $gva = $self->adaptor()->db()->get_GroupVersionAdaptor();
      my $groupversions = $gva->fetch_all_by_status( $self->ccds_status );
      $self->{'_groupversion_array'} = $groupversions;
    }
  }
  return $self->{'_groupversion_array'};

  my($class,@args) = @_;

  my $self = bless {},$class;

  my ($dbid, $ccds_status, $adaptor) =  
	  rearrange([qw(DBID
	                CCDS_STATUS
                  ADAPTOR
			)],@args);
 
  $self->dbID         ( $dbid );
  $self->ccds_status  ( $ccds_status );
  $self->adaptor      ( $adaptor );
  
  return $self;