Included libraries | Package variables | General documentation | Methods |
WebCvs | Raw content |
_columns | No description | Code |
_objs_from_sth | No description | Code |
_tables | No description | Code |
fetch_by_status_id | No description | Code |
_columns | description | prev | next | Top |
my $self = shift; return ( 'csv.ccds_status_val_uid', 'csv.ccds_status');}
_objs_from_sth | description | prev | next | Top |
my ($self, $sth) = @_; my @out; my ($dbid, $ccds_status); $sth->bind_columns(\$ dbid,\$ ccds_status); while($sth->fetch()) { push @out, Bio::EnsEMBL::ExternalData::CDSTrack::CcdsStatus->new( -dbID => $dbid, -ccds_status => $ccds_status, -adaptor => $self ); } return\@ out; } 1;}
_tables | description | prev | next | Top |
my $self = shift; return (['CcdsStatusVals' , 'csv']);}
fetch_by_status_id | description | prev | next | Top |
my $self = shift; my $ccds_status_val_uid = shift; throw("Require ccds_status_val_uid for fetch_by_status_id") unless ($ccds_status_val_uid); my $constraint = "csv.ccds_status_val_uid = '$ccds_status_val_uid'"; my ($csv_obj) = @{ $self->generic_fetch($constraint) }; return $csv_obj;}