#-----------------------------------------------
# Configuration Parameters for the WDB script.
#-----------------------------------------------
$formdir       = "$CONFIG_DIR/fdf";  	# Dir. with form definition files
$user          = '???';                 # Database user.
$pswd          = '???';                 # Password for database user.
$server        = 'SYBASE';              # Database server.
$MAIN_MENU     = "/";                   # Main menu of other forms.("homepage")
$WDB_HTML      = "/wdb";		# URL to WDB HTML files 
$IMAGEDIR      = $WDB_HTML;	    	# Directory with the *_btn.gif files
$QUERY_HELP    = "$WDB_HTML/wdb_query_help.html";
$MAXROWCOUNT   = 150;                   # Max allowed value of $rowcount
$rowcount      = 50;                    # Max number of rows returned.
$DATEFORMAT    = "dmy";                 # Date format : European.
$NULL_VALUE    = "";                    # The value to display for NULL fields
%SPEC_NULL     = ( 'int', -2147483647,  # Special null values.
                   'smallint', -32768,
                   'i4', -2147483647,
                   'i2', -32768 );
$DBI_FILE      = 'syb_dbi.pl';		# Database Interface : Sybase (sybperl)

$debugfile     = "/tmp/WDB.log";
# $debug = 'debug';			# Debug - disabled.

unshift(@INC, "/usr/server/arc/lib/perl");  # Perl library ( for "cgi-lib.pl" )

#---------------------------------
# Setup some standard HTML texts.
#---------------------------------
$helptext="
            <TITLE>WDB - WWW DataBase interface</TITLE>
            <H1>WDB - WWW DataBase interface</H1>

            An error occured during the execution of WDB, if you have problems
            understanding why this error occured please contact
            bfrasmus@eso.org.
            <hr>
";

sub html_tail
{
    $form{'COMMENTS_TO'} = "bfrasmus@eso.org" unless $form{'COMMENTS_TO'} ;

    print <<END_HTML
            <hr>
            <a href=\"http://arch-http.hq.eso.org/bfrasmus/wdb/wdb.html\">
            $version</a>
            - $rel_date ......
            <a href=\"http://arch-http.hq.eso.org/cgi-bin/comments/$form{'COMMENTS_TO'}/wdb_form:$form{'NAME'}\">
            Send comments</a> to <i>$form{'COMMENTS_TO'}</i>
END_HTML
}

#---- End of File - Please don't edit below this line ----
1;