// JavaScript code for Inmagic's Web Single-Record Display
// Copyright © 1998-2004 Inmagic, Inc., Woburn, MA, USA. All rights reserved.

var   dbtw_params       = "";
var   query_string      = "";
var   wp_server         = window.location.protocol + '//' + window.location.host;
var   gsb_browserIsIE   = (navigator.appName == "Microsoft Internet Explorer");

function dbtw_form_change(select_object, action, params)
   {
   var new_form = escape( select_object.options[select_object.selectedIndex].text );
   var i = new_form.indexOf( "+" );
   while ( i >= 0 )
   {
	   new_form = new_form.substring( 0, i ) +
	               "%2B" +
	               new_form.substring( i+1, new_form.length );
	   i = new_form.indexOf( "+" );
	}

   var form_key = "DF=";
   var n1 = params.indexOf( form_key );
   var n2 = n1 + form_key.length;
   var n3 = params.indexOf( "&", n2 );
   var n4 = params.length;
   var form_change_url = action + "?AC=CHANGE_DISPLAY" +
                           params.substring( 0, n2 ) +
                           new_form +
                           params.substring( n3, n4 );
	window.location.href = form_change_url;
   }

function dbtw_prev(prev_url)
   {
	window.location.href = prev_url;
   }

function dbtw_next(next_url)
   {
	window.location.href = next_url;
   }

function dbtw_new_search(query_url)
   {
	window.location.href = query_url;
   }

function dbtw_init_page()
   {
   setCookieEx('erc_state','');
   }

function dbtw_terminate_page()
   {
   }

function escapeEx(sz)
   {
	return ('z' + sz.replace(/[{$,%,',`,@,{,},~,!,#,(,),&,^,+,\,,=,\[,\], ]/g,"_"));
   }

function setCookie(sCookieName, sValue, iMinutesToSave)
   {
   if (!navigator.cookieEnabled)
      return;

   sCookieName = escape(sCookieName);
   sValue = escape(sValue);

   var sExpires = "";
   var sCookie  = "";

   if (iMinutesToSave == -1)
      return;
   else if (iMinutesToSave > 0)
      {
      var exp = new Date();
      var newExpTime = exp.getTime() + ( iMinutesToSave * 60 * 1000 );
      exp.setTime(newExpTime);
      sExpires = "; expires=" + exp.toGMTString();
      }
   else if (iMinutesToSave == -2)
      {
      var nextYear = new Date();
      nextYear.setFullYear(nextYear.getFullYear() + 1);
      sExpires = "; expires=" + nextYear.toGMTString();
      }
   sNewCookie = sCookieName + "=" + sValue + sExpires + "; path=/";
   document.cookie = sNewCookie;
   }

function setCookieEx(sCookieName, sValue)
   {
   if (!navigator.cookieEnabled)
      return;
   if (!gsb_browserIsIE)
      setCookie(sCookieName, sValue, 0)
   else if (!document.all.uData)
      setCookie(sCookieName, sValue, 0)
   else
      {
      sValue = escape(sValue);
      if (sValue.length > 65000)
         return;
      sCookieName = escapeEx(sCookieName);
   	uData.setAttribute(sCookieName,sValue);
   	uData.save("uData");
      }
   }