interface/patient_file/summary/demographics.php

   1 <?
   2  include_once("../../globals.php");
   3  include_once("$srcdir/patient.inc");
   4  include_once("$srcdir/acl.inc");
   5 ?>
   6 <html>
   7
   8 <head>
   9 <link rel=stylesheet href="<?echo $css_header;?>" type="text/css">
  10 <script type="text/javascript" src="../../../library/dialog.js"></script>
  11 <script language="JavaScript">
  12
  13  function oldEvt(eventid) {
  14   dlgopen('../../main/calendar/add_edit_event.php?eid=' + eventid, '_blank', 550, 270);
  15  }
  16
  17  function refreshme() {
  18   location.reload();
  19  }
  20
  21  // Process click on Delete link.
  22  function deleteme() {
  23   dlgopen('../deleter.php?patient=<?php echo $pid ?>', '_blank', 500, 450);
  24   return false;
  25  }
  26
  27  // Called by the deleteme.php window on a successful delete.
  28  function imdeleted() {
  29   top.location.href = '../main/main_screen.php';
  30  }
  31
  32 </script>
  33 </head>
  34
  35 <body <?echo $top_bg_line;?> topmargin=0 rightmargin=0 leftmargin=2 bottommargin=0 marginwidth=2 marginheight=0>
  36
  37 <?
  38  $result = getPatientData($pid);
  39  $result2 = getEmployerData($pid);
  40
  41  $thisauth = acl_check('patients', 'demo');
  42  if ($thisauth) {
  43   if ($result['squad'] && ! acl_check('squads', $result['squad']))
  44    $thisauth = 0;
  45  }
  46
  47  if (!$thisauth) {
  48   echo "<p>(Demographics not authorized)</p>\n";
  49   echo "</body>\n</html>\n";
  50   exit();
  51  }
  52
  53  if ($thisauth == 'write') {
  54   echo "<p><a href='demographics_full.php' target='Main'>" .
  55    "<font class='title'>Demographics</font>" .
  56    "<font class='more'>$tmore</font></a>";
  57   if (acl_check('admin', 'super')) {
  58    echo "&nbsp;&nbsp;<a href='' onclick='return deleteme()'>" .
  59     "<font class='more' style='color:red'>(Delete)</font></a>";
  60   }
  61   echo "</p>\n";
  62  }
  63 ?>
  64
  65 <table border="0" width="100%">
  66  <tr>
  67   <td align="left" valign="top">
  68    <table border='0' cellpadding='0' width='100%'>
  69     <tr>
  70      <td valign='top'>
  71       <span class='bold'>Name: </span><span class='text'><?echo $result{"title"}?> <?echo $result{"fname"}?> <?echo $result{"mname"}?> <?echo $result{"lname"}?></span><br>
  72       <span class='bold'>Number: </span><span class='text'><?echo $result{"pubpid"}?></span>
  73      </td>
  74      <td valign='top'>
  75 <?
  76  if ($result{"DOB"} && $result{"DOB"} != "0000-00-00") {
  77 ?>
  78       <span class='bold'>DOB: </span>
  79       <span class='text'>
  80 <?
  81   echo $result{"DOB"};
  82  }
  83 ?>
  84       </span>
  85      </td>
  86      <td valign='top'><? if ($result{"sex"} != ""){?><span class='bold'>Sex: </span><?}?><span class='text'><?echo $result{"sex"}?></span></td>
  87      <td valign='top'><? if ($result{"ss"} != "") {?><span class='bold'>S.S.: </span><?}?><span class='text'><?echo $result{"ss"}?></span></td>
  88     </tr>
  89     <tr>
  90      <td valign='top'>
  91 <? if (($result{"street"} != "") || ($result{"city"} != "") || ($result{"state"} != "") || ($result{"country_code"} != "") || ($result{"postal_code"} != "")) {?>
  92       <span class='bold'>Address: </span>
  93 <?}?>
  94       <br><span class='text'><?echo $result{"street"}?><br><?echo $result{"city"}?><?if($result{"city"} != ""){echo ", ";}?><?echo $result{"state"};?>
  95 <? if($result{"country_code"} != ""){ echo ", "; }?><?echo $result{"country_code"}?>
  96 <?echo " ";
  97 echo $result{"postal_code"}?>
  98       </span>
  99      </td>
 100      <td valign='top'>
 101 <?
 102         if (    ($result{"contact_relationship"} != "") ||
 103                 ($result{"phone_contact"} != "") ||
 104                 ($result{"phone_home"} != "") ||
 105                 ($result{"phone_biz"} != "") ||
 106                 ($result{"email"} != "")  ||
 107                 ($result{"phone_cell"} != "")    ){
 108 ?>
 109       <span class='bold'>Emergency Contact: </span><?}?><span class='text'><?echo $result{"contact_relationship"}?><?echo " "?>
 110 <?
 111         if ($result{"phone_contact"} != "") {
 112                 echo " " . $result{"phone_contact"};
 113         }
 114         if ($result{"phone_home"} != "") {
 115                 echo "<br>Home: ";
 116                 echo $result{"phone_home"};
 117         }
 118         if ($result{"phone_biz"} != "") {
 119                 echo "<br>Work: ";
 120                 echo $result{"phone_biz"};
 121         }
 122         if ($result{"phone_cell"} != "") {
 123                 echo "<br>Mobile: ";
 124                 echo $result{"phone_cell"};
 125         }
 126         if ($result{"email"} != "") {
 127                 echo "<br>Email: </span>";
 128                 echo '<a class=link_submit href="mailto:' . $result{"email"} . '">' . $result{"email"} . '</a>';
 129         }
 130 ?>
 131      </td>
 132      <td valign='top'>
 133 <?
 134         if ($result{"status"} != "") {
 135                 echo "<span class='bold'>Marital Status: </span>";
 136                 echo "<span class='text'>" .  $result{"status"} . "</span>";
 137         }
 138 ?>
 139      </td>
 140      <td valign='top'></td>
 141     </tr>
 142
 143 <? if (! $GLOBALS['athletic_team']) { ?>
 144     <tr>
 145      <td colspan='4' valign='top'>
 146         <?
 147                 $result{"hipaa_mail"}=='YES' ? $opt_out='ALLOWS' : $opt_out='DOES NOT ALLOW' ;
 148                 echo "<span class='text'>Patient $opt_out Mailed Information </span>";
 149         ?>
 150      </td>
 151     </tr>
 152     <tr>
 153      <td colspan='4' valign='top'>
 154         <?
 155                 $result{"hipaa_voice"}=='YES' ? $opt_out='ALLOWS' : $opt_out='DOES NOT ALLOW' ;
 156                 echo "<span class='text'>Patient $opt_out Voice Messages </span>";
 157         ?>
 158      </td>
 159     </tr>
 160 <? } else { ?>
 161     <tr>
 162      <td colspan='4' valign='top'>
 163       &nbsp;
 164      </td>
 165     </tr>
 166 <? } ?>
 167
 168     <tr>
 169      <td valign='top'>
 170 <? if ($result{"occupation"} != "") {?><span class='bold'>Occupation: </span><span class='text'><?echo $result{"occupation"}?></span><br><?}?>
 171 <? if ($result2{"name"} != "") {?><span class='bold'>Employer: </span><span class='text'><?echo $result2{"name"}?></span><?}?>
 172      </td>
 173      <td valign='top'>
 174 <? if (($result2{"street"} != "") || ($result2{"city"} != "") || ($result2{"state"} != "") || ($result2{"country"} != "") || ($result2{"postal_code"} != "")) {?>
 175       <span class='bold'>Employer Address:</span>
 176 <? } ?>
 177       <br>
 178       <span class='text'>
 179 <?echo $result2{"street"}?><br><?echo $result2{"city"}?><?if($result2{"city"} != ""){echo ", ";}?><?echo $result2{"state"}?>
 180 <?if($result2{"country"} != ""){echo ", ";}?><?echo $result2{"country"}?>
 181 <?if($result2{"postal_code"} != ""){echo " ";}?>
 182 <?echo $result2{"postal_code"}?>
 183       </span>
 184      </td>
 185      <td valign='top'>
 186 <?
 187  // This stuff only applies to athletic team use of OpenEMR:
 188  if ($GLOBALS['athletic_team']) {
 189   //                  blue       dk green   yellow     red        orange
 190   $fitcolors = array('#6677ff', '#00cc00', '#ffff00', '#ff3333', '#ff8800');
 191   $fitcolor = $fitcolors[0];
 192   $fitness = $_POST['form_fitness'];
 193   if ($fitness) {
 194    sqlStatement("UPDATE patient_data SET fitness = '$fitness' WHERE pid = '$pid'");
 195   } else {
 196    $fitness = $result['fitness'];
 197    if (! $fitness) $fitness = 1;
 198   }
 199   $fitcolor = $fitcolors[$fitness - 1];
 200 ?>
 201       <form method='post' action='demographics.php'>
 202       <span class='bold'>Fitness to Play:</span><br>
 203       <select name='form_fitness' onchange='document.forms[0].submit()' style='background-color:<? echo $fitcolor ?>'>
 204        <option value='1'<? if ($fitness == 1) echo ' selected' ?>>Full Play</option>
 205        <option value='2'<? if ($fitness == 2) echo ' selected' ?>>Full Training</option>
 206        <option value='3'<? if ($fitness == 3) echo ' selected' ?>>Restricted Training</option>
 207        <option value='4'<? if ($fitness == 4) echo ' selected' ?>>Injured Out</option>
 208        <option value='5'<? if ($fitness == 5) echo ' selected' ?>>Rehabilitation</option>
 209       </select>
 210       </form>
 211 <? } ?>
 212      </td>
 213      <td valign='top'></td>
 214     </tr>
 215     <tr>
 216      <td valign='top'>
 217 <? if (! $GLOBALS['athletic_team']) { ?>
 218 <? if ($result{"ethnoracial"} != "")  { ?><span class='bold'>Race/Ethnicity: </span><span class='text'><?echo $result{"ethnoracial"};?></span><br><? } ?>
 219 <? if ($result{"language"} != "")     { ?><span class='bold'>Language: </span><span class='text'><?echo ucfirst($result{"language"});?></span><br><? } ?>
 220 <? if ($result{"interpretter"} != "") { ?><span class='bold'>Interpreter: </span><span class='text'><?echo $result{"interpretter"};?></span><br><? } ?>
 221 <? if ($result{"family_size"} != "")  { ?><span class='bold'>Family Size: </span><span class='text'><?echo $result{"family_size"};?></span><br><? } ?>
 222 <? } ?>
 223      </td>
 224      <td valign='top'>
 225 <?
 226 function print_as_money($money) {
 227 preg_match("/(\d*)\.?(\d*)/",$money,$moneymatches);
 228 $tmp = wordwrap(strrev($moneymatches[1]),3,",",1);
 229 $ccheck = strrev($tmp);
 230 if ($ccheck[0] == ",") {
 231         $tmp = substr($ccheck,1,strlen($ccheck)-1);
 232 }
 233 if ($moneymatches[2] != "") {
 234         return "$ " . strrev($tmp) . "." . $moneymatches[2];
 235 } else {
 236         return "$ " . strrev($tmp);
 237 }
 238 }
 239 ?>
 240 <? if (! $GLOBALS['athletic_team']) { ?>
 241 <? if ($result{"financial_review"} != "0000-00-00 00:00:00") {?><span class='bold'>Financial Review Date: </span><span class='text'><?echo date("n/j/Y",strtotime($result{"financial_review"}));?></span><br><?}?>
 242 <? if ($result{"monthly_income"} != "") {?><span class='bold'>Monthly Income: </span><span class='text'><?echo print_as_money($result{"monthly_income"});?></span><br><?}?>
 243 <? if ($result{"migrantseasonal"} != "") {?><span class='bold'>Migrant/Seasonal: </span><span class='text'><?echo $result{"migrantseasonal"};?></span><br><?}?>
 244 <? if ($result{"homeless"} != "") {?><span class='bold'>Homeless, etc.: </span><span class='text'><?echo $result{"homeless"};?></span><br><?}?>
 245 <? } ?>
 246      </td>
 247      <td valign='top'>
 248       <table>
 249        <tr>
 250         <td><? if ($result{"genericname1"} != "") {?><span class='bold'><?=$result{"genericname1"}?></span>:<?}?> </td>
 251         <td><? if ($result{"genericval1"} != "") {?><span class='text'><?=$result{"genericval1"}?></span><?}?></td>
 252        </tr>
 253        <tr>
 254         <td><? if ($result{"genericname2"} != "") {?><span class='bold'><?=$result{"genericname2"}?></span>:<?}?> </td>
 255         <td><? if ($result{"genericval2"} != "") {?><span class='text'><?=$result{"genericval2"}?></span><?}?></td>
 256        </tr>
 257       </table>
 258      </td>
 259      <td valign='top'></td>
 260     </tr>
 261 <?php
 262 //////////////////////////////////REFERRAL SECTION
 263 if ($result{"referrer"} != "" || $result{"referrerID"} != "")
 264 {
 265 ?>
 266     <tr>
 267      <td valign='top'>
 268       <span class='bold'>Primary Provider: </span><span class='text'><?=getProviderName($result['providerID'])?></span><br>
 269       <!--<span class='bold'>Primary Provider ID: </span><span class='text'><?=$result{"referrerID"}?></span>-->
 270      </td>
 271      <td valign='top'></td>
 272      <td valign='top'></td>
 273      <td valign='top'></td>
 274     </tr>
 275 <?php
 276 }
 277
 278 /////////////////////////////////INSURANCE SECTION
 279 $result3 = getInsuranceData($pid, "primary");
 280 if ($result3{"provider"}) {
 281 ?>
 282     <tr>
 283      <td valign='top'>
 284       <span class='bold'>Primary Insurance Provider:</span><br><span class='text'><?echo $result3{"provider_name"}?></span><br>
 285       <span class='text'>Policy Number: <?echo $result3{"policy_number"}?><br>
 286       Plan Name: <?=$result3{"plan_name"}?><br>
 287       Group Number: <?echo $result3{"group_number"}?></span>
 288      </td>
 289      <td valign='top'>
 290       <span class='bold'>Subscriber: </span><br><span class='text'><?=$result3{"subscriber_fname"}?> <?=$result3{"subscriber_mname"}?> <?=$result3{"subscriber_lname"}?> <?if ($result3{"subscriber_relationship"} != "") {echo "(".$result3{"subscriber_relationship"}.")";}?><br>
 291       S.S.: <?echo $result3{"subscriber_ss"}?> D.O.B.: <?if ($result3{"subscriber_DOB"} != "0000-00-00 00:00:00") {echo $result3{"subscriber_DOB"};}?><br>
 292       Phone: <? echo $result3{"subscriber_phone"}?>
 293       </span>
 294      </td>
 295      <td valign='top'>
 296       <span class='bold'>Subscriber Address: </span><br><span class='text'><?echo $result3{"subscriber_street"}?><br><?echo $result3{"subscriber_city"}?><?if($result3{"subscriber_state"} != ""){echo ", ";}?><?echo $result3{"subscriber_state"}?><?if($result3{"subscriber_country"} != ""){echo ", ";}?><?echo $result3{"subscriber_country"}?> <?echo " ".$result3{"subscriber_postal_code"}?></span>
 297      </td>
 298      <td valign='top'>
 299       <span class='bold'>Subscriber Employer: </span><br><span class='text'><?echo $result3{"subscriber_employer"}?><br><?echo $result3{"subscriber_employer_street"}?><br><?echo $result3{"subscriber_employer_city"}?><?if($result3{"subscriber_employer_city"} != ""){echo ", ";}?><?echo $result3{"subscriber_employer_state"}?><?if($result3{"subscriber_employer_country"} != ""){echo ", ";}?><?echo $result3{"subscriber_employer_country"}?> <?echo " ".$result3{"subscriber_employer_postal_code"}?></span>
 300      </td>
 301     </tr>
 302     <tr>
 303      <td><? if ($result3{"copay"} != "") {?><span class='bold'>CoPay: </span><span class='text'><?=$result3{"copay"}?></span><?}?></td>
 304      <td valign='top'></td>
 305      <td valign='top'></td>
 306      <td valign='top'></td>
 307    </tr>
 308 <? } ?>
 309 <?
 310 $result4 = getInsuranceData($pid, "secondary");
 311 if ($result4{"provider"} != "") {
 312 ?>
 313     <tr>
 314      <td valign='top'>
 315       <span class='bold'>Secondary Insurance Provider:</span><br><span class='text'><?echo $result4{"provider_name"}?></span><br>
 316       <span class='text'>Policy Number: <?echo $result4{"policy_number"}?><br>
 317       Plan Name: <?=$result4{"plan_name"}?><br>
 318       Group Number: <?echo $result4{"group_number"}?></span>
 319      </td>
 320      <td valign='top'>
 321       <span class='bold'>Subscriber: </span><br><span class='text'><?=$result4{"subscriber_fname"}?> <?=$result4{"subscriber_mname"}?> <?=$result4{"subscriber_lname"}?> <?if ($result4{"subscriber_relationship"} != "") {echo "(".$result4{"subscriber_relationship"}.")";}?><br>
 322       S.S.: <?echo $result4{"subscriber_ss"}?> D.O.B.: <?if ($result4{"subscriber_DOB"} != "0000-00-00 00:00:00") {echo $result4{"subscriber_DOB"};}?><br>
 323       Phone: <? echo $result4{"subscriber_phone"}?>
 324       </span>
 325      </td>
 326      <td valign='top'>
 327       <span class='bold'>Subscriber Address: </span><br><span class='text'><?echo $result4{"subscriber_street"}?><br><?echo $result4{"subscriber_city"}?><?if($result4{"subscriber_state"} != ""){echo ", ";}?><?echo $result4{"subscriber_state"}?><?if($result4{"subscriber_country"} != ""){echo ", ";}?><?echo $result4{"subscriber_country"}?> <?echo " ".$result4{"subscriber_postal_code"}?></span>
 328      </td>
 329      <td valign='top'>
 330       <span class='bold'>Subscriber Employer: </span><br><span class='text'><?echo $result4{"subscriber_employer"}?><br><?echo $result4{"subscriber_employer_street"}?><br><?echo $result4{"subscriber_employer_city"}?><?if($result4{"subscriber_employer_city"} != ""){echo ", ";}?><?echo $result4{"subscriber_employer_state"}?><?if($result4{"subscriber_employer_country"} != ""){echo ", ";}?><?echo $result4{"subscriber_employer_country"}?> <?echo " ".$result4{"subscriber_employer_postal_code"}?></span>
 331      </td>
 332     </tr>
 333     <tr>
 334      <td>
 335       <? if ($result4{"copay"} != "") {?><span class='bold'>CoPay: </span><span class='text'><?=$result4{"copay"}?></span><?}?>
 336      </td>
 337      <td valign='top'></td>
 338      <td valign='top'></td>
 339      <td valign='top'></td>
 340     </tr>
 341 <? } ?>
 342 <?
 343 $result5 = getInsuranceData($pid, "tertiary");
 344 if ($result5{"provider"}) {
 345 ?>
 346     <tr>
 347      <td valign='top'>
 348       <span class='bold'>Tertiary Insurance Provider:</span><br><span class='text'><?echo $result5{"provider_name"}?></span><br>
 349       <span class='text'>Policy Number: <?echo $result5{"policy_number"}?><br>
 350       Plan Name: <?=$result5{"plan_name"}?><br>
 351       Group Number: <?echo $result5{"group_number"}?></span>
 352      </td>
 353      <td valign='top'>
 354       <span class='bold'>Subscriber: </span><br><span class='text'><?=$result5{"subscriber_fname"}?> <?=$result5{"subscriber_mname"}?> <?=$result5{"subscriber_lname"}?> <?if ($result5{"subscriber_relationship"} != "") {echo "(".$result5{"subscriber_relationship"}.")";}?><br>
 355       S.S.: <?echo $result5{"subscriber_ss"}?> D.O.B.: <?if ($result5{"subscriber_DOB"} != "0000-00-00 00:00:00") {echo $result5{"subscriber_DOB"};}?><br>
 356       Phone: <? echo $result5{"subscriber_phone"}?>
 357       </span>
 358      </td>
 359      <td valign='top'>
 360       <span class='bold'>Subscriber Address: </span><br><span class='text'><?echo $result5{"subscriber_street"}?><br><?echo $result5{"subscriber_city"}?><?if($result5{"subscriber_state"} != ""){echo ", ";}?><?echo $result5{"subscriber_state"}?><?if($result5{"subscriber_country"} != ""){echo ", ";}?><?echo $result5{"subscriber_country"}?> <?echo " ".$result5{"subscriber_postal_code"}?></span>
 361      </td>
 362      <td valign='top'>
 363       <span class='bold'>Subscriber Employer: </span><br><span class='text'><?echo $result5{"subscriber_employer"}?><br><?echo $result5{"subscriber_employer_street"}?><br><?echo $result5{"subscriber_employer_city"}?><?if($result5{"subscriber_employer_city"} != ""){echo ", ";}?><?echo $result5{"subscriber_employer_state"}?><?if($result5{"subscriber_employer_country"} != ""){echo ", ";}?><?echo $result5{"subscriber_employer_country"}?> <?echo " ".$result5{"subscriber_employer_postal_code"}?></span>
 364      </td>
 365     </tr>
 366     <tr>
 367      <td>
 368       <? if ($result5{"copay"} != "") {?><span class='bold'>CoPay: </span><span class='text'><?=$result5{"copay"}?></span><?}?>
 369      </td>
 370      <td valign='top'></td>
 371      <td valign='top'></td>
 372      <td valign='top'></td>
 373     </tr>
 374 <?
 375 }
 376 ?>
 377    </table>
 378   </td>
 379   <td valign="top" class="text">
 380 <?php
 381 if (isset($pid)) {
 382  $query = "SELECT e.pc_eid, e.pc_aid, e.pc_title, e.pc_eventDate, " .
 383   "e.pc_startTime, u.fname, u.lname, u.mname " .
 384   "FROM openemr_postcalendar_events AS e, users AS u WHERE " .
 385   "e.pc_pid = '$pid' AND e.pc_eventDate >= CURRENT_DATE AND " .
 386   "u.id = e.pc_aid " .
 387   "ORDER BY e.pc_eventDate, e.pc_startTime";
 388  $res = sqlStatement($query);
 389  while($row = sqlFetchArray($res)) {
 390   $dayname = date("l", strtotime($row['pc_eventDate']));
 391   $dispampm = "am";
 392   $disphour = substr($row['pc_startTime'], 0, 2) + 0;
 393   $dispmin  = substr($row['pc_startTime'], 3, 2);
 394   if ($disphour >= 12) {
 395    $dispampm = "pm";
 396    if ($disphour > 12) $disphour -= 12;
 397   }
 398   echo "<a href='javascript:oldEvt(" . $row['pc_eid'] .
 399        ")'><b>$dayname " . $row['pc_eventDate'] . "</b><br>";
 400   echo "$disphour:$dispmin $dispampm " . $row['pc_title'] . "<br>\n";
 401   echo $row['fname'] . " " . $row['lname'] . "</a><br>&nbsp;<br>\n";
 402  }
 403 }
 404 ?>
 405   </td>
 406  </tr>
 407 </table>
 408
 409 </body>
 410 </html>