interface/patient_file/summary/demographics.php

   1 <?php
   2 // This program is free software; you can redistribute it and/or
   3 // modify it under the terms of the GNU General Public License
   4 // as published by the Free Software Foundation; either version 2
   5 // of the License, or (at your option) any later version.
   6
   7 //SANITIZE ALL ESCAPES
   8 $sanitize_all_escapes=true;
   9 //
  10
  11 //STOP FAKE REGISTER GLOBALS
  12 $fake_register_globals=false;
  13 //
  14
  15  require_once("../../globals.php");
  16  require_once("$srcdir/patient.inc");
  17  require_once("$srcdir/acl.inc");
  18  require_once("$srcdir/classes/Address.class.php");
  19  require_once("$srcdir/classes/InsuranceCompany.class.php");
  20  require_once("$srcdir/classes/Document.class.php");
  21  require_once("$srcdir/options.inc.php");
  22  require_once("../history/history.inc.php");
  23  require_once("$srcdir/formatting.inc.php");
  24  require_once("$srcdir/edi.inc");
  25
  26   if ($GLOBALS['concurrent_layout'] && $_GET['set_pid']) {
  27   include_once("$srcdir/pid.inc");
  28   setpid($_GET['set_pid']);
  29  }
  30
  31 function print_as_money($money) {
  32         preg_match("/(\d*)\.?(\d*)/",$money,$moneymatches);
  33         $tmp = wordwrap(strrev($moneymatches[1]),3,",",1);
  34         $ccheck = strrev($tmp);
  35         if ($ccheck[0] == ",") {
  36                 $tmp = substr($ccheck,1,strlen($ccheck)-1);
  37         }
  38         if ($moneymatches[2] != "") {
  39                 return "$ " . strrev($tmp) . "." . $moneymatches[2];
  40         } else {
  41                 return "$ " . strrev($tmp);
  42         }
  43 }
  44
  45 // get an array from Photos category
  46 function pic_array($pid,$picture_directory) {
  47     $pics = array();
  48     $sql_query = "select documents.id from documents join categories_to_documents " .
  49                  "on documents.id = categories_to_documents.document_id " .
  50                  "join categories on categories.id = categories_to_documents.category_id " .
  51                  "where categories.name like ? and documents.foreign_id = ?";
  52     if ($query = sqlStatement($sql_query, array($picture_directory,$pid))) {
  53       while( $results = sqlFetchArray($query) ) {
  54             array_push($pics,$results['id']);
  55         }
  56       }
  57     return ($pics);
  58 }
  59 // Get the document ID of the first document in a specific catg.
  60 function get_document_by_catg($pid,$doc_catg) {
  61
  62     $result = array();
  63
  64         if ($pid and $doc_catg) {
  65           $result = sqlQuery("SELECT d.id, d.date, d.url FROM " .
  66             "documents AS d, categories_to_documents AS cd, categories AS c " .
  67             "WHERE d.foreign_id = ? " .
  68             "AND cd.document_id = d.id " .
  69             "AND c.id = cd.category_id " .
  70             "AND c.name LIKE ? " .
  71             "ORDER BY d.date DESC LIMIT 1", array($pid, $doc_catg) );
  72             }
  73
  74         return($result['id']);
  75 }
  76
  77 // Display image in 'widget style'
  78 function image_widget($doc_id,$doc_catg)
  79 {
  80         global $pid, $web_root;
  81         $docobj = new Document($doc_id);
  82         $image_file = $docobj->get_url_file();
  83         $extension = substr($image_file, strrpos($image_file,"."));
  84         $viewable_types = array('.png','.jpg','.jpeg','.png','.bmp'); // image ext supported by fancybox viewer
  85         if ( in_array($extension,$viewable_types) ) { // extention matches list
  86                 $to_url = "<td> <a href = $web_root" .
  87                                 "/controller.php?document&retrieve&patient_id=$pid&document_id=$doc_id" .
  88                                 "/tmp$extension" .  // Force image type URL for fancybox
  89                                 " onclick=top.restoreSession(); class='image_modal'>" .
  90                 " <img src = $web_root" .
  91                                 "/controller.php?document&retrieve&patient_id=$pid&document_id=$doc_id" .
  92                                 " width=100 alt='$doc_catg:$image_file'>  </a> </td> <td valign='center'>".
  93                 htmlspecialchars($doc_catg) . '<br />&nbsp;' . htmlspecialchars($image_file) .
  94                                 "</td>";
  95         }
  96         else {
  97                                 $to_url = "<td> <a href='" . $web_root . "/controller.php?document&retrieve" .
  98                     "&patient_id=$pid&document_id=$doc_id'" .
  99                     " onclick='top.restoreSession()' class='css_button_small'>" .
 100                     "<span>" .
 101                     htmlspecialchars( xl("View"), ENT_QUOTES )."</a> &nbsp;" .
 102                                         htmlspecialchars( "$doc_catg - $image_file", ENT_QUOTES ) .
 103                     "</span> </td>";
 104                 }
 105         echo "<table><tr>";
 106         echo $to_url;
 107         echo "</tr></table>";
 108 }
 109
 110 // Determine if the Vitals form is in use for this site.
 111 $tmp = sqlQuery("SELECT count(*) AS count FROM registry WHERE " .
 112   "directory = 'vitals' AND state = 1");
 113 $vitals_is_registered = $tmp['count'];
 114 ?>
 115 <html>
 116
 117 <head>
 118 <?php html_header_show();?>
 119 <link rel="stylesheet" href="<?php echo $css_header;?>" type="text/css">
 120 <link rel="stylesheet" type="text/css" href="../../../library/js/fancybox/jquery.fancybox-1.2.6.css" media="screen" />
 121 <style type="text/css">@import url(../../../library/dynarch_calendar.css);</style>
 122 <script type="text/javascript" src="../../../library/textformat.js"></script>
 123 <script type="text/javascript" src="../../../library/dynarch_calendar.js"></script>
 124 <?php include_once("{$GLOBALS['srcdir']}/dynarch_calendar_en.inc.php"); ?>
 125 <script type="text/javascript" src="../../../library/dynarch_calendar_setup.js"></script>
 126 <script type="text/javascript" src="../../../library/dialog.js"></script>
 127 <script type="text/javascript" src="../../../library/js/jquery.1.3.2.js"></script>
 128 <script type="text/javascript" src="../../../library/js/common.js"></script>
 129 <script type="text/javascript" src="../../../library/js/fancybox/jquery.fancybox-1.2.6.js"></script>
 130 <script type="text/javascript" language="JavaScript">
 131 //Visolve - sync the radio buttons - Start
 132 if((top.window.parent) && (parent.window)){
 133         var wname = top.window.parent.left_nav;
 134         wname.syncRadios();
 135         wname.setRadio(parent.window.name, "dem");
 136 }
 137 //Visolve - sync the radio buttons - End
 138
 139  var mypcc = '<?php echo htmlspecialchars($GLOBALS['phone_country_code'],ENT_QUOTES); ?>';
 140
 141  function oldEvt(eventid) {
 142   dlgopen('../../main/calendar/add_edit_event.php?eid=' + eventid, '_blank', 550, 270);
 143  }
 144
 145  function advdirconfigure() {
 146    dlgopen('advancedirectives.php', '_blank', 500, 450);
 147   }
 148
 149  function refreshme() {
 150   top.restoreSession();
 151   location.reload();
 152  }
 153
 154  // Process click on Delete link.
 155  function deleteme() {
 156   dlgopen('../deleter.php?patient=<?php echo htmlspecialchars($pid,ENT_QUOTES); ?>', '_blank', 500, 450);
 157   return false;
 158  }
 159
 160  // Called by the deleteme.php window on a successful delete.
 161  function imdeleted() {
 162 <?php if ($GLOBALS['concurrent_layout']) { ?>
 163   parent.left_nav.clearPatient();
 164 <?php } else { ?>
 165   top.restoreSession();
 166   top.location.href = '../main/main_screen.php';
 167 <?php } ?>
 168  }
 169
 170  function validate() {
 171   var f = document.forms[0];
 172 <?php
 173 if ($GLOBALS['athletic_team']) {
 174   echo "  if (f.form_userdate1.value != f.form_original_userdate1.value) {\n";
 175   $irow = sqlQuery("SELECT id, title FROM lists WHERE " .
 176     "pid = ? AND enddate IS NULL ORDER BY begdate DESC LIMIT 1", array($pid));
 177   if (!empty($irow)) {
 178 ?>
 179    if (confirm('Do you wish to also set this new return date in the issue titled "<?php echo htmlspecialchars($irow['title'],ENT_QUOTES); ?>"?')) {
 180     f.form_issue_id.value = '<?php echo htmlspecialchars($irow['id'],ENT_QUOTES); ?>';
 181    } else {
 182     alert('OK, you will need to manually update the return date in any affected issue(s).');
 183    }
 184 <?php } else { ?>
 185    alert('You have changed the return date but there are no open issues. You probably need to create or modify one.');
 186 <?php
 187   } // end empty $irow
 188   echo "  }\n";
 189 } // end athletic team
 190 ?>
 191   return true;
 192  }
 193
 194  function newEvt() {
 195   dlgopen('../../main/calendar/add_edit_event.php?patientid=<?php echo htmlspecialchars($pid,ENT_QUOTES); ?>', '_blank', 550, 270);
 196   return false;
 197  }
 198
 199 function sendimage(pid, what) {
 200  // alert('Not yet implemented.'); return false;
 201  dlgopen('../upload_dialog.php?patientid=' + pid + '&file=' + what,
 202   '_blank', 500, 400);
 203  return false;
 204 }
 205
 206 </script>
 207
 208 <script type="text/javascript">
 209
 210 function toggleIndicator(target,div) {
 211
 212     $mode = $(target).find(".indicator").text();
 213     if ( $mode == "<?php echo htmlspecialchars(xl('collapse'),ENT_QUOTES); ?>" ) {
 214         $(target).find(".indicator").text( "<?php echo htmlspecialchars(xl('expand'),ENT_QUOTES); ?>" );
 215         $("#"+div).hide();
 216         $.post( "../../../library/ajax/user_settings.php", { target: div, mode: 0 });
 217     } else {
 218         $(target).find(".indicator").text( "<?php echo htmlspecialchars(xl('collapse'),ENT_QUOTES); ?>" );
 219         $("#"+div).show();
 220         $.post( "../../../library/ajax/user_settings.php", { target: div, mode: 1 });
 221     }
 222 }
 223
 224 $(document).ready(function(){
 225
 226     // load divs
 227     $("#stats_div").load("stats.php", { 'embeddedScreen' : true }, function() {
 228         // (note need to place javascript code here also to get the dynamic link to work)
 229         $(".rx_modal").fancybox( {
 230                 'overlayOpacity' : 0.0,
 231                 'showCloseButton' : true,
 232                 'frameHeight' : 500,
 233                 'frameWidth' : 800,
 234                 'centerOnScroll' : false,
 235                 'callbackOnClose' : function()  {
 236                 refreshme();
 237                 }
 238         });
 239     });
 240     $("#pnotes_ps_expand").load("pnotes_fragment.php");
 241     $("#disclosures_ps_expand").load("disc_fragment.php");
 242
 243     <?php if ($GLOBALS['enable_cdr'] && $GLOBALS['enable_cdr_crw']) { ?>
 244       $("#clinical_reminders_ps_expand").load("clinical_reminders_fragment.php", { 'embeddedScreen' : true }, function() {
 245           // (note need to place javascript code here also to get the dynamic link to work)
 246           $(".medium_modal").fancybox( {
 247                   'overlayOpacity' : 0.0,
 248                   'showCloseButton' : true,
 249                   'frameHeight' : 500,
 250                   'frameWidth' : 800,
 251                   'centerOnScroll' : false,
 252                   'callbackOnClose' : function()  {
 253                   refreshme();
 254                   }
 255           });
 256       });
 257     <?php } // end crw?>
 258
 259     <?php if ($GLOBALS['enable_cdr'] && $GLOBALS['enable_cdr_prw']) { ?>
 260       $("#patient_reminders_ps_expand").load("patient_reminders_fragment.php");
 261     <?php } // end prw?>
 262
 263 <?php if ($vitals_is_registered) { ?>
 264     // Initialize the Vitals form if it is registered.
 265     $("#vitals_ps_expand").load("vitals_fragment.php");
 266 <?php } ?>
 267
 268 <?php
 269   // Initialize for each applicable LBF form.
 270   $gfres = sqlStatement("SELECT option_id FROM list_options WHERE " .
 271     "list_id = 'lbfnames' AND option_value > 0 ORDER BY seq, title");
 272   while($gfrow = sqlFetchArray($gfres)) {
 273 ?>
 274     $("#<?php echo $gfrow['option_id']; ?>_ps_expand").load("lbf_fragment.php?formname=<?php echo $gfrow['option_id']; ?>");
 275 <?php
 276   }
 277 ?>
 278
 279     // fancy box
 280     enable_modals();
 281
 282     tabbify();
 283
 284 // modal for dialog boxes
 285   $(".large_modal").fancybox( {
 286     'overlayOpacity' : 0.0,
 287     'showCloseButton' : true,
 288     'frameHeight' : 600,
 289     'frameWidth' : 1000,
 290     'centerOnScroll' : false
 291   });
 292
 293 // modal for image viewer
 294   $(".image_modal").fancybox( {
 295     'overlayOpacity' : 0.0,
 296     'showCloseButton' : true,
 297     'centerOnScroll' : false,
 298     'autoscale' : true
 299   });
 300
 301 });
 302
 303 </script>
 304
 305 <style type="css/text">
 306 #pnotes_ps_expand {
 307   height:auto;
 308   width:100%;
 309 }
 310 </style>
 311
 312 </head>
 313
 314 <body class="body_top">
 315
 316 <?php
 317  $result = getPatientData($pid, "*, DATE_FORMAT(DOB,'%Y-%m-%d') as DOB_YMD");
 318  $result2 = getEmployerData($pid);
 319  $result3 = getInsuranceData($pid, "primary", "copay, provider, DATE_FORMAT(`date`,'%Y-%m-%d') as effdate");
 320  $insco_name = "";
 321
 322  if ($result3['provider']) {   // Use provider in case there is an ins record w/ unassigned insco
 323      $insco_name = getInsuranceProvider($result3['provider']);
 324  }
 325
 326  $thisauth = acl_check('patients', 'demo');
 327  if ($thisauth) {
 328   if ($result['squad'] && ! acl_check('squads', $result['squad']))
 329    $thisauth = 0;
 330  }
 331
 332  if (!$thisauth) {
 333   echo "<p>(" . htmlspecialchars(xl('Demographics not authorized'),ENT_NOQUOTES) . ")</p>\n";
 334   echo "</body>\n</html>\n";
 335   exit();
 336  }
 337
 338  if ($thisauth == 'write') {
 339   echo "<table><tr><td><span class='title'>" .
 340    htmlspecialchars(getPatientName($pid),ENT_NOQUOTES) .
 341    "</span></td>";
 342
 343   if (acl_check('admin', 'super')) {
 344    echo "<td style='padding-left:1em;'><a class='css_button iframe' href='../deleter.php?patient=" .
 345     htmlspecialchars($pid,ENT_QUOTES) . "'>" .
 346     "<span>".htmlspecialchars(xl('Delete'),ENT_NOQUOTES).
 347     "</span></a></td>";
 348   }
 349   echo "</tr></table>";
 350  }
 351
 352 // Get the document ID of the patient ID card if access to it is wanted here.
 353 $idcard_doc_id = false;
 354 if ($GLOBALS['patient_id_category_name']) {
 355   $idcard_doc_id = get_document_by_catg($pid, $GLOBALS['patient_id_category_name']);
 356 }
 357
 358 ?>
 359 <table cellspacing='0' cellpadding='0' border='0'>
 360  <tr>
 361   <td class="small" colspan='4'>
 362 <a href="../history/history.php" onclick='top.restoreSession()'>
 363 <?php echo htmlspecialchars(xl('History'),ENT_NOQUOTES); ?></a>
 364 |
 365 <?php //note that we have temporarily removed report screen from the modal view ?>
 366 <a href="../report/patient_report.php" onclick='top.restoreSession()'>
 367 <?php echo htmlspecialchars(xl('Report'),ENT_NOQUOTES); ?></a>
 368 |
 369 <?php //note that we have temporarily removed document screen from the modal view ?>
 370 <a href="../../../controller.php?document&list&patient_id=<?php echo $pid;?>" onclick='top.restoreSession()'>
 371 <?php echo htmlspecialchars(xl('Documents'),ENT_NOQUOTES); ?></a>
 372 |
 373 <a href="../transaction/transactions.php" class='iframe large_modal' onclick='top.restoreSession()'>
 374 <?php echo htmlspecialchars(xl('Transactions'),ENT_NOQUOTES); ?></a>
 375   </td>
 376  </tr>
 377 </table> <!-- end header -->
 378
 379 <div style='margin-top:10px'> <!-- start main content div -->
 380  <table border="0" cellspacing="0" cellpadding="0" width="100%">
 381   <tr>
 382    <td align="left" valign="top">
 383     <!-- start left column div -->
 384     <div style='float:left; margin-right:20px'>
 385      <table cellspacing=0 cellpadding=0>
 386       <tr>
 387        <td>
 388 <?php
 389 // Billing expand collapse widget
 390 $widgetTitle = xl("Billing");
 391 $widgetLabel = "billing";
 392 $widgetButtonLabel = xl("Edit");
 393 $widgetButtonLink = "return newEvt();";
 394 $widgetButtonClass = "";
 395 $linkMethod = "javascript";
 396 $bodyClass = "notab";
 397 $widgetAuth = false;
 398 $fixedWidth = true;
 399 if ($GLOBALS['force_billing_widget_open']) {
 400   $forceExpandAlways = true;
 401 }
 402 else {
 403   $forceExpandAlways = false;
 404 }
 405 expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 406   $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 407   $widgetAuth, $fixedWidth, $forceExpandAlways);
 408 ?>
 409         <br>
 410 <?php
 411  if ($GLOBALS['oer_config']['ws_accounting']['enabled']) {
 412  // Show current balance and billing note, if any.
 413   echo "        <div style='margin-left: 10px; margin-right: 10px'>" .
 414    "<span class='bold'><font color='#ee6600'>" .
 415    htmlspecialchars(xl('Balance Due'),ENT_NOQUOTES) .
 416    ": " . htmlspecialchars(oeFormatMoney(get_patient_balance($pid)),ENT_NOQUOTES) .
 417    "</font></span><br>";
 418   if ($result['genericname2'] == 'Billing') {
 419    echo "<span class='bold'><font color='red'>" .
 420     htmlspecialchars(xl('Billing Note'),ENT_NOQUOTES) . ":" .
 421     htmlspecialchars($result['genericval2'],ENT_NOQUOTES) .
 422     "</font></span><br>";
 423   }
 424   if ($result3['provider']) {   // Use provider in case there is an ins record w/ unassigned insco
 425    echo "<span class='bold'>" .
 426     htmlspecialchars(xl('Primary Insurance'),ENT_NOQUOTES) . ': ' . htmlspecialchars($insco_name,ENT_NOQUOTES) .
 427     "</span>&nbsp;&nbsp;&nbsp;";
 428    if ($result3['copay'] > 0) {
 429     echo "<span class='bold'>" .
 430      htmlspecialchars(xl('Copay'),ENT_NOQUOTES) . ': ' .  htmlspecialchars($result3['copay'],ENT_NOQUOTES) .
 431      "</span>&nbsp;&nbsp;&nbsp;";
 432    }
 433    echo "<span class='bold'>" .
 434     htmlspecialchars(xl('Effective Date'),ENT_NOQUOTES) . ': ' .  htmlspecialchars(oeFormatShortDate($result3['effdate'],ENT_NOQUOTES)) .
 435     "</span>";
 436   }
 437   echo "</div><br>";
 438  }
 439 ?>
 440         </div> <!-- required for expand_collapse_widget -->
 441        </td>
 442       </tr>
 443       <tr>
 444        <td>
 445 <?php
 446 // Demographics expand collapse widget
 447 $widgetTitle = xl("Demographics");
 448 $widgetLabel = "demographics";
 449 $widgetButtonLabel = xl("Edit");
 450 $widgetButtonLink = "demographics_full.php";
 451 $widgetButtonClass = "";
 452 $linkMethod = "html";
 453 $bodyClass = "";
 454 $widgetAuth = ($thisauth == "write");
 455 $fixedWidth = true;
 456 expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 457   $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 458   $widgetAuth, $fixedWidth);
 459 ?>
 460          <div id="DEM" >
 461           <ul class="tabNav">
 462            <?php display_layout_tabs('DEM', $result, $result2); ?>
 463           </ul>
 464           <div class="tabContainer">
 465            <?php display_layout_tabs_data('DEM', $result, $result2); ?>
 466           </div>
 467          </div>
 468         </div> <!-- required for expand_collapse_widget -->
 469        </td>
 470       </tr>
 471
 472       <tr>
 473        <td>
 474 <?php
 475 $insurance_count = 0;
 476 foreach (array('primary','secondary','tertiary') as $instype) {
 477   $enddate = 'Present';
 478   $query = "SELECT * FROM insurance_data WHERE " .
 479     "pid = ? AND type = ? " .
 480     "ORDER BY date DESC";
 481   $res = sqlStatement($query, array($pid, $instype) );
 482   while( $row = sqlFetchArray($res) ) {
 483     if ($row['provider'] ) $insurance_count++;
 484   }
 485 }
 486
 487 if ( $insurance_count > 0 ) {
 488   // Insurance expand collapse widget
 489   $widgetTitle = xl("Insurance");
 490   $widgetLabel = "insurance";
 491   $widgetButtonLabel = xl("Edit");
 492   $widgetButtonLink = "demographics_full.php";
 493   $widgetButtonClass = "";
 494   $linkMethod = "html";
 495   $bodyClass = "";
 496   $widgetAuth = ($thisauth == "write");
 497   $fixedWidth = true;
 498   expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 499     $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 500     $widgetAuth, $fixedWidth);
 501
 502   if ( $insurance_count > 0 ) {
 503 ?>
 504
 505         <ul class="tabNav"><?php
 506                                         ///////////////////////////////// INSURANCE SECTION
 507                                         $first = true;
 508                                         foreach (array('primary','secondary','tertiary') as $instype) {
 509
 510                                                 $query = "SELECT * FROM insurance_data WHERE " .
 511                                                 "pid = ? AND type = ? " .
 512                                                 "ORDER BY date DESC";
 513                                                 $res = sqlStatement($query, array($pid, $instype) );
 514
 515                                                 $enddate = 'Present';
 516
 517                                                   while( $row = sqlFetchArray($res) ) {
 518                                                         if ($row['provider'] ) {
 519
 520                                                                 $ins_description  = ucfirst($instype);
 521                                                                 $ins_description = xl($ins_description);
 522                                                                 $ins_description  .= strcmp($enddate, 'Present') != 0 ? " (".xl('Old').")" : "";
 523                                                                 ?>
 524                                                                 <li <?php echo $first ? 'class="current"' : '' ?>><a href="/play/javascript-tabbed-navigation/">
 525                                                                 <?php echo htmlspecialchars($ins_description,ENT_NOQUOTES); ?></a></li>
 526                                                                 <?php
 527                                                                 $first = false;
 528                                                         }
 529                                                         $enddate = $row['date'];
 530                                                 }
 531                                         }
 532                                         // Display the eligibility tab
 533                                         echo "<li><a href='/play/javascript-tabbed-navigation/'>" .
 534                                                 htmlspecialchars( xl('Eligibility'), ENT_NOQUOTES) . "</a></li>";
 535
 536                                         ?></ul><?php
 537
 538                                 } ?>
 539
 540                                 <div class="tabContainer">
 541                                         <?php
 542                                         $first = true;
 543                                         foreach (array('primary','secondary','tertiary') as $instype) {
 544                                           $enddate = 'Present';
 545
 546                                                 $query = "SELECT * FROM insurance_data WHERE " .
 547                                                 "pid = ? AND type = ? " .
 548                                                 "ORDER BY date DESC";
 549                                                 $res = sqlStatement($query, array($pid, $instype) );
 550                                           while( $row = sqlFetchArray($res) ) {
 551                                                 if ($row['provider'] ) {
 552                                                         ?>
 553                                                                 <div class="tab <?php echo $first ? 'current' : '' ?>">
 554                                                                 <table border='0' cellpadding='0' width='100%'>
 555                                                                 <?php
 556                                                                 $icobj = new InsuranceCompany($row['provider']);
 557                                                                 $adobj = $icobj->get_address();
 558                                                                 $insco_name = trim($icobj->get_name());
 559                                                                 ?>
 560                                                                 <tr>
 561                                                                  <td valign='top' colspan='3'>
 562                                                                   <span class='text'>
 563                                                                   <?php if (strcmp($enddate, 'Present') != 0) echo htmlspecialchars(xl("Old"),ENT_NOQUOTES)." "; ?>
 564                                                                   <?php $tempinstype=ucfirst($instype); echo htmlspecialchars(xl($tempinstype.' Insurance'),ENT_NOQUOTES); ?>
 565                                                                   <?php if (strcmp($row['date'], '0000-00-00') != 0) { ?>
 566                                                                   <?php echo htmlspecialchars(xl('from','',' ',' ').$row['date'],ENT_NOQUOTES); ?>
 567                                                                   <?php } ?>
 568                                                                   <?php echo htmlspecialchars(xl('until','',' ',' '),ENT_NOQUOTES);
 569                                                                     echo (strcmp($enddate, 'Present') != 0) ? $enddate : htmlspecialchars(xl('Present'),ENT_NOQUOTES); ?>:</span>
 570                                                                  </td>
 571                                                                 </tr>
 572                                                                 <tr>
 573                                                                  <td valign='top'>
 574                                                                   <span class='text'>
 575                                                                   <?php
 576                                                                   if ($insco_name) {
 577                                                                         echo htmlspecialchars($insco_name,ENT_NOQUOTES) . '<br>';
 578                                                                         if (trim($adobj->get_line1())) {
 579                                                                           echo htmlspecialchars($adobj->get_line1(),ENT_NOQUOTES) . '<br>';
 580                                                                           echo htmlspecialchars($adobj->get_city() . ', ' . $adobj->get_state() . ' ' . $adobj->get_zip(),ENT_NOQUOTES);
 581                                                                         }
 582                                                                   } else {
 583                                                                         echo "<font color='red'><b>".htmlspecialchars(xl('Unassigned'),ENT_NOQUOTES)."</b></font>";
 584                                                                   }
 585                                                                   ?>
 586                                                                   <br>
 587                                                                   <?php echo htmlspecialchars(xl('Policy Number'),ENT_NOQUOTES); ?>:
 588                                                                   <?php echo htmlspecialchars($row['policy_number'],ENT_NOQUOTES) ?><br>
 589                                                                   <?php echo htmlspecialchars(xl('Plan Name'),ENT_NOQUOTES); ?>:
 590                                                                   <?php echo htmlspecialchars($row['plan_name'],ENT_NOQUOTES); ?><br>
 591                                                                   <?php echo htmlspecialchars(xl('Group Number'),ENT_NOQUOTES); ?>:
 592                                                                   <?php echo htmlspecialchars($row['group_number'],ENT_NOQUOTES); ?></span>
 593                                                                  </td>
 594                                                                  <td valign='top'>
 595                                                                   <span class='bold'><?php echo htmlspecialchars(xl('Subscriber'),ENT_NOQUOTES); ?>: </span><br>
 596                                                                   <span class='text'><?php echo htmlspecialchars($row['subscriber_fname'] . ' ' . $row['subscriber_mname'] . ' ' . $row['subscriber_lname'],ENT_NOQUOTES); ?>
 597                                                         <?php
 598                                                                   if ($row['subscriber_relationship'] != "") {
 599                                                                         echo "(" . htmlspecialchars($row['subscriber_relationship'],ENT_NOQUOTES) . ")";
 600                                                                   }
 601                                                         ?>
 602                                                                   <br>
 603                                                                   <?php echo htmlspecialchars(xl('S.S.'),ENT_NOQUOTES); ?>:
 604                                                                   <?php echo htmlspecialchars($row['subscriber_ss'],ENT_NOQUOTES); ?><br>
 605                                                                   <?php echo htmlspecialchars(xl('D.O.B.'),ENT_NOQUOTES); ?>:
 606                                                                   <?php if ($row['subscriber_DOB'] != "0000-00-00 00:00:00") echo htmlspecialchars($row['subscriber_DOB'],ENT_NOQUOTES); ?><br>
 607                                                                   <?php echo htmlspecialchars(xl('Phone'),ENT_NOQUOTES); ?>:
 608                                                                   <?php echo htmlspecialchars($row['subscriber_phone'],ENT_NOQUOTES); ?>
 609                                                                   </span>
 610                                                                  </td>
 611                                                                  <td valign='top'>
 612                                                                   <span class='bold'><?php echo htmlspecialchars(xl('Subscriber Address'),ENT_NOQUOTES); ?>: </span><br>
 613                                                                   <span class='text'><?php echo htmlspecialchars($row['subscriber_street'],ENT_NOQUOTES); ?><br>
 614                                                                   <?php echo htmlspecialchars($row['subscriber_city'],ENT_NOQUOTES); ?>
 615                                                                   <?php if($row['subscriber_state'] != "") echo ", "; echo htmlspecialchars($row['subscriber_state'],ENT_NOQUOTES); ?>
 616                                                                   <?php if($row['subscriber_country'] != "") echo ", "; echo htmlspecialchars($row['subscriber_country'],ENT_NOQUOTES); ?>
 617                                                                   <?php echo " " . htmlspecialchars($row['subscriber_postal_code'],ENT_NOQUOTES); ?></span>
 618
 619                                                         <?php if (trim($row['subscriber_employer'])) { ?>
 620                                                                   <br><span class='bold'><?php echo htmlspecialchars(xl('Subscriber Employer'),ENT_NOQUOTES); ?>: </span><br>
 621                                                                   <span class='text'><?php echo htmlspecialchars($row['subscriber_employer'],ENT_NOQUOTES); ?><br>
 622                                                                   <?php echo htmlspecialchars($row['subscriber_employer_street'],ENT_NOQUOTES); ?><br>
 623                                                                   <?php echo htmlspecialchars($row['subscriber_employer_city'],ENT_NOQUOTES); ?>
 624                                                                   <?php if($row['subscriber_employer_city'] != "") echo ", "; echo htmlspecialchars($row['subscriber_employer_state'],ENT_NOQUOTES); ?>
 625                                                                   <?php if($row['subscriber_employer_country'] != "") echo ", "; echo htmlspecialchars($row['subscriber_employer_country'],ENT_NOQUOTES); ?>
 626                                                                   <?php echo " " . htmlspecialchars($row['subscriber_employer_postal_code'],ENT_NOQUOTES); ?>
 627                                                                   </span>
 628                                                         <?php } ?>
 629
 630                                                                  </td>
 631                                                                 </tr>
 632                                                                 <tr>
 633                                                                  <td>
 634                                                         <?php if ($row['copay'] != "") { ?>
 635                                                                   <span class='bold'><?php echo htmlspecialchars(xl('CoPay'),ENT_NOQUOTES); ?>: </span>
 636                                                                   <span class='text'><?php echo htmlspecialchars($row['copay'],ENT_NOQUOTES); ?></span>
 637                                                         <?php } ?>
 638                                                         <br>
 639                                                                   <span class='bold'><?php echo htmlspecialchars(xl('Accept Assignment'),ENT_NOQUOTES); ?>:</span>
 640                                                                   <span class='text'><?php if($row['accept_assignment'] == "TRUE") echo xl("YES"); ?>
 641                                                                   <?php if($row['accept_assignment'] == "FALSE") echo xl("NO"); ?></span>
 642                                                                  </td>
 643                                                                  <td valign='top'></td>
 644                                                                  <td valign='top'></td>
 645                                                            </tr>
 646
 647                                                         </table>
 648                                                         </div>
 649                                                         <?php
 650
 651                                                 } // end if ($row['provider'])
 652                                                 $enddate = $row['date'];
 653                                                 $first = false;
 654                                           } // end while
 655                                         } // end foreach
 656
 657                                         // Display the eligibility information
 658                                         echo "<div class='tab'>";
 659                                         show_eligibility_information($pid,true);
 660                                         echo "</div>";
 661
 662                         ///////////////////////////////// END INSURANCE SECTION
 663                         ?>
 664                         </div>
 665
 666                         <?php } // ?>
 667
 668                         </td>
 669                 </tr>
 670
 671                 <tr>
 672                         <td width='650px'>
 673
 674 <?php
 675 // Notes expand collapse widget
 676 $widgetTitle = xl("Notes");
 677 $widgetLabel = "pnotes";
 678 $widgetButtonLabel = xl("Edit");
 679 $widgetButtonLink = "pnotes_full.php";
 680 $widgetButtonClass = "";
 681 $linkMethod = "html";
 682 $bodyClass = "notab";
 683 $widgetAuth = true;
 684 $fixedWidth = true;
 685 expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 686   $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 687   $widgetAuth, $fixedWidth);
 688 ?>
 689
 690                     <br/>
 691                     <div style='margin-left:10px' class='text'><img src='../../pic/ajax-loader.gif'/></div><br/>
 692                 </div>
 693                         </td>
 694                 </tr>
 695                 <?php if ( (acl_check('patients', 'med')) && ($GLOBALS['enable_cdr'] && $GLOBALS['enable_cdr_prw']) ) {
 696                 echo "<tr><td width='650px'>";
 697                 // patient reminders collapse widget
 698                 $widgetTitle = xl("Patient Reminders");
 699                 $widgetLabel = "patient_reminders";
 700                 $widgetButtonLabel = xl("Edit");
 701                 $widgetButtonLink = "../reminder/patient_reminders.php?mode=simple&patient_id=".$pid;
 702                 $widgetButtonClass = "";
 703                 $linkMethod = "html";
 704                 $bodyClass = "notab";
 705                 $widgetAuth = true;
 706                 $fixedWidth = true;
 707                 expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel , $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass, $widgetAuth, $fixedWidth); ?>
 708                     <br/>
 709                     <div style='margin-left:10px' class='text'><image src='../../pic/ajax-loader.gif'/></div><br/>
 710                 </div>
 711                         </td>
 712                 </tr>
 713                 <?php } //end if prw is activated  ?>
 714
 715        <tr>
 716        <td width='650px'>
 717 <?php
 718 // disclosures expand collapse widget
 719 $widgetTitle = xl("Disclosures");
 720 $widgetLabel = "disclosures";
 721 $widgetButtonLabel = xl("Edit");
 722 $widgetButtonLink = "disclosure_full.php";
 723 $widgetButtonClass = "";
 724 $linkMethod = "html";
 725 $bodyClass = "notab";
 726 $widgetAuth = true;
 727 $fixedWidth = true;
 728 expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 729   $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 730   $widgetAuth, $fixedWidth);
 731 ?>
 732                     <br/>
 733                     <div style='margin-left:10px' class='text'><img src='../../pic/ajax-loader.gif'/></div><br/>
 734                 </div>
 735      </td>
 736     </tr>
 737
 738 <?php if ($vitals_is_registered) { ?>
 739     <tr>
 740      <td width='650px'>
 741 <?php // vitals expand collapse widget
 742   $widgetTitle = xl("Vitals");
 743   $widgetLabel = "vitals";
 744   $widgetButtonLabel = xl("Trend");
 745   $widgetButtonLink = "../encounter/trend_form.php?formname=vitals";
 746   $widgetButtonClass = "";
 747   $linkMethod = "html";
 748   $bodyClass = "notab";
 749   // check to see if any vitals exist
 750   $existVitals = sqlQuery("SELECT * FROM form_vitals WHERE pid=?", array($pid) );
 751   if ($existVitals) {
 752     $widgetAuth = true;
 753   }
 754   else {
 755     $widgetAuth = false;
 756   }
 757   $fixedWidth = true;
 758   expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 759     $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 760     $widgetAuth, $fixedWidth);
 761 ?>
 762       <br/>
 763       <div style='margin-left:10px' class='text'><img src='../../pic/ajax-loader.gif'/></div><br/>
 764       </div>
 765      </td>
 766     </tr>
 767 <?php } // end if ($vitals_is_registered) ?>
 768
 769 <?php
 770   // This generates a section similar to Vitals for each LBF form that
 771   // supports charting.  The form ID is used as the "widget label".
 772   //
 773   $gfres = sqlStatement("SELECT option_id, title FROM list_options WHERE " .
 774     "list_id = 'lbfnames' AND option_value > 0 ORDER BY seq, title");
 775   while($gfrow = sqlFetchArray($gfres)) {
 776 ?>
 777     <tr>
 778      <td width='650px'>
 779 <?php // vitals expand collapse widget
 780     $vitals_form_id = $gfrow['option_id'];
 781     $widgetTitle = $gfrow['title'];
 782     $widgetLabel = $vitals_form_id;
 783     $widgetButtonLabel = xl("Trend");
 784     $widgetButtonLink = "../encounter/trend_form.php?formname=$vitals_form_id";
 785     $widgetButtonClass = "";
 786     $linkMethod = "html";
 787     $bodyClass = "notab";
 788     // check to see if any instances exist for this patient
 789     $existVitals = sqlQuery(
 790       "SELECT * FROM forms WHERE pid = ? AND formdir = ? AND deleted = 0",
 791       array($pid, $vitals_form_id));
 792     $widgetAuth = $existVitals ? true : false;
 793     $fixedWidth = true;
 794     expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel,
 795       $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 796       $widgetAuth, $fixedWidth);
 797 ?>
 798        <br/>
 799        <div style='margin-left:10px' class='text'>
 800         <image src='../../pic/ajax-loader.gif'/>
 801        </div>
 802        <br/>
 803       </div> <!-- This is required by expand_collapse_widget(). -->
 804      </td>
 805     </tr>
 806 <?php
 807   } // end while
 808 ?>
 809
 810    </table>
 811
 812   </div>
 813     <!-- end left column div -->
 814
 815     <!-- start right column div -->
 816         <div>
 817     <table>
 818     <tr>
 819     <td>
 820
 821 <div>
 822     <?php
 823
 824     // If there is an ID Card or any Photos show the widget
 825     $photos = pic_array($pid, $GLOBALS['patient_photo_category_name']);
 826     if ($photos or $idcard_doc_id )
 827     {
 828         $widgetTitle = xl("ID Card") . '/' . xl("Photos");
 829         $widgetLabel = "photos";
 830         $linkMethod = "javascript";
 831         $bodyClass = "notab-right";
 832         $widgetAuth = false;
 833         $fixedWidth = false;
 834         expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel ,
 835                 $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass,
 836                 $widgetAuth, $fixedWidth);
 837 ?>
 838 <br />
 839 <?php
 840         if ($idcard_doc_id) {
 841                 image_widget($idcard_doc_id, $GLOBALS['patient_id_category_name']);
 842                 }
 843
 844         foreach ($photos as $photo_doc_id) {
 845             image_widget($photo_doc_id, $GLOBALS['patient_photo_category_name']);
 846         }
 847     }
 848 ?>
 849
 850 <br />
 851 </div>
 852 <div>
 853  <?php
 854     // Advance Directives
 855     if ($GLOBALS['advance_directives_warning']) {
 856         // advance directives expand collapse widget
 857         $widgetTitle = xl("Advance Directives");
 858         $widgetLabel = "directives";
 859         $widgetButtonLabel = xl("Edit");
 860         $widgetButtonLink = "return advdirconfigure();";
 861         $widgetButtonClass = "";
 862         $linkMethod = "javascript";
 863         $bodyClass = "summary_item small";
 864         $widgetAuth = true;
 865         $fixedWidth = false;
 866         expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel , $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass, $widgetAuth, $fixedWidth);
 867           $counterFlag = false; //flag to record whether any categories contain ad records
 868           $query = "SELECT id FROM categories WHERE name='Advance Directive'";
 869           $myrow2 = sqlQuery($query);
 870           if ($myrow2) {
 871           $parentId = $myrow2['id'];
 872           $query = "SELECT id, name FROM categories WHERE parent=?";
 873           $resNew1 = sqlStatement($query, array($parentId) );
 874           while ($myrows3 = sqlFetchArray($resNew1)) {
 875               $categoryId = $myrows3['id'];
 876               $nameDoc = $myrows3['name'];
 877               $query = "SELECT documents.date, documents.id " .
 878                    "FROM documents " .
 879                    "INNER JOIN categories_to_documents " .
 880                    "ON categories_to_documents.document_id=documents.id " .
 881                    "WHERE categories_to_documents.category_id=? " .
 882                    "AND documents.foreign_id=? " .
 883                    "ORDER BY documents.date DESC";
 884               $resNew2 = sqlStatement($query, array($categoryId, $pid) );
 885               $limitCounter = 0; // limit to one entry per category
 886               while (($myrows4 = sqlFetchArray($resNew2)) && ($limitCounter == 0)) {
 887                   $dateTimeDoc = $myrows4['date'];
 888               // remove time from datetime stamp
 889               $tempParse = explode(" ",$dateTimeDoc);
 890               $dateDoc = $tempParse[0];
 891               $idDoc = $myrows4['id'];
 892               echo "<a href='$web_root/controller.php?document&retrieve&patient_id=" .
 893                     htmlspecialchars($pid,ENT_QUOTES) . "&document_id=" .
 894                     htmlspecialchars($idDoc,ENT_QUOTES) . "&as_file=true'>" .
 895                     htmlspecialchars(xl_document_category($nameDoc),ENT_NOQUOTES) . "</a> " .
 896                     htmlspecialchars($dateDoc,ENT_NOQUOTES);
 897               echo "<br>";
 898               $limitCounter = $limitCounter + 1;
 899               $counterFlag = true;
 900               }
 901           }
 902           }
 903           if (!$counterFlag) {
 904               echo "&nbsp;&nbsp;" . htmlspecialchars(xl('None'),ENT_NOQUOTES);
 905           } ?>
 906       </div>
 907  <?php  }  // close advanced dir block
 908
 909         // This is a feature for a specific client.  -- Rod
 910         if ($GLOBALS['cene_specific']) {
 911           echo "   <br />\n";
 912
 913           $imagedir  = $GLOBALS['OE_SITE_DIR'] . "/documents/$pid/demographics";
 914           $imagepath = "$web_root/sites/" . $_SESSION['site_id'] . "/documents/$pid/demographics";
 915
 916           echo "   <a href='' onclick=\"return sendimage($pid, 'photo');\" " .
 917                 "title='Click to attach patient image'>\n";
 918           if (is_file("$imagedir/photo.jpg")) {
 919                 echo "   <img src='$imagepath/photo.jpg' /></a>\n";
 920           } else {
 921                 echo "   Attach Patient Image</a><br />\n";
 922           }
 923           echo "   <br />&nbsp;<br />\n";
 924
 925           echo "   <a href='' onclick=\"return sendimage($pid, 'fingerprint');\" " .
 926                 "title='Click to attach fingerprint'>\n";
 927           if (is_file("$imagedir/fingerprint.jpg")) {
 928                 echo "   <img src='$imagepath/fingerprint.jpg' /></a>\n";
 929           } else {
 930                 echo "   Attach Biometric Fingerprint</a><br />\n";
 931           }
 932           echo "   <br />&nbsp;<br />\n";
 933         }
 934
 935         // This stuff only applies to athletic team use of OpenEMR.  The client
 936         // insisted on being able to quickly change fitness and return date here:
 937         //
 938         if (false && $GLOBALS['athletic_team']) {
 939           //                  blue      green     yellow    red       orange
 940           $fitcolors = array('#6677ff','#00cc00','#ffff00','#ff3333','#ff8800','#ffeecc','#ffccaa');
 941           if (!empty($GLOBALS['fitness_colors'])) $fitcolors = $GLOBALS['fitness_colors'];
 942           $fitcolor = $fitcolors[0];
 943           $form_fitness   = $_POST['form_fitness'];
 944           $form_userdate1 = fixDate($_POST['form_userdate1'], '');
 945           $form_issue_id  = $_POST['form_issue_id'];
 946           if ($form_submit) {
 947                 $returndate = $form_userdate1 ? "'$form_userdate1'" : "NULL";
 948                 sqlStatement("UPDATE patient_data SET fitness = ?, " .
 949                   "userdate1 = ? WHERE pid = ?", array($form_fitness, $returndate, $pid) );
 950                 // Update return date in the designated issue, if requested.
 951                 if ($form_issue_id) {
 952                   sqlStatement("UPDATE lists SET returndate = ? WHERE " .
 953                     "id = ?", array($returndate, $form_issue_id) );
 954                 }
 955           } else {
 956                 $form_fitness = $result['fitness'];
 957                 if (! $form_fitness) $form_fitness = 1;
 958                 $form_userdate1 = $result['userdate1'];
 959           }
 960           $fitcolor = $fitcolors[$form_fitness - 1];
 961           echo "   <form method='post' action='demographics.php' onsubmit='return validate()'>\n";
 962           echo "   <span class='bold'>Fitness to Play:</span><br />\n";
 963           echo "   <select name='form_fitness' style='background-color:$fitcolor'>\n";
 964           $res = sqlStatement("SELECT * FROM list_options WHERE " .
 965                 "list_id = 'fitness' ORDER BY seq");
 966           while ($row = sqlFetchArray($res)) {
 967                 $key = $row['option_id'];
 968                 echo "    <option value='" . htmlspecialchars($key,ENT_QUOTES) . "'";
 969                 if ($key == $form_fitness) echo " selected";
 970                 echo ">" . htmlspecialchars($row['title'],ENT_NOQUOTES) . "</option>\n";
 971           }
 972           echo "   </select>\n";
 973           echo "   <br /><span class='bold'>Return to Play:</span><br>\n";
 974           echo "   <input type='text' size='10' name='form_userdate1' id='form_userdate1' " .
 975                 "value='$form_userdate1' " .
 976                 "title='" . htmlspecialchars(xl('yyyy-mm-dd Date of return to play'),ENT_QUOTES) . "' " .
 977                 "onkeyup='datekeyup(this,mypcc)' onblur='dateblur(this,mypcc)' />\n" .
 978                 "   <img src='../../pic/show_calendar.gif' align='absbottom' width='24' height='22' " .
 979                 "id='img_userdate1' border='0' alt='[?]' style='cursor:pointer' " .
 980                 "title='" . htmlspecialchars(xl('Click here to choose a date'),ENT_QUOTES) . "'>\n";
 981           echo "   <input type='hidden' name='form_original_userdate1' value='" . htmlspecialchars($form_userdate1,ENT_QUOTES) . "' />\n";
 982           echo "   <input type='hidden' name='form_issue_id' value='' />\n";
 983           echo "<p><input type='submit' name='form_submit' value='Change' /></p>\n";
 984           echo "   </form>\n";
 985         }
 986
 987         // Show current and upcoming appointments.
 988         if (isset($pid) && !$GLOBALS['disable_calendar']) {
 989          $query = "SELECT e.pc_eid, e.pc_aid, e.pc_title, e.pc_eventDate, " .
 990           "e.pc_startTime, e.pc_hometext, u.fname, u.lname, u.mname, " .
 991           "c.pc_catname " .
 992           "FROM openemr_postcalendar_events AS e, users AS u, " .
 993           "openemr_postcalendar_categories AS c WHERE " .
 994           "e.pc_pid = ? AND e.pc_eventDate >= CURRENT_DATE AND " .
 995           "u.id = e.pc_aid AND e.pc_catid = c.pc_catid " .
 996           "ORDER BY e.pc_eventDate, e.pc_startTime";
 997          $res = sqlStatement($query, array($pid) );
 998
 999         if ( (acl_check('patients', 'med')) && ($GLOBALS['enable_cdr'] && $GLOBALS['enable_cdr_crw']) ) {
1000           // clinical summary expand collapse widget
1001           $widgetTitle = xl("Clinical Reminders");
1002           $widgetLabel = "clinical_reminders";
1003           $widgetButtonLabel = xl("Edit");
1004           $widgetButtonLink = "../reminder/clinical_reminders.php?patient_id=".$pid;;
1005           $widgetButtonClass = "";
1006           $linkMethod = "html";
1007           $bodyClass = "summary_item small";
1008           $widgetAuth = true;
1009           $fixedWidth = false;
1010           expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel , $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass, $widgetAuth, $fixedWidth);
1011           echo "<br/>";
1012           echo "<div style='margin-left:10px' class='text'><image src='../../pic/ajax-loader.gif'/></div><br/>";
1013           echo "</div>";
1014         } // end if crw
1015
1016         // appointments expand collapse widget
1017         $widgetTitle = xl("Appointments");
1018         $widgetLabel = "appointments";
1019         $widgetButtonLabel = xl("Add");
1020         $widgetButtonLink = "return newEvt();";
1021         $widgetButtonClass = "";
1022         $linkMethod = "javascript";
1023         $bodyClass = "summary_item small";
1024         $widgetAuth = (isset($res) && $res != null);
1025         $fixedWidth = false;
1026         expand_collapse_widget($widgetTitle, $widgetLabel, $widgetButtonLabel , $widgetButtonLink, $widgetButtonClass, $linkMethod, $bodyClass, $widgetAuth, $fixedWidth);
1027
1028                          $count = 0;
1029                          while($row = sqlFetchArray($res)) {
1030                           $count++;
1031                           $dayname = date("l", strtotime($row['pc_eventDate']));
1032                           $dispampm = "am";
1033                           $disphour = substr($row['pc_startTime'], 0, 2) + 0;
1034                           $dispmin  = substr($row['pc_startTime'], 3, 2);
1035                           if ($disphour >= 12) {
1036                            $dispampm = "pm";
1037                            if ($disphour > 12) $disphour -= 12;
1038                           }
1039                           $etitle = xl('(Click to edit)');
1040                           if ($row['pc_hometext'] != "") {
1041                                 $etitle = xl('Comments').": ".($row['pc_hometext'])."\r\n".$etitle;
1042                           }
1043               echo "<a href='javascript:oldEvt(" . htmlspecialchars($row['pc_eid'],ENT_QUOTES) .
1044                 ")' title='" . htmlspecialchars($etitle,ENT_QUOTES) . "'>";
1045                           echo "<b>" . htmlspecialchars(xl($dayname) . ", " . $row['pc_eventDate'],ENT_NOQUOTES) . "</b><br>";
1046                           echo htmlspecialchars("$disphour:$dispmin " . xl($dispampm) . " " . xl_appt_category($row['pc_catname']),ENT_NOQUOTES) . "<br>\n";
1047                           echo htmlspecialchars($row['fname'] . " " . $row['lname'],ENT_NOQUOTES) . "</a><br>\n";
1048                          }
1049                          if (isset($res) && $res != null) {
1050                                 if ( $count < 1 ) { echo "&nbsp;&nbsp;" . htmlspecialchars(xl('None'),ENT_NOQUOTES); }
1051                                 echo "</div>";
1052                          }
1053                         }
1054                         ?>
1055                 </div>
1056
1057                 <div id='stats_div'>
1058             <br/>
1059             <div style='margin-left:10px' class='text'><img src='../../pic/ajax-loader.gif'/></div><br/>
1060         </div>
1061     </td>
1062     </tr>
1063     </table>
1064
1065         </div> <!-- end right column div -->
1066
1067   </td>
1068
1069  </tr>
1070 </table>
1071
1072 </div> <!-- end main content div -->
1073
1074 <?php if ($GLOBALS['concurrent_layout'] && $_GET['set_pid']) { ?>
1075 <script language='JavaScript'>
1076  top.window.parent.left_nav.setPatient(<?php echo "'" . htmlspecialchars(($result['fname']) . " " . ($result['lname']),ENT_QUOTES) .
1077    "'," . htmlspecialchars($pid,ENT_QUOTES) . ",'" . htmlspecialchars(($result['pubpid']),ENT_QUOTES) .
1078    "','', ' " . htmlspecialchars(xl('DOB') . ": " . oeFormatShortDate($result['DOB_YMD']) . " " . xl('Age') . ": " . getPatientAge($result['DOB_YMD']), ENT_QUOTES) . "'"; ?>);
1079 EncounterDateArray=new Array;
1080 CalendarCategoryArray=new Array;
1081 EncounterIdArray=new Array;
1082 Count=0;
1083  <?php
1084  //Encounter details are stored to javacript as array.
1085 $result4 = sqlStatement("SELECT fe.encounter,fe.date,openemr_postcalendar_categories.pc_catname FROM form_encounter AS fe ".
1086         " left join openemr_postcalendar_categories on fe.pc_catid=openemr_postcalendar_categories.pc_catid  WHERE fe.pid = ? order by fe.date desc", array($pid));
1087    if(sqlNumRows($result4)>0)
1088         while($rowresult4 = sqlFetchArray($result4))
1089          {
1090 ?>
1091                 EncounterIdArray[Count]='<?php echo htmlspecialchars($rowresult4['encounter'], ENT_QUOTES); ?>';
1092                 EncounterDateArray[Count]='<?php echo htmlspecialchars(oeFormatShortDate(date("Y-m-d", strtotime($rowresult4['date']))), ENT_QUOTES); ?>';
1093                 CalendarCategoryArray[Count]='<?php echo htmlspecialchars( xl_appt_category($rowresult4['pc_catname']), ENT_QUOTES); ?>';
1094                 Count++;
1095  <?php
1096          }
1097  ?>
1098  top.window.parent.left_nav.setPatientEncounter(EncounterIdArray,EncounterDateArray,CalendarCategoryArray);
1099  parent.left_nav.setRadio(window.name, 'dem');
1100 </script>
1101 <?php } ?>
1102
1103 <?php if (false && $GLOBALS['athletic_team']) { ?>
1104 <script language='JavaScript'>
1105  Calendar.setup({inputField:"form_userdate1", ifFormat:"%Y-%m-%d", button:"img_userdate1"});
1106 </script>
1107 <?php } ?>
1108
1109 </body>
1110 </html>