\n";
echo "\n";
echo "\n";
echo "| ". $current_module_strings['LBL_WEEK'] ." | \n";
$WeekDayName=array('LBL_SM_SUN','LBL_SM_MON','LBL_SM_TUE','LBL_SM_WED','LBL_SM_THU','LBL_SM_FRI','LBL_SM_SAT');
for ( $i = $current_user->weekstart;$i<=6;$i++ ) {
echo "". $current_module_strings[$WeekDayName[$i]] ." | \n";
}
for ( $i = 0;$i<$current_user->weekstart;$i++ ) {
echo "". $current_module_strings[$WeekDayName[$i]] ." | \n";
}
echo " \n";
$ts = mktime(12,0,0,$m,1,$y);
$today=Date("Ymd",time());
/* Back to last weekstart before ts */
while ( Date("w",$ts) != $current_user->weekstart ) {
$ts -= 86400;
}
$go = 1;
$a = 0;
$w = 0;
while ( $go == 1 ) {
$wd = Date("w",$ts);
$xd = Date("j",$ts);
$xxd = Date("d",$ts);
$xm = Date("n",$ts);
$xy = Date("Y",$ts);
if ( $wd == $l->user->weekstart ) {
# new week
echo "\n";
$w0 = (( 1 + Date("w",mktime(12,0,0,1,1, Date("Y",$ts) ) )) % 7) > 3;
$wn = sprintf("%02d", Round( (Date("z",$ts)+7 ) / 7) );
echo " | ". $wn ." | \n";
}
$col = "";
if ( $today == Date("Ymd",$ts) )
{
$col = "today";
}
else if ($wd == 0 )
{
$col = "holiday";
}
else if ($wd == 6 )
{
$col = "freeday";
}
else if ($xm != $m )
{
$col = "otherday";
}
else
{
$col = "appday";
}
//For displaying the class - included by Jaguar
if($xm !=$m)
{
echo "\n";
}
else
{
$tdavl=" | ". $xxd ."";
// added by raj
/* Select appointments for this day */
$from = new DateTime();
$to = new DateTime();
$from->setDateTimeTS($ts - 12 * 3600);
$to->setDateTimeTS($ts - 12 * 3600);
#$to->addDays(7);
$pref->callist = array();
$app = new appointment();
$app->readCal($pref,$from,$to);
// appointment::readCal($pref,$from,$to);
$dd = new DateTime();
# $d = strftime($lang['DateFormatStr'],$ts);
$dd->setDateTimeTS($ts);
$d = $dd->getDate();
$tref = Date("Ymd",$ts);
$eventclass=$col;
if(count($pref->callist)!=0)
{
//Classes are provided when events are created - Jaguar
if($col == "today")
$eventclass="todayevent";
else
$eventclass="eventbold";
}
$tdavl.=$eventclass."\">\n";
echo $tdavl; //displaying the td - Jaguar
//Display Date with link, move here from above to get tref date format
if ($col=="today")
{
echo "". $xxd ."";
}
else
{
echo "". $xxd ."" ;
}
//
$next = NextDay($ts);
# Check for workday
if ( ! $dd->isWorkDay($pref) ) {
$ts = $next;
$day++;
continue;
}
$dinfo = GetDaysInfo($ts);
$hastable = 0;
$a = 0;
//
}
else
{
echo " ";
}
#echo " ". $xxd ."";
echo " | \n";
if ( $wd == ($l->user->weekstart+6)%7 ) {
# end week
echo " \n";
if ( ($xm > $m) || ($xy > $y) ) {
break;
}
}
$a++;
$w++;
$ts += 86400;
}
if ( $n == 1 ) {
echo "| NONE |
|---|
";
}
echo " \n";
echo " |
![](\"".$image_path."left.gif\")
![](\"".$image_path."right.gif\")