/**
* Extracts attribute contents FROM a parent tree object
*
* @param array $tree an array containing an array FROM which the
* object data should be extracted
* @param string $ver represents the version of the GEDCOM standard
* data is being extracted from
*
* @return void
*
* @access public
* @since Method available since Release 0.0.1
*/
public function parse_tree($tree, $ver)
{
if (($i1 = parent::find_tag($tree, Rp_Tags::SOURCE)) !== false) {
$this->system_id = parent::parse_text($tree[$i1], Rp_Tags::SOURCE);
if (isset($tree[$i1][1])) {
$sub2 = $tree[$i1][1];
if (($i2 = parent::find_tag($sub2, Rp_Tags::VERSION)) !== false) {
$this->ver_nbr = parent::parse_text($sub2[$i2], Rp_Tags::VERSION);
}
if (($i2 = parent::find_tag($sub2, Rp_Tags::NAME)) !== false) {
$this->product_name = parent::parse_text($sub2[$i2], Rp_Tags::NAME);
}
$this->corporation->parse_tree($sub2, $ver);
$this->rp_data->parse_tree($sub2, $ver);
}
}
}
