interface/main/calendar/modules/PostCalendar/pntemplates/default/views/day/orig_default.html

   1 [-*Smarty*-]
   2 [-*****************************************************************************-]
   3 [-* Copyright (C) 2005-2006 Rod Roark <rod@sunsetsystems.com> and others      *-]
   4 [-*                                                                           *-]
   5 [-* LICENSE: This program is free software; you can redistribute it and/or    *-]
   6 [-* modify it under the terms of the GNU General Public License               *-]
   7 [-* as published by the Free Software Foundation; either version 3            *-]
   8 [-* of the License, or (at your option) any later version.                    *-]
   9 [-* This program is distributed in the hope that it will be useful,           *-]
  10 [-* but WITHOUT ANY WARRANTY; without even the implied warranty of            *-]
  11 [-* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the              *-]
  12 [-* GNU General Public License for more details.                              *-]
  13 [-* You should have received a copy of the GNU General Public License         *-]
  14 [-* along with this program. If not,                                          *-]
  15 [-* see <http://opensource.org/licenses/gpl-license.php>;.                    *-]
  16 [-*****************************************************************************-]
  17 [-* @package OpenEMR                                                          *-]
  18 [-* @author Rod Roark <rod@sunsetsystems.com>                                 *-]
  19 [-* @author Roberto Vasquez <robertogagliotta@gmail.com>                      *-]
  20 [-* @link http://www.open-emr.org                                             *-]
  21 [-*                                                                           *-]
  22 [-*****************************************************************************-]
  23 [-config_load file="default.conf"-]
  24 [-*Load the Language Definitions*-]
  25 [-config_load file="lang.$USER_LANG"-]
  26 [-include file="$TPL_NAME/views/header.html"-]
  27 [-* we want to include out stylesheet for this view*-]
  28 [-fetch file="$TPL_STYLE_PATH/day.css" assign="css"-]
  29 [-eval var=$css-]
  30
  31 <style>
  32 a {
  33  text-decoration:none;
  34 }
  35 td {
  36  font-family: Arial, Helvetica, sans-serif;
  37 }
  38 .tacell {
  39  font-size:10pt;
  40  background-color:#ddffdd;
  41  text-align:right;
  42 }
  43 .tucell {
  44  font-size:10pt;
  45  background-color:#ffbbbb;
  46  text-align:right;
  47 }
  48 .eacell {
  49  font-size:10pt;
  50  background-color:#ffffff;
  51 }
  52 .eucell {
  53  font-size:10pt;
  54  background-color:#ffbbbb;
  55 }
  56 .bordyy {
  57 }
  58 .bordyn {
  59  border-top-width:0px;
  60  padding-top:0px;
  61 }
  62 .bordny {
  63  border-bottom-width:0px;
  64  padding-bottom:0px;
  65 }
  66 .bordnn {
  67  border-top-width:0px;
  68  border-bottom-width:0px;
  69  padding-top:0px;
  70  padding-bottom:0px;
  71 }
  72 div.tiny { width:1px; height:1px; font-size:1px; }
  73 </style>
  74
  75 <style type="text/css">@import url(../../../library/dynarch_calendar.css);</style>
  76 <script type="text/javascript" src="../../../library/dialog.js?v=[-php-] echo $v_js_includes; [-/php-]"></script>
  77 <script type="text/javascript" src="../../../library/textformat.js"></script>
  78 <script type="text/javascript" src="../../../library/dynarch_calendar.js"></script>
  79 [-php-] include_once("{$GLOBALS['srcdir']}/dynarch_calendar_en.inc.php"); [-/php-]
  80 <script type="text/javascript" src="../../../library/dynarch_calendar_setup.js"></script>
  81
  82 <script language='JavaScript'>
  83
  84  var mypcc = '[-php-] echo $GLOBALS['phone_country_code'] [-/php-]';
  85
  86  // This is called from the event editor popup.
  87  function refreshme() {
  88   top.restoreSession();
  89   document.forms[0].submit();
  90  }
  91
  92  function newEvt(startampm, starttimeh, starttimem, eventdate, providerid, catid) {
  93   dlgopen('add_edit_event.php?startampm=' + startampm +
  94    '&starttimeh=' + starttimeh + '&starttimem=' + starttimem +
  95    '&date=' + eventdate + '&userid=' + providerid + '&catid=' + catid,
  96    '_blank', 775, 500);
  97  }
  98
  99  function oldEvt(eventdate, eventid) {
 100   dlgopen('add_edit_event.php?date='+eventdate+'&eid=' + eventid, '_blank', 775, 500);
 101  }
 102
 103  function goPid(pid) {
 104   top.restoreSession();
 105 [-php-]
 106                   echo "  top.RTop.location = '../../patient_file/summary/demographics.php' " .
 107                    "+ '?set_pid=' + pid;\n";
 108 [-/php-]
 109  }
 110
 111  function GoToToday(theForm){
 112   var todays_date = new Date();
 113   var theMonth = todays_date.getMonth() + 1;
 114   theMonth = theMonth < 10 ? "0" + theMonth : theMonth;
 115   theForm.jumpdate.value = todays_date.getFullYear() + "-" + theMonth + "-" + todays_date.getDate();
 116   top.restoreSession();
 117   theForm.submit();
 118  }
 119
 120 </script>
 121
 122 <!-- Required for the popup date selectors -->
 123 <div id="overDiv" style="position:absolute; visibility:hidden; z-index:1000;"></div>
 124
 125 [-php-]
 126
 127  // A_CATEGORY is an ordered array of associative-array categories.
 128  // Keys of interest are: id, name, color, desc, event_duration.
 129  //
 130  // echo "<!-- A_CATEGORY = "; print_r($this->_tpl_vars['A_CATEGORY']); echo " -->\n"; // debugging
 131  // echo "<!-- A_EVENTS = "; print_r($this->_tpl_vars['A_EVENTS']); echo " -->\n"; // debugging
 132
 133  $A_CATEGORY  =& $this->_tpl_vars['A_CATEGORY'];
 134
 135  // [-if $PRINT_VIEW != 1-]
 136  // [-*Main Navigation*-]
 137  // [-include file="$TPL_NAME/views/global/navigation.html"-]
 138  // [-/if-]
 139
 140  $A_EVENTS  =& $this->_tpl_vars['A_EVENTS'];
 141  // $S_EVENTS  =& $this->_tpl_vars['S_EVENTS']; // Deleted by Rod
 142  $providers =& $this->_tpl_vars['providers'];
 143  $times     =& $this->_tpl_vars['times'];
 144  $interval  =  $this->_tpl_vars['interval'];
 145  $viewtype  =  $this->_tpl_vars['VIEW_TYPE'];
 146  $PREV_WEEK_URL = $this->_tpl_vars['PREV_WEEK_URL'];
 147  $NEXT_WEEK_URL = $this->_tpl_vars['NEXT_WEEK_URL'];
 148  $PREV_DAY_URL  = $this->_tpl_vars['PREV_DAY_URL'];
 149  $NEXT_DAY_URL  = $this->_tpl_vars['NEXT_DAY_URL'];
 150
 151  $Date =  postcalendar_getDate();
 152  if (!isset($y)) $y = substr($Date, 0, 4);
 153  if (!isset($m)) $m = substr($Date, 4, 2);
 154  if (!isset($d)) $d = substr($Date, 6, 2);
 155
 156  // echo "<!-- There are " . count($A_EVENTS) . " A_EVENTS days -->\n";
 157
 158  $MULTIDAY = count($A_EVENTS) > 1;
 159
 160  $facilities = getUserFacilities($_SESSION['authId']); // from users_facility
 161  if (count($facilities) == 1 || !$_SESSION['pc_facility']) {
 162   $_SESSION['pc_facility'] = $facilities[0]['id'];
 163  }
 164  if ( $_SESSION['pc_facility'] ) {
 165   $provinfo = getProviderInfo('%', true, $_SESSION['pc_facility']);
 166  } else {
 167   $provinfo = getProviderInfo();
 168  }
 169  // echo "<form name='theform' action='index.php?module=PostCalendar&func=view" .
 170  echo "<form id='theform' name='theform' action='index.php?module=PostCalendar&func=view" .
 171       "&tplview=default&pc_category=&pc_topic=' " .
 172       "method='post' onsubmit='return top.restoreSession()'>\n";
 173  echo "<center>\n";
 174  echo "<table border='0' cellpadding='0' cellspacing='0' width='99%'>\n";
 175  echo " <tr><td colspan='3' height='5'></td></tr>\n";
 176  echo " <tr>\n";
 177
 178  // Build the scrolling selection list of providers.
 179  echo "  <td rowspan='2' align='left' valign='top' width='33%' nowrap>\n";
 180  echo "   <select multiple size='3' name='pc_username[]'>\n";
 181  echo "    <option value='__PC_ALL__'>"  .xl ("All Users"). "</option>\n";
 182  foreach ($provinfo as $doc) {
 183   $username = $doc['username'];
 184   echo "    <option value='$username'";
 185   foreach ($providers as $provider)
 186    if ($provider['username'] == $username) echo " selected";
 187   echo ">" . $doc['fname'] . " " . $doc['lname'] . "</option>\n";
 188  }
 189  echo "   </select>\n";
 190
 191 /*********************************************************************
 192  // ==============================
 193  // FACILITY FILTERING (lemonsoftware)
 194  $facilities = getFacilities();
 195  echo "   <select name='pc_facility'>\n";
 196  if ( !$_SESSION['pc_facility'] ) $selected = "selected='selected'";
 197  echo "    <option value='0' $selected>"  .xl('All Facilities'). "</option>\n";
 198  foreach ($facilities as $fa) {
 199     $selected = ( $_SESSION['pc_facility'] == $fa['id']) ? "selected='selected'" : "" ;
 200      echo "    <option value='" .$fa['id']. "' $selected>"  .$fa['name']. "</option>\n";
 201  }
 202  echo "   </select>\n";
 203 *********************************************************************/
 204 // ==============================
 205 // FACILITY FILTERING (lemonsoftware)
 206 if ($_SESSION['authorizeduser'] == 1) {
 207   $facilities = getFacilities();
 208 } else {
 209   $facilities = getUserFacilities($_SESSION['authId']); // from users_facility
 210   if (count($facilities) == 1)
 211     $_SESSION['pc_facility'] = ($facilities[0]['id']);
 212 }
 213 if (count($facilities) > 1) {
 214   echo "   <select name='pc_facility' id='pc_facility' onChange='document.getElementById(\"theform\").submit();'>\n";
 215   if ( !$_SESSION['pc_facility'] ) $selected = "selected='selected'";
 216   if ( !$GLOBALS['restrict_user_facility']) echo "    <option value='0' $selected>" . xl('All Facilities') . "</option>\n";
 217   foreach ($facilities as $fa) {
 218     $selected = ( $_SESSION['pc_facility'] == $fa['id']) ? "selected='selected'" : "" ;
 219     echo "    <option value='" . $fa['id'] . "' $selected>" . $fa['name'] . "</option>\n";
 220   }
 221   echo "   </select>\n";
 222 }
 223 /********************************************************************/
 224
 225  // EOS FF
 226  // ==============================
 227
 228  echo "  </td>\n";
 229
 230  // Build the date and view type selectors and the Go button and the Today button.
 231  echo "  <td align='center' valign='top' width='34%' nowrap>\n";
 232
 233  echo "    <input type='text' size='10' name='jumpdate' id='jumpdate'\n" .
 234   "     value='$y-$m-$d' title='yyyy-mm-dd date to go to'\n" .
 235   "     onkeyup='datekeyup(this,mypcc)' onblur='dateblur(this,mypcc)' />\n" .
 236   "     <img src='../../pic/show_calendar.gif' id='img_jumpdate' align='absbottom'\n" .
 237   "      width='24' height='22' border='0' alt='[?]' style='cursor:pointer'\n" .
 238   "     title='" .xl ("Click here to choose a date"). "'>\n";
 239
 240  echo "   &nbsp;<select name='viewtype'>\n";
 241  foreach ( array ('day' => xl("Day View"), 'week' => xl("Week View"), 'month' => xl("Month View"), 'year' => xl("Year View"))
 242           as $key => $value)  {
 243   echo "    <option value='$key'";
 244   if ($key == $viewtype) echo " selected";
 245   echo ">$value</option>\n";
 246  }
 247  echo "   </select>\n";
 248  echo "   &nbsp;<input type='submit' name='bnsubmit' value='" .xl ("Go"). "' />\n";
 249  echo "   &nbsp;<input type='submit' name='bnsubmit' value='" .xl ("Today"). "' onClick='GoToToday(theform);' />\n";
 250  echo "  </td>\n";
 251
 252  // Show the Add and Search buttons.
 253  echo "  <td align='right' valign='top' width='33%' nowrap>\n";
 254  echo "   <input type='button' value='" .xl ("Add"). "' onclick='newEvt(1, 9, 00, $Date, 0, 0)' />\n";
 255  echo "   <input type='button' value='" . xl ("Search") .
 256   "' onclick='top.restoreSession();location=\"index.php?module=PostCalendar&func=search\"' />\n";
 257  echo "  </td>\n";
 258  echo " </tr>\n";
 259
 260  // Show the date/range and its previous- and next-day/week selectors.
 261  echo " <tr>\n";
 262  echo "  <td align='center' width='34%' nowrap>\n";
 263  $atmp = array_keys($A_EVENTS);
 264
 265 if ($MULTIDAY) {
 266   echo "<a href='" . attr($PREV_WEEK_URL) . "' onclick='top.restoreSession()'>&lt;&lt;</a>&nbsp;\n";
 267   echo dateformat(strtotime($atmp[0]));
 268   echo " - ";
 269   echo dateformat(strtotime($atmp[count($atmp)-1]));
 270   echo "&nbsp;<a href='" . attr($NEXT_WEEK_URL) . "' onclick='top.restoreSession()'>&gt;&gt;</a>\n";
 271  } else {
 272   echo "<a href='" . attr($PREV_DAY_URL) . "' onclick='top.restoreSession()'>&lt;&lt;</a>&nbsp;\n";
 273   echo dateformat(strtotime($atmp[0]), true);
 274   echo "&nbsp;<a href='" . attr($NEXT_DAY_URL) . "' onclick='top.restoreSession()'>&gt;&gt;</a>\n";
 275  }
 276  echo "  </td>\n";
 277  echo "  <td align='right' width='33%' nowrap>\n";
 278  echo "   &nbsp;\n";
 279  echo "  </td>\n";
 280
 281  echo " </tr>\n";
 282  echo "</table>\n";
 283  echo "</center>\n";
 284  echo "</form>\n";
 285
 286 [-/php-]
 287
 288 <script language='JavaScript'>
 289  Calendar.setup({inputField:"jumpdate", ifFormat:"%Y-%m-%d", button:"img_jumpdate"});
 290 </script>
 291
 292 [-assign var="dayname" value=$DATE|date_format:"%w"-]
 293 [-assign var="day"     value=$DATE|date_format:"%d"|string_format:"%1d"-]
 294 [-assign var="month"   value=$DATE|date_format:"%m"|string_format:"%1d"-]
 295 [-assign var="year"    value=$DATE|date_format:"%Y"|string_format:"%4d"-]
 296
 297 [-pc_sort_events var="S_EVENTS" sort="time" order="asc" value=$A_EVENTS-]
 298
 299 [-php-]
 300
 301  echo "<table width='100%' border='1' cellpadding='1' cellspacing='0' >\n";
 302  $tdstylearr = array('bordyy', 'bordny', 'bordyn', 'bordnn');
 303
 304  // For each day...
 305  foreach ($A_EVENTS as $date => $events) {
 306   $need_headers = true;
 307   $eventdate = substr($date, 0, 4) . substr($date, 5, 2) . substr($date, 8, 2);
 308
 309   // If multiple days then show a date header for each.
 310   if ($MULTIDAY) {
 311    echo " <tr>\n";
 312    echo "  <td colspan='" . (count($providers) * 2) . "' align='center'>" .
 313         dateformat(strtotime($date), true) . "</td>";
 314    echo " </tr>\n";
 315   }
 316
 317   $arr_events = $A_EVENTS[$date];
 318   list($slotkey, $slotevent) = each($arr_events);
 319
 320   // This is an array of provider status information for this day,
 321   // used to properly assign table cell attributes.
 322   $provstat = array();
 323
 324   $slotindex = 0;
 325   $lastslotindex = count($times) - 1;
 326
 327   // For each time slot...
 328   foreach ($times as $slottime) {
 329    $startampm = ($slottime['mer']) == "pm" ? 2 : 1;
 330    $starttimeh = $slottime['hour'];
 331    $starttimem = $slottime['minute'];
 332    $slotendmins = $starttimeh * 60 + $starttimem + $interval;
 333
 334    // Repeat doc names at 1PM.  This is a kludge; omit it for released code.
 335    // if ($starttimeh == 13 && $starttimem == 0) $need_headers = true;
 336
 337    // Get all events for all providers just for this time slot now, because we
 338    // can pick up where we left off and because we don't want to re-scan all
 339    // events for the day for each table cell.
 340    //
 341    $arr_slot = array();
 342    for (; isset($slotkey); list($slotkey, $slotevent) = each($arr_events)) {
 343     $starth = substr($slotevent['startTime'], 0, 2);
 344     $startm = substr($slotevent['startTime'], 3, 2);
 345
 346     if (($starth * 60 + $startm) >= $slotendmins) break;
 347
 348     $arr_slot[$slotkey] = $slotevent;
 349
 350     $catid = $slotevent['catid'];
 351     $providerid = $slotevent['aid'];
 352     $durminutes = ceil($slotevent['duration'] / 60);
 353     $durslots = ceil($durminutes / $interval);
 354
 355     // While we're here, collect information for cell cosmetics.
 356     if ($catid == 2) { // in office
 357      $provstat[$providerid]['in'] = true;
 358
 359      // Save preferred category info for this IN event.
 360      $provstat[$providerid]['in_cat'] = -1;
 361      $provstat[$providerid]['in_slot0'] = $slotindex;
 362      $provstat[$providerid]['in_slots'] = 1;
 363      if ($slotevent['prefcatid']) {
 364       foreach ($A_CATEGORY as $catkey => $catval) {
 365        if ($catval['id'] == $slotevent['prefcatid']) {
 366         $provstat[$providerid]['in_cat'] = $catkey;
 367         $provstat[$providerid]['in_slots'] =
 368          ceil(ceil($catval['event_duration'] / 60) / $interval);
 369         break;
 370        }
 371       }
 372       // Debugging:
 373       if ($provstat[$providerid]['in_cat'] < 0) {
 374        echo "<!-- Unmatched prefcatid = " . $slotevent['prefcatid'] . " -->\n"; // debugging
 375       }
 376      }
 377
 378     }
 379     else if ($catid == 3) { // out of office
 380      $provstat[$providerid]['in'] = false;
 381     }
 382     else if ($catid == 4 || $catid == 8 || $catid == 11) { // unavailable types
 383      // unavailable slots are marked 'res' for appropriate coloring.
 384      $endindex = $slotindex + $durslots;
 385      for ($i = $slotindex; $i < $endindex; ++$i) {
 386       $provstat[$providerid][$i]['res'] = true;
 387      }
 388     }
 389     // If duration > slot size then mark slots for border control.  A slot
 390     // marked 'ext' is not to have a border between itself and the slot below.
 391     if ($durslots > 1) {
 392      $endindex = $slotindex + $durslots - 1;
 393      for ($i = $slotindex; $i < $endindex; ++$i) {
 394       $provstat[$providerid][$i]['ext'] = true;
 395      }
 396     }
 397    }
 398    // Finished getting event information for this time slot.
 399
 400    // Write a header row with the provider names if appropriate.
 401    if ($need_headers) {
 402     $need_headers = false;
 403     echo " <tr>\n";
 404     foreach ($providers as $provider) {
 405      echo "  <td colspan='2' align='center'>";
 406      echo $provider['fname'][0] . " " . $provider['lname'];
 407      echo "</td>\n";
 408     }
 409     echo " </tr>\n";
 410    }
 411
 412    echo " <tr>\n";
 413
 414    // We are now ready to write the table row for the current time slot.
 415    // This loops once for each provider to be displayed.
 416    //
 417    foreach ($providers as $provider) {
 418     $providerid = $provider['id'];
 419
 420     // Mark this as a no-bottom-border slot if the preferred category
 421     // duration extends beyond it.
 422     //
 423     // echo "<!-- slotindex=$slotindex in=" . $provstat[$providerid]['in'] .
 424     //  " in_cat=" . $provstat[$providerid]['in_cat'] .
 425     //  " in_slot0=" . $provstat[$providerid]['in_slot0'] .
 426     //  " in_slots=" . $provstat[$providerid]['in_slots'] . " -->\n"; // debugging
 427     //
 428     if ($provstat[$providerid]['in']) {
 429      if (($slotindex + 1 - $provstat[$providerid]['in_slot0']) % $provstat[$providerid]['in_slots'])
 430       $provstat[$providerid][$slotindex]['ext'] = true;
 431     }
 432
 433     $content = ""; // this will be the event cell content
 434
 435     $clsuffix = "acell";
 436     if ($provstat[$providerid][$slotindex]['res'] || ! $provstat[$providerid]['in']) {
 437       $clsuffix = "ucell";
 438     }
 439
 440     // Remove top and/or bottom table cell borders using CSS when events span
 441     // time slots or when the practitioner is not in-office.  Using "rowspan"
 442     // would be a difficult and inferior solution to this problem.
 443     //
 444     $tdstyleix = 0;
 445     $timelabel = true;
 446     if ($slotindex < $lastslotindex &&
 447         ($provstat[$providerid][$slotindex]['ext'] || !$provstat[$providerid]['in'])) {
 448      $tdstyleix += 1; // no bottom
 449     }
 450     if ($slotindex > 0 && ($provstat[$providerid][$slotindex-1]['ext'] ||
 451         !($provstat[$providerid]['in'] || $provstat[$providerid]['wasin']))) {
 452      $tdstyleix += 2; // no top
 453      $timelabel = false;
 454     }
 455     $tdstyle = ' ' . $tdstylearr[$tdstyleix];
 456
 457     $disptimeh = ($starttimeh > 12) ? ($starttimeh - 12) : $starttimeh;
 458
 459     $in_cat_id = 0;
 460     if ($provstat[$providerid]['in_cat'] >= 0) {
 461      $category =& $A_CATEGORY[$provstat[$providerid]['in_cat']];
 462      if ($category['id']) $in_cat_id = $category['id'];
 463     }
 464
 465     // If a slot omits the top border, then we omit the TOD cell's top border
 466     // and skip writing its time-of-day text.  This way we can get some rows
 467     // with no content at all, which should produce a more compact and readable
 468     // calendar display.
 469
 470     echo "  <td class='t$clsuffix$tdstyle'";
 471     if ($slotindex == 0) echo " width='1%'";
 472     echo ">";
 473     if ($timelabel) {
 474      echo "<a href='javascript:newEvt($startampm,$starttimeh,$starttimem,$eventdate,$providerid,$in_cat_id)'>";
 475      echo "$disptimeh:$starttimem</a>";
 476     } else {
 477      echo "<div class=tiny></div>"; // 1x1 px content so the browser does not suppress borders
 478     }
 479     echo "</td>\n";
 480
 481     echo "  <td class='e$clsuffix$tdstyle'";
 482     if ($clsuffix == "acell" && $in_cat_id) {
 483      echo " style='background-color:" . $category['color'] . "'";
 484      echo " title='" . $category['name'] . "'";
 485     }
 486     echo ">";
 487
 488     // Scan all events for this time slot and generate the associated HTML for
 489     // this doc.  JavaScript is used in hrefs to reduce the volume of output.
 490     //
 491     reset($arr_slot);
 492     while (list($eventkey, $event) = each($arr_slot)) {
 493      if ($event['aid'] != $providerid) continue;
 494      if ($content) $content .= " ";
 495      $starth = substr($event['startTime'], 0, 2);
 496      $startm = substr($event['startTime'], 3, 2);
 497      $eventid = $event['eid'];
 498      $patientid = $event['pid'];
 499      $commapos = strpos($event['patient_name'], ",");
 500      $lname = substr($event['patient_name'], 0, $commapos);
 501      $fname = substr($event['patient_name'], $commapos + 2);
 502      $patient_dob = $event['patient_dob'];
 503      $patient_age = $event['patient_age'];
 504      $title = xl('Age') . " $patient_age ($patient_dob)";
 505      $catid = $event['catid'];
 506      $comment = addslashes($event['hometext']);
 507      $catname = $event['catname'];
 508      if ($comment && $GLOBALS['calendar_appt_style'] < 4)
 509       $title .= " " . $comment;
 510      if ($catid == 2 || $catid == 3 || $catid == 4 || $catid == 8 || $catid == 11) {
 511       if      ($catid ==  2) $catname = xl('IN');
 512       else if ($catid ==  3) $catname = xl('OUT');
 513       else if ($catid ==  4) $catname = xl('VACATION');
 514       else if ($catid ==  8) $catname = xl('LUNCH');
 515       else if ($catid == 11) $catname = xl('RESERVED');
 516       // Omit lunch, vacation, etc. if the doc is not in-office.
 517       if ($provstat[$providerid]['in'] || $catid < 4) {
 518        $content .= "<a href='javascript:oldEvt($eventdate,$eventid)'>";
 519        $content .= $catname;
 520        if ($comment) $content .= " - $comment";
 521        $content .= "</a>";
 522       }
 523      }
 524      else if ($patientid) { // some sort of patient appointment
 525       $content .= "<a href='javascript:oldEvt($eventdate,$eventid)' title='$catname'>";
 526       // $content .= $starth . ':' . $startm . htmlspecialchars($event['apptstatus']) . "</a>";
 527       $content .= $starth . ':' . $startm . '&nbsp;' . htmlspecialchars($event['apptstatus']) . "&nbsp;</a>";
 528       $content .= "<a href='javascript:goPid($patientid)' title='$title'>";
 529       if ($catid == 1) $content .= "<strike>";
 530       $content .= htmlspecialchars($lname);
 531       if ($GLOBALS['calendar_appt_style'] != 1) {
 532        $content .= "," . htmlspecialchars($fname);
 533        if ($event['title'] && $GLOBALS['calendar_appt_style'] >= 3) {
 534         $content .= "(" . $event['title'];
 535         if ($event['hometext'] && $GLOBALS['calendar_appt_style'] >= 4)
 536          $content .= ": <font color='green'>" . htmlspecialchars(trim($event['hometext'])) . "</font>";
 537         $content .= ")";
 538        }
 539       }
 540       if ($catid == 1) $content .= "</strike>";
 541       $content .= "</a>";
 542      }
 543      else { // some other non-patient event
 544       $content .= "<a href='javascript:oldEvt($eventdate,$eventid)' title='$catname' " .
 545        "style='background-color:" . $event['catcolor'] . "'>";
 546       $content .= $starth . ':' . $startm . '&nbsp;' . htmlspecialchars($event['apptstatus']) . "&nbsp;";
 547       if ($GLOBALS['calendar_appt_style'] != 1) {
 548        if ($event['title'] && $GLOBALS['calendar_appt_style'] >= 3) {
 549         $content .= $event['title'];
 550         if ($event['hometext'] && $GLOBALS['calendar_appt_style'] >= 4)
 551          $content .= ": " . htmlspecialchars(trim($event['hometext']));
 552        }
 553       }
 554       $content .= "</a>";
 555      }
 556     } // end while
 557
 558     if (! $content) $content = "<div class=tiny></div>"; // so the browser does not suppress borders
 559     echo $content . "</td>\n";
 560
 561     // Keep track of whether the doc was in during the previous time slot.
 562     $provstat[$providerid]['wasin'] = $provstat[$providerid]['in'];
 563
 564    } // end provider
 565
 566    echo " </tr>\n";
 567
 568    ++$slotindex;
 569   } // end time slot
 570  } // end day
 571
 572  echo "</table>\n";
 573
 574  // [-*footer*-]
 575  // [-include file="$TPL_NAME/views/global/footer.html"-]
 576  // [-include file="$TPL_NAME/views/footer.html"-]
 577
 578 [-/php-]
 579
 580 </body>
 581 </html>