  PROCEDURE [XREF] dup$locate_variable_symbol (
        variable_name: pmt$program_name;
        home_spec: dut$home_specification;
        search_options: dut$variable_search_options;
    VAR symbol_entry: dut$symbol_entry;
    VAR nested_proc: boolean;
    VAR current_proc: dut$symbol_entry;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc dut$home_specification
*copyc dut$variable_specification
*copyc ost$status
?? POP ??
