";
// event table format with columnheadings
echo "
";
echo "
Date
Time
Speaker/Title
";
$row_count = 1;
$class1 = "d1";
$class2 = "d2";
$last_date="";
// find all candidate Colloquium Events with "Colloq" in their WebEvent title,
// extract in date order by descending WebEvent ID order to handle modified titles
$result = mysql_query("SELECT * from events where title LIKE '%Colloq%' order by year asc, month asc, day asc, id desc");
if (!$result) {
$message = 'Invalid query: ' . mysql_error() . "\n";
$message .= 'Whole query: ' . $query;
die($message);
}
while ($WebEventrow = mysql_fetch_array($result))
{
$venue = "";
$rowclass = ($row_count % 2) ? $class1 : $class2; // colorize bacground in alternate rows
// decode ASCII hex symbol characters in WebEvent strings
$newtitle = rawurldecode($WebEventrow[title]); //convert WebEvent storage format back to readable text
$newdescr = rawurldecode($WebEventrow[description]);
// translate WebEvent calendar numbers to Charlottesville locations
//
// if ($WebEventrow[cal] == 38) {$venue="U.Va.";}
// if ($WebEventrow[cal] == 11) {$venue="ER-Aud";}
// if ($WebEventrow[cal] == 12) {$venue="ER-311";}
// if ($WebEventrow[cal] == 57) {$venue="ER-230";}
//
// screen out placeholder entries, remote colloquia and room preparation
if
(
(($WebEventrow[cal] == 11) || ($WebEventrow[cal] == 57)) && // event in ER Auditorium or ER-230
(($WebEventrow[gmt_end] > $WebEvent_gmt_now)) && // event not in past
(!(strpos($newtitle,"NO TALK") > 0)) &&
(!(strpos($newtitle,"No talk") > 0)) &&
(!(strpos($newtitle,"rep-time") > 0 )) &&
(!(strpos($newtitle,"TBA") > 0 )) &&
(!(strpos($newtitle,"B Colloq") > 0)) && // exclude GB in Aud or 230 by video
(!(strpos($newtitle,"OC Colloq") > 0)) && // exclude AOC in Aud or 230 by video
(!(strpos($newtitle,"No colloq") > 0)) &&
(!(strpos($newtitle,"No Colloq") > 0)) &&
(!(strpos($newtitle,"lloquium Preparation") > 0)) // exclude preparation time reservations
)
{
$cday = new_date("l",$WebEventrow[gmt_start],"-0500"); // get weekday of colloquium from WebEVent
$cdate = new_date("F d, Y",$WebEventrow[gmt_start],"-0500"); // Month, day, year of colloquium from WebEvent
$ctime = new_date("h:i a",$WebEventrow[gmt_start],"-0500"); // start of colloquium (Eastern time) from WebEvent
$speakerpos = strpos($newtitle," by ") + 4; // find speaker and title text after " by "
$speaker = substr($newtitle,$speakerpos); // speaker/title string
if (($speaker == '') || ($speakerpos == 4)) {$speaker = 'TBD';} // no talk arranged yet
if ((!($cday == 'Thursday')) || (!($ctime == '04:00 pm'))) // red display if not at default time/day
{$fontcolor = 'Red';} else
{$fontcolor = 'Black';}
if (!($cday == 'Thursday')) // note unusual day
{$NBDayText = ' NOTE DAY';} else
{$NBDayText = ' ';}
if (!($ctime == '04:00 pm')) // note unusual time
{$NBTimeText = ' NOTE TIME';} else
{$NBTimeText = ' ';}
// write the entry as a row in the table
if (!(($cdate == $last_date))) // if not duplicate of higher ID
{
printf ("
%s %s %s
%s %s
%s
",
$cday,
$cdate, $NBDayText,
$ctime, $NBTimeText,
$speaker
// $WebEventrow[custom2] video hub identifier if needed
);
$last_date = $cdate;
$row_count++;
} // end if
}
}
echo "
\n";
include ("cv_colloquium_footer.html");
include ("../../../common/nrao-end.html"); // NRAO footer
?>