##

if ($item_name eq "LinkLocation") {
				
    $i = 0;
    $temp_token = $p->get_token;
				
    while (!($temp_token->[0] eq "E") && ($i < 3)) {

	if (($temp_token->[1] eq "item")) {

		$temp_dcr{$dcr_name}{Location}[$i] = $p->get_trimmed_text("/value");
		$i++;

	}

	$temp_token = $p->get_token;
    }

    $found++;

}

##

##

if ($item_name eq "Show Link") {
				
    $temp_token = $p->get_token;

    while (!(($temp_token->[0] eq "E") && ($temp_token->[1] eq "item"))) {
        if (($temp_token->[0] eq "S")  && ($temp_token->[1] eq "value")) {
            for ($i=0;$i<2;) {
	        $temp_token = $p->get_tag("item");
	        $temp_dcr{$dcr_name}{Location}[$i] = $p->get_trimmed_text("/item");
	        $i++;
            }
            $temp_token = $p->get_token;
	}

    }
    $found++;
}