interface/patient_file/summary/browse.php

   1 <?php
   2 /**
   3  * Patient selector for insurance gui
   4  *
   5  * @package   OpenEMR
   6  * @link      http://www.open-emr.org
   7  * @author    Brady Miller <brady.g.miller@gmail.com>
   8  * @copyright Copyright (c) 2018 Brady Miller <brady.g.miller@gmail.com>
   9  * @license   https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
  10  */
  11
  12
  13 require_once("../../globals.php");
  14 require_once("$srcdir/patient.inc");
  15 require_once("$srcdir/options.inc.php");
  16
  17 use OpenEMR\Core\Header;
  18
  19 //the maximum number of patient records to display:
  20 $M = 100;
  21
  22 $browsenum = (is_numeric($_REQUEST['browsenum'])) ? $_REQUEST['browsenum'] : 1;
  23 ?>
  24 <html>
  25 <head>
  26     <?php Header::setupHeader(['datetime-picker', 'opener']); ?>
  27
  28     <script language="javascript">
  29         $(document).ready(function(){
  30             $('[name="findBy"').on('change', function () {
  31                 if($(this).val() === 'DOB'){
  32                     $('#searchparm').datetimepicker({
  33                         <?php $datetimepicker_timepicker = false; ?>
  34                         <?php $datetimepicker_showseconds = false; ?>
  35                         <?php $datetimepicker_formatInput = true; ?>
  36                         <?php require($GLOBALS['srcdir'] . '/js/xl/jquery-datetimepicker-2-5-4.js.php'); ?>
  37                         <?php // can add any additional javascript settings to datetimepicker here; need to prepend first setting with a comma ?>
  38                     });
  39                 } else {
  40                     $('#searchparm').datetimepicker("destroy");
  41                 }
  42             });
  43         });
  44     </script>
  45
  46 </head>
  47
  48 <body class="body_top">
  49
  50 <a href="javascript:window.close();"><font class=title><?php echo xlt('Browse for Record'); ?></font><font class=back><?php echo text($tback);?></font></a>
  51
  52 <form border='0' method='post' name="find_patient" action="browse.php?browsenum=<?php echo ".attr( $browsenum)."?>">
  53
  54 <input type='entry' size='10' name='patient' id='searchparm'>
  55 <select name="findBy" size='1'>
  56  <option value="ID"><?php echo xlt('ID'); ?></option>
  57  <option value="Last" selected><?php echo xlt('Last Name'); ?></option>
  58  <option value="SSN"><?php echo xlt('SSN'); ?></option>
  59  <option value="DOB"><?php echo xlt('DOB'); ?></option>
  60 </select>
  61 <a href="javascript:document.find_patient.submit();" class=link><?php echo xlt('Find'); ?></a>&nbsp;&nbsp;
  62 <a href="javascript:auto_populate_employer_address();" class=link_submit><?php echo xlt('Copy Values'); ?></a>
  63 </form>
  64
  65 <?php
  66 if (isset($_GET{set_pid})) {
  67     if (!isset($_POST{insurance})) {
  68         $insurance = "primary";
  69     } else {
  70         $insurance = $_POST{insurance};
  71     }
  72
  73     $result = getPatientData($_GET{set_pid});
  74   // $result2 = getEmployerData($_GET{set_pid}); // not used!
  75     $result3 = getInsuranceData($_GET{set_pid}, $insurance);
  76 ?>
  77
  78 <script language=javascript>
  79 <!--
  80 function auto_populate_employer_address(){
  81  var df = opener.document.demographics_form;
  82  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_fname.value='<?php echo htmlspecialchars($result3{subscriber_fname}, ENT_QUOTES);?>';
  83  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_mname.value='<?php echo htmlspecialchars($result3{subscriber_mname}, ENT_QUOTES);?>';
  84  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_lname.value='<?php echo htmlspecialchars($result3{subscriber_lname}, ENT_QUOTES);?>';
  85  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_street.value='<?php echo htmlspecialchars($result3{subscriber_street}, ENT_QUOTES);?>';
  86  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_city.value='<?php echo htmlspecialchars($result3{subscriber_city}, ENT_QUOTES);?>';
  87  df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_state.value='<?php echo htmlspecialchars($result3{subscriber_state}, ENT_QUOTES);?>';
  88  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_postal_code.value='<?php echo htmlspecialchars($result3{subscriber_postal_code}, ENT_QUOTES);?>';
  89  if (df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_country) // in case this is commented out
  90   df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_country.value='<?php echo htmlspecialchars($result3{subscriber_country}, ENT_QUOTES);?>';
  91  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_phone.value='<?php echo htmlspecialchars($result3{subscriber_phone}, ENT_QUOTES);?>';
  92  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_DOB.value='<?php echo attr(oeFormatShortDate($result3{subscriber_DOB}));?>';
  93  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_ss.value='<?php echo htmlspecialchars($result3{subscriber_ss}, ENT_QUOTES);?>';
  94  df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_sex.value='<?php echo htmlspecialchars($result3{subscriber_sex}, ENT_QUOTES);?>';
  95
  96  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>plan_name.value='<?php echo htmlspecialchars($result3{plan_name}, ENT_QUOTES);?>';
  97  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>policy_number.value='<?php echo htmlspecialchars($result3{policy_number}, ENT_QUOTES);?>';
  98  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>group_number.value='<?php echo htmlspecialchars($result3{group_number}, ENT_QUOTES);?>';
  99  df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>provider.value='<?php echo htmlspecialchars($result3{provider}, ENT_QUOTES);?>';
 100
 101  // One clinic comments out the subscriber employer stuff.
 102  if (df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer) {
 103   df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer.value='<?php echo htmlspecialchars($result3{subscriber_employer}, ENT_QUOTES);?>';
 104   df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer_street.value='<?php echo htmlspecialchars($result3{subscriber_employer_street}, ENT_QUOTES);?>';
 105   df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer_city.value='<?php echo htmlspecialchars($result3{subscriber_employer_city}, ENT_QUOTES);?>';
 106   df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer_state.value='<?php echo htmlspecialchars($result3{subscriber_employer_state}, ENT_QUOTES);?>';
 107   df.i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer_postal_code.value='<?php echo htmlspecialchars($result3{subscriber_employer_postal_code}, ENT_QUOTES);?>';
 108   df.form_i<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>subscriber_employer_country.value='<?php echo htmlspecialchars($result3{subscriber_employer_country}, ENT_QUOTES);?>';
 109  }
 110 }
 111 //-->
 112 </script>
 113
 114 <form method=post name=insurance_form action=browse.php?browsenum=<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>&set_pid=<?php echo htmlspecialchars($_GET{set_pid}, ENT_QUOTES);?>>
 115 <input type="hidden" name="browsenum" value="<?php echo htmlspecialchars($browsenum, ENT_QUOTES);?>">
 116 <span class=bold> <?php echo htmlspecialchars(xl('Insurance Provider'), ENT_NOQUOTES); ?>:</span>
 117 <select name=insurance onchange="javascript:document.insurance_form.submit();">
 118     <option value="primary" <?php echo ($insurance == "primary") ? "selected" : ""?>><?php echo htmlspecialchars(xl('Primary'), ENT_NOQUOTES); ?></option>
 119     <option value="secondary" <?php echo ($insurance == "secondary") ? "selected" : ""?>><?php echo htmlspecialchars(xl('Secondary'), ENT_NOQUOTES); ?></option>
 120     <option value="tertiary" <?php echo ($insurance == "tertiary") ? "selected" : ""?>><?php echo htmlspecialchars(xl('Tertiary'), ENT_NOQUOTES); ?></option>
 121 </select>
 122
 123 </form>
 124 <table class="table">
 125 <tr>
 126 <td><span class=text><?php echo htmlspecialchars(xl('First Name'), ENT_NOQUOTES); ?>:</span></td>
 127 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_fname}, ENT_NOQUOTES);?></span></td>
 128 </tr>
 129 <tr>
 130 <td><span class=text><?php echo htmlspecialchars(xl('Middle Name'), ENT_NOQUOTES); ?>:</span></td>
 131 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_mname}, ENT_NOQUOTES);?></span></td>
 132 </tr>
 133 <tr>
 134 <td><span class=text><?php echo htmlspecialchars(xl('Last Name'), ENT_NOQUOTES); ?>:</span></td>
 135 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_lname}, ENT_NOQUOTES);?></span></td>
 136 </tr>
 137 <tr>
 138 <td><span class=text><?php echo htmlspecialchars(xl('Address'), ENT_NOQUOTES); ?>:</span></td>
 139 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_street}, ENT_NOQUOTES);?></span></td>
 140 </tr>
 141 <tr>
 142 <td><span class=text><?php echo htmlspecialchars(xl('City'), ENT_NOQUOTES); ?>:</span></td>
 143 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_city}, ENT_NOQUOTES);?></span></td>
 144 </tr>
 145 <tr>
 146 <td><span class=text><?php echo htmlspecialchars(xl('State'), ENT_NOQUOTES); ?>:</span></td>
 147 <td><span class=text>
 148     <?php
 149   //Modified 7/2009 by BM to incorporate data types
 150     echo generate_display_field(array('data_type'=>$GLOBALS['state_data_type'],'list_id'=>$GLOBALS['state_list']), $result3{subscriber_state});
 151     ?>
 152 </span></td>
 153 </tr>
 154 <tr>
 155 <td><span class=text><?php echo htmlspecialchars(xl('Zip Code'), ENT_NOQUOTES); ?>:</span></td>
 156 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_postal_code}, ENT_NOQUOTES);?></span></td>
 157 </tr>
 158 <tr>
 159 <td><span class=text><?php echo htmlspecialchars(xl('Country'), ENT_NOQUOTES); ?>:</span></td>
 160 <td><span class=text>
 161     <?php
 162   //Modified 7/2009 by BM to incorporate data types
 163     echo generate_display_field(array('data_type'=>$GLOBALS['country_data_type'],'list_id'=>$GLOBALS['country_list']), $result3{subscriber_country});
 164     ?>
 165 </span></td>
 166 </tr>
 167 <tr>
 168 <td><span class=text><?php echo htmlspecialchars(xl('Phone'), ENT_NOQUOTES); ?>:</span></td>
 169 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_phone}, ENT_NOQUOTES);?></span></td>
 170 </tr>
 171 <tr>
 172 <td><span class=text><?php echo htmlspecialchars(xl('DOB'), ENT_NOQUOTES); ?>:</span></td>
 173 <td><span class=text><?php echo text(oeFormatShortDate($result3{subscriber_DOB}));?></span></td>
 174 </tr>
 175 <tr>
 176 <td><span class=text><?php echo htmlspecialchars(xl('SS'), ENT_NOQUOTES); ?>:</span></td>
 177 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_ss}, ENT_NOQUOTES);?></span></td>
 178 </tr>
 179 <tr>
 180 <td><span class=text><?php echo htmlspecialchars(xl('Primary Insurance Provider'), ENT_NOQUOTES); ?>:</span></td>
 181 <td><span class=text><?php echo htmlspecialchars($result3{provider_name}, ENT_NOQUOTES);?></span></td>
 182 </tr>
 183 <tr>
 184 <td><span class=text><?php echo htmlspecialchars(xl('Plan Name'), ENT_NOQUOTES); ?>:</span>
 185 </td><td><span class=text><?php echo htmlspecialchars($result3{plan_name}, ENT_NOQUOTES);?></span></td>
 186 </tr>
 187 <tr>
 188 <td><span class=text><?php echo htmlspecialchars(xl('Group Number'), ENT_NOQUOTES); ?>:</span></td>
 189 <td><span class=text><?php echo htmlspecialchars($result3{group_number}, ENT_NOQUOTES);?></span></td>
 190 </tr>
 191 <tr>
 192 <tr>
 193 <td><span class=text><?php echo htmlspecialchars(xl('Policy Number'), ENT_NOQUOTES); ?>:</span></td>
 194 <td><span class=text><?php echo htmlspecialchars($result3{policy_number}, ENT_NOQUOTES);?></span></td>
 195 </tr>
 196
 197 <?php if (empty($GLOBALS['omit_employers'])) { ?>
 198
 199 <tr>
 200 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer'), ENT_NOQUOTES); ?>:</span></td>
 201 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_employer}, ENT_NOQUOTES);?></span></td>
 202 </tr>
 203 <tr>
 204 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer Address'), ENT_NOQUOTES); ?>:</span></td>
 205 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_employer_street}, ENT_NOQUOTES);?></span></td>
 206 </tr>
 207 <tr>
 208 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer Zip Code'), ENT_NOQUOTES); ?>:</span></td>
 209 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_employer_postal_code}, ENT_NOQUOTES);?></span></td>
 210 </tr>
 211 <tr>
 212 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer City'), ENT_NOQUOTES); ?>:</span></td>
 213 <td><span class=text><?php echo htmlspecialchars($result3{subscriber_employer_city}, ENT_NOQUOTES);?></span></td>
 214 </tr>
 215 <tr>
 216 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer State'), ENT_NOQUOTES); ?>:</span></td>
 217 <td><span class=text>
 218     <?php
 219   //Modified 7/2009 by BM to incorporate data types
 220     echo generate_display_field(array('data_type'=>$GLOBALS['state_data_type'],'list_id'=>$GLOBALS['state_list']), $result3{subscriber_employer_state});
 221     ?>
 222 </span></td>
 223 </tr>
 224 <tr>
 225 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Employer Country'), ENT_NOQUOTES); ?>:</span></td>
 226 <td><span class=text>
 227     <?php
 228    //Modified 7/2009 by BM to incorporate data types
 229     echo generate_display_field(array('data_type'=>$GLOBALS['country_data_type'],'list_id'=>$GLOBALS['country_list']), $result3{subscriber_employer_country});
 230     ?>
 231 </span></td>
 232 </tr>
 233
 234 <?php } ?>
 235
 236 <tr>
 237 <td><span class=text><?php echo htmlspecialchars(xl('Subscriber Sex'), ENT_NOQUOTES); ?>:</span></td>
 238 <td><span class=text><?php echo generate_display_field(array('data_type'=>'1','list_id'=>'sex'), $result3{subscriber_sex}); ?></span></td>
 239 </tr>
 240 </table>
 241
 242 <br>
 243 <a href="javascript:auto_populate_employer_address();" class=link_submit><?php echo htmlspecialchars(xl('Copy Values'), ENT_NOQUOTES); ?></a>
 244
 245 <?php
 246 } else {
 247 ?>
 248
 249 <table class="table">
 250 <tr>
 251 <th>
 252 <span class=bold><?php echo htmlspecialchars(xl('Name'), ENT_NOQUOTES); ?></span>
 253 </th><th>
 254 <span class=bold><?php echo htmlspecialchars(xl('SS'), ENT_NOQUOTES); ?></span>
 255 </th><th>
 256 <span class=bold><?php echo htmlspecialchars(xl('DOB'), ENT_NOQUOTES); ?></span>
 257 </th><th>
 258 <span class=bold><?php echo htmlspecialchars(xl('ID'), ENT_NOQUOTES); ?></span>
 259 </th></tr>
 260 <?php
 261
 262 $count=0;
 263 $total=0;
 264
 265 $findby = $_POST['findBy'];
 266 $patient = $_POST['patient'];
 267 if ($findby == "Last" && $result = getPatientLnames("$patient", "*")) {
 268     foreach ($result as $iter) {
 269         if ($total >= $M) {
 270             break;
 271         }
 272
 273         print "<tr><td><a class=text target=_top href='browse.php?browsenum=" .
 274                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 275                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 276                     htmlspecialchars($iter{"lname"}.", ".$iter{"fname"}, ENT_NOQUOTES) .
 277                     "</td></a>\n";
 278         print "<td><a class=text target=_top href='browse.php?browsenum=" .
 279                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 280                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 281                     htmlspecialchars($iter{"ss"}, ENT_NOQUOTES) . "</a></td>";
 282         if ($iter{"DOB"} != "0000-00-00 00:00:00") {
 283             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 284                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 285                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 286                         text(oeFormatShortDate($iter{"DOB"})) . "</a></td>";
 287         } else {
 288             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 289                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 290                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>&nbsp;</a></td>";
 291         }
 292
 293         print "<td><a class=text target=_top href='browse.php?browsenum=" .
 294                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 295                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 296                     htmlspecialchars($iter{"pubpid"}, ENT_NOQUOTES) . "</a></td>";
 297
 298         $total++;
 299     }
 300 }
 301
 302 if ($findby == "ID" && $result = getPatientId("$patient", "*")) {
 303     foreach ($result as $iter) {
 304         if ($total >= $M) {
 305             break;
 306         }
 307
 308         print "<tr><td><a class=text target=_top href='browse.php?browsenum=" .
 309                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 310                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 311                     htmlspecialchars($iter{"lname"}.", ".$iter{"fname"}, ENT_NOQUOTES) .
 312                     "</td></a>\n";
 313         print "<td><a class=text target=_top href='browse.php?browsenum=" .
 314                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 315                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 316                     htmlspecialchars($iter{"ss"}, ENT_NOQUOTES) . "</a></td>";
 317         if ($iter{"DOB"} != "0000-00-00 00:00:00") {
 318             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 319                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 320                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 321                         text(oeFormatShortDate($iter{"DOB"})) . "</a></td>";
 322         } else {
 323             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 324                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 325                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>&nbsp;</a></td>";
 326         }
 327
 328         print "<td><a class=text target=_top href='browse.php?browsenum=" .
 329                     htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 330                     htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 331                     htmlspecialchars($iter{"pubpid"}, ENT_NOQUOTES) . "</a></td>";
 332
 333         $total++;
 334     }
 335 }
 336
 337 if ($findby == "DOB" && $result = getPatientDOB(DateToYYYYMMDD($patient), "*")) {
 338     foreach ($result as $iter) {
 339         if ($total >= $M) {
 340             break;
 341         }
 342
 343                 print "<tr><td><a class=text target=_top href='browse.php?browsenum=" .
 344                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 345                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 346                         htmlspecialchars($iter{"lname"}.", ".$iter{"fname"}, ENT_NOQUOTES) .
 347                         "</td></a>\n";
 348                 print "<td><a class=text target=_top href='browse.php?browsenum=" .
 349                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 350                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 351                         htmlspecialchars($iter{"ss"}, ENT_NOQUOTES) . "</a></td>";
 352         if ($iter{"DOB"} != "0000-00-00 00:00:00") {
 353             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 354                 htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 355                 htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 356                 text(oeFormatShortDate($iter{"DOB"})) . "</a></td>";
 357         } else {
 358             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 359                 htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 360                 htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>&nbsp;</a></td>";
 361         }
 362
 363                 print "<td><a class=text target=_top href='browse.php?browsenum=" .
 364                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 365                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 366                         htmlspecialchars($iter{"pubpid"}, ENT_NOQUOTES) . "</a></td>";
 367
 368         $total++;
 369     }
 370 }
 371
 372 if ($findby == "SSN" && $result = getPatientSSN("$patient", "*")) {
 373     foreach ($result as $iter) {
 374         if ($total >= $M) {
 375             break;
 376         }
 377
 378                 print "<tr><td><a class=text target=_top href='browse.php?browsenum=" .
 379                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 380                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 381                         htmlspecialchars($iter{"lname"}.", ".$iter{"fname"}, ENT_NOQUOTES) .
 382                         "</td></a>\n";
 383                 print "<td><a class=text target=_top href='browse.php?browsenum=" .
 384                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 385                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 386                         htmlspecialchars($iter{"ss"}, ENT_NOQUOTES) . "</a></td>";
 387         if ($iter{"DOB"} != "0000-00-00 00:00:00") {
 388             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 389                 htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 390                 htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 391                 text(oeFormatShortDate($iter{"DOB"})) . "</a></td>";
 392         } else {
 393             print "<td><a class=text target=_top href='browse.php?browsenum=" .
 394                 htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 395                 htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>&nbsp;</a></td>";
 396         }
 397
 398                 print "<td><a class=text target=_top href='browse.php?browsenum=" .
 399                         htmlspecialchars($browsenum, ENT_QUOTES) . "&set_pid=" .
 400                         htmlspecialchars($iter{"pid"}, ENT_QUOTES) . "'>" .
 401                         htmlspecialchars($iter{"pubpid"}, ENT_NOQUOTES) . "</a></td>";
 402
 403         $total++;
 404     }
 405 }
 406 ?>
 407 </table>
 408 <?php
 409 }
 410 ?>
 411 </body>
 412 </html>