// Global variables
var allCoverages = new Array();
var allSchedules = new Array();
var allKeyedComments = new Array();
var editLinked = 0;
var adminOption = null;

// Initialized
function initAdmin() {
  editLinked = 0;
}

// Select all edits for a given satellite/date
function selectAll(satidx,dateidx) {
  var trs=getTRs(satidx,dateidx);
  for (var i=0; i<trs.length; i++) {
    var linkCheckboxes=trs[i].getElementsByTagName("input");
    for (var j=0; j<linkCheckboxes.length; j++)
      if (linkCheckboxes[j].id.match('link_'+satidx+'_'+dateidx) &&
        linkCheckboxes[j].checked == false)
        linkCheckboxes[j].click();
  }
}

// Unselect all edits for a given satellite/date
function selectNone(satidx,dateidx) {
  var trs=getTRs(satidx,dateidx);
  for (var i=0; i<trs.length; i++) {
    var linkCheckboxes=trs[i].getElementsByTagName("input");
    for (var j=0; j<linkCheckboxes.length; j++)
      if (linkCheckboxes[j].id.match('link_'+satidx+'_'+dateidx) &&
        linkCheckboxes[j].checked == true)
        linkCheckboxes[j].click();
  }
}

// Select all edits for a given time
function editAll(satidx,dateidx,timeidx) {
  var trs=getTRs(satidx,dateidx,timeidx);
  for (var i=0; i<trs.length; i++) {
    var linkCheckboxes=trs[i].getElementsByTagName("input");
    for (var j=0; j<linkCheckboxes.length; j++)
      if (linkCheckboxes[j].id.match('link_'+satidx+'_'+dateidx+'_'+timeidx))
        linkCheckboxes[j].click();
  }
}

// Create edit elements for a given row
function editRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var tbodyElem=document.getElementById('body_'+satidx+'_'+dateidx);
  var trElem=document.getElementById('row_'+rowref);

  // Notify all linked rows
  if (trElem.mclinked==1) {
    editLinked=1;
    var trs = getTRs(satidx,dateidx);
    for (var i=0; i<trs.length; i++) {
      if (trs[i].mclinked==1) setLinked(trs[i].id.replace(/^row_/,''),1);
    }
  }

  // Change Edit to Save/Delete
  var editElem=document.getElementById('edit_'+rowref);
  var html ='<span class=adminyes onClick="doSave(';
      html+=satidx+','+dateidx+','+timeidx+','+typeidx;
      html+=');">Save</span>';
      html+=' &bull; ';
      html+='<span class=adminno onClick="doDelete(';
      html+=satidx+','+dateidx+','+timeidx+','+typeidx;
      html+=');">Delete</span>';
  editElem.innerHTML=html;

  // Edit coverage
  var coverageElem=document.getElementById('coverage_'+rowref);
  var coverage=coverageElem.innerHTML;
  var thisVal=allCoverages[coverage];
  var html ='<select style="width:100%;" id=select_coverage_'+rowref+'>';
      html+='<option value='+thisVal+'>'+coverage+'</option>';
      for (var key in allCoverages) {
        if (key==coverage) continue;
        html+='<option value='+allCoverages[key]+'>'+key+'</option>';
      }
      html+='</select>';
  coverageElem.innerHTML=html;

  // Edit schedule
  var scheduleElem=document.getElementById('schedule_'+rowref);
  var schedule=scheduleElem.innerHTML;
  var thisVal=allSchedules[schedule];
  var html ='<select style="width:100%;" id=select_schedule_'+rowref+'>';
      html+='<option value='+thisVal+'>'+schedule+'</option>';
      for (var key in allSchedules) {
        if (key==schedule) continue;
        html+='<option value='+allSchedules[key]+'>'+key+'</option>';
      }
      html+='</select>';
  scheduleElem.innerHTML=html;

  // SPECIAL CASE: If type is HRIT, the some comments look like
  // ingestor "problems."  Allow these to be edited
  var typeElem=document.getElementById('timeinfo_'+rowref);
  var typeparts=typeElem.innerHTML;
  var parts=typeparts.split('|');
  var type='ERROR';
  if (parts.length==2) type=parts[1];

  // Do NOT allow comment editing if it is a linked row
  if (trElem.mclinked!=1 || type=='HRIT') {

    // Edit comment
    var i=1;
    var commentElem;
    var comment;
    while (commentElem=document.getElementById('comment_'+rowref+'_'+i)) {
      i++;
      comment=commentElem.innerHTML;
      comment=comment.replace(/&amp;/,"&");
      var html ='<input style="width:99%;" value="'+comment+'" ';
          html+=' id=input_comment_'+rowref+'_'+i+'>';
      commentElem.innerHTML=html;
    }

    // Edit keyed comment
    var i=1;
    var kCommentElem;
    var kComment;
    while (kCommentElem=document.getElementById('kcomment_'+rowref+'_'+i)) {
      i++;
      kComment=kCommentElem.innerHTML;
      kComment=kComment.replace(/&amp;/,"&");
      var thisVal=allKeyedComments[kComment];
      var html ='<select style="width:99%;" ';
          html+=' id=select_kcomment_'+rowref+'_'+i+'>';
          html+='<option value='+thisVal+'>'+kComment+'</option>';
          html+='<option value=-1>&lt;DELETE&gt;</option>';
          for (var key in allKeyedComments) {
            if (key==kComment) continue;
            html+='<option value='+allKeyedComments[key]+'>'+key+'</option>';
          }
          html+='</select>';
      kCommentElem.innerHTML=html;
    }
  }

  // Add new comments
  var newrow = createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname);
  newrow.id='row_'+rowref+'_add';
  var html ='<span class=adminother onClick="newComment(';
      html+=satidx+','+dateidx+','+timeidx+','+typeidx+',';
      html+=cmtspan+',\''+clsname+'\');">New comment</span>';
      html+=' &bull; ';
      html+='<span class=adminother onClick="newKComment(';
      html+=satidx+','+dateidx+','+timeidx+','+typeidx+',';
      html+=cmtspan+',\''+clsname+'\');">New keyed comment</span>';
  newrow.childNodes[3].innerHTML=html;

  var afterElem = getLastRow(rowref);
  insertAfter(tbodyElem, newrow, afterElem);

}

// Create edit elements for a given day comment
function editDayComment(satidx,dateidx,cmtidx) {
  var rowref=satidx+'_'+dateidx+'_'+cmtidx;

  // Change Edit to Save/Delete
  var editElem=document.getElementById('edit_day_click_'+rowref);
  var html ='<span class=adminyes onClick="doSaveDayComment(';
      html+=satidx+','+dateidx+','+cmtidx;
      html+=');">Save</span>';
      html+=' &bull; ';
      html+='<span class=adminno onClick="doDeleteDayComment(';
      html+=satidx+','+dateidx+','+cmtidx;
      html+=');">Delete</span>';
  editElem.innerHTML=html;

  // Edit start date
  var sdateElem=document.getElementById('edit_day_sdate_'+rowref);
  var sdate=sdateElem.innerHTML;
  var html ='<input style="width:100px;" id=input_day_sdate_'+rowref+' ';
      html+=' onChange="validateDate(this.id);" ';
      html+=' value="'+sdate+'"> ';
      html+='<input style="display:none;" id=input_day_sdate_'+rowref+'_old ';
      html+=' value="'+sdate+'"> ';
  sdateElem.innerHTML=html;

  // Edit start time
  var stimeElem=document.getElementById('edit_day_stime_'+rowref);
  var stime=stimeElem.innerHTML;
  var html ='<input style="width:100px;" id=input_day_stime_'+rowref+' ';
      html+=' onChange="validateTime(this.id);" ';
      html+=' value="'+stime+'"> ';
      html+='<input style="display:none;" id=input_day_stime_'+rowref+'_old ';
      html+=' value="'+stime+'"> ';
  stimeElem.innerHTML=html;

  // Edit end date
  var edateElem=document.getElementById('edit_day_edate_'+rowref);
  var edate=edateElem.innerHTML;
  var html ='<input style="width:100px;" id=input_day_edate_'+rowref+' ';
      html+=' onChange="validateDate(this.id);" ';
      html+=' value="'+edate+'"> ';
      html+='<input style="display:none;" id=input_day_edate_'+rowref+'_old ';
      html+=' value="'+edate+'"> ';
  edateElem.innerHTML=html;

  // Edit end time
  var etimeElem=document.getElementById('edit_day_etime_'+rowref);
  var etime=etimeElem.innerHTML;
  var html ='<input style="width:100px;" id=input_day_etime_'+rowref+' ';
      html+=' onChange="validateTime(this.id);" ';
      html+=' value="'+etime+'"> ';
      html+='<input style="display:none;" id=input_day_etime_'+rowref+'_old ';
      html+=' value="'+etime+'"> ';
  etimeElem.innerHTML=html;

  // Edit comment
  var commentElem=document.getElementById('edit_day_comment_'+rowref);
  var comment=commentElem.innerHTML;
  var html ='<input style="width:80%;" value="'+commentElem.innerHTML+'" ';
      html+=' id=input_day_comment_'+rowref+'>';
      html+='<input style="display:none;" id=input_day_comment_'+rowref+'_old ';
      html+=' value="'+comment+'"> ';
  commentElem.innerHTML=html;

}

// Manage row linking for editing
function checkLink(checked,satidx,dateidx,timeidx,typeidx) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var trs = getTRs(satidx,dateidx,timeidx,typeidx);
  for (var i=0; i<trs.length; i++) {
    if (checked) {
      trs[i].style.fontWeight='bold';
      trs[i].mclinked=1;
      if (editLinked) setLinked(rowref,1);
    }
    else {
      trs[i].style.fontWeight=null;
      trs[i].style.color=null;
      trs[i].mclinked=0;
      setLinked(rowref,0);
    }
  }
}
function setLinked(rowref,onoff) {
  var linked=document.getElementById('linked_'+rowref);
  var unlinked=document.getElementById('unlinked_'+rowref);
  if (linked && unlinked) {
    if (onoff) {
      linked.style.display='inline';
      unlinked.style.display='none';
    }
    else {
      unlinked.style.display='inline';
      linked.style.display='none';
    }
  }
}

// Return array of rows that match search conditions
function getTRs(satidx,dateidx,timeidx,typeidx) {
  // table:	equals	table_results
  // tbody:	equals	body_<satidx>_<dateidx>
  // tr:	stars	tr_<satidx>_<dateidx>_<timeidx>_<typeidx>(_<rowidx>)
  var tbody = document.getElementById('body_'+satidx+'_'+dateidx);
  if (!tbody) return;
  var trs = tbody.getElementsByTagName("tr");
  var checkString = '_'+satidx+'_'+dateidx+'_';
  if (timeidx!=null) checkString += timeidx+'_';
  if (typeidx!=null) checkString += typeidx;
  var checkRE = new RegExp(checkString);
  var trarray = new Array();
  for (var i=0; i<trs.length; i++) {
    if (trs[i].id.match(checkRE)) trarray.push(trs[i]);
  }
  return(trarray);
}

// Show/hide admin stuff in the results table
// Not using this right now--setColumnVisibility is not reliably cross-browser
function showAdmin() {
  var tables=document.getElementsByTagName("table");
  for (var i=0; i<tables.length; i++) {
    if (!tables[i].id.match(/^table_1_/)) continue;
    setColumnVisibility(tables[i],1,'visible');
  }
}
function hideAdmin() {
  var tables=document.getElementsByTagName("table");
  for (var i=0; i<tables.length; i++) {
    if (!tables[i].id.match(/^table_1_/)) continue;
    setColumnVisibility(tables[i],1,'collapse');
  }
}

// Create edit element for comments
function newComment(satidx,dateidx,timeidx,typeidx,cmtspan,clsname) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var tbodyElem=document.getElementById('body_'+satidx+'_'+dateidx);

  var d = new Date();
  var newid='row_'+rowref+'_'+d.getTime()+'_new_comment';

  var newrow = createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname);
  newrow.id=newid;
  newrow.childNodes[3].innerHTML='';
  tbodyElem.insertBefore(newrow, getLastRow(rowref));
  var html ='<input style="width:99%;" value="" ';
      html+=' id=input_'+newid+'>';
  newrow.childNodes[3].innerHTML+=html;
}

// Create edit element for keyed comments
function newKComment(satidx,dateidx,timeidx,typeidx,cmtspan,clsname) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var tbodyElem=document.getElementById('body_'+satidx+'_'+dateidx);

  var d = new Date();
  var newid='row_'+rowref+'_'+d.getTime()+'_new_kcomment';

  var newrow = createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname);
  newrow.id=newid;
  newrow.childNodes[3].innerHTML='';
  tbodyElem.insertBefore(newrow, getLastRow(rowref));
  var html ='<select style="width:99%;" ';
      html+=' id=select_'+newid+'>';
      html+='<option value=0></option>';
      for (var key in allKeyedComments)
        html+='<option value='+allKeyedComments[key]+'>'+key+'</option>';
      html+='</select>';
  newrow.childNodes[3].innerHTML+=html;
}

// Create a new TR/TD element with the given properties
function createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var spacetd1 = document.createElement("td");
  spacetd1.className='f_time';
  var spacetd2 = document.createElement("td");
  spacetd2.className='f_fulltime';
  var spacetd3 = document.createElement("td");
  var newtd = document.createElement("td");
  newtd.colSpan=cmtspan;
  newtd.innerHTML='ERROR';
  var newtr = document.createElement("tr");
  newtr.className=clsname;
  newtr.id='ERROR_'+rowref;
  newtr.appendChild(spacetd1);
  newtr.appendChild(spacetd2);
  newtr.appendChild(spacetd3);
  newtr.appendChild(newtd);
  return(newtr);
}

// Get the last row element of the given rowref
function getLastRow(rowref) {
  var lastElem;

  // Do we already have the "new" row?
  if (lastElem=document.getElementById('row_'+rowref+'_add'))
    return(lastElem);

  // Are there any keyed comments?
  if (lastElem=document.getElementById('row_'+rowref+'_kcomment'))
    return(lastElem);

  // Are there any typed comments?
  if (lastElem=document.getElementById('row_'+rowref+'_comment'))
    return(lastElem);

  lastElem=document.getElementById('row_'+rowref);
  return(lastElem);
}

// Get list of coverages from database
function getAllCoverages() {
  var vars=new Array();
  vars.push('field=coverage');
  runAJAX('jslists.php',vars,'eval');
}

// Get list of schedules from database
function getAllSchedules() {
  var vars=new Array();
  vars.push('field=schedule');
  runAJAX('jslists.php',vars,'eval');
}

// Get list of keyed comments from database
function getAllKeyedComments() {
  var vars=new Array();
  vars.push('field=comment');
  runAJAX('jslists.php',vars,'eval');
}

// Get list of GVAR band info from SATBAND
function getAllBandInfo() {
  var vars=new Array();
  vars.push('field=band');
  runAJAX('jslists.php',vars,'eval');
}

// Should we act as though we are Admin?
function lightAdmin() {
  selected('menu_admin');
  document.getElementById('menu_admin').style.color='red';
}
function unlightAdmin() {
  unselected('menu_admin');
  unhilite('menu_admin');
  document.getElementById('menu_admin').style.color='black';
  hideElem('debug');
}
function showAdminMenu() {
  var adminMenu=document.createElement("div");
  adminMenu.id='menu_admin_options';
  adminMenu.className='menuadmin';
  adminMenu.style.top='1.5em';
  adminMenu.style.borderLeft='1px solid black';
  var html ='<span id=menu_admin_option_record class=adminitem ';
      html+='  onMouseOver="try{hilite(this)}catch(err){};" ';
      html+='  onMouseOut="try{unhilite(this)}catch(err){};" ';
      html+='  onClick="showAdminRecord();" ';
      html+='>New record</span>';
      html+=' &bull; ';
      html+='<span id=menu_admin_option_comment class=adminitem ';
      html+='  onMouseOver="try{hilite(this)}catch(err){};" ';
      html+='  onMouseOut="try{unhilite(this)}catch(err){};" ';
      html+='  onClick="showAdminComment();" ';
      html+='>Day comment</span>';
      html+=' &bull; ';
      html+='<span id=menu_admin_option_lists class=adminitem ';
      html+='  onMouseOver="try{hilite(this)}catch(err){};" ';
      html+='  onMouseOut="try{unhilite(this)}catch(err){};" ';
      html+='  onClick="showAdminLists();" ';
      html+='>Edit lists</span>';
      html+=' &bull; ';
      html+='<span id=menu_admin_option_satellites class=adminitem ';
      html+='  onMouseOver="try{hilite(this)}catch(err){};" ';
      html+='  onMouseOut="try{unhilite(this)}catch(err){};" ';
      html+='  onClick="showAdminSatellites();" ';
      html+='>Edit satellites</span>';
      html+=' &bull; ';
      html+='<span id=menu_admin_option_ingestors class=adminitem ';
      html+='  onMouseOver="try{hilite(this)}catch(err){};" ';
      html+='  onMouseOut="try{unhilite(this)}catch(err){};" ';
      html+='  onClick="showAdminIngestors();" ';
      html+='>Edit ingestors</span>';
  adminMenu.innerHTML=html;
  document.body.appendChild(adminMenu);
  adminOption=null;
  setAdminHelp(true);
}
function hideAdminMenu() {
  hideAdminFull();
  var adminMenu=document.getElementById('menu_admin_options');
  if (adminMenu!=null) document.body.removeChild(adminMenu);
  setAdminHelp(false);
}
function isAdmin() {
  if (isSelectedByProperty('menu_admin')) return 1;
  else return 0;
}
function toggleDebug() {
  if (isAdmin())
    toggleElem('debug');
  else
    hideElem('debug');
}

function adminOn() {
  lightAdmin();
  showAdminMenu();
}
function adminOff() {
  unlightAdmin();
  hideAdminMenu();
}

// #############################################################################
// SHOW ADMIN FUNCTIONS
function showAdminFull() {
  var adminMenuFull=document.getElementById('menu_admin_full');
  if (adminMenuFull!=null) return(adminMenuFull);
  var adminMenuFull=document.createElement("div");
  adminMenuFull.id='menu_admin_full';
  adminMenuFull.className='menuadminfull';
  document.body.appendChild(adminMenuFull);
  return(adminMenuFull);
}
function hideAdminFull() {
  var adminMenuFull=document.getElementById('menu_admin_full');
  if (adminMenuFull!=null) document.body.removeChild(adminMenuFull);
}
function showAdminRecord() {
  var theId='menu_admin_option_record';
  if (adminOption!=theId) unselected(adminOption);
  if (isSelectedByProperty(theId)) {
    unselected(theId);
    adminOption=null;
    hideAdminFull();
  }
  else {
    selected(theId);
    adminOption=theId;
    adminMenuFull=showAdminFull();
    getAdminOption('record');
  }
}
function showAdminComment() {
  var theId='menu_admin_option_comment';
  if (adminOption!=theId) unselected(adminOption);
  if (isSelectedByProperty(theId)) {
    unselected(theId);
    adminOption=null;
    hideAdminFull();
  }
  else {
    selected(theId);
    adminOption=theId;
    adminMenuFull=showAdminFull();
    getAdminOption('comment');
  }
}
function showAdminLists() {
  var theId='menu_admin_option_lists';
  if (adminOption!=theId) unselected(adminOption);
  if (isSelectedByProperty(theId)) {
    unselected(theId);
    adminOption=null;
    hideAdminFull();
  }
  else {
    selected(theId);
    adminOption=theId;
    adminMenuFull=showAdminFull();
    getAdminOption('lists');
  }
}
function showAdminSatellites() {
  var theId='menu_admin_option_satellites';
  if (adminOption!=theId) unselected(adminOption);
  if (isSelectedByProperty(theId)) {
    unselected(theId);
    adminOption=null;
    hideAdminFull();
  }
  else {
    selected(theId);
    adminOption=theId;
    adminMenuFull=showAdminFull();
    getAdminOption('satellites');
  }
}
function showAdminIngestors() {
  var theId='menu_admin_option_ingestors';
  if (adminOption!=theId) unselected(adminOption);
  if (isSelectedByProperty(theId)) {
    unselected(theId);
    adminOption=null;
    hideAdminFull();
  }
  else {
    selected(theId);
    adminOption=theId;
    adminMenuFull=showAdminFull();
    getAdminOption('ingestors');
  }
}

// #############################################################################
// FOR NEW RECORDS
function addRecord() {
  var missing=0;
  var theDate=document.getElementById('TXT_admin_record_date').value;
  if (theDate.trim()=='') missing=1;
  var theTime=document.getElementById('TXT_admin_record_time').value;
  if (theTime.trim()=='') missing=1;
  var theSatellite=document.getElementById('SEL_key_satellite_1').value;
  if (theSatellite<0) missing=1;
  var theType=document.getElementById('SEL_key_type_1').value;
  if (theType<0) missing=1;
  var theCoverage=document.getElementById('SEL_key_coverage_1').value;
  if (theCoverage<0) missing=1;
  var theSchedule=document.getElementById('SEL_key_schedule_1').value;
  if (theSchedule<0) missing=1;
  var theComment=document.getElementById('TXT_record_comment').value;
  var theKComment=document.getElementById('SEL_key_comment_1').value;
  if (missing) {
    alert('Missing required (*) fields');
    return(false);
  }
  var vars=new Array();
  vars.push('action=add');
  vars.push('data='+theDate+'|'+theTime+'|'+theSatellite+'|'+theType+'|'+theCoverage+'|'+theSchedule+'|'+escape(theComment)+'|'+theKComment);
  getAdminOption('record',vars);
}

// #############################################################################
// FOR DAY COMMENTS
function addDayComment() {
  var missing=0;
  var theStartDate=document.getElementById('TXT_admin_start_date').value;
  if (theStartDate.trim()=='') missing=1;
  var theStartTime=document.getElementById('TXT_admin_start_time').value;
  if (theStartTime.trim()=='') {
    document.getElementById('TXT_admin_start_time').value='00:00';
    theStartTime='00:00';
  }
  var theEndDate=document.getElementById('TXT_admin_end_date').value;
  if (theEndDate.trim()=='') missing=1;
  var theEndTime=document.getElementById('TXT_admin_end_time').value;
  if (theEndTime.trim()=='') {
    document.getElementById('TXT_admin_end_time').value='00:00';
    theEndTime='00:00';
  }
  var theSatellite=document.getElementById('SEL_key_satellite_1').value;
  if (theSatellite<0) missing=1;
  var theComment=document.getElementById('TXT_day_comment').value;
  if (theComment.trim()=='') missing=1;
  if (missing) {
    alert('Missing required (*) fields');
    return(false);
  }
  var vars=new Array();
  vars.push('action=add');
  vars.push('data='+theStartDate+'|'+theStartTime+'|'+theEndDate+'|'+theEndTime+'|'+theSatellite+'|'+escape(theComment));
  getAdminOption('comment',vars);
}

// #############################################################################
// FOR LISTS
function newType() {
  var theName=prompt('New type:','');
  if (theName=='' || theName==null) return(false);
  var theSuffix=prompt('Filename suffix for '+theName+':','');
  if (theSuffix=='' || theSuffix==null) return(false);
  var vars=new Array();
  vars.push('action=new');
  vars.push('target=type');
  vars.push('data='+theName+'|'+theSuffix);
  getAdminOption('lists',vars);
}
function newCoverage() {
  var theName=prompt('New coverage:','');
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=new');
  vars.push('target=coverage');
  vars.push('data='+theName);
  getAdminOption('lists',vars);
}
function newSchedule() {
  var theName=prompt('New schedule:','');
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=new');
  vars.push('target=schedule');
  vars.push('data='+theName);
  getAdminOption('lists',vars);
}
function newKeyedComment() {
  var theName=prompt('New keyed comment:','');
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=new');
  vars.push('target=kcomment');
  vars.push('data='+theName);
  getAdminOption('lists',vars);
}

function askReassignKeyedComment() {
  document.getElementById('span_reassign').style.display='block';
}
function doReassignKeyedComment() {
  var oldComment=document.getElementById('SEL_key_comment').value;
  var newComment=document.getElementById('SEL_key_comment_1').value;
  if (oldComment<0 || oldComment=='') {
    alert('Select a keyed comment to reassign');
    return(false);
  }
  if (newComment<0 || newComment=='') {
    alert('Select a keyed comment to reassign to');
    return(false);
  }
  if (newComment==oldComment) {
    alert('Pick a different keyed comment to reassign to');
    return(false);
  }
  var vars=new Array();
  vars.push('action=reassign');
  vars.push('target=kcomment');
  vars.push('data='+oldComment+'|'+newComment);
  if (confirm('Reassign?')) getAdminOption('lists',vars);
}

// #############################################################################
// FOR SATELLITES
function newSatellite() {
  var theName=prompt('New satellite name:','');
  if (theName=='' || theName==null) return(false);
  var theSSI=prompt('New imager SS (required):','');
  if (theSSI=='' || theSSI==null) return(false);
  var theSSS=prompt('New sounder SS (empty for none):','');
  var vars=new Array();
  vars.push('action=newsat');
  vars.push('data='+theName+'|'+theSSI+'|'+theSSS);
  getAdminOption('satellites',vars);
}
function newLocation() {
  var theName=prompt('New location name:','');
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=newloc');
  vars.push('data='+theName);
  getAdminOption('satellites',vars);
}
function addLocation() {
  var theElem=document.getElementById('SEL_key_satellite_1');
  if (theElem==null || theElem.selectedIndex<0) return(false);
  var theName=theElem[theElem.selectedIndex].text;
  var theSatellite=theElem[theElem.selectedIndex].value;
  if (theName=='' || theName==null) {
    alert('Select a satellite from the list');
    return(false);
  }

  var theElem=document.getElementById('TXT_admin_satellite_date');
  if (theElem==null) return(false);
  var theStart=theElem.value;
  if (theStart=='' || theStart==null) {
    alert('Enter a start date');
    return(false);
  }

  var theElem=document.getElementById('SEL_locations_1');
  if (theElem==null || theElem.selectedIndex<0) return(false);
  var theName=theElem[theElem.selectedIndex].text;
  var theLocation=theElem[theElem.selectedIndex].value;
  if (theName=='' || theName==null) {
    alert('Select a location from the list');
    return(false);
  }

  var vars=new Array();
  vars.push('action=add');
  vars.push('data='+theSatellite+'|'+theStart+'|'+theLocation);
  getAdminOption('satellites',vars);
}
function setEnd(satname,satkey,start,location,end) {
  var vars=new Array();
  vars.push('action=end');
  vars.push('data='+satkey+'|'+start+'|'+end+'|'+location);
  getAdminOption('satellites',vars);
}

// #############################################################################
// FOR INGESTOR
function newIngestor() {
  var theName=prompt('New ingestor name:','');
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=new');
  vars.push('data='+theName);
  getAdminOption('ingestors',vars);
}
function deleteIngestor() {
  var theElem=document.getElementById('SEL_ingestors');
  if (theElem==null || theElem.selectedIndex<0) {
    alert('Select an ingestor from the list');
    return(false);
  }
  var theName=theElem[theElem.selectedIndex].value;
  if (theName=='' || theName==null) return(false);
  var vars=new Array();
  vars.push('action=delete');
  vars.push('data='+theName);
  if (confirm('Delete '+theName+'?')) getAdminOption('ingestors',vars);
}

// #############################################################################
// SAVE AND DELETE ROWS
function doSave(satidx,dateidx,timeidx,typeidx) {
  var rowInfo=getRowInfo(satidx,dateidx,timeidx,typeidx);
  rowInfo['linked']=getRowLinks(satidx,dateidx,timeidx,typeidx);
  rowInfo['satidx']=satidx;
  rowInfo['dateidx']=dateidx;
  rowInfo['timeidx']=timeidx;
  rowInfo['typeidx']=typeidx;
  sendAdmin(rowInfo,'update');
}

function doneSave(satidx,dateidx,timeidx,typeidx) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var trElem=document.getElementById('row_'+rowref);
  var trs = getTRs(satidx,dateidx);
  var html='';

  // Unedit all rows, including linked
  if (trElem.mclinked==1) {
    editLinked=0;
    for (var i=0; i<trs.length; i++) {
      if (trs[i].mclinked==1) {
        var parts=trs[i].id.split('_');
        html+=unEdit(parts[1],parts[2],parts[3],parts[4],parts[5]);
      }
    }
  }
  else {
    html+=unEdit(satidx,dateidx,timeidx,typeidx);
  }

  // Add new comments to all linked rows
  var tbodyElem=document.getElementById('body_'+satidx+'_'+dateidx);
  var cmtspan=trElem.getElementsByTagName("td").length-3;
  var clsname=trElem.className;
  var rowRegExp = new RegExp('^row_\\d+_\\d+_\\d+_\\d+$');
  if (trElem.mclinked==1) {
    var j=0;
    for (var i=0; i<trs.length; i++) {
      if (trs[i].mclinked==1 && trs[i].id.match(rowRegExp)) {
        if (html!='') {
          j++;
          var newrow=createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname);
          newrow.id='row_'+rowref+'_'+j+'_linked_comments';
          newrow.childNodes[3].innerHTML=html;
          insertAfter(tbodyElem, newrow, trs[i]);
        }
        trs[i].mclinked=0;
      }
    }
  }
  else {
    if (html!='') {
      var newrow=createRow(satidx,dateidx,timeidx,typeidx,cmtspan,clsname);
      newrow.id='row_'+rowref+'_1_linked_comment';
      newrow.childNodes[3].innerHTML=html;
      insertAfter(tbodyElem, newrow, trElem);
    }
    trElem.mclinked=0;
  }
}

function unEdit(satidx,dateidx,timeidx,typeidx,rowname) {
  if (rowname==null)
    var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  else
    var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx+'_'+rowname;
  var trElem=document.getElementById('row_'+rowref);
  if (trElem==null) return('');

  // Turn off the link style
  trElem.style.fontWeight=null;
  trElem.style.color=null;
//  trElem.mclinked=0;
  setLinked(rowref,0);
  if (rowname!=null) return('');

  // Change Save/Delete to Saved
  var editElem=document.getElementById('edit_'+rowref);
  editElem.innerHTML='Saved';

  // Unedit coverage
  var coverageElem=document.getElementById('coverage_'+rowref);
  var coverage=document.getElementById('select_coverage_'+rowref);
  if (coverage!=null)
    coverageElem.innerHTML=coverage[coverage.selectedIndex].text;

  // Unedit schedule
  var scheduleElem=document.getElementById('schedule_'+rowref);
  var schedule=document.getElementById('select_schedule_'+rowref);
  if (schedule!=null)
    scheduleElem.innerHTML=schedule[schedule.selectedIndex].text;

  // Unedit comments
  var commentElem;
  var comment;
  var i=1;
  while (commentElem=document.getElementById('comment_'+rowref+'_'+i)) {
    i++;
    var inputs=commentElem.getElementsByTagName("input");
    for (var j=0; j<inputs.length; j++) {
      var text=inputs[j].value;
      if (text=='') commentElem.style.display='none';
      else commentElem.innerHTML=text;
    }
  }

  // Unedit keyed comments
  var i=1;
  var kCommentElem;
  var kComment;
  while (kCommentElem=document.getElementById('kcomment_'+rowref+'_'+i)) {
    i++;
    var selects=kCommentElem.getElementsByTagName("select");
    for (var j=0; j<selects.length; j++) {
      var select=selects[j];
      var text=select[select.selectedIndex].text;
      if (text=='<DELETE>') kCommentElem.style.display='none';
      else kCommentElem.innerHTML=text;
    }
  }

  // Need these later on
  var trs = getTRs(satidx,dateidx);
  var html='';

  // Unedit new comments
  var rowRegExpNC = new RegExp('row_'+rowref+'_\\d+_new_comment');
  for (var i=0; i<trs.length; i++) {
    if (trs[i].id.match(rowRegExpNC)) {
      var td=trs[i].childNodes[3];
      var inputs=td.getElementsByTagName("input");
      for (var j=0; j<inputs.length; j++) {
        var text=inputs[j].value;
        if (text!='' && text!='undefined') html+=text+'<br>';
      }
      trs[i].style.display='none';
    }
  }

  // Unedit new keyed comments
  var rowRegExpNKC = new RegExp('row_'+rowref+'_\\d+_new_kcomment');
  for (var i=0; i<trs.length; i++) {
    if (trs[i].id.match(rowRegExpNKC)) {
      var td=trs[i].childNodes[3];
      var selects=td.getElementsByTagName("select");
      for (var j=0; j<selects.length; j++) {
        var select=selects[j];
        var text=select[select.selectedIndex].text;
        if (text!='' && text!='undefined') html+=text+'<br>';
      }
      trs[i].style.display='none';
    }
  }

  // Hide the "New" rows as well
  var newAddElem=document.getElementById('row_'+rowref+'_add');
  if (newAddElem!=null)
    newAddElem.style.display='none';

  // Return the text to add to each linked row
  return(html);
}

function doDelete(satidx,dateidx,timeidx,typeidx) {
  var rowInfo=getRowInfo(satidx,dateidx,timeidx,typeidx);
  rowInfo['linked']=getRowLinks(satidx,dateidx,timeidx,typeidx);
  rowInfo['satidx']=satidx;
  rowInfo['dateidx']=dateidx;
  rowInfo['timeidx']=timeidx;
  rowInfo['typeidx']=typeidx;
  records=rowInfo['linked'].length+1;
  var string='Delete record?';
  if (records>1) string='Delete '+records+' linked records?';
  if (confirm(string)) sendAdmin(rowInfo,'delete');
}

function doneDelete(satidx,dateidx,timeidx,typeidx) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var trElem=document.getElementById('row_'+rowref);
  var trs = getTRs(satidx,dateidx);

  // Hide all rows, including linked
  if (trElem.mclinked==1) {
    editLinked=0;
    for (var i=0; i<trs.length; i++) {
      if (trs[i].mclinked==1) trs[i].style.display='none';
    }
  }
  else {
    trElem.style.display='none';
  }

  // Hide the new rows too
  var rowRegExpNC = new RegExp('row_'+rowref+'_\d+_new_comment');
  var rowRegExpNKC = new RegExp('row_'+rowref+'_\d+_new_kcomment');
  for (var i=0; i<trs.length; i++) {
    if (
      trs[i].id.match('row_'+rowref) ||
      trs[i].id.match('row_'+rowref+'_add') ||
      trs[i].id.match(rowRegExpNC) ||
      trs[i].id.match(rowRegExpNKC)
    ) trs[i].style.display='none';
  }
}

// Get row info: sat, date, time, type, coverage, schedule, comments
function getRowInfo(satidx,dateidx,timeidx,typeidx) {
  var rowObject = new Array();
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var tbodyElem=document.getElementById('body_'+satidx+'_'+dateidx);
  var dayInfoElem=document.getElementById('dayinfo_'+satidx+'_'+dateidx);
  var timeInfoElem=document.getElementById('timeinfo_'+rowref);

  // Get satellite and date
  var parts=dayInfoElem.innerHTML.split('|');
  rowObject['satellite']=parts[0];
  rowObject['date']=parts[1];

  // Get time and type
  var parts=timeInfoElem.innerHTML.split('|');
  rowObject['time']=parts[0];
  rowObject['type']=parts[1];

  var trElem=document.getElementById('row_'+rowref);
  var selects=trElem.getElementsByTagName("select");

  // Get coverage
  var coverage = new Array();
  coverage['old']=selects[0][0].value;
  coverage['new']=selects[0].value;
  rowObject['coverage']=coverage;

  // Get schedule
  var schedule = new Array();
  schedule['old']=selects[1][0].value;
  schedule['new']=selects[1].value;
  rowObject['schedule']=schedule;

  // Get comments
  var comments = new Array();
  var trElem=document.getElementById('row_'+rowref+'_comment');
  if (trElem!=null) {
    var inputs=trElem.getElementsByTagName("input");
    for (var i=0; i<inputs.length; i++) comments.push(inputs[i].value);
  }
  var inputs=tbodyElem.getElementsByTagName("input");
  var rowRegExpNC = new RegExp('row_'+rowref+'_\\d+_new_comment');
  for (var i=0; i<inputs.length; i++) {
    if (inputs[i].id.match(rowRegExpNC)) comments.push(inputs[i].value);
  }
  rowObject['comments']=comments;

  // Get keyed comments
  var kcomments = new Array();
  var trElem=document.getElementById('row_'+rowref+'_kcomment');
  if (trElem!=null) {
    var selects=trElem.getElementsByTagName("select");
    for (var i=0; i<selects.length; i++) {
      var kcomment = new Array();
      kcomment['old']=selects[i][0].value;
      kcomment['new']=selects[i].value;
      kcomments.push(kcomment);
    }
  }
  var selects=tbodyElem.getElementsByTagName("select");
  var rowRegExpNKC = new RegExp('row_'+rowref+'_\\d+_new_kcomment');
  for (var i=0; i<selects.length; i++) {
    if (selects[i].id.match(rowRegExpNKC)) {
      var kcomment = new Array();
      kcomment['add']=selects[i].value;
      kcomments.push(kcomment);
    }
  }
  rowObject['kcomments']=kcomments;

  return(rowObject);
}

// Get row link info (time/type)
function getRowLinks(satidx,dateidx,timeidx,typeidx) {
  var rowref=satidx+'_'+dateidx+'_'+timeidx+'_'+typeidx;
  var thisrow=document.getElementById('row_'+rowref);
  var links = new Array();
  if (thisrow.mclinked!=1) return(links);
  var trs = getTRs(satidx,dateidx);
  for (var i=0; i<trs.length; i++) {
    if (trs[i].mclinked==1 && trs[i].id.match(/^row_\d+_\d+_\d+_\d+$/)) {
      var thisref=trs[i].id.replace(/^row_/,'');
      if (thisref==rowref) continue;
      var link = new Array();
      var timeInfoElem=document.getElementById('timeinfo_'+thisref);
      var parts=timeInfoElem.innerHTML.split('|');
      link['time']=parts[0];
      link['type']=parts[1];
      links.push(link);
    }
  }
  return(links);
}

// Debugging: print a rowObject
function printRowInfo(rowInfo) {
  var string ='rowObject\n';
      string+='  satellite: '+rowInfo['satellite']+'\n';
      string+='  date: '+rowInfo['date']+'\n';
      string+='  time: '+rowInfo['time']+'\n';
      string+='  type: '+rowInfo['type']+'\n';
      string+='  coverage:\n';
      string+='    old: '+rowInfo['coverage']['old']+'\n';
      string+='      new: '+rowInfo['coverage']['new']+'\n';
      string+='  schedule:\n';
      string+='    old: '+rowInfo['schedule']['old']+'\n';
      string+='      new: '+rowInfo['schedule']['new']+'\n';
      string+='  comments:\n';
  for (var i=0; i<rowInfo['comments'].length; i++) {
      string+='    set: '+rowInfo['comments'][i]+'\n';
  }
      string+='  kcomments:\n';
  for (var i=0; i<rowInfo['kcomments'].length; i++) {
      string+='    old: '+rowInfo['kcomments'][i]['old']+'\n';
      string+='      new: '+rowInfo['kcomments'][i]['new']+'\n';
      string+='    add: '+rowInfo['kcomments'][i]['add']+'\n';
  }
      string+='  linked:\n';
  for (var i=0; i<rowInfo['linked'].length; i++) {
      string+='    time: '+rowInfo['linked'][i]['time']+'\n';
      string+='    type: '+rowInfo['linked'][i]['type']+'\n';
  }
  alert(string);
}

// #############################################################################
// SAVE AND DELETE DAY COMMENTS
function doSaveDayComment(satidx,dateidx,cmtidx) {
  var rowInfo = getRowInfoDayComment(satidx,dateidx,cmtidx);
  rowInfo['satidx']=satidx;
  rowInfo['dateidx']=dateidx;
  rowInfo['cmtidx']=cmtidx;
  sendAdminDayComment(rowInfo,'updatedaycomment');
}

function doneSaveDayComment(satidx,dateidx,cmtidx) {
  var rowref=satidx+'_'+dateidx+'_'+cmtidx;

  // Change Save/Delete to Saved
  var editElem=document.getElementById('edit_day_click_'+rowref);
  editElem.innerHTML='Saved';

  // Unedit start date
  var sdateElem=document.getElementById('edit_day_sdate_'+rowref);
  var sdate=document.getElementById('input_day_sdate_'+rowref).value;
  sdateElem.innerHTML=sdate;

  // Unedit start time
  var stimeElem=document.getElementById('edit_day_stime_'+rowref);
  var stime=document.getElementById('input_day_stime_'+rowref).value;
  stimeElem.innerHTML=stime;

  // Unedit end date
  var edateElem=document.getElementById('edit_day_edate_'+rowref);
  var edate=document.getElementById('input_day_edate_'+rowref).value;
  edateElem.innerHTML=edate;

  // Unedit end time
  var etimeElem=document.getElementById('edit_day_etime_'+rowref);
  var etime=document.getElementById('input_day_etime_'+rowref).value;
  etimeElem.innerHTML=etime;

  // Unedit comment
  var commentElem=document.getElementById('edit_day_comment_'+rowref);
  var comment=document.getElementById('input_day_comment_'+rowref).value;
  commentElem.innerHTML=comment;
}

function doDeleteDayComment(satidx,dateidx,cmtidx) {
  var rowInfo = getRowInfoDayComment(satidx,dateidx,cmtidx);
  rowInfo['satidx']=satidx;
  rowInfo['dateidx']=dateidx;
  rowInfo['cmtidx']=cmtidx;
  var string='Delete day comment?';
  if (confirm(string)) sendAdminDayComment(rowInfo,'deletedaycomment');
}

function doneDeleteDayComment(satidx,dateidx,cmtidx) {
  var rowref=satidx+'_'+dateidx+'_'+cmtidx;
  var trElem=document.getElementById('edit_day_'+rowref);
  trElem.style.display='none';
}

// Get row info: sat, date, time, type, coverage, schedule, comments
function getRowInfoDayComment(satidx,dateidx,cmtidx) {
  var rowObject = new Array();
  var rowref=satidx+'_'+dateidx+'_'+cmtidx;
  var dayInfoElem=document.getElementById('dayinfo_'+satidx+'_'+dateidx);
  var parts=dayInfoElem.innerHTML.split('|');
  rowObject['satidx']=satidx;
  rowObject['satellite']=parts[0];

  // Start
  var start = new Array();
  var thisId = 'input_day_sdate_'+rowref;
  var thatId = 'input_day_stime_'+rowref;
  start['old']=document.getElementById(thisId+'_old').value + ' ' +
               document.getElementById(thatId+'_old').value;
  start['new']=document.getElementById(thisId).value + ' ' +
               document.getElementById(thatId).value;
  rowObject['start']=start;

  // End
  var end = new Array();
  var thisId = 'input_day_edate_'+rowref;
  var thatId = 'input_day_etime_'+rowref;
  end['old']=document.getElementById(thisId+'_old').value + ' ' +
             document.getElementById(thatId+'_old').value;
  end['new']=document.getElementById(thisId).value + ' ' +
             document.getElementById(thatId).value;
  rowObject['end']=end;

  // Comment
  var daycomment = new Array();
  var thisId = 'input_day_comment_'+rowref;
  daycomment['old']=document.getElementById(thisId+'_old').value;
  daycomment['new']=document.getElementById(thisId).value;
  rowObject['daycomment']=daycomment;

  return(rowObject);
}