Bio::EnsEMBL::ExternalData::CDSTrack Interpretation
Included librariesPackage variablesGeneral documentationMethods
Toolbar
WebCvsRaw content
Package variables
No package variables defined.
Included modules
Bio::EnsEMBL::ExternalData::CDSTrack::DBSQL::InterpretationAdaptor
Bio::EnsEMBL::Storable
Bio::EnsEMBL::Utils::Argument qw ( rearrange )
Bio::EnsEMBL::Utils::Exception qw ( throw )
Inherit
Bio::EnsEMBL::Storable
Synopsis
No synopsis!
Description
No description!
Methods
acc_rejection_id
No description
Code
accession_id
No description
Code
ccds_id
No description
Code
char_val
No description
Code
comment
No description
Code
date_time
No description
Code
float_val
No description
Code
group_id
No description
Code
group_version_id
No description
Code
integer_val
No description
Code
interpretation_subtype
No description
Code
interpretation_subtype_id
No description
Code
interpretation_type_id
No description
Code
interpreter_id
No description
Code
new
No description
Code
parent_interpretation_id
No description
Code
program_id
No description
Code
reftrack_id
No description
Code
val_description
No description
Code
Methods description
None available.
Methods code
acc_rejection_iddescriptionprevnextTop
sub acc_rejection_id {
  my $self = shift;
  $self->{'acc_rejection_uid'} = shift if ( @_ );
  return $self->{'acc_rejection_uid'};
}
accession_iddescriptionprevnextTop
sub accession_id {
  my $self = shift;
  $self->{'accession_uid'} = shift if ( @_ );
  return $self->{'accession_uid'};
}
ccds_iddescriptionprevnextTop
sub ccds_id {
  my $self = shift;
  $self->{'ccds_uid'} = shift if ( @_ );
  return $self->{'ccds_uid'};
}
char_valdescriptionprevnextTop
sub char_val {
  my $self = shift;
  $self->{'char_val'} = shift if ( @_ );
  return $self->{'char_val'};
}
commentdescriptionprevnextTop
sub comment {
  my $self = shift;
  $self->{'comment'} = shift if ( @_ );
  return $self->{'comment'};
}
date_timedescriptionprevnextTop
sub date_time {
  my $self = shift;
  $self->{'date_time'} = shift if ( @_ );
  return $self->{'date_time'};
}
float_valdescriptionprevnextTop
sub float_val {
  my $self = shift;
  $self->{'float_val'} = shift if ( @_ );
  return $self->{'float_val'};
}
group_iddescriptionprevnextTop
sub group_id {
  my $self = shift;
  $self->{'group_uid'} = shift if ( @_ );
  return $self->{'group_uid'};
}
group_version_iddescriptionprevnextTop
sub group_version_id {
  my $self = shift;
  $self->{'group_version_uid'} = shift if ( @_ );
  return $self->{'group_version_uid'};
}
integer_valdescriptionprevnextTop
sub integer_val {
  my $self = shift;
  $self->{'integer_val'} = shift if ( @_ );
  return $self->{'integer_val'};
}
interpretation_subtypedescriptionprevnextTop
sub interpretation_subtype {
  my $self = shift;
  $self->{'interpretation_subtype'} = shift if ( @_ );
  return $self->{'interpretation_subtype'};
}
1;
}
interpretation_subtype_iddescriptionprevnextTop
sub interpretation_subtype_id {
  my $self = shift;
  $self->{'interpretation_subtype_uid'} = shift if ( @_ );
  return $self->{'interpretation_subtype_uid'};
}
interpretation_type_iddescriptionprevnextTop
sub interpretation_type_id {
  my $self = shift;
  $self->{'interpretation_type_uid'} = shift if ( @_ );
  return $self->{'interpretation_type_uid'};
}
interpreter_iddescriptionprevnextTop
sub interpreter_id {
  my $self = shift;
  $self->{'interpreter_uid'} = shift if ( @_ );
  return $self->{'interpreter_uid'};
}
newdescriptionprevnextTop
sub new {
  my($class,@args) = @_;

  my $self = bless {},$class;

  my ($dbid, $ccds_id, $group_id, $group_version_id, $accession_id, $parent_interpretation_id,
  $date_time, $comment, $val_description, $char_val, $integer_val, $float_val, 
  $interpretation_type_id, $interpretation_subtype_id, $acc_rejection_id, $interpreter_id,
  $program_id, $reftrack_id, $interpretation_subtype, $adaptor) =  
	  rearrange([qw(DBID
	                CCDS_ID
                  GROUP_ID
                  GROUP_VERSION_ID
                  ACCESSION_ID
                  PARENT_INTERPRETATION_ID
                  DATE_TIME
                  COMMENT
                  VAL_DESCRIPTION
                  CHAR_VAL
                  INTEGER_VAL
                  FLOAT_VAL
                  INTERPRETATION_TYPE_ID
                  INTERPRETATION_SUBTYPE_ID
                  ACC_REJECTION_ID
                  INTERPRETER_ID
                  PROGRAM_ID
                  REFTRACK_ID
                  INTERPRETATION_SUBTYPE
                  ADAPTOR
			)],@args);
 
  $self->dbID                       ( $dbid );
  $self->ccds_id                    ( $ccds_id );
  $self->group_id                   ( $group_id );
  $self->group_version_id           ( $group_version_id );
  $self->accession_id               ( $accession_id );
  $self->parent_interpretation_id   ( $parent_interpretation_id );
  $self->date_time                  ( $date_time );
  $self->comment                    ( $comment );
  $self->val_description            ( $val_description );
  $self->char_val                   ( $char_val );
  $self->integer_val                ( $integer_val ); 
  $self->float_val                  ( $float_val );
  $self->interpretation_type_id     ( $interpretation_type_id );
  $self->interpretation_subtype_id  ( $interpretation_subtype_id );
  $self->acc_rejection_id           ( $acc_rejection_id );
  $self->interpreter_id             ( $interpreter_id );
  $self->program_id                 ( $program_id );
  $self->reftrack_id                ( $reftrack_id );
  $self->interpretation_subtype     ( $interpretation_subtype );
  $self->adaptor                    ( $adaptor );
  
  return $self;
}
parent_interpretation_iddescriptionprevnextTop
sub parent_interpretation_id {
  my $self = shift;
  $self->{'parent_interpretation_uid'} = shift if ( @_ );
  return $self->{'parent_interpretation_uid'};
}
program_iddescriptionprevnextTop
sub program_id {
  my $self = shift;
  $self->{'program_uid'} = shift if ( @_ );
  return $self->{'program_uid'};
}
reftrack_iddescriptionprevnextTop
sub reftrack_id {
  my $self = shift;
  $self->{'reftrack_uid'} = shift if ( @_ );
  return $self->{'reftrack_uid'};
}
val_descriptiondescriptionprevnextTop
sub val_description {
  my $self = shift;
  $self->{'val_description'} = shift if ( @_ );
  return $self->{'val_description'};
}
General documentation
No general documentation available.