var l_index;
var l_text;
var l_value;

var addList =    new Array(2);
    addList[0] = new Array();

var delList =    new Array(2);
    delList[0] = new Array();

var addNum =     new Array(2);
    addNum[0] = 0;

var delNum =    new Array(2);
    delNum[0] = 0;

function Init()
{
  with (document.siafu) {
    if (typeof(list1) == "undefined" || typeof(list2) == "undefined")
        return;
	
    if (list1.length > 0)
      list1.selectedIndex=0;
    if (list2.length > 0)
      list2.selectedIndex=0;
  }
}

function IniSubmit()
{
  with (document.siafu) {
    add_num1.value = addNum[0];
    del_num1.value = delNum[0];
//    alert("addnum = "+add_num1.value);

    add_list1.value = addList[0][0];
    for (var i=1; i<addNum[0]; i++)
      add_list1.value += ',' + addList[0][i];
//  alert("add1 = "+add_list1.value);
    del_list1.value = delList[0][0];
    for (var i=1; i<delNum[0]; i++)
      del_list1.value += ',' + delList[0][i];
//  alert("del1 = "+del_list1.value); 
  }
  return true;
}

//function ChgGroup()
//{
//  IniSubmit();
//  document.siafu.submit();
//}

function RemoveItem(list)
{
  if (list.length == 0)
    return;
  //var ll = '';
  //alert(list.selectedIndex);
  //alert('list='+list.length);
  var sel = list.selectedIndex;
  //alert('sel='+sel);
  //alert('list_length='+list.length);
  if ( sel < list.length-1 ) 
  for (var i=list.selectedIndex; i<list.length-1; i++) {
    list[i].text = list[i+1].text;
    list[i].value = list[i+1].value;
  } 
  list.length--;
  if (list.length == 0)
    return;
  if (sel == list.length) {
    list[list.length-1].selected = true;
    list.selectedIndex = list.length-1;
  }
  return;
}

function MoveItem(lst1, lst2)
{
  if (lst1.length < 1)
 	return;
  l_index = lst1.selectedIndex;
  //RemoveItem(lst1);
  //alert ('move index='+l_index);
  l_text =  lst1[l_index].text;
  l_value = lst1[l_index].value;
  lst2.length++;
  lst2[lst2.length-1].text = l_text;
  lst2[lst2.length-1].value = l_value;
  lst2[lst2.length-1].selected = true;
  lst2.selectedIndex = lst2.length-1;
  RemoveItem(lst1);
}

function ClickLeft(form, num)
{
 if (form.list1.selectedIndex >= 0 ) {                                                     
  MoveItem(form.list1, form.list2);
  addList[num][addNum[num]]=l_value;
  addNum[num]++;
  for (var i=0; i<delNum[num]; i++) {
    if (delList[num][i] == l_value) {
      delNum[num]--;
      for (var j=i; j<delNum[num]; j++)
        delList[num][j] = delList[num][j+1];
      break;
    }
  }
 }
}
//------------------------------------------------------
function ClickRight(form, num)
{
 if (form.list2.selectedIndex >= 0) {
  MoveItem(form.list2, form.list1);
  delList[num][delNum[num]] = l_value;
  delNum[num]++;
  for (var i=0; i<addNum[num]; i++) {
    if (addList[num][i] == l_value) {
      addNum[num]--;
      for (var j=i; j<addNum[num]; j++)
      addList[num][j] = addList[num][j+1];
      break;
    }
  }
 }
}

function retExit()
{
 window.siafu.ret.value = 1;
 ChgGroup();
}