interface/forms/CAMOS/notegen.php

   1 <?
   2 $depth = '../../../';
   3 include_once ($depth.'interface/globals.php');
   4 include_once ($depth.'library/classes/class.ezpdf.php');
   5 ?>
   6 <?
   7 if (!$_POST['submit'] && !($_GET['pid'] && $_GET['encounter'])) {
   8 ?>
   9 <html>
  10 <head>
  11 <title>
  12 Print Notes
  13 </title>
  14 <style type="text/css">@import url('<?php echo $depth ?>library/dynarch_calendar.css');</style>
  15 <script type="text/javascript" src="<?php echo $depth ?>library/dialog.js"></script>
  16 <script type="text/javascript" src="<?php echo $depth ?>library/textformat.js"></script>
  17 <script type="text/javascript" src="<?php echo $depth ?>library/dynarch_calendar.js"></script>
  18 <script type="text/javascript" src="<?php echo $depth ?>library/dynarch_calendar_en.js"></script>
  19 <script type="text/javascript" src="<?php echo $depth ?>library/dynarch_calendar_setup.js"></script>
  20 </head>
  21
  22 <body>
  23 <script language='JavaScript'> var mypcc = '1'; </script>
  24
  25 <form method=post name=choose_patients>
  26
  27 <table>
  28 <tr><td>
  29 <span class='text'><?php xl('Start (yyyy-mm-dd): ','e') ?></span>
  30 </td><td>
  31 <input type='text' size='10' name='start' id='start' value='<? echo $_POST['end'] ? $_POST['end'] : date('Y-m-d') ?>'
  32 onkeyup='datekeyup(this,mypcc)' onblur='dateblur(this,mypcc)'
  33 title='yyyy-mm-dd last date of this event' />
  34 <img src='<?php echo $depth ?>interface/pic/show_calendar.gif' align='absbottom' width='24' height='22'
  35 id='img_start' border='0' alt='[?]' style='cursor:pointer'
  36 title='Click here to choose a date'>
  37 <script>
  38 Calendar.setup({inputField:'start', ifFormat:'%Y-%m-%d', button:'img_start'});
  39 </script>
  40 </td></tr>
  41
  42 <tr><td>
  43 <span class='text'><?php xl('End (yyyy-mm-dd): ','e') ?></span>
  44 </td><td>
  45 <input type='text' size='10' name='end' id='end' value ='<? echo $_POST['end'] ? $_POST['end'] : date('Y-m-d') ?>'
  46 onkeyup='datekeyup(this,mypcc)' onblur='dateblur(this,mypcc)'
  47 title='yyyy-mm-dd last date of this event' />
  48 <img src='<?php echo $depth ?>interface/pic/show_calendar.gif' align='absbottom' width='24' height='22'
  49 id='img_end' border='0' alt='[?]' style='cursor:pointer'
  50 title='Click here to choose a date'>
  51 <script>
  52 Calendar.setup({inputField:'end', ifFormat:'%Y-%m-%d', button:'img_end'});
  53 </script>
  54 </td></tr>
  55 <tr><td></td><td></td></tr>
  56 <tr><td>Last Name: </td><td>
  57 <input type='text' name='lname'/>
  58 </td></tr>
  59 <tr><td>First Name: </td><td>
  60 <input type='text' name='fname'/>
  61 </td></tr>
  62 <tr><td>
  63 <input type='submit' name='submit' value='submit'>
  64 </td><td>
  65 </td></tr>
  66 </table>
  67 </form>
  68 </body>
  69 </html>
  70 <?
  71 }
  72 if ($_POST['submit'] || ($_GET['pid'] && $_GET['encounter'])) {
  73         $pdf =& new Cezpdf();
  74         $pdf->selectFont($depth.'library/fonts/Helvetica');
  75         $pdf->ezSetCmMargins(3,1,1,1);
  76         $output = getFormData($_POST['start'],$_POST['end'],$_POST['lname'],$_POST['fname']);
  77         ksort($output);
  78         $first = 1;
  79         foreach ($output as $datekey => $dailynote) {
  80                 foreach ($dailynote as $note_id => $notecontents) {
  81                         preg_match('/(\d+)_(\d+)/', $note_id, $matches); //the unique note id contains the pid and encounter
  82                         $pid = $matches[1];
  83                         $enc = $matches[2];
  84                         if (!$first) { //generate a new page each time except first iteration when nothing has been printed yet
  85                                 $pdf->ezNewPage();
  86                         }
  87                         else {
  88                                 $first = 0;
  89                         }
  90                         $pdf->ezText("Date: ".$notecontents['date'],8);
  91                         $pdf->ezText("Name: ".$notecontents['name'],8);
  92 //                      $pdf->ezText("ID: ".$note_id,8);
  93
  94                         $query = sqlStatement("select pubpid from patient_data where id=".$_GET['pid']);
  95                         if ($results = mysql_fetch_array($query, MYSQL_ASSOC)) {
  96                                 $pubpid = $results['pubpid'];
  97                         }
  98                         $pdf->ezText("Claim# ".$pubpid,8);
  99
 100                         $pdf->ezText("",8);
 101                         $pdf->ezText("Chief Complaint: ".$notecontents['reason'],8);
 102                         if ($notecontents['vitals']) {
 103                                 $pdf->ezText("",8);
 104                                 $pdf->ezText($notecontents['vitals'],8);
 105                         }
 106                         if (count($notecontents['exam']) > 0) {
 107                                 $pdf->ezText("",8);
 108                                 $pdf->ezText("Progress Notes",12);
 109                                 $pdf->ezText("",8);
 110                                 foreach($notecontents['exam'] as $examnote) {
 111                                         $pdf->ezText("$examnote");
 112                                 }
 113                         }
 114                         if (count($notecontents['prescriptions']) > 0) {
 115                                 $pdf->ezText("",8);
 116                                 $pdf->ezText("Prescriptions",12);
 117                                 $pdf->ezText("",8);
 118                                 foreach($notecontents['prescriptions'] as $rx) {
 119                                         $pdf->ezText($rx);
 120                                 }
 121                         }
 122                         if (count($notecontents['other']) > 0) {
 123                                 $pdf->ezText("",8);
 124                                 $pdf->ezText("Other",12);
 125                                 $pdf->ezText("",8);
 126                                 foreach($notecontents['other'] as $other => $othercat) {
 127                                         $pdf->ezText($other,8);
 128                                         foreach($othercat as $items) {
 129                                                 $pdf->ezText($items,8);
 130                                         }
 131                                 }
 132                         }
 133                         if (count($notecontents['billing']) > 0) {
 134                                 $tmp = array();
 135                                 foreach($notecontents['billing'] as $code) {
 136                                         $tmp[$code]++;
 137                                 }
 138                                 if (count($tmp) > 0) {
 139                                         $pdf->ezText("",8);
 140                                         $pdf->ezText("Coding",12);
 141                                         $pdf->ezText("",8);
 142                                         foreach($tmp as $code => $val) {
 143                                                 $pdf->ezText($code,8);
 144                                         }
 145                                 }
 146                         }
 147                         if (count($notecontents['calories']) > 0) {
 148                                 $sum = 0;
 149                                 $pdf->ezText("",8);
 150                                 $pdf->ezText("Calories",12);
 151                                 $pdf->ezText("",8);
 152                                 foreach($notecontents['calories'] as $calories => $value) {
 153                                         $pdf->ezText($value['content'].' - '.$value['item'].' - '.$value['date'],8);
 154                                         $sum += $value['content'];
 155                                 }
 156                                 $pdf->ezText("--------",8);
 157                                 $pdf->ezText($sum,8);
 158                         }
 159                         $pdf->ezText("",12);
 160                         $pdf->ezText("",12);
 161                         $pdf->ezText("Digitally Signed",12);
 162
 163                         $query = sqlStatement("select t2.id, t2.fname, t2.lname, t2.title from forms as t1 join users as t2 on " .
 164                                 "(t1.user like t2.username) where t1.pid=$pid and t1.encounter=$encounter");
 165                         if ($results = mysql_fetch_array($query, MYSQL_ASSOC)) {
 166                                 $name = $results['fname']." ".$results['lname'].", ".$results['title'];
 167                                 $user_id = $results['id'];
 168                         }
 169                         $path = $GLOBALS['fileroot']."/interface/forms/CAMOS";
 170                         if (file_exists($path."/sig".$user_id.".jpg")) {
 171                                 $pdf->ezImage($path."/sig".$user_id.".jpg",'','72','','left','');
 172                         }
 173                         $pdf->ezText($name,12);
 174                 }
 175         }
 176         $pdf->ezStream();
 177 }
 178 function getFormData($start_date,$end_date,$lname,$fname) { //dates in sql format
 179         $lname = trim($lname);
 180         $fname = trim($fname);
 181         $name_clause = '';
 182         $date_clause = "date(t2.date) >= '".$start_date."' and date(t2.date) <= '".$end_date."' ";
 183         if ($lname || $fname) {
 184                 $name_clause = "and t3.lname like '%".$lname."%' and t3.fname like '%".$fname."%' ";
 185         }
 186         $dates = array();
 187         if ($_GET['pid'] && $_GET['encounter']) {
 188                 $date_clause = '';
 189                 $name_clause = "t2.pid=".$_GET['pid']." and t2.encounter=".$_GET['encounter']." ";
 190         }
 191         $query1 = sqlStatement(
 192                 "select t1.form_id, t1.form_name, t1.pid, date_format(t2.date,'%m-%d-%Y') as date, " .
 193                 "date_format(t2.date,'%Y%m%d') as datekey, " .
 194                 "t3.lname, t3.fname, date_format(t3.DOB,'%m-%d-%Y') as dob, " .
 195                 "t2.encounter as enc, " .
 196                 "t2.reason from " .
 197                 "forms as t1 join " .
 198                 "form_encounter as t2 on " .
 199                 "(t1.pid = t2.pid and t1.encounter = t2.encounter) " .
 200                 "join patient_data as t3 on " .
 201                 "(t1.pid = t3.pid) where " .
 202                 $date_clause .
 203                 $name_clause .
 204                 "order by date,pid");
 205         while ($results1 = mysql_fetch_array($query1, MYSQL_ASSOC)) {
 206                 if (!$dates[$results1['datekey']]) {
 207                         $dates[$results1['datekey']] = array();
 208                 }
 209                 if (!$dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]) {
 210                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']] = array();
 211                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['name'] = $results1['fname'].' '.$results1['lname'];
 212                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['date'] = $results1['date'];
 213                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['dob'] = $results1['dob'];
 214                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['vitals'] = '';
 215                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['reason'] = $results1['reason'];
 216                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['exam'] = array();
 217                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['prescriptions'] = array();
 218                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['other'] = array();
 219                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['billing'] = array();
 220                         $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['calories'] = array();
 221                 }
 222                 // get icd9 codes for this encounter
 223                 $query2 = sqlStatement("select * from billing where encounter = ".
 224                         $results1['enc']." and pid = ".$results1['pid']." and code_type like 'ICD9' and activity=1");
 225                 while ($results2 = mysql_fetch_array($query2, MYSQL_ASSOC)) {
 226                         array_push($dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['billing'],
 227                                 $results2['code'].' '.$results2['code_text']);
 228                 }
 229                 if (strtolower($results1['form_name']) == 'vitals') { // deal with Vitals
 230                         $query2 = sqlStatement("select * from form_vitals where id = " .
 231                                 $results1['form_id']);
 232                         if ($results2 = mysql_fetch_array($query2, MYSQL_ASSOC)) {
 233                                 $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['vitals'] = formatVitals($results2);
 234                         }
 235                 }
 236                 if (substr(strtolower($results1['form_name']),0,5) == 'camos') { // deal with camos
 237                         $query2 = sqlStatement("select category,subcategory,item,content,date_format(date,'%h:%i %p') as date from form_CAMOS where id = " .
 238                                 $results1['form_id']);
 239                         if ($results2 = mysql_fetch_array($query2, MYSQL_ASSOC)) {
 240                                 if ($results2['category'] == 'exam') {
 241                                         array_push($dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['exam'],$results2['content']);
 242                                 }
 243                                 elseif ($results2['category'] == 'prescriptions') {
 244                                         array_push($dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['prescriptions'],preg_replace("/\n+/",' ',$results2['content']));
 245                                 }
 246                                 elseif ($results2['category'] == 'communications') {
 247                                         //do nothing
 248                                 }
 249                                 elseif ($results2['category'] == 'calorie intake') {
 250                                         $values = array('subcategory' => $results2['subcategory'],
 251                                                 'item' => $results2['item'],
 252                                                 'content' => $results2['content'],
 253                                                 'date' => $results2['date']);
 254                                         array_push($dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['calories'],$values);
 255
 256                                 }
 257                                 else {
 258                                         if (!$dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['other'][$results2['category']]) {
 259                                                 $dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['other'][$results2['category']] = array();
 260                                         }
 261                                         array_push($dates[$results1['datekey']][$results1['pid'].'_'.$results1['enc']]['other'][$results2['category']],
 262                                                 preg_replace(array("/\n+/","/patientname/i"),array(' ',$results1['fname'].' '.$results1['lname']),$results2['content']));
 263                                 }
 264                         }
 265                 }
 266         }
 267         return $dates;
 268 }
 269 function formatVitals($raw) { //pass raw vitals array, format and return as string
 270         $height = '';
 271         $weight = '';
 272         $bmi = '';
 273         $temp= '';
 274         $bp = '';
 275         $pulse = '';
 276         $respiration = '';
 277         $oxygen_saturation = '';
 278         if ($raw['height'] && $raw['height'] > 0) {
 279                 $height = "HT: ".$raw['height']." ";
 280         }
 281         if ($raw['weight'] && $raw['weight'] > 0) {
 282                 $weight = "WT: ".$raw['weight']." ";
 283         }
 284         if ($raw['BMI'] && $raw['BMI'] > 0) {
 285                 $bmi = "BMI: ".$raw['BMI']." ";
 286         }
 287         if ($raw['temperature'] && $raw['temperature'] > 0) {
 288                 $temp = "Temp: ".$raw['temperature']." ";
 289         }
 290         if ($raw['bps'] && $raw['bpd'] && $raw['bps'] > 0 && $raw['bpd'] > 0) {
 291                 $bp = "BP: ".$raw['bps']."/".$raw['bpd']." ";
 292         }
 293         if ($raw['pulse'] && $raw['pulse'] > 0) {
 294                 $pulse = "Pulse: ".$raw['pulse']." ";
 295         }
 296         if ($raw['respiration'] && $raw['respiration'] > 0) {
 297                 $respiration = "Respiration: ".$raw['respiration']." ";
 298         }
 299         if ($raw['oxygen_saturation'] && $raw['oxygen_saturation'] > 0) {
 300                 $oxygen_saturation = "O2 Sat: ".$raw['oxygen_saturation']."% ";
 301         }
 302         $ret = $height.$weight.$bmi.$temp.$bp.
 303                 $pulse.$respiration.$oxygen_saturation;
 304         if ($ret != '') {
 305                 $ret = "Vital Signs: ".$ret;
 306         }
 307         return $ret;
 308 }