Thanks alot kayleigh!!!!I was able to get the start\end times to work. Now all I need is to get the date on it. Here is what I did to get it working with the oldstyle:
Calendar.pl code added in BOLD:
# Call-back method to get events
*Template::getEvents = \&getEvents;
*Template::getEvent = \&getEvent;
*Template::getEvent2 = \&getEvent2;
Find the subroutine "getEvent", below it add this new subroutine:
code:
--------------------------------------------------------------------------------
###################################################
# Subroutine called by Template to get the schedule
###################################################
sub getEvent2 {
my ($id2) = @_; my ($db2) = new DBFile($schedule_db);
my ($event2) = $db2->getRecord( {'event_id'=>$id2 } );
return $event2;
}
Event_detail.html code added in BOLD:
----Code located at top------
<%
$VIEW = "EVENT";
$EVENT = &getEvent($in{'event_id'});
$db = new DBFile($main::events_db);
$EVENT2->{'schedule'} = &getEvent2($in{'event_id'});
$fields = &main:: DBGetFieldsInDisplayOrder($db);
%>
----Code Located near bottom-------
<TABLE BORDER="0" CELLPADDING="2" CELLSPACING="0">
<!-- START Time Code -->
<SPAN CLASS="text"><TR><TD ALIGN="right" VALIGN="top"><B>Time:</B></TD>
<TD ALIGN="left" VALIGN="top">
<%
if ( $event->{'schedule'}->{'all_day'})
{
print "All Day"; }
else { print &Date::formatTime($EVENT2->{schedule}->{start_time},$Config->get("time_format")), " - ", &Date::formatTime($EVENT2->{schedule}->{end_time} , $Config->get("time_format")); }
%>
</TD></TR></SPAN>
<!-- End Time Code -->
[This message has been edited by Krypto (edited August 05, 2002).]
[This message has been edited by Krypto (edited August 05, 2002).]
[This message has been edited by Krypto (edited August 05, 2002).]
[This message has been edited by Krypto (edited August 05, 2002).]