Object representation of the data element.
   Object fields are:
    Scalar:     metadataIdRef, 
    Scalar:     id, 
    Object reference:   commonTime => type ARRAY,
    Object reference:   datum => type ARRAY,
    Object reference:   key => type HASH,

   The constructor accepts only single parameter, it could be a hashref to parameters hash  or DOM with  'data' element 

    

              use perfSONAR_PS::Datatypes::v2_0::nmwg::Message::Data;

          my $el =  perfSONAR_PS::Datatypes::v2_0::nmwg::Message::Data->new($DOM_Obj);

      creates   object, accepts DOM with  element tree or hashref to the list of
      keyd parameters
         metadataIdRef   => undef, 
         id   => undef, 
         commonTime => ARRAY,
         datum => ARRAY,
         key => HASH,

       accept parent DOM
       return data object DOM, generated from object contents 

    if any of subelements can be an arrray then this method will provide
    facility to add another element to the  array and will return ref to such array
    or just set the element to a new one
=cut

sub addCommonTime { my $self = shift; my $new = shift; my $logger = get_logger( $CLASSPATH );

    $self->commonTime && ref($self->commonTime) eq 'ARRAY'?push @{$self->commonTime}, $new:$self->commonTime([$new]); 
    $logger->debug("Added new to commonTime"); 
    $self->buildIdMap; ## rebuild index map 
    $self->buildRefIdMap; ## rebuild ref index map  
    return $self->commonTime;
}

     remove specific element from the array of commonTime elements by id ( if id is supported by this element )
     accepts single param - id - which is id attribute of the element
     if there is no array then it will return undef and warninig
     if it removed some id then $id will be returned

     get specific element from the array of commonTime elements by id ( if id is supported by this element )
     accepts single param - id
     if there is no array then it will return just an object

    if any of subelements can be an arrray then this method will provide
    facility to add another element to the  array and will return ref to such array
    or just set the element to a new one
=cut

sub addDatum { my $self = shift; my $new = shift; my $logger = get_logger( $CLASSPATH );

    $self->datum && ref($self->datum) eq 'ARRAY'?push @{$self->datum}, $new:$self->datum([$new]); 
    $logger->debug("Added new to datum"); 
    $self->buildIdMap; ## rebuild index map 
    $self->buildRefIdMap; ## rebuild ref index map  
    return $self->datum;
}

     remove specific element from the array of datum elements by id ( if id is supported by this element )
     accepts single param - id - which is id attribute of the element
     if there is no array then it will return undef and warninig
     if it removed some id then $id will be returned

     get specific element from the array of datum elements by id ( if id is supported by this element )
     accepts single param - id
     if there is no array then it will return just an object

      depending on config  it will return some hash ref  to the initialized fields
    for example querySQL ()
    accepts one optional prameter - query hashref
    will return:
    { ip_name_src =>  'hepnrc1.hep.net' },}

      merge with another data ( append + overwrite if exists )
      we can do it differently
      method #1:
         convert to dom both objects and then get resulted object from combined dom 
      method #2 default:
         through the introspection of the object

    if any of subelements has id then get a map of it in form of
    hashref to { element}{id} = index in array and store in the idmap field

   will parse all subelements and register all namepspaces within the data namespace

   Maxim Grigoriev (FNAL)  2007-2008, maxim@fnal.gov