// JavaScript code for DB/Text Web Publisher QBE screens
// DB/Text® WebPublisher, Copyright © 1998-2001, Inmagic, Inc., Woburn, MA, USA. All rights reserved.

var appletCount = 0;
var inputObjects = new Array(), inputNames = new Array();
var appletObjects = new Array(), appletNames = new Array();

var timerID = null;

var dbtw_dllcgi = "/dbtw-wpd/exec/dbtwpub.dll";
var dbtw_base_url = window.location;
var dbtw_server = window.location.protocol + "//" + window.location.host + dbtw_dllcgi;
var dbtw_action = "\"" + dbtw_dllcgi + "\"";
var dbtw_logo_loc="/dbtw-wpd/images/";

var dbtw_applet = "\"BrowserApplet.class\"";
var dbtw_applet_base;
if ( parseInt(navigator.appVersion, 10) < 4 )
   dbtw_applet_base = "\"/dbtw-wpd/applets/ww25\"";
else if ( (navigator.appName.indexOf("Netscape") >= 0) &&
            (parseInt(navigator.appVersion, 10) == 4) &&
            (navigator.appVersion.substring(2,3) == "0") &&
            (parseInt(navigator.appVersion.substring(2,5), 10) <= 6) )
   dbtw_applet_base = "\"/dbtw-wpd/applets/ww25\"";
else
   dbtw_applet_base = "\"/dbtw-wpd/applets/ww30\"";

var dbtw_noquery_msg = "No query criteria specified.";

// Variables to support translation
var dbtw_noquery_msg = "No query criteria specified.";

var dbtw_ww_width = 80;
var dbtw_ww_height = 30;
var dbtw_ww_label = "Word Wheel";

function dbtw_initialize(tb_name, bUsePassword, msg_file)
   {
   // tb_name, bUsePassword are unused, and are present to be compatible with generated HTML
   // msg_file, if present and not empty, supplies a message file
   var actMsgFile = "";
   if ((arguments.length >= 3) && (msg_file.length > 0))
      actMsgFile = "&MF=" + msg_file;

   // Support setting localized strings
   document.write("\r\n<SCRIPT LANGUAGE=\"JavaScript\" SRC=\"" + dbtw_dllcgi +
                  "?AC=APPLET_STRINGS" + actMsgFile + "\"></" + "SCRIPT>");
   }

// Not used in files generated by V5.0 and after; retained to support older files
function dbtw_body( bg_color, bg_image )
{
	var body_html = "\r\n\<BODY";
	if ( bg_color != "" )
		body_html += ( " BGCOLOR=#" + bg_color );
	if ( bg_image != "" )
	   if ( bg_image.indexOf("/") != -1 )
		   body_html += ( " BACKGROUND=\"" + bg_image + "\"" );
		else
		   body_html += ( " BACKGROUND=\"" + dbtw_logo_loc + bg_image + "\"" );
	body_html += " onLoad=\"dbtw_init_page()\" onUnload=\"dbtw_terminate_page()\">\r\n";
	document.write( body_html );
}

function dbtw_logo( logo_image )
{
   var logo_html;
   if ( logo_image.indexOf("/") != -1 )
	   logo_html = "\r\n\<IMG SRC=\"" + logo_image + "\">\r\n";
	else
	   logo_html = "\r\n\<IMG SRC=\"" + dbtw_logo_loc + logo_image + "\">\r\n";
	document.write( logo_html );
}

function dbtw_image_inline_extref( image )
{
	var image_html = "\r\n\<IMG SRC=\"" + image + "\">\r\n";
	document.write( image_html );
}

function dbtw_image_link_extref( image )
{
	var image_html = "\r\n\<A HREF=\"" + image + "\">"
								+ image + "</A>\r\n";
	document.write( image_html );
}

function dbtw_q_submit( form_obj )
{
   if ((navigator.appName == "Microsoft Internet Explorer") &&
       (navigator.appVersion.indexOf("3.0") >= 0))
      return true;
   var el_count = form_obj.elements.length;
   for ( var i=0; i<el_count; i++ )
      if ( form_obj.elements[i].name.substring(0, 2) == "QI" )
         if ( form_obj.elements[i].type.substring(0, 6) == "select" )
         {
            if ( form_obj.elements[i].options[form_obj.elements[i].selectedIndex].text != "" )
               return true;
         }
         else
         {
            if ( form_obj.elements[i].value != "" )
               return true;
         }
   alert( dbtw_noquery_msg );
   return false;
}

function dbtw_q_form()
{
	var form_html = "\r\n<FORM ACTION=" + dbtw_action +
						" METHOD=POST NAME=\"qbe_form\" onSubmit=\"return dbtw_q_submit(this)\">\r\n";
	document.write( form_html );
	var xc_html = "<INPUT TYPE=\"hidden\" NAME=\"XC\" VALUE=\"" + 
	               dbtw_dllcgi + "\">\r\n";
	document.write( xc_html );
	var url_html = "<INPUT TYPE=\"hidden\" NAME=\"BU\" VALUE=\"" + 
	               dbtw_base_url + "\">\r\n";
	document.write( url_html );
}

function dbtw_q_applet( input_name )
{
	var applet_html = "\r\n<td> <APPLET CODE=" + dbtw_applet +
	               " CODEBASE=" + dbtw_applet_base +
						" WIDTH=" + dbtw_ww_width + " HEIGHT=" + dbtw_ww_height + " ALIGN=TOP VSPACE=0" +
						" NAME=\"app_" + input_name + "\" MAYSCRIPT>\r\n";
	document.write( applet_html );

   var btnName_html = "\r\n<PARAM NAME=\"btnName\" VALUE=\"" + dbtw_ww_label + "\">";
	document.write( btnName_html );

	inputNames[appletCount] = input_name;
	appletNames[appletCount] = "app_" + input_name;
	appletCount++;
}


function checkApplets()
{
   var i = 0;
   var pasteStr = "";
   var currApplet = null;
   var currBox = null;
   var boxText = "";

	for (i = 0; i < appletCount; i++ )
	{
		currApplet = appletObjects[i];      
		pasteStr = currApplet.m_PasteStr;
		if (pasteStr != "")
		{
			currBox = inputObjects[i];
			if (currBox.value == "")
				boxText = pasteStr;
			else
				boxText = currBox.value + " / " + pasteStr;
			currBox.value = boxText;
			currApplet.m_PasteStr = "";
		}      
	}
	timerID = setTimeout("checkApplets()", 200);
}

function initApplet(currApplet)
{
   currApplet.ServerAddress = dbtw_server;

   var tmp, r, g, b;
   tmp = document.bgColor;
   r = "0x" + tmp.substring(1, 3);      
   g = "0x" + tmp.substring(3, 5);
   b = "0x" + tmp.substring(5, 7);
   currApplet.SetButtonBkColor(parseInt(r), parseInt(g), parseInt(b));                                 
}


function displayHelp()
{
   window.open("/dbtw-wpd/help/dws_ww.htm", "help", "scrollbars=1,resizable=1,width=600,height=300");   
} 


function dbtw_init_page()
{
	var appletIndex;
	var appletObject; 

	for (appletIndex = 0; appletIndex < appletCount; appletIndex++ )
	{
		inputObjects[appletIndex] = eval( "document.qbe_form." + inputNames[appletIndex] );
		
		if ((navigator.appName == "Microsoft Internet Explorer") &&
          (navigator.appVersion.indexOf("3.0") >= 0))
			appletObject = document.qbe_form.elements[appletNames[appletIndex]];
		else
   			appletObject = document.applets[appletNames[appletIndex]];

		appletObjects[appletIndex] = appletObject;
		initApplet( appletObject );
	}
	timerID = setTimeout("checkApplets()", 500);      
}

function dbtw_terminate_page()
{
	clearTimeout(timerID);
}