<?php
/*
 * index.html
 *
 * @(#) $Header: /home/mlemos/cvsroot/enanet/index.html,v 1.46 2021/03/15 05:07:38 mlemos Exp $
 *
 * E na Net service
 *
 * This information is CONFIDENTIAL and PROPRIETARY
 * (C) Copyright Manuel Lemos. All Rights Reserved.
 *
 * $Log: index.html,v $
 * Revision 1.46  2021/03/15 05:07:38  mlemos
 * Updated the code to work in PHP 7.
 *
 * Revision 1.45  1999/01/05 01:10:35  mlemos
 * Reduced the font size of the service brief text.
 * Made the chapter selection options appear only when as advanced options.
 * Rearranged the layout of the question form and the media quotes so that
 * they appear in the same level of the page.
 * Added a link to set the advanced options.
 * Made the message to encourage the addition of a bookmark and the link to
 * the order page appear below the question form.
 *
 * Revision 1.44  1999/01/04 20:02:52  mlemos
 * Added a ruler to separate media quotes from the input question form.
 *
 * Revision 1.43  1999/01/04 19:27:09  mlemos
 * Switch the order of the notice to encourage the user to add a bookmark to
 * the page.
 *
 * Revision 1.42  1998/10/26 18:52:42  mlemos
 * Moved the position of the E na Net service page anchor.
 *
 * Revision 1.41  1998/09/16 04:04:38  mlemos
 * Made the free word in the service briefing link to the begining of the
 * service question form.
 *
 * Revision 1.40  1998/08/06 17:58:36  mlemos
 * Made the main media quote nbe displayed at the top of the page.
 *
 * Revision 1.39  1998/08/06 15:12:44  mlemos
 * Replaced the static include statements by require statements.
 *
 * Revision 1.38  1998/07/11 00:39:43  mlemos
 * Made the book animation appear right next to the question form.
 *
 * Revision 1.37  1998/07/09 01:59:32  mlemos
 * Moved the book animation to near the question form.
 * Displayed a small thumb nail image of the book code in the place of the
 * book animation.
 *
 * Revision 1.36  1998/06/28 00:44:12  mlemos
 * Moved the Java script code to the end of the page HTML code.
 * Added code to validate the form preventing the users to enter empty
 * questions.
 *
 * Revision 1.35  1998/06/03 23:48:02  mlemos
 * Ensured that the question mark in the ask question form does not take space
 * larger than the question mark character.
 *
 * Revision 1.34  1998/05/30 18:46:46  mlemos
 * Made the briefing and the question parts of the pages grab the user
 * attention using flashing arrows.
 *
 * Revision 1.33  1998/05/30 03:57:08  mlemos
 * Made the message that encourages the users to add a bookmark to this page
 * to be displayed in a larger font.
 *
 * Revision 1.32  1998/05/25 00:15:14  mlemos
 * Made the service brief message appear in a table with a border.
 *
 * Revision 1.31  1998/05/24 03:46:04  mlemos
 * Made the book animation appear in a table cell with lighter background
 * color.
 *
 * Revision 1.29  1998/05/23 19:44:14  mlemos
 * Re-arranged the layout of the page to make it lighter.
 *
 * Revision 1.28  1998/05/23 04:16:27  mlemos
 * Adjusted the page to the new header layout.
 *
 * Revision 1.27  1998/05/14 23:28:32  mlemos
 * Added quotes to tag parameters that need it.
 *
 * Revision 1.26  1998/05/14 22:08:24  mlemos
 * Made the book animation appear on the right side of the service briefing
 * message.
 *
 * Revision 1.25  1998/04/27 22:56:48  mlemos
 * Added Javascript code to give the focus to the question from text input on
 * document load.
 * Removed the horizonatal rulers above and below the question submit button.
 *
 * Revision 1.24  1998/04/25 18:23:19  mlemos
 * Fixed Weblint complaints.
 *
 * Revision 1.23  1998/04/22 19:04:12  mlemos
 * Incresed the emphasis to the book link and the question text input label.
 *
 * Revision 1.22  1998/04/19 22:09:10  mlemos
 * Made the link to the book page be a simple link.
 * Made the links to put the question about bookmarks be generated by
 * EnaNetMakeQuestionLinkString function.
 *
 * Revision 1.21  1998/04/16 03:51:29  mlemos
 * Added support to forward the selected chapters between pages.
 *
 * Revision 1.20  1998/04/15 00:19:23  mlemos
 * Moved the code to list the chapters table to the EnaNetListChapters function.
 *
 * Revision 1.19  1998/04/13 22:02:05  mlemos
 * Made the chapters be unselected by default.
 * Added a message to tell that if no chapters are selected the search is done
 * on all chapters.
 *
 * Revision 1.18  1998/04/13 04:13:05  mlemos
 * Added support to select from which chapters the extracts found will be
 * listed.
 *
 * Revision 1.17  1998/04/07 22:48:17  mlemos
 * Made the links in the message that encourages to add a bookmark appear in
 * form of explicit question.
 *
 * Revision 1.16  1998/04/04 22:01:46  mlemos
 * Added a message to encourage users to add bookmarks to this page.
 *
 * Revision 1.15  1998/04/04 18:58:58  mlemos
 * Made the word free appear with great 'realce'.
 *
 * Revision 1.14  1998/04/01 18:27:06  mlemos
 * Removed an argument that was in excess in LibraryFormEnd call.
 *
 * Revision 1.13  1998/03/30 05:42:23  mlemos
 * Corrected the display of a form cell table to be centered by LibraryCenter
 * function.
 *
 * Revision 1.12  1998/03/29 22:36:42  mlemos
 * Made the page identifier be passed to the EnaNetCheckAuthorization function.
 *
 * Revision 1.11  1998/03/26 21:44:52  mlemos
 * Included the accounts.php3 source.
 * Made authorization check retrieve the accessing USER name.
 *
 * Revision 1.10  1998/03/26 02:01:27  mlemos
 * Added a call to EnaNetCheckAuthorization function.
 *
 * Revision 1.9  1998/03/24 14:57:23  mlemos
 * Reduced the font sizes for the book title and form labels.
 *
 * Revision 1.8  1998/03/24 14:51:41  mlemos
 * Changed the EnaNetHeader call to EnaNetLocaleHeader.
 *
 * Revision 1.7  1998/03/20 00:21:10  mlemos
 * Made the link to the book page be done by LibraryMakeLinkString function.
 *
 * Revision 1.6  1998/03/19 17:39:12  mlemos
 * Added parameter to indicate what page is being presented when calling
 * EnaNetHeader function.
 *
 * Revision 1.5  1998/03/19 01:18:50  mlemos
 * Turned the book title into a link.
 * Removed the book author name.
 *
 * Revision 1.4  1998/03/19 01:02:03  mlemos
 * Changed the calls to LibraryFooter to EnaNetFooter.
 *
 * Revision 1.3  1998/03/17 00:45:10  mlemos
 * Moved the page header code to the enanet.php3 source.
 * Moved the text  that asks for a question to near the input control.
 *
 * Revision 1.2  1998/03/10 01:03:14  mlemos
 * Added code to present the input question form.
 *
 * Revision 1.1  1998/03/09 18:48:26  mlemos
 * initial sources.
 *
 *
 *
 */

	require("globals.php3");
	require("locale.php3");
	require("library.php3");
	require("accounts.php3");
	require("enanet.php3");
	$authorized_user=EnaNetCheckAuthorization("","start");
	$onload="DocumentLoad()";
	EnaNetLocaleHeader("","start");
?>
<TABLE>
<TR>
<TD>
<?php
	LibraryCenter("TABLE","BORDER");
?>
<TR>
<?php
	echo "<TD BGCOLOR=\"$background_lighter\">";
?>
<TABLE>
<TR>
<TD WIDTH="0%">
<?php
	LibraryMakeSimpleImageLink("","the_book.html","cover_small_thumb.jpg",sprintf(LocaleText("the-book"),LocaleText("book-title")));
?>
</TD>
<?php
	LibraryCenter("TD","");
?><FONT SIZE="+0"><?php
	$book_title=LibraryMakeSimpleLinkString(LocaleText("book")." &#171;".LocaleText("book-title")."&#187;","the_book.html","");
	printf(LocaleText("service-brief"),"<FONT SIZE=\"+1\"><B>".LibraryMakeSimpleLinkString(LocaleText("Free"),"#ask-question","")."</B></FONT>","<FONT SIZE=\"+1\"><B>$book_title</B></FONT>");
?></FONT><?php
	LibraryCenterEnd("TD");
?>
</TR>
</TABLE>
</TD>
</TR>
<?php
	LibraryCenterEnd("TABLE");
?>
</TD>
<TD WIDTH="0%">
<?php
	LibraryImage("briefing-arrow.gif",LocaleText("look-at-this"));
?>
</TD>
</TR>
</TABLE>
<?php
	EnaNetHeaderEnd();
?>
<A NAME="ask-question"><!-- --></A>
<?php
	LibraryFormStartNamedSubmit("ask_question.html","questionForm","return SubmitQuestion()");
	if(IsSet($advanced))
	{
		$listed_chapters=array();
		if(IsSet($chapters)
		&& GetType($chapters)=="array")
		{
			for($chapter=0;$chapter<count($chapters);$chapter++)
			{
				if(IsSet($chapter_numbers[$chapters[$chapter]]))
					$listed_chapters[$chapter_numbers[$chapters[$chapter]]]=1;
			}
		}
		EnaNetListChapters($listed_chapters,LocaleText("select-chapters"),LocaleText("no-selected-chapters"),1);
?>
<BR>
<?php
	}
	LibraryCenter("TABLE","WITDH=\"100%\"");
?>
<TR>
<?php
	echo "<TD VALIGN=top",(IsSet($advanced) ? "" : " WIDTH=\"50%\""),">";
	LibraryCenter("TABLE","");
?>
<TR>
<?php
	echo "<TD ALIGN=right><B><FONT SIZE=\"+1\">",LocaleText("type-a-question"),":</FONT></B></TD>";
?>
<TD>
<TABLE>
<TR>
<TD><FONT SIZE="+1"><INPUT TYPE=text NAME=question></FONT></TD>
<TD WIDTH="0%"><FONT SIZE="+1">?</FONT></TD>
</TR>
</TABLE>
</TD>
</TR>
<TR>
<TD COLSPAN=2></TD>
</TR>
<TR>
<?php
	LibraryCenter("TD","COLSPAN=2");
?><FONT SIZE="+1"><?php
	echo LocaleText("use-this-button");
	LibraryFormSubmit(LocaleText("submit-question"));
	echo " ";
	LibraryImage("question-arrow.gif",LocaleText("look-at-this"));
?></FONT><?php
	LibraryCenterEnd("TD");
?>
</TR>
<?php
	if(!IsSet($advanced))
	{
?>
<TR>
<?php
		LibraryCenter("TD","COLSPAN=2");
		$values["0,NAME"]="advanced";
		$values["0,VALUE"]=1;
		echo LibraryMakeLinkString(LocaleText("advanced-options"),"index.html","",1,$values);
		LibraryCenterEnd("TD");
?>
</TR>
<?php
	}
	LibraryCenterEnd("TABLE");
?>
<BR>
<?php
	LibraryCenter("TABLE","BORDER");
?>
<TR>
<?php
	LibraryCenter("TD","BGCOLOR=\"$background_lighter\"");
	$book_marks_link=EnaNetMakeQuestionLinkString(sprintf(LocaleText("what-are"),LocaleText("bookmarks")),LocaleText("bookmarks"));
	if(($book_marks_english=LocaleText("bookmarks-english"))!="")
		$book_marks_link.="/".EnaNetMakeQuestionLinkString(sprintf(LocaleText("what-are"),$book_marks_english),$book_marks_english);
?><FONT SIZE="+1"><?php
	printf(LocaleText("add-to-bookmarks"),LocaleText("bookmarks"),sprintf(LocaleText("what-are"),$book_marks_link));
?></FONT><?php
	LibraryCenterEnd("TD","");
?>
</TR>
<?php
	LibraryCenterEnd("TABLE");
?>
<BR>
<?php
	EnaNetDisplayOrderMessage(1);
?>
</TD>
<?php
	if(!IsSet($advanced))
	{
?>
<TD WIDTH="50%">
<?php
		LibraryCenter("TABLE","BORDER");
?>
<TR>
<?php
		echo "<TD BGCOLOR=\"$background_darker\">";
		LibraryCenter("TABLE","");
?>
<TR>
<TD>
<?php
		echo LibraryImage("book-animation.gif",LocaleText("look-at-this"));
?>
</TD>
<?php
		LibraryCenter("TD","BGCOLOR=\"$background_darker\"");
		echo "<B><FONT SIZE=\"+1\">",sprintf(LocaleText("the-press-said"),LibraryMakeSimpleLinkString("&#171;".LocaleText("book-title")."&#187;","the_book.html","")),"</FONT></B>";
		LibraryCenterEnd("TD");
?>
</TR>
<?php
		LibraryCenterEnd("TABLE");
		EnaNetDisplayQuotes(0,0);
?>
</TD>
</TR>
<?php
		LibraryCenterEnd("TABLE");
?>
</TD>
<?php
	}
?>
</TR>
<?php
	LibraryCenterEnd("TABLE");
	LibraryFormEnd();
?>
<SCRIPT LANGUAGE=Javascript TYPE="text/javascript">
<!--

function SubmitQuestion()
{
	if(document.questionForm.question.value=="")
	{
		alert("<?php
	echo LocaleText("no-question-entered");
?>")
		document.questionForm.question.focus()
		return false
	}
	else
		return true
}

function DocumentLoad()
{
	document.questionForm.question.focus()
}

//-->
</SCRIPT>
<?php
	EnaNetFooter();
?>