function pop_voucher_record(record_number)
    {
      pop_window('/cgi-bin/webedit?Faction=EDIT&Fview_only=Y&Fwebspec=vchedit.tag&Frecord_number='+record_number);
    }
    function pop_VOUCHER(item_reference)
    {
      call('/cgi-bin/ajax?Faction=GETRECORD&Fitem_type=VOUCHER&Fitem_reference='+item_reference,null,pop_voucher_record);
    }
    function pop_ITEM(item_type,item_reference)
    {
      call('/cgi-bin/ajax?Faction=POPITEM&Fitem_type='+item_type+'&Fitem_reference='+item_reference,null,eval);
    }
    function process_response(response)
      {
        //alert(' response ' + response);
        eval(response);
        if (document.sciform.Dbarcode__reference_number.value!="" && document.sciform.Dbarcode__type.value!="") {
          if (document.sciform.Dbarcode__type.value=="VOUCHER")
            pop_VOUCHER(document.sciform.Dbarcode__reference_number.value);
          else
            pop_ITEM(document.sciform.Dbarcode__type.value,document.sciform.Dbarcode__reference_number.value);
          set_focus();
        }
      }
    function set_focus()
    {
      if (document.sciform.Dbarcode__scan) {
        document.sciform.Dbarcode__scan.focus();
        //window.setTimeout("set_focus()",1000);
      }
    }
    function load_focus()
      {
        document.sciform.Dbarcode__scan.value='';
        set_focus();
      }
    add_onload('window.setTimeout("load_focus()",1000);');
    function check_scan(barcode_scan)
     {
       var cmd = '/cgi-bin/ajax?Faction=BARCODE_QUERY&Fscan_code=' + barcode_scan;
       //alert(cmd);
       call(cmd,null,process_response);
       document.sciform.Dbarcode__scan.value='';
       set_focus();
     }