function fillList( listObject, strOptions ){
  // fill any list with options
  emptyList( listObject );
  
  // always insert selection prompt
  var lst = listObject;
  lst.options[0] = new Option('[--Seleziona--]', '');
  
  // options in form "value~displaytext|value~displaytext|..."
  var aOptionPairs = strOptions.split('|');
  for( var i = 0; i < aOptionPairs.length; i++ ){
    if (aOptionPairs[i].indexOf('~') != -1) {
      var aOptions = aOptionPairs[i].split('~');
      lst.options[i + 1] = new Option(aOptions[1], aOptions[0]);
    }  
  }

  // eval( "document.forms['QForm']['" + listObject + "'].onchange=" + listObject + "_onChange;" );
}

function emptyList( listObject ){
  var lst = listObject ; 
  lst.options.length = 0;
}

function selectOption( listObject, optionVal ){
  // set list selection to option based on value
  var lst = listObject;
  for( var i = 0; i< lst.options.length; i++ ){
    if( lst.options[i].value == optionVal ){
      lst.selectedIndex = i;
      return;
    }  
  }
}