interface/new/new_patient_save.php

   1 <?
   2  include_once("../globals.php");
   3  include_once("$srcdir/sql.inc");
   4  include_once("$srcdir/pid.inc");
   5  include_once("$srcdir/patient.inc");
   6
   7 //here, we lock the patient data table while we find the most recent max PID
   8 //other interfaces can still read the data during this lock, however
   9 sqlStatement("lock tables patient_data read");
  10
  11 $result = sqlQuery("select max(pid)+1 as pid from patient_data");
  12
  13 // TBD: This looks wrong to unlock the table before we have added our
  14 // patient with its newly allocated pid!
  15 //
  16 sqlStatement("unlock tables");
  17 //end table lock
  18 $newpid = 1;
  19
  20 if ($result['pid'] > 1)
  21   $newpid = $result['pid'];
  22
  23 setpid($newpid);
  24
  25 if($pid == NULL) {
  26   $pid = 0;
  27 }
  28
  29 //what do we set for the public pid?
  30 if (isset($_POST["pubpid"]) && ($_POST["pubpid"] != "")) {
  31   $mypubpid = $_POST["pubpid"];
  32 } else {
  33   $mypubpid = $pid;
  34 }
  35
  36 if ($_POST['form_create']) {
  37
  38  $form_fname = ucwords(trim($_POST["fname"]));
  39  $form_lname = ucwords(trim($_POST["lname"]));
  40  $form_mname = ucwords(trim($_POST["mname"]));
  41
  42  newPatientData(
  43   $_POST["db_id"],
  44   $_POST["title"],
  45   $form_fname,
  46   $form_lname,
  47   $form_mname,
  48   "", // sex
  49   "", // dob
  50   "", // street
  51   "", // postal_code
  52   "", // city
  53   "", // state
  54   "", // country_code
  55   "", // ss
  56   "", // occupation
  57   "", // phone_home
  58   "", // phone_biz
  59   "", // phone_contact
  60   "", // status
  61   "", // contact_relationship
  62   "", // referrer
  63   "", // referrerID
  64   "", // email
  65   "", // language
  66   "", // ethnoracial
  67   "", // interpreter
  68   "", // migrantseasonal
  69   "", // family_size
  70   "", // monthly_income
  71   "", // homeless
  72   "", // financial_review
  73   "$mypubpid",
  74   $pid
  75       // providerID
  76       // genericname1
  77       // genericval1
  78       // genericname2
  79       // genericval2
  80       // phone_cell
  81       // hipaa_mail
  82       // hipaa_voice
  83       // squad
  84  );
  85
  86  newEmployerData($pid);
  87  newHistoryData($pid);
  88  newInsuranceData($pid, "primary");
  89  newInsuranceData($pid, "secondary");
  90  newInsuranceData($pid, "tertiary");
  91 }
  92 ?>
  93 <html>
  94 <body>
  95 <script language="Javascript">
  96 <!--
  97 <?
  98  if ($alertmsg) {
  99   echo "alert('$alertmsg');\n";
 100  }
 101 ?>
 102 window.location="<?echo "$rootdir/patient_file/patient_file.php?set_pid=$pid";?>";
 103 -->
 104 </script>
 105
 106 </body>
 107 </html>