function setDynaList(arrDL){

 var oList1 = document.forms[arrDL[2]].elements[arrDL[1]]
 var oList2 = document.forms[arrDL[4]].elements[arrDL[3]]
 var arrList = arrDL[5]

 clearDynaList(oList2);

 if (oList1.selectedIndex == -1){
  oList1.selectedIndex = 0;
 }

 populateDynaList(oList2, oList1[oList1.selectedIndex].value, arrList);
 return true;
}



function clearDynaList(oList){

 for (var i = oList.options.length; i >= 0; i--){
  oList.options[i] = null;
 }

 oList.selectedIndex = -1;
}

function populateDynaList(oList, nIndex, aArray){
oList[oList.length]= new Option("---");
 for (var i = 0; i < aArray.length; i= i + 3){
  if (aArray[i] == nIndex){
   oList.options[oList.options.length] = new Option(aArray[i + 1], aArray[i + 2]);
  }
 }

 if (oList.options.length == 0){
  oList.options[oList.options.length] = new Option("--",0);
 }

 oList.selectedIndex = 0;
}