// ===================================================================
// Author: Matt Kruse <matt@mattkruse.com>
// WWW: http://www.mattkruse.com/
//
// NOTICE: You may use this code for any purpose, commercial or
// private, without any further permission from the author. You may
// remove this notice from your final code if you wish, however it is
// appreciated by the author if at least my web site address is kept.
//
// You may *NOT* re-distribute this code in any way except through its
// use. That means, you can include it in your product, or your web
// site, or any other form where the code is actually being used. You
// may not put the plain javascript up on your site for download or
// include it in your javascript libraries for download. 
// If you wish to share this code with others, please just point them
// to the URL instead.
// Please DO NOT link directly to my .js files from your site. Copy
// the files to your server and use them there. Thank you.
// ===================================================================

/* 
PopupWindow.js
Author: Matt Kruse
Last modified: 02/16/04

DESCRIPTION: This object allows you to easily and quickly popup a window
in a certain place. The window can either be a DIV or a separate browser
window.

COMPATABILITY: Works with Netscape 4.x, 6.x, IE 5.x on Windows. Some small
positioning errors - usually with Window positioning - occur on the 
Macintosh platform. Due to bugs in Netscape 4.x, populating the popup 
window with <STYLE> tags may cause errors.

USAGE:
// Create an object for a WINDOW popup
var win = new PopupWindow(); 

// Create an object for a DIV window using the DIV named 'mydiv'
var win = new PopupWindow('mydiv'); 

// Set the window to automatically hide itself when the user clicks 
// anywhere else on the page except the popup
win.autoHide(); 

// Show the window relative to the anchor name passed in
win.showPopup(anchorname);

// Hide the popup
win.hidePopup();

// Set the size of the popup window (only applies to WINDOW popups
win.setSize(width,height);

// Populate the contents of the popup window that will be shown. If you 
// change the contents while it is displayed, you will need to refresh()
win.populate(string);

// set the URL of the window, rather than populating its contents
// manually
win.setUrl("http://www.site.com/");

// Refresh the contents of the popup
win.refresh();

// Specify how many pixels to the right of the anchor the popup will appear
win.offsetX = 50;

// Specify how many pixels below the anchor the popup will appear
win.offsetY = 100;

NOTES:
1) Requires the functions in AnchorPosition.js

2) Your anchor tag MUST contain both NAME and ID attributes which are the 
   same. For example:
   <A NAME="test" ID="test"> </A>

3) There must be at least a space between <A> </A> for IE5.5 to see the 
   anchor tag correctly. Do not do <A></A> with no space.

4) When a PopupWindow object is created, a handler for 'onmouseup' is
   attached to any event handler you may have already defined. Do NOT define
   an event handler for 'onmouseup' after you define a PopupWindow object or
   the autoHide() will not work correctly.
*/ 

// Set the position of the popup window based on the anchor
function PopupWindow_getXYPosition(anchorname) {
	var coordinates;
	if (this.type == "WINDOW") {
		coordinates = getAnchorWindowPosition(anchorname);
		}
	else {
		coordinates = getAnchorPosition(anchorname);
		}
	this.x = coordinates.x;
	this.y = coordinates.y;
	}
// Set width/height of DIV/popup window
function PopupWindow_setSize(width,height) {
	this.width = width;
	this.height = height;
	}
// Fill the window with contents
function PopupWindow_populate(contents) {
	this.contents = contents;
	this.populated = false;
	}
// Set the URL to go to
function PopupWindow_setUrl(url) {
	this.url = url;
	}
// Set the window popup properties
function PopupWindow_setWindowProperties(props) {
	this.windowProperties = props;
	}
// Refresh the displayed contents of the popup
function PopupWindow_refresh() {
	if (this.divName != null) {
		// refresh the DIV object
		if (this.use_gebi) {
			document.getElementById(this.divName).innerHTML = this.contents;
			}
		else if (this.use_css) { 
			document.all[this.divName].innerHTML = this.contents;
			}
		else if (this.use_layers) { 
			var d = document.layers[this.divName]; 
			d.document.open();
			d.document.writeln(this.contents);
			d.document.close();
			}
		}
	else {
		if (this.popupWindow != null && !this.popupWindow.closed) {
			if (this.url!="") {
				this.popupWindow.location.href=this.url;
				}
			else {
				this.popupWindow.document.open();
				this.popupWindow.document.writeln(this.contents);
				this.popupWindow.document.close();
			}
			this.popupWindow.focus();
			}
		}
	}
//
//----------------------------------------------------------------------------------------------------------------------------
// Position and show the popup, relative to an anchor object
//----------------------------------------------------------------------------------------------------------------------------
//
function PopupWindow_showPopup(anchorname) {

  this.anchor = anchorname;
  this.visible = true;
  this.getXYPosition(anchorname);
  this.x += this.offsetX;
  this.y += this.offsetY;
  if (!this.populated && (this.contents != "")) {
    this.populated = true;
    this.refresh();
  }
  if (this.divName != null) {
    // Show the DIV object
    if (this.use_gebi) {
      if (!this.comboBox && (this.x + this.width) > document.body.offsetWidth) {
        this.x = this.x - this.width + document.all(this.anchor).offsetWidth;
      }
      if (!this.comboBox && (this.y + this.height) > (document.body.offsetHeight)) {
        if ((this.y - this.height) < 0 ) {
          if ((this.y + this.height) > (document.body.offsetHeight + 150)) {
            this.y = this.y - this.height;
          }		      
        } else if (this.ValueList>"") {
          this.y = this.y - this.height + 10;
        } else {
          this.y = this.y - this.height - 10;
        }
      }
      document.getElementById(this.divName).style.left = this.x + "px";
      document.getElementById(this.divName).style.top = this.y + "px";
      if (!this.comboBox) {
        document.getElementById(this.divName).style.visibility = "visible";
      }
      document.getElementById(this.divName).style.zIndex = 10000;
    } else if (this.use_css) {
      document.all[this.divName].style.left = this.x;
      document.all[this.divName].style.top = this.y;
      document.all[this.divName].style.visibility = "visible";
    } else if (this.use_layers) {
      document.layers[this.divName].left = this.x;
      document.layers[this.divName].top = this.y;
      document.layers[this.divName].visibility = "visible";
    }
  } else {
    if (this.popupWindow == null || this.popupWindow.closed) {
      // If the popup window will go off-screen, move it so it doesn't
      if (this.x<0) { this.x=0; }
      if (this.y<0) { this.y=0; }
      if (screen && screen.availHeight) {
        if ((this.y + this.height) > screen.availHeight) {
          this.y = screen.availHeight - this.height;
        }
      }
      if (screen && screen.availWidth) {
        if ((this.x + this.width) > screen.availWidth) {
          this.x = screen.availWidth - this.width;
        }
      }
      var avoidAboutBlank = window.opera || ( document.layers && !navigator.mimeTypes['*'] ) || navigator.vendor == 'KDE' || ( document.childNodes && !document.all && !navigator.taintEnabled );
      this.popupWindow = window.open(avoidAboutBlank?"":"about:blank","window_"+anchorname,this.windowProperties+",width="+this.width+",height="+this.height+",screenX="+this.x+",left="+this.x+",screenY="+this.y+",top="+this.y+"");
    }
    this.refresh();
  }
}
//
//----------------------------------------------------------------------------------------------------------------------------
// Hide the popup
//----------------------------------------------------------------------------------------------------------------------------
//
function PopupWindow_hidePopup() {
//    alert('hide');
	this.visible = false;
	if (this.divName != null) {
		if (this.use_gebi) {
//		alert(document.body.id);
//document.body.style.visibility="hidden";
//document.all("f1").style.visibility="hidden";
			document.getElementById(this.divName).style.visibility = "hidden";
            try {
			  document.all("f1").style.display="none";
			} catch(e) {
            }			
//document.body.style.visibility="hidden";
//document.body.style.visibility="visible";
//this.refresh();
			}
		else if (this.use_css) {
			document.all[this.divName].style.visibility = "hidden";
			}
		else if (this.use_layers) {
			document.layers[this.divName].visibility = "hidden";
			}
		}
	else {
		if (this.popupWindow && !this.popupWindow.closed) {
			this.popupWindow.close();
			this.popupWindow = null;
			}
		}
//alert("jim");
	}
// Pass an event and return whether or not it was the popup DIV that was clicked
function PopupWindow_isClicked(e) {
	if (this.divName != null) {
		if (this.use_layers) {
			var clickX = e.pageX;
			var clickY = e.pageY;
			var t = document.layers[this.divName];
			if ((clickX > t.left) && (clickX < t.left+t.clip.width) && (clickY > t.top) && (clickY < t.top+t.clip.height)) {
				return true;
				}
			else { return false; }
			}
		else if (document.all) { // Need to hard-code this to trap IE for error-handling
			var t = window.event.srcElement;
			while (t.parentElement != null) {
//			    document.write="id:" + t.id + ":tag:" + t.tagName + this.parentElement.tagName
				if (t.id==this.divName) {
					return true;
				}
				t = t.parentElement;
				}
			return false;
			}
		else if (this.use_gebi && e) {
			var t = e.originalTarget;
			while (t.parentNode != null) {
				if (t.id==this.divName) {
					return true;
					}
				t = t.parentNode;
				}
			return false;
			}
		return false;
		}
	return false;
	}

// Check an onMouseDown event to see if we should hide
function PopupWindow_hideIfNotClicked(e) {
	if (this.autoHideEnabled && !this.isClicked(e)) {
//			    document.write=this.parentElement.tagName
		this.hidePopup();
		}
	}
// Call this to make the DIV disable automatically when mouse is clicked outside it
function PopupWindow_autoHide() {
	this.autoHideEnabled = true;
	}
// This global function checks all PopupWindow objects onmouseup to see if they should be hidden
function PopupWindow_hidePopupWindows(e) {
	for (var i=0; i<popupWindowObjects.length; i++) {
		if (popupWindowObjects[i] != null) {
			var p = popupWindowObjects[i];
			p.hideIfNotClicked(e);
			}
		}
	}
// Run this immediately to attach the event listener
function PopupWindow_attachListener() {
	if (document.layers) {
		document.captureEvents(Event.MOUSEUP);
	}
	window.popupWindowOldEventListener = document.onmouseup;
	if (window.popupWindowOldEventListener != null) {
		document.onmouseup = new Function("window.popupWindowOldEventListener(); PopupWindow_hidePopupWindows();");
	}
	else {
		document.onmouseup = PopupWindow_hidePopupWindows;
	}
    document.onkeydown = ChangeEnterKeyToTab;
}

function ChangeEnterKeyToTab() {
  if (window.event.keyCode == 13) {window.event.keyCode = 9;}
}
// CONSTRUCTOR for the PopupWindow object
// Pass it a DIV name to use a DHTML popup, otherwise will default to window popup
function PopupWindow() {
	if (!window.popupWindowIndex) { window.popupWindowIndex = 0; }
	if (!window.popupWindowObjects) { window.popupWindowObjects = new Array(); }
	if (!window.listenerAttached) {
		window.listenerAttached = true;
		PopupWindow_attachListener();
		}
	this.index = popupWindowIndex++;
	popupWindowObjects[this.index] = this;
	this.divName = null;
	this.popupWindow = null;
	this.comboBox = false;
	this.width=0;
	this.height=0;
	this.populated = false;
	this.visible = false;
	this.autoHideEnabled = false;
	this.anchor = "";
	this.dialog = false;
	this.contents = "";
	this.url="";
	this.windowProperties="toolbar=no,location=no,status=no,menubar=no,scrollbars=auto,resizable,alwaysRaised,dependent,titlebar=no";
	if (arguments.length>0) {
		this.type="DIV";
		this.divName = arguments[0];
		}
	else {
		this.type="WINDOW";
		}
	this.use_gebi = false;
	this.use_css = false;
	this.use_layers = false;
	if (document.getElementById) { this.use_gebi = true; }
	else if (document.all) { this.use_css = true; }
	else if (document.layers) { this.use_layers = true; }
	else { this.type = "WINDOW"; }
	this.offsetX = 0;
	this.offsetY = 0;
	// Method mappings
	this.getXYPosition = PopupWindow_getXYPosition;
	this.populate = PopupWindow_populate;
	this.setUrl = PopupWindow_setUrl;
	this.setWindowProperties = PopupWindow_setWindowProperties;
	this.refresh = PopupWindow_refresh;
	this.showPopup = PopupWindow_showPopup;
	this.hidePopup = PopupWindow_hidePopup;
	this.setSize = PopupWindow_setSize;
	this.isClicked = PopupWindow_isClicked;
	this.autoHide = PopupWindow_autoHide;
	this.hideIfNotClicked = PopupWindow_hideIfNotClicked;
	this.hidePopupWin = KP_hidePopup;
	}



  document.write("<DIV id=EtsPopDiv1 style='visibility:hidden;POSITION:absolute;z-index:+1'></DIV>")
  var popVis = false;
//  var popErr = false;
//  var popVal = "";

  function MoveToNextControl(PrmName) {

    var i = 0;
    var WrkFnd = false;
    var WrkFrm = document.all(PrmName).form;

    for (i=1; i<WrkFrm.elements.length; i++) {
      if (WrkFnd && WrkFrm.elements(i).tabIndex > -1) {
        try {
          if (WrkFrm.elements(i).value == "") {
            WrkFrm.elements(i).select();
            WrkFrm.elements(i).focus();
            break;
          }
        } catch(e) { 
        }
      }
      if (WrkFrm.elements(i).id == PrmName) {WrkFnd = true;}
    }
  }

//
// Hide object
//
function KP_hidePopup() {
  if (arguments.length > 0) { window.popupWindowObjects[arguments[0]].hidePopup(); }
  else {this.hidePopup(); }
}
  
function KP_Focus(PrmFld) {
  if (document.all(PrmFld).getAttribute("popErr") == 'false') {
    document.all(PrmFld).setAttribute("popVal",document.all(PrmFld).value);
    if (document.all(PrmFld).getAttribute("ClientEnterFunction") > "") { 
      eval(document.all(PrmFld).getAttribute("ClientEnterFunction")); 
    }
  }
}

function KP_Val_Popup(PrmFld, PrmTyp, PrmLimit, PrmDescCol, PrmDescFieldId, PrmVal, PrmFocus, PrmUCase, PrmAllowBlank) {
  
  var WrkRtn = true;
  
  if (PrmUCase) {
    document.all(PrmFld).value = document.all(PrmFld).value.toUpperCase();
  }

  if (document.all(PrmFld).value != document.all(PrmFld).getAttribute('popVal')) {
    if (document.all(PrmFld).value.replace(new RegExp(" {1,}"),"") > '' || (PrmAllowBlank && document.all(PrmFld).value > '')) {
      try {
        WrkRtn = eval(document.all(PrmFld).getAttribute('IntValFunction'));
      } catch(e) {
        WrkRtn = false;
      }
      if (!PrmLimit) {WrkRtn = true;}
      if (!WrkRtn) {
        document.all(PrmFld).select();
        document.all(PrmFld).focus();
        if (PrmTyp == "Cbx") {
          alert('Value ' + document.all(PrmFld).value + " is not in the list");
        } else if (PrmTyp == "Dte") {
           alert('Value ' + document.all(PrmFld).value + " is not a date in the format [dd NNN yyyy]");
        } else if (PrmTyp == "Num") {
           alert('Value ' + document.all(PrmFld).value + " is not a number");
        } 
      }
    } else {
      if (PrmDescCol > 0) {
        document.all(PrmFld).setAttribute('DescValue', '');
      }
    }
    if (WrkRtn && document.all(PrmFld).getAttribute('ClientValFunction') > "") {
      try {
        WrkRtn = eval(document.all(PrmFld).getAttribute('ClientValFunction').replace("this.id", "'" + PrmFld + "'"));
      } catch(e) {
        WrkRtn = false;
      }
      if (!WrkRtn) {
        document.all(PrmFld).select();
        document.all(PrmFld).focus();
      }
    }
    if (!WrkRtn) {
      document.all(PrmFld).setAttribute('popErr','true');
      document.all(PrmFld).setAttribute('popVal',document.all(PrmFld).value);
      if (PrmDescCol > 0) {
        document.all(PrmFld).setAttribute('DescValue', '');
      }
    }
    
    if (PrmDescCol > 0) {
      if (PrmDescFieldId > "") {
        document.all(PrmDescFieldId).value = document.all(PrmFld).getAttribute('DescValue');
      } else {
        document.all(PrmFld + '_Desc').value = document.all(PrmFld).getAttribute('DescValue');
      }
    }
    if (WrkRtn && PrmFocus) {
      MoveToNextControl(PrmFld);
    }   
  } else if (document.all(PrmFld).getAttribute('popErr') == 'true') {
    document.all(PrmFld).value = '';
    document.all(PrmFld).setAttribute('popErr','false');
    if (document.all(PrmFld).getAttribute('ClientValFunction') > "") {
      try {
        WrkRtn = eval(document.all(PrmFld).getAttribute('ClientValFunction').replace("this.id", "'" + PrmFld + "'"));
      } catch(e) {
      }
    }
  }
  
  if (document.all(PrmFld).getAttribute('ClientExitFunction') > "") {
    if (WrkRtn) { 
        eval(document.all(PrmFld).getAttribute('ClientExitFunction').replace("this.id", "'" + PrmFld + "'"));
    }
  }
  return WrkRtn;
}

function KP_Val_Populate(PrmFld, PrmDescCol, PrmDescFieldId) {
  if (PrmDescCol > 0) {
    if (PrmDescFieldId > "") {
      document.all(PrmDescFieldId).value = document.all(PrmFld).getAttribute('DescValue');
    } else {
      document.all(PrmFld + '_Desc').value = document.all(PrmFld).getAttribute('DescValue');
    }
  }
}

function GetEventString(PrmFld, PrmEvent) {
  var WrkStr = document.all(PrmFld).getAttribute(PrmEvent).toString();
  var WrkI = WrkStr.indexOf("{");
  if (WrkI > 0) {
    WrkStr = WrkStr.substr(WrkI+1);
    WrkStr = WrkStr.substr(0, WrkStr.length-1);
  } 
  return WrkStr;
}

function EtsCtl_Enable(PrmId) {
  var WrkStr = "";
  if (PrmId.length > 5) { WrkStr = PrmId.substr(PrmId.length-5); }
  if (WrkStr != "_Desc") {
    try {
      document.all(PrmId).disabled = false;
      if (document.all(PrmId).getAttribute("CtlType") == "EtsButton") {
        document.all(PrmId + "_inset").background = document.all(PrmId).getAttribute("backImg");
      } else {
        document.all(PrmId).style.backgroundColor = "";
        document.all(PrmId).style.borderStyle = "";
	    document.all(PrmId + "_Arrow").style.visibility = "visible";
	  }
    } catch(e) {
    }
  }			
}

function EtsCtl_Disable(PrmId) {
  var WrkStr = "";
  if (PrmId.length > 5) { WrkStr = PrmId.substr(PrmId.length-5); }
  if (WrkStr != "_Desc") {
    try {
      document.all(PrmId).disabled = true;
      if (document.all(PrmId).getAttribute("CtlType") == "EtsButton") {
        document.all(PrmId + "_inset").background = "";
      } else {
        if (document.all(PrmId).getAttribute("UpdBGColor") == "True") {
          document.all(PrmId).style.backgroundColor = "WhiteSmoke"; }
        document.all(PrmId).style.borderStyle = "none";
	    document.all(PrmId + "_Arrow").style.visibility = "hidden";
  	  }
    } catch(e) {
    }
  }			
}

function EtsCtl_Populate_Value(PrmId, PrmValue) {
  try {
	document.all(PrmId).value = PrmValue;
	if (document.all(PrmId).getAttribute("CtlType") == "ComboInp") {
	  eval("ValComboPopup_" + PrmId + "('populate')");
	} else if (document.all(PrmId).getAttribute("CtlType") == "ValueListInp") {
	  eval(document.all(PrmId).getAttribute("IntValFunction"));
	  eval(document.all(PrmId).getAttribute("PopFunction"));
	}
  } catch(e) {
  }			
}