my $self = shift;
  return $self->dbID;

  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_CCDS_ID( $self->ccds_id );
      $self->{'_groupversion_array'} = $groupversions;
    }
  }
  return $self->{'_groupversion_array'};

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

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


1;

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

  my $self = bless {},$class;

  my ($dbid, $group_id, $latest_version, $adaptor) =  
	  rearrange([qw(
	                DBID
                  GROUP_ID
                  LATEST_VERSION
                  ADAPTOR
			)],@args);
 
  $self->dbID           ( $dbid );
  $self->group_id       ( $group_id );
  $self->latest_version ( $latest_version );
  $self->adaptor        ( $adaptor );
  
  return $self;