2 require_once("../globals.php");
3 require_once("$srcdir/sql.inc");
5 // Validation for non-unique external patient identifier.
6 if (!empty($_POST["pubpid"])) {
7 $form_pubpid = trim($_POST["pubpid"]);
8 $result = sqlQuery("SELECT count(*) AS count FROM patient_data WHERE " .
9 "pubpid = '$form_pubpid'");
10 if ($result['count']) {
12 require_once("new.php");
17 require_once("$srcdir/pid.inc");
18 require_once("$srcdir/patient.inc");
20 //here, we lock the patient data table while we find the most recent max PID
21 //other interfaces can still read the data during this lock, however
22 sqlStatement("lock tables patient_data read");
24 $result = sqlQuery("select max(pid)+1 as pid from patient_data");
26 // TBD: This looks wrong to unlock the table before we have added our
27 // patient with its newly allocated pid!
29 sqlStatement("unlock tables");
33 if ($result['pid'] > 1)
34 $newpid = $result['pid'];
42 // what do we set for the public pid?
43 if (isset($_POST["pubpid"]) && ($_POST["pubpid"] != "")) {
44 $mypubpid = $_POST["pubpid"];
49 if ($_POST['form_create']) {
51 $form_fname = ucwords(trim($_POST["fname"]));
52 $form_lname = ucwords(trim($_POST["lname"]));
53 $form_mname = ucwords(trim($_POST["mname"]));
55 // ===================
56 // DBC SYSTEM WAS REMOVED
57 $form_sex = trim($_POST["sex"]) ;
58 $form_dob = trim($_POST["DOB"]) ;
62 $form_countrycode = '' ;
64 // ===================
74 $form_street, // street
75 $form_postcode, // postal_code
78 $form_countrycode, // country_code
85 "", // contact_relationship
92 "", // migrantseasonal
96 "", // financial_review
108 0, // $pharmacy_id = 0,
109 "", // $drivers_license = "",
110 "", // $hipaa_notice = "",
111 "", // $hipaa_message = "",
115 newEmployerData($pid);
116 newHistoryData($pid);
117 newInsuranceData($pid, "primary");
118 newInsuranceData($pid, "secondary");
119 newInsuranceData($pid, "tertiary");
121 // Set referral source separately because we don't want it messed
122 // with later by newPatientData().
123 if ($refsource = trim($_POST["refsource"])) {
124 sqlQuery("UPDATE patient_data SET referral_source = '$refsource' " .
125 "WHERE pid = '$pid'");
132 <script language
="Javascript">
135 echo "alert('$alertmsg');\n";
137 if ($GLOBALS['concurrent_layout']) {
138 echo "window.location='$rootdir/patient_file/summary/demographics.php?" .
139 "set_pid=$pid&is_new=1';\n";
141 echo "window.location='$rootdir/patient_file/patient_file.php?set_pid=$pid';\n";