#!/usr/bin/perl
#YOUSEF RABAH
#Search Generator
#Thursday, December 05, 2002
#for WEBDB use


use DBI;
use utility;
use db;
my $sql;

#------------------------------------------- 

$filename = "../php/courseSearchDepartments.php";
open (OUT, ">$filename") || die "cant open $filename";

$sql = "select distinct department.dept_code, department.dept_name from department, course " ;
$sql .= "where department.dept_code = course.department_code and course.campus='E'order by department code " ;
($status, @rows) = runSQLSelect($sql);



if ($status >= 1) {
    for (my $i=0; $i < $status; $i++) {
	$dept_code  = $rows[$i][0];
	$dept_name  = $rows[$i][1];
	
	print OUT "<option value='$dept_code'>$dept_name</option>";
    }
}
close (OUT) || die "cant close $filename";

#-------------------------------------------   

$filename = "../php/courseSearchTimes.php";
open (OUT, ">$filename") || die "cant open $filename";

$sql  = "select course_start_time_banner.start_time from course_start_time_banner";
($status, @rows) = runSQLSelect($sql);


if ($status >= 1) {
    for (my $i=0; $i < $status; $i++) {
	$start_time  = $rows[$i][0];
		
	print OUT "<option value='$start_time'>$start_time</option>";
	}
}
close (OUT) || die "cant close $filename";

#-------------------------------------------   

$filename = "../php/courseSearchDivisions.php";
open (OUT, ">$filename") || die "cant open $filename";

$sql = "select division_banner.division_code, division_banner.division_desc from division_banner";
($status, @rows) = runSQLSelect($sql);


if ($status >= 1) {
    
    for (my $i=0; $i < $status; $i++) {
	
	$div_code  = $rows[$i][0];
	$div_name  = $rows[$i][1];
	
	print OUT "<option value='$div_code'>$div_name</option>";
    }
}
close (OUT) || die "cant close $filename";

#-------------------------------------------   

$filename = "../php/courseSearchSections.php";
open (OUT, ">$filename") || die "cant open $filename";

$sql = "select s.session_desc from session_banner s";
    ($status, @rows) = runSQLSelect($sql);


if ($status >= 1) {
    for (my $i=0; $i < $status; $i++) {
	
	$session_desc  = $rows[$i][0];
	
	print OUT "<option value='$session_desc'>$session_desc</option>";
    }
}
close (OUT) || die "cant close $filename";

#-------------------------------------------