var pgHTML = '';
var topLinkNo  = 0;

// **********************************************
// 1. Set up a page number and 
// 2. Define if it is printer friendly version 
// 3. Define current Page URL
// **********************************************
// pgNumber: Default if not found - Home page - 0  
var pgNumber    = getURLparm('page');
if (!pgNumber) pgNumber = 0;

// prtFriendly: 0 or 1
var prtFriendly = getURLparm('prt');
if (!prtFriendly) prtFriendly = 0;

// currPageURL: i.e. index.htm?page=1&prt=0
var currPageURL = aURL0[pgNumber][1] + '?page=' + aURL0[pgNumber][6] + '&prt=' + prtFriendly;
// **********************************************


/* Get URL parameter */
function getURLparm(pName) {
  var qStr = location.search.substring(1);
  var pVal = false;
  if (qStr.length > 1) {
    var aParms = location.search.substring(1).split("&");
    for ( var i=0; i < aParms.length; i++ ) {
      if (aParms[i].split("=")[0] == pName) pVal = aParms[i].split("=")[1];
      }
  }
  else pVal = false;
  return pVal;
}


/* Meta Tags */
function writeMetaTags() {
  pgHTML +=
    '<meta name="keywords" content="' + aURL0[pgNumber][7] + '" />\n'+
    '<meta name="description" content="' + companyName0 + ' - ' + aURL0[pgNumber][8] + '" />\n'+
    '<meta name="robots" content="index,follow" />\n';
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Window Title */
function writeWiindowTitle() {
  pgHTML += '<title>' + superTitle + ' - ' + aURL0[pgNumber][0] + '</title>';
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Copyright link */
function insertCopyrigtLink() {
	if (pgNumber != 1) { // Copyright Page is always = 1 // Hide link to the same page
    pgHTML +=
      '<center><font face="verdana" size=1>'+
      'Copyright &copy; '+copyrtY+' <a class="lilnx" href="'+
      aURL0[1][1] + '?page=' + aURL0[1][6] + '&prt=' + prtFriendly +
      '" target="_self" onmouseover="window.status=\'' + aURL0[1][8] +
      '\';return true;" onmouseout="window.status=\''+companyName0+'\';return true;">'+
      companyName0 +
      '<\/a><br><br><\/font><\/center>';
   }
}


/* Page Image */
function writePageImage(pImgFullFileName, pImgTitle) {
  pgHTML +=
    '<table border=0><tr><td><img class="shadow7" src="' +
    pImgFullFileName +
    '" border="1" ';
  if (pImgTitle)
    pgHTML +=
      'alt="'+pImgTitle+'" title="'+pImgTitle+'"';
  pgHTML +=
    '/></td></tr>';
  if (pImgTitle)
    pgHTML +=
      '<tr><td><label class="imglabel">'+pImgTitle+'</label></td></tr>';
  pgHTML +=
   '</table>';
  with (document) write(pgHTML);
  pgHTML = '';
}


function hideEM (u, d, n) {
/* Hide email address from robots */
// u - email username portion
// d - email domain name portion
// n - a-href tag content (optional) not to show full email address
 	pgHTML +=
	'<a class="lilnx" target="_blank" href=\"mailto:'+u+'@'+d+'\" '+
	'onmouseover="window.status=\''+n+'\';return true;" '+
	'onmouseout ="window.status=\''+companyName0+'\';return true;">';

    if (!n)
   	  pgHTML += u+'@'+d;
    else
   	  pgHTML += n;
 	pgHTML +=  '</a>';
  with (document) write(pgHTML);
  pgHTML = '';
}


function writeiFrame (n, l, b, w, h, s, a) {
/* Write iframe */
  pgHTML =
	  '<iframe name="'  + n +
    '" frameborder="' + b +
    '" src="'         + l +
	  '" width="'       + w +
    '" height="'      + h +
    '" align="'       + a +
    '" scrolling="'   + s +
    '"></iframe>' ;
  with (document) { write(pgHTML); }
  pgHTML = '';
}


function setiFrameSize(n, w, h) {
/* Set iFrame size */
  var iFrameWin = window.frames[n];
  var iFrameEl = document.getElementById? document.getElementById(n): document.all? document.all[n]: null;
  if ( iFrameEl && iFrameWin ) {
    iFrameEl.style.height = "" + h + "px";
    iFrameEl.style.width  = "" + w + "px";
  }
}


function writeScriptLine (p, f) {
/* Write a JavaScript line */
  pgHTML =
    '<script type="text/javascript" src="' + p +
    f + '"></script>' ;
  with (document) { write(pgHTML); }
  pgHTML = '';
}

/* Setup Slideshow */
function setSlideShow(s, n) {
  var iFrameName   = 'slideshow';
  var iFrameLink   = '_sys_/slideshow/slideshow.htm?';
  var iFrameScroll = 'auto';
  var iFrameAlign  = 'center';
  var iFrameBorder = 0;

  if (isIE) {
    writeSlideShowLink(n);
    var iFrameWidth  = 0;
    var iFrameHeight = 0;
  }
  else {
    var iFrameWidth  = 620;
    var iFrameHeight = 400;
  }
  writeiFrame(iFrameName, iFrameLink + s, iFrameBorder, iFrameWidth, iFrameHeight, iFrameScroll, iFrameAlign);
}


/* Write Slideshow Link */
function writeSlideShowLink(n) {
  pgHTML =
    '<table align="center" border=0><tr><form name="ssform"><th align="center" valign="middle" class="flattbls">' +
    '<label class="sslabel">'+n+' Slideshow</label></th><td>' +
    '<input name="ssoc" type="image" name="ssimg" src="_sys_/layout/showopen.gif" onClick="setSlideShowLink(\'slideshow\',this); return false;" onsubmit="return false;" />' +
    '</td></form></tr></table>';
  with (document) { write(pgHTML); }
  pgHTML = '';
}


/* Close / Open Slideshow Link */
function setSlideShowLink(n, g) {
  if (isiFrameOpen) {
    setiFrameSize(n, 0, 0);
    g.src='_sys_/layout/showopen.gif';
    isiFrameOpen = false;
    }
  else {
    setiFrameSize(n, 620, 380);
    g.src='_sys_/layout/showclose.gif';
    isiFrameOpen = true;
    }
}


/* Write a Link as a Sub Array (i.e. element of main links array) */
function writeLinkAsSubArray(sA) {
/* sA - subarray */
	  pgHTML +=
     	'<a class="lilnx" href="';

      /* If it is external link or PDF, no page# or prt friendly mode */
      if (sA[1].indexOf('.pdf')==-1 && sA[1].indexOf('http://')==-1)
	  pgHTML +=
		  sA[1] + '?page=' + sA[6] + '&prt=' + prtFriendly;
	  else
	  pgHTML +=
		  sA[1];

      /* Open PDF files or external links in a new window */
      if (sA[1].indexOf('.pdf')==-1 && sA[1].indexOf('http://')==-1)
     	  pgHTML +=
          '" target="_self"';
      else
     	  pgHTML +=
          '" target="_blank"';

   	  pgHTML +=
        ' onmouseover="window.status=\'' + sA[8] + '\';return true;"'+
        ' onmouseout="window.status=companyName0;return true;"'+
        '>' + sA[0] + '</a>';

    with (document) { write(pgHTML); }
	  pgHTML = '';
}


/* Printer Friendly Version Link */
function insertPrtVerLink() {
  pgHTML +=
    '<a href="'+ aURL0[pgNumber][1]+ '?page=' + aURL0[pgNumber][6] + '&prt=1' +
    '" onmouseover="document.prtver.src=\'_sys_/layout/printerh.gif\';window.status=\'Switch to Printer friendly version\';return true;"'+
    ' onmouseout ="document.prtver.src=\'_sys_/layout/printer.gif\' ;window.status=companyName0;return true;">'+
    '<img name="prtver" src="_sys_/layout/printer.gif" '+
    'border="0" alt="Switch to Printer friendly version" title="Switch to Printer friendly version" /></a>';
}


function insertScrVerLink() {
/* Screen Friendly Version Link */
 	pgHTML +=
    '<a href="'+ aURL0[pgNumber][1]+ '?page=' + aURL0[pgNumber][6] + '&prt=0' +
    '" onmouseover="document.prtver.src=\'_sys_/layout/screenh.gif\';window.status=\'Switch to Screen version\';return true;"'+
   	' onmouseout ="document.prtver.src=\'_sys_/layout/screen.gif\' ;window.status=companyName0;return true;">'+
   	'<img name="prtver" src="_sys_/layout/screen.gif" '+
   	'border="0" alt="Switch to Screen version" title="Switch to Screen version" /></a>';
}


/**********************************************************/
/**********************************************************/
/**********************************************************/
/********   Functions with Site Specific details   ********/
/**********************************************************/
/**********************************************************/
/**********************************************************/

/* Write Page Top */
function writePageTop() {
  buildSbyDIV();
	if (isIE) standbyMessage('sbyDiv',1);
  writePageHeader();
  writePageFraming1();
  writePageTitle();
}


/* Page Framing - Part 1 */
function writePageFraming1() {

  var ctH;

  pgHTML +=
    '<table border="0" width="100%" cellspacing="2" cellpadding="2"><tr>';

if (prtFriendly==1) {
  ctH = document['body'].offsetHeight - 130;
  pgHTML +=
    '<td align="center" valign="bottom" height="100%" width="3" bgcolor="white">';
  insertScrVerLink();
}
else {
  ctH = document['body'].offsetHeight - 228;
  pgHTML +=
    '<td align="center" valign="bottom" height="100%" width="123" bgcolor="white" nobr>'+
    '<label class="lmenuspace">..............................</label>';
  insertPrtVerLink();
}
  pgHTML +=
    '</td><td align="center" valign="top" height="100%" width="100%">'+
    '<table class="ct" border="0" width="100%" height="100%" cellspacing="6" cellpadding="0"><tr>'+
    '<td align="left" width="100%" valign="top" style="height:'+ctH+'px;">';
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Page Framing - Part 2 */
function writePageFraming2() {
  pgHTML +=
    '</td></tr><tr><td height="30">';

  insertCopyrigtLink();

  pgHTML +=
    '</td></tr></table></td><td align="left" width="220" height="420" valign="top">'+
    '<table class="shadow7" border=0 cellspacing=0 cellpadding=0><tr><td>';
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Page Framing - Part 3 */
function writePageFraming3() {

pgHTML +=
    '</td></tr></table></td></tr><tr><td width="100%" colspan="3">'+
    '</td></tr></table>';

if (prtFriendly==0) {
  pgHTML +=
    '<table width="100%" height="22" border="0" cellspacing="0" cellpadding="0" '+
    'background="_sys_/layout/hbar.jpg"><tr>'+
    '<td width="140" nowrap="nowrap" align="center" valign="middle">';

  pgHTML +=
		'</td>'+
    '<td width="*" align="center" valign="middle">'+
    '<table height="21" border="0" cellspacing="0" cellpadding="0" width="100%"><tr>'+
    '<td width="50%">&nbsp;<\/td>';

  for (i = 0; i < aURLbtm.length; i++) {
 		if (pgNumber != aURLbtm[i][6]) { // Hide link to the same page
		 	pgHTML +=
			  '<td valign="middle" align="center" nowrap><a class="btm" href="' +
				aURLbtm[i][1];

			        pgHTML += '?page=' + aURLbtm[i][6] + '&prt=' + prtFriendly;

 				pgHTML +=
					'" onmouseover="window.status=\'' +
		  		aURLbtm[i][8] + '\';return true;" onmouseout="window.status=\'' +
		  		companyName0  + '\';return true;">&nbsp; &nbsp;' +
					aURLbtm[i][0] + '&nbsp; &nbsp;</a></td>';
				}
		}

  pgHTML +=
    '<td width=50%>&nbsp;<\/td><\/tr><\/table></td><td align="center" width="220"> </td></tr></table>';
}
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Write Page Middle */
function writePageMiddle() {
  writePageFraming2();
}


/* Write Page Bottom */
function writePageBottom() {
  writePageFraming3();
  if (isIE) standbyMessage('sbyDiv',0);
}


/* Page Header */
function writePageHeader() {
if (prtFriendly==0) {
  pgHTML +=
    '<table width="100%" height="100" border="0" cellspacing="0" cellpadding="0" bgcolor="#365373"><tr>'+
    '<a name="top">' +
    '<td width="130" height="100" nowrap="nowrap" rowspan="2" align="center" valign="middle" bgcolor="#FFFFFF">'+
    '<a href="'+ aURL0[0][1] + '?page=' + aURL0[0][6] + '&prt=' + prtFriendly + '" ' +
		'onmouseover="document.logo.src=\'_sys_/layout/logoh.jpg\';window.status=\''+aURL0[0][8]+'\';return true;" '+
    'onmouseout ="document.logo.src=\'_sys_/layout/logo.jpg\' ;window.status=companyName0;return true;">'+
    '<img name="logo" src="_sys_/layout/logo.jpg" width="100" '+
    'height="100" border="0" alt="'+aURL0[0][0]+'" title="'+aURL0[0][8]+'" /></a></td>'+
    '<td style="background-repeat: no-repeat;" width="540" height="60" align="left" valign="middle" '+
    'background="_sys_/layout/bgtop1.jpg"><label class="ln1">'+
    companyName1 +
    '</label></td><td height="60"> </td></tr><tr>'+
    '<td style="background-repeat: no-repeat;" height="40" align="left" valign="top" background="_sys_/layout/bgtop2.jpg"><label class="ln2">'+
    companyName2 +
    '</label></td><td height="40"> </td></tr><tr>'+
    '<td height="26" colspan="3" background="_sys_/layout/hbar.jpg"> </td></tr></table>';
  }
  else {
  pgHTML +=
    '<table width="100%" height="50" border="0" cellspacing="0" cellpadding="0"><tr>'+
    '<td width="30" height="50" nowrap align="center" valign="middle"></td>'+
    '<td width="50" height="50" nowrap="nowrap" align="center" valign="middle">'+
    '<a href="'+ aURL0[0][1] + '?page=' + aURL0[0][6] + '&prt=' + prtFriendly + '" '+
    'onmouseover="document.logo.src=\'_sys_/layout/logosmall.jpg\';window.status=\''+aURL0[0][8]+'\';return true;" '+
    'onmouseout ="document.logo.src=\'_sys_/layout/logosmall.jpg\' ;window.status=\''+companyName0+'\';return true;">'+
    '<img name="logo" src="_sys_/layout/logosmall.jpg" width="50" '+
    'height="50" border="0" alt="'+aURL0[0][0]+'" title="'+aURL0[0][8]+'" /></a></td>'+
    '<td width="100%" height="60" align="center" valign="middle" '+
    'bgcolor="#ffffff"><label class="ln2">'+
    companyName0 +
    '</td><td width="50" height="50" nowrap align="center" valign="middle"></td>'+
    '</tr><tr></table>';
  }
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Page Title */
function writePageTitle() {
  pgHTML +=
    '<table width="100%" height="34" border="0" cellspacing="4" cellpadding="0" bgcolor="#40668B">'+
    '<tr><th align="center" width="100%"><label class="pt">'+
    aURL0[pgNumber][0]+
    '</label></th></tr></table><br />';
  with (document) write(pgHTML);
  pgHTML = '';
}


/* Right-Side Image */
function writeRightSideImage(pImgFullFileName, pImgTitle) {
if (prtFriendly==0) {
  pgHTML +=
    '<img src="' +
    pImgFullFileName +
    '" width="200" height="400" border="1" alt="'+pImgTitle+'" title="'+pImgTitle+'" />';
  with (document) write(pgHTML);
  pgHTML = '';
  }
}

