Toolbar

Summary

BioMart::Configuration::AttributeCollection

Package variables

Inherit

BioMart::Root

Synopsis

Holds a List of BioMart::Attribute objects.

Description

Object to further define the Attributes available to the User Interface by
a Dataset. Holds a list of one or more BioMart::Attribute objects.

Methods

Methods description

  Usage      : usage
  Description: Description
  Returntype : 
  Exceptions : none
  Caller     : caller

  Usage      : Arg [1] - (optional) string $description
  Description: get/set for description
  Returntype : string
  Exceptions : none
  Caller     : general

  Usage      : Arg [1] - (optional) string $display_name
  Description: get/set for display name
  Returntype : string
  Exceptions : none
  Caller     : general

  Usage      : usage
  Description: Description
  Returntype :
  Exceptions : none
  Caller     : caller

  Usage      : Arg [1] - (optional) string $max_select
  Description: get/set for max select
  Returntype : string
  Exceptions : none
  Caller     : general

  Usage      : usage
  Description: Description
  Returntype : string name
  Exceptions : none
  Caller     : caller

  Usage      : 
  Description: get/set for selectAll checkBox
  Returntype : true/false
  Exceptions : none
  Caller     : templateToolKit

Methods code

sub _new {

  my ($self, @param) = @_;
  $self->SUPER::_new(@param);

  $self->addParams(TITLES, @param);
  $self->attr('attributes', []);

}

sub addAttribute {

  my ($self, $attribute) = @_;

  my $attributes = $self->get('attributes');
  push @{$attributes}, $attribute;

}

sub description {

  # stores description
  my ($self, $value) = @_;
  if ($value){
    $self->setParam(DESCRIPTION, $value);
  }
  return $self->getParam(DESCRIPTION);

}

sub displayName {

  # stores display name
  my ($self, $value) = @_;
  if ($value){
    $self->setParam(DISPLAYNAME, $value);
  }
  return $self->getParam(DISPLAYNAME);

}

sub getAllAttributes {

  my $self = shift;

  return $self->get('attributes');
}

1;

}

sub maxSelect {

  # stores max select
  my ($self, $value) = @_;
  if ($value){
    $self->setParam(MAXSELECT, $value);
  }
  return $self->getParam(MAXSELECT);

}

sub name {

  my ($self, $newName) = @_;

  if ($newName) {
    $self->setParam(NAMEKEY, $newName);
  }
  return $self->getParam(NAMEKEY);

}

sub selectAll {

  # stores max select
  my ($self, $value) = @_;
  if ($value){
    $self->setParam(SELECTALL, $value);
  }
  return $self->getParam(SELECTALL);

}

General documentation

This module is part of the BioMart project http://www.biomart.org
Questions can be posted to the mart-dev mailing list: mart-dev@ebi.ac.uk