/*
 * The following code was contributed by Andreas Maurer for the 
 * assessement functionality
 *
 */
function deleteEvent(eid) {
  eval("document.event_"+eid+".op.value=\"EventsDelNew\"");
  eval("document.event_"+eid+".submit()");
}

function deleteLink(lid) {
  eval("document.link_"+lid+".op.value=\"LinksDelNew\"");
  eval("document.link_"+lid+".submit()");
}

function deleteLinkCat(cid) {
  eval("document.linkcat_"+cid+".op.value=\"LinksCatDelNew\"");
  eval("document.linkcat_"+cid+".submit()");
}

function openWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}

function updateClock() {
  monthNames = new Array( "Jan","Feb","Mar","Apr","May","Jun","Jul",
			  "Aug", "Sep","Oct","Nov","Dec");
  now = new Date();
  min = now.getUTCMinutes();
  hour = now.getUTCHours();
  dat = now.getUTCDate();
  thisYear = now.getUTCFullYear();
  min  = ((min < 10) ? "0" + min : min);
  hour  = ((hour < 10) ? "0" + hour : hour);
  dat  = ((dat < 10) ? "0" + dat : dat);
  if(thisYear < 1900) {
    thisYear += 1900; // Y2K
  }
  datestr = dat + " " + monthNames[now.getUTCMonth()] + " " + thisYear + 
    " " + hour + ":" + min + " GMT";
  document.getElementById("clock").firstChild.nodeValue=datestr;
  window.setTimeout('updateClock()',60000);    
}


function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; 
  for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++){
    x.src=x.oSrc;
  }
}



function MM_preloadImages() { //v3.0
  var d=document; 
  if(d.images){ 
    if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; 
    for(i=0; i<a.length; i++) {
      if (a[i].indexOf("#")!=0) { 
	d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];
      }
    }
  }
}



function MM_findObj(n, d) { //v4.0
  var p,i,x;  
  if(!d) {
    d=document; 
  }
  if((p=n.indexOf("?"))>0 && parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);
  }
  if(!(x=d[n])&&d.all) x=d.all[n]; 
  for (i=0;!x&&i<d.forms.length;i++) {
    x=d.forms[i][n];
  }
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) {
    x=MM_findObj(n,d.layers[i].document);
  }
  if(!x && document.getElementById) {
    x=document.getElementById(n); return x;
  }
}



function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; 
  document.MM_sr=new Array; 
  for(i=0;i<(a.length-2);i+=3) {
    if ((x=MM_findObj(a[i]))!=null) {
      document.MM_sr[j++]=x; 
      if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];
    }
  }
}


// Assessments
function checkFillInForm(f){
  aa = "";
  for(i=0;i<f.elements.length;i++){
    if(f.elements[i].name.indexOf("fillInText") >= 0){
      if(f.elements[i].value.length < 1){
	alert("Please fill out all gaps!");
	return false;
      }
    }
  }
  return true;
}


// Here some Code by Gunter Vasold

// Metadata handling
function removeMetaRel(number) {
  answ = confirm('You are going to remove relation ' + number + 
         '. \nAre you sure?');
  if(answ == true) {
    document.forms[0].delrel.value = number;
    document.forms[0].submit();
  }
}

function removeMetaClass(number) {
  answ = confirm('You are going to remove classification ' + number + 
		 '. \nAre you sure?');
  ;
  if(answ == true) {
    document.forms[0].delclass.value = number;
    document.forms[0].submit();
  }
}


function selectMetaTargetObject(name) {
  url = "modules.php?name=cw_authoring_tools&file=meta/relobj_chooser&relname="+name;
  win = window.open(url, "_blank", "width=600,height=400,resizable=yes,scrollbars=yes");
}

function setMetaRelation(relname, id) {
  document.forms[0].elements[relname].value = id;
}


function openCWWindow(url, name, properties) {
  if(document.forms["lmform"].use_lm.checked) {
    url = url + "&cw_mode=study";
    //alert("The study mode is temporarily disabled!");
    //return;
  }
  else {
    url = url + "&cw_mode=browse";
  }
  win = window.open(url, name, properties);
}


// ******************** LM relateted ****************************************
//stringmonths = new Object(Jan,Feb,Mar,Apr,May,Jun,Jul,Aug,Sep,Oct,Nove,Dec);
//document.write("stringmonths[2]");

function rawtoweek(millisecs){
  stringmonths = new Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
  datestring = new Object();
  dateobject = new Date();
  dateobject.setTime(millisecs);
  day = dateobject.getDate();
  month = dateobject.getMonth();
  year = dateobject.getYear();
  if (day < 10){dday = "0" + day.toString();}else{dday = day.toString();}
  if (year > 2000){yyear = year;}else{yyear = 1900 + year;}
  mmonth = stringmonths[month];
  datestring.day = dday;
  datestring.month = mmonth;
  datestring.year = yyear.toString();
  return datestring;
}

function calculatetimes(){
  rpsddate = new Date();
  rpfddate = new Date();
  gensddate = new Date();
  genfddate = new Date();
  qcsddate = new Date();
  qcfddate = new Date();

  document.forms[0].elements[1].value = Math.round(75/document.forms[0].elements[0].value);

  rpsd = rpsddate.getTime();
  rpsddatestring = rawtoweek(rpsd);
  weekinmillisecs = (25 * 604800000/document.forms[0].elements[0].value);
  rpfd = rpsd + weekinmillisecs;
  rpfddatestring = rawtoweek(rpfd);
  genfd = rpfd + weekinmillisecs;
  genfddatestring = rawtoweek(genfd);
  qcfd = genfd +weekinmillisecs;
  qcfddatestring = rawtoweek(qcfd);

  document.forms[0].rpstart.value =  "starting today:    " + rpsddatestring.day+"   "+rpsddatestring.month+"   "+rpsddatestring.year;
  document.forms[0].rpfinish.value = "system estimate: " + rpfddatestring.day+"   "+rpfddatestring.month+"   "+rpfddatestring.year;
  document.forms[0].genstart.value = "system estimate: " + rpfddatestring.day+"   "+rpfddatestring.month+"   "+rpfddatestring.year;
  document.forms[0].genfinish.value = "system estimate: " + genfddatestring.day+"   "+genfddatestring.month+"   "+genfddatestring.year;
  document.forms[0].qcstart.value = "system estimate: " + genfddatestring.day+"   "+genfddatestring.month+"   "+genfddatestring.year;
  document.forms[0].qcfinish.value = "system estimate: " + qcfddatestring.day+"   "+qcfddatestring.month+"   "+qcfddatestring.year;
}
function submit(){;}