function setImage (state, ndx) {
//    if (state == "dn") {
//       document.images[ndx].src = dnButtons[ndx].src
//       document.images[ndx] = dnButtons[ndx]
//    } else {
//       document.images[ndx].src = upButtons[ndx].src
//       document.images[ndx] = upButtons[ndx]
//    }
    return true
}

function setMsg (Msg) {
   window.status = Msg
   return true
}

function doReset () {
    if (confirm("Clear this form?")) {
       document.forms[0].reset()
    }
}

function doUSACAL () {
    if (confirm("View the USA Calendar of Events?")) {
       alert("Stub for Calendar View function")
    } else {
       alert("View Calendar cancelled")
    }
}

function doAddEvent (form, CGI_URL) {
    if (confirm("Add a new event?")) {
       // window.location.href = CGI_URL + "/edit_event.cgi" + 
       // "?Task=add&EType=add&EFile="
       form.Task.value = "add"
       form.EType.value = "add"
       form.EFile.value = ""
       form.action = CGI_URL + "/edit_event.cgi"
       form.submit()
    }  else {
          alert("Add event cancelled")
    }
}

function doEditEvent (form, CGI_URL) {
    if (confirm("Modify this event?")) {
       // window.location.href = CGI_URL + "/edit_event.cgi" +
       //    "?Task=edit&EType=edit&EFile=" + EventFile
      form.Task.value  = 'edit';
      form.EType.value = 'edit';
      form.action = CGI_URL + "/edit_event.cgi";
      form.submit();
    }  else {
          alert("Edit event cancelled");
    }
}

function doCopyEvent (form, CGI_URL) {
    if (confirm("Copy this event?")) {
      form.Task.value  = 'edit';
      form.EType.value = 'copy';
      form.action = CGI_URL + "/edit_event.cgi";
      form.submit();
    }  else {
          alert("Copy event cancelled");
    }
}

function doDeleteEvent (DelFile,CGI_URL) {
   if (confirm("If you continue, this Event cannot be undeleted.\n\n" +
      "Do you want to delete it anyway?")) {
      window.location.href = CGI_URL + "/delete_event.cgi?EFile=" + 
	  DelFile
   } else {
      alert("Deletion cancelled")
   }
}

function trim (trimVal) {
   // This function trims blanks off the right-hand side of a variable
   inputStr = trimVal.toString()
   var len = inputStr.length - 1;
   while ((len > -1) && 
	  (inputStr.charAt(len) == " ")) {
      inputStr = inputStr.substr(0, len)
      len--;
   }
   return inputStr
}

function alltrim (trimVal) {
   // This function trims blanks off the right & left hand sides of a variable
   inputStr = trimVal.toString()
   while (inputStr.charAt(0) == " ") {
      inputStr = inputStr.substr(1)
   }
   return trim(inputStr)
}

function ZeroPad (Val,MinLen) {
   while (Val.length < MinLen) {
      Val = "0" + Val
   }
   return Val
}

function FixYear (Val) {
   if (Val.length < 2) {
      Val = '200' +  Val
   }  else if (Val < 99) {
         Val = '20' + Val
   }  else if (Val == 99) {
         Val = '19' + Val
   }
   return Val
}

function doProperties (form) {
   alert ("Created: " + form.SysTime.value + "\nModified: " +
          form.LastMod.value + "\nUser ID: " +
          form.User.value + "\nDomain: " + form.Domain.value)
}

function UnderConstruction() {
   alert ("This page is currently under construction")
}

function doSaveEvent (form, CGI_URL) {
   if (doValidateEvent(form)) {
      form.Task.value = "save"
//      form.EType.value = "add"
      form.action = CGI_URL + "/save_event.cgi";
      // alert ("Task = "  + form.Task.value)
      // alert ("EType = " + form.EType.value)
      // alert ('form.action = "' + form.action + '"')
      form.submit()
   }
}