library/sql-ccr.inc

   1 <?php
   2 //  ------------------------------------------------------------------------ //
   3 //                     Garden State Health Systems                           //
   4 //                    Copyright (c) 2010 gshsys.com                          //
   5 //                      <http://www.gshsys.com/>                             //
   6 //  ------------------------------------------------------------------------ //
   7 //  This program is free software; you can redistribute it and/or modify     //
   8 //  it under the terms of the GNU General Public License as published by     //
   9 //  the Free Software Foundation; either version 2 of the License, or        //
  10 //  (at your option) any later version.                                      //
  11 //                                                                           //
  12 //  You may not change or alter any portion of this comment or credits       //
  13 //  of supporting developers from this source code or any supporting         //
  14 //  source code which is considered copyrighted (c) material of the          //
  15 //  original comment or credit authors.                                      //
  16 //                                                                           //
  17 //  This program is distributed in the hope that it will be useful,          //
  18 //  but WITHOUT ANY WARRANTY; without even the implied warranty of           //
  19 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the            //
  20 //  GNU General Public License for more details.                             //
  21 //                                                                           //
  22 //  You should have received a copy of the GNU General Public License        //
  23 //  along with this program; if not, write to the Free Software              //
  24 //  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA //
  25 //  ------------------------------------------------------------------------ //
  26
  27 if($_POST['ccrAction'] == 'generate'){
  28   if(isset($_POST['show_date'])){
  29     $set = "on";
  30     $start = $_POST['Start'];
  31     $start = $start." 00:00:00";
  32     $end = $_POST['End'];
  33     $end = $end." 23:59:59";
  34   }
  35 }
  36
  37 function getHeaderData() {
  38
  39 // Reserved for future use
  40
  41 }
  42
  43 function getMedicationData() {
  44         global $pid,$set,$start,$end;
  45   if($set == "on"){
  46     $sql = "
  47       SELECT prescriptions.date_added ,
  48         prescriptions.patient_id,
  49         prescriptions.start_date,
  50         prescriptions.quantity,
  51         prescriptions.interval,
  52         prescriptions.note,
  53         prescriptions.drug,
  54         prescriptions.medication,
  55         IF(prescriptions.active=1,'Active','Prior History No Longer Active') AS active,
  56         prescriptions.provider_id,
  57         prescriptions.size,
  58         IFNULL(prescriptions.refills,0) AS refills,
  59         lo2.title AS form,
  60         lo.title
  61       FROM prescriptions
  62       LEFT JOIN list_options AS lo
  63       ON lo.list_id = 'drug_units' AND prescriptions.unit = lo.option_id
  64       LEFT JOIN list_options AS lo2
  65       ON lo2.list_id = 'drug_form' AND prescriptions.form = lo2.option_id
  66       WHERE prescriptions.patient_id = ?
  67       AND prescriptions.date_added BETWEEN ? AND ?
  68       UNION
  69       SELECT
  70         DATE(DATE) AS date_added,
  71         pid AS patient_id,
  72         begdate AS start_date,
  73         '' AS quantity,
  74         '' AS `interval`,
  75         comments AS note,
  76         title AS drug,
  77         '' AS medication,
  78         IF((enddate = '0000-00-00' OR enddate >= CURDATE()),'Active','Prior History No Longer Active') AS active,
  79         '' AS provider_id,
  80         '' AS size,
  81         0 AS refills,
  82         '' AS form,
  83         '' AS title
  84       FROM
  85         lists
  86       WHERE `type` = 'medication'
  87         AND pid = ?
  88         AND `date` BETWEEN ? AND ?";
  89     $result = sqlStatement($sql, array($pid,$start,$end,$pid,$start,$end) );
  90   }else{
  91     $sql = "
  92       SELECT prescriptions.date_added ,
  93         prescriptions.patient_id,
  94         prescriptions.start_date,
  95         prescriptions.quantity,
  96         prescriptions.interval,
  97         prescriptions.note,
  98         prescriptions.drug,
  99         prescriptions.medication,
 100         IF(prescriptions.active=1,'Active','Prior History No Longer Active') AS active,
 101         prescriptions.provider_id,
 102         prescriptions.size,
 103         IFNULL(prescriptions.refills,0) AS refills,
 104         lo2.title AS form,
 105         lo.title
 106       FROM prescriptions
 107       LEFT JOIN list_options AS lo
 108       ON lo.list_id = 'drug_units' AND prescriptions.unit = lo.option_id
 109       LEFT JOIN list_options AS lo2
 110       ON lo2.list_id = 'drug_form' AND prescriptions.form = lo2.option_id
 111       WHERE prescriptions.patient_id = ?
 112       UNION
 113       SELECT
 114         DATE(DATE) AS date_added,
 115         pid AS patient_id,
 116         begdate AS start_date,
 117         '' AS quantity,
 118         '' AS `interval`,
 119         comments AS note,
 120         title AS drug,
 121         '' AS medication,
 122         IF((enddate = '0000-00-00' OR enddate >= CURDATE()),'Active','Prior History No Longer Active') AS active,
 123         '' AS provider_id,
 124         '' AS size,
 125         0 AS refills,
 126         '' AS form,
 127         '' AS title
 128       FROM
 129         lists
 130       WHERE `type` = 'medication'
 131         AND pid = ?";
 132     $result = sqlStatement($sql, array($pid,$pid) );
 133   }
 134         return $result;
 135 }
 136
 137 function getImmunizationData() {
 138         global $pid,$set,$start,$end;
 139   if($set == "on"){
 140     $sql = "SELECT
 141       immunizations.administered_date,
 142       immunizations.patient_id,
 143       immunizations.vis_date,
 144       immunizations.note,
 145       immunizations.immunization_id,
 146       immunizations.manufacturer,
 147       codes.code_text AS title
 148     FROM immunizations
 149     LEFT JOIN codes ON immunizations.cvx_code = codes.code
 150     LEFT JOIN code_types ON codes.code_type = code_types.ct_id
 151     WHERE immunizations.patient_id = ? AND code_types.ct_key = 'CVX'
 152     AND create_date BETWEEN ? AND ?" ;
 153     $result = sqlStatement($sql, array($pid,$start,$end) );
 154   }else{
 155     $sql = "SELECT
 156       immunizations.administered_date,
 157       immunizations.patient_id,
 158       immunizations.vis_date,
 159       immunizations.note,
 160       immunizations.immunization_id,
 161       immunizations.manufacturer,
 162       codes.code_text AS title
 163     FROM immunizations
 164     LEFT JOIN codes ON immunizations.cvx_code = codes.code
 165     LEFT JOIN code_types ON codes.code_type = code_types.ct_id
 166     WHERE immunizations.patient_id = ? AND code_types.ct_key = 'CVX'";
 167     $result = sqlStatement($sql, array($pid) );
 168   }
 169         return $result;
 170 }
 171
 172
 173 function getProcedureData() {
 174
 175         global $pid,$set,$start,$end;
 176   if($set == "on"){
 177     $sql = "
 178     SELECT
 179       lists.title as proc_title,
 180       lists.date as `date`,
 181       list_options.title as outcome,
 182       '' as laterality,
 183       '' as body_site,
 184       lists.type as `type`,
 185       lists.diagnosis as `code`,
 186       IF(SUBSTRING(lists.diagnosis,1,LOCATE(':',lists.diagnosis)-1) = 'ICD9','ICD9-CM',SUBSTRING(lists.diagnosis,1,LOCATE(':',lists.diagnosis)-1)) AS coding
 187     FROM
 188       lists
 189       LEFT JOIN issue_encounter
 190         ON issue_encounter.list_id = lists.id
 191       LEFT JOIN form_encounter
 192         ON form_encounter.encounter = issue_encounter.encounter
 193       LEFT JOIN facility
 194         ON form_encounter.facility_id = facility.id
 195       LEFT JOIN users
 196         ON form_encounter.provider_id = users.id
 197       LEFT JOIN list_options
 198         ON lists.outcome = list_options.option_id
 199         AND list_options.list_id = 'outcome'
 200     WHERE lists.type = 'surgery'
 201       AND lists.pid = ?
 202       AND lists.date BETWEEN ? AND ?
 203     UNION
 204     SELECT
 205       pt.name as proc_title,
 206       prs.date as `date`,
 207       '' as outcome,
 208       ptt.laterality as laterality,
 209       ptt.body_site as body_site,
 210       'Lab Order' as `type`,
 211       ptt.standard_code as `code`,
 212       IF(SUBSTRING(ptt.standard_code,1,LOCATE(':',ptt.standard_code)-1) = 'ICD9','ICD9-CM',SUBSTRING(ptt.standard_code,1,LOCATE(':',ptt.standard_code)-1)) AS coding
 213     FROM
 214       procedure_result AS prs
 215       LEFT JOIN procedure_report AS prp
 216         ON prs.procedure_report_id = prp.procedure_report_id
 217       LEFT JOIN procedure_order AS po
 218         ON prp.procedure_order_id = po.procedure_order_id
 219       LEFT JOIN procedure_type AS pt
 220         ON prs.procedure_type_id = pt.procedure_type_id
 221       LEFT JOIN procedure_type AS ptt
 222         ON pt.parent = ptt.procedure_type_id
 223         AND ptt.procedure_type = 'ord'
 224       LEFT JOIN list_options AS lo
 225         ON lo.list_id = 'proc_unit'
 226         AND pt.units = lo.option_id
 227     WHERE po.patient_id = ?
 228     AND prs.date BETWEEN ? AND ?";
 229
 230     $result = sqlStatement($sql, array($pid,$start,$end,$pid,$start,$end) );
 231   }else{
 232     $sql = "
 233     SELECT
 234       lists.title as proc_title,
 235       lists.date as `date`,
 236       list_options.title as outcome,
 237       '' as laterality,
 238       '' as body_site,
 239       lists.type as `type`,
 240       lists.diagnosis as `code`,
 241       IF(SUBSTRING(lists.diagnosis,1,LOCATE(':',lists.diagnosis)-1) = 'ICD9','ICD9-CM',SUBSTRING(lists.diagnosis,1,LOCATE(':',lists.diagnosis)-1)) AS coding
 242     FROM
 243       lists
 244       LEFT JOIN issue_encounter
 245         ON issue_encounter.list_id = lists.id
 246       LEFT JOIN form_encounter
 247         ON form_encounter.encounter = issue_encounter.encounter
 248       LEFT JOIN facility
 249         ON form_encounter.facility_id = facility.id
 250       LEFT JOIN users
 251         ON form_encounter.provider_id = users.id
 252       LEFT JOIN list_options
 253         ON lists.outcome = list_options.option_id
 254         AND list_options.list_id = 'outcome'
 255     WHERE lists.type = 'surgery'
 256       AND lists.pid = ?
 257     UNION
 258     SELECT
 259       pt.name as proc_title,
 260       prs.date as `date`,
 261       '' as outcome,
 262       ptt.laterality as laterality,
 263       ptt.body_site as body_site,
 264       'Lab Order' as `type`,
 265       ptt.standard_code as `code`,
 266       IF(SUBSTRING(ptt.standard_code,1,LOCATE(':',ptt.standard_code)-1) = 'ICD9','ICD9-CM',SUBSTRING(ptt.standard_code,1,LOCATE(':',ptt.standard_code)-1)) AS coding
 267     FROM
 268       procedure_result AS prs
 269       LEFT JOIN procedure_report AS prp
 270         ON prs.procedure_report_id = prp.procedure_report_id
 271       LEFT JOIN procedure_order AS po
 272         ON prp.procedure_order_id = po.procedure_order_id
 273       LEFT JOIN procedure_type AS pt
 274         ON prs.procedure_type_id = pt.procedure_type_id
 275       LEFT JOIN procedure_type AS ptt
 276         ON pt.parent = ptt.procedure_type_id
 277         AND ptt.procedure_type = 'ord'
 278       LEFT JOIN list_options AS lo
 279         ON lo.list_id = 'proc_unit'
 280         AND pt.units = lo.option_id
 281     WHERE po.patient_id = ? ";
 282
 283     $result = sqlStatement($sql, array($pid,$pid) );
 284   }
 285         return $result;
 286 }
 287
 288
 289 function getProblemData() {
 290
 291         global $pid,$set,$start,$end;
 292   if($set == "on"){
 293     $sql = "
 294     SELECT fe.encounter, fe.reason, fe.provider_id, u.title, u.fname, u.lname,
 295       fe.facility_id, f.street, f.city, f.state, ie.list_id, l.pid, l.title AS prob_title, l.diagnosis,
 296       l.outcome, l.groupname, l.begdate, l.enddate, l.type, l.comments , l.date, cd.code_text
 297     FROM lists AS l
 298     LEFT JOIN issue_encounter AS ie ON ie.list_id = l.id
 299     LEFT JOIN form_encounter AS fe ON fe.encounter = ie.encounter
 300     LEFT JOIN facility AS f ON fe.facility_id = f.id
 301     LEFT JOIN users AS u ON fe.provider_id = u.id
 302     LEFT JOIN codes AS cd ON cd.code = SUBSTRING(l.diagnosis, LOCATE(':',l.diagnosis)+1)
 303     LEFT JOIN code_types AS ct ON ct.ct_id = cd.code_type
 304     WHERE l.type = 'medical_problem' AND l.pid=? AND ct.ct_key = SUBSTRING(l.diagnosis, 1, LOCATE(':',l.diagnosis)-1)
 305     AND l.date BETWEEN ? AND ?";
 306     $result = sqlStatement($sql, array($pid,$start,$end) );
 307   }else{
 308     $sql = "
 309     SELECT fe.encounter, fe.reason, fe.provider_id, u.title, u.fname, u.lname,
 310       fe.facility_id, f.street, f.city, f.state, ie.list_id, l.pid, l.title AS prob_title, l.diagnosis,
 311       l.outcome, l.groupname, l.begdate, l.enddate, l.type, l.comments , l.date, cd.code_text
 312     FROM lists AS l
 313     LEFT JOIN issue_encounter AS ie ON ie.list_id = l.id
 314     LEFT JOIN form_encounter AS fe ON fe.encounter = ie.encounter
 315     LEFT JOIN facility AS f ON fe.facility_id = f.id
 316     LEFT JOIN users AS u ON fe.provider_id = u.id
 317     LEFT JOIN codes AS cd ON cd.code = SUBSTRING(l.diagnosis, LOCATE(':',l.diagnosis)+1)
 318     LEFT JOIN code_types AS ct ON ct.ct_id = cd.code_type
 319     WHERE l.type = 'medical_problem' AND l.pid=? AND ct.ct_key = SUBSTRING(l.diagnosis, 1, LOCATE(':',l.diagnosis)-1)";
 320     $result = sqlStatement($sql, array($pid) );
 321   }
 322         return $result;
 323 }
 324
 325
 326 function getAlertData() {
 327
 328         global $pid,$set,$start,$end;
 329   if($set == "on"){
 330         $sql = "
 331     select fe.reason, fe.provider_id, fe.facility_id, fe.encounter,
 332       ie.list_id, l.pid, l.title as alert_title, l.outcome,
 333       l.groupname, l.begdate, l.enddate, l.type, l.diagnosis, l.date ,
 334       l.reaction , l.comments ,
 335         f.street, f.city, f.state, u.title, u.fname, u.lname, cd.code_text
 336     from lists as l
 337     left join issue_encounter as ie
 338     on ie.list_id = l.id
 339     left join form_encounter as fe
 340     on fe.encounter = ie.encounter
 341     left join facility as f
 342     on fe.facility_id = f.id
 343     left join users as u
 344     on fe.provider_id = u.id
 345     left join codes as cd
 346     on cd.code = SUBSTRING(l.diagnosis, LOCATE(':',l.diagnosis)+1)
 347     where l.type = 'allergy' and l.pid=?
 348     AND l.date BETWEEN ? AND ?";
 349
 350     $result = sqlStatement($sql, array($pid,$start,$end) );
 351   }else{
 352     $sql = "
 353     select fe.reason, fe.provider_id, fe.facility_id, fe.encounter,
 354       ie.list_id, l.pid, l.title as alert_title, l.outcome,
 355       l.groupname, l.begdate, l.enddate, l.type, l.diagnosis, l.date ,
 356       l.reaction , l.comments ,
 357         f.street, f.city, f.state, u.title, u.fname, u.lname, cd.code_text
 358     from lists as l
 359     left join issue_encounter as ie
 360     on ie.list_id = l.id
 361     left join form_encounter as fe
 362     on fe.encounter = ie.encounter
 363     left join facility as f
 364     on fe.facility_id = f.id
 365     left join users as u
 366     on fe.provider_id = u.id
 367     left join codes as cd
 368     on cd.code = SUBSTRING(l.diagnosis, LOCATE(':',l.diagnosis)+1)
 369     where l.type = 'allergy' and l.pid=?";
 370
 371     $result = sqlStatement($sql, array($pid) );
 372   }
 373         return $result;
 374 }
 375
 376
 377 function getResultData() {
 378
 379         global $pid,$set,$start,$end;
 380   if($set == "on"){
 381     $sql = "
 382       SELECT
 383         prs.procedure_result_id as `pid`,
 384         pt.name as `name`,
 385         pt.procedure_type_id as `type`,
 386         prs.date as `date`,
 387         concat_ws(' ',prs.result,lo.title) as `result`,
 388         prs.range as `range`,
 389         prs.abnormal as `abnormal`,
 390         prs.comments as `comments`,
 391         ptt.lab_id AS `lab`
 392       FROM
 393         procedure_result AS prs
 394         LEFT JOIN procedure_report AS prp
 395           ON prs.procedure_report_id = prp.procedure_report_id
 396         LEFT JOIN procedure_order AS po
 397           ON prp.procedure_order_id = po.procedure_order_id
 398         LEFT JOIN procedure_type AS pt
 399           ON prs.procedure_type_id = pt.procedure_type_id
 400           LEFT JOIN procedure_type AS ptt
 401           ON pt.parent = ptt.procedure_type_id
 402           AND ptt.procedure_type = 'ord'
 403         LEFT JOIN list_options AS lo
 404           ON lo.list_id = 'proc_unit' AND pt.units = lo.option_id
 405       WHERE po.patient_id=?
 406       AND prs.date BETWEEN ? AND ?";
 407
 408     $result = sqlStatement($sql, array($pid,$start,$end) );
 409   }else{
 410     $sql = "
 411       SELECT
 412         prs.procedure_result_id as `pid`,
 413         pt.name as `name`,
 414         pt.procedure_type_id as `type`,
 415         prs.date as `date`,
 416         concat_ws(' ',prs.result,lo.title) as `result`,
 417         prs.range as `range`,
 418         prs.abnormal as `abnormal`,
 419         prs.comments as `comments`,
 420         ptt.lab_id AS `lab`
 421       FROM
 422         procedure_result AS prs
 423         LEFT JOIN procedure_report AS prp
 424           ON prs.procedure_report_id = prp.procedure_report_id
 425         LEFT JOIN procedure_order AS po
 426           ON prp.procedure_order_id = po.procedure_order_id
 427         LEFT JOIN procedure_type AS pt
 428           ON prs.procedure_type_id = pt.procedure_type_id
 429           LEFT JOIN procedure_type AS ptt
 430           ON pt.parent = ptt.procedure_type_id
 431           AND ptt.procedure_type = 'ord'
 432         LEFT JOIN list_options AS lo
 433           ON lo.list_id = 'proc_unit' AND pt.units = lo.option_id
 434       WHERE po.patient_id=?";
 435
 436     $result = sqlStatement($sql, array($pid) );
 437   }
 438         return $result;
 439 }
 440
 441
 442 function getActorData() {
 443         global $pid;
 444
 445         $sql = "
 446         select fname, lname, DOB, sex, pid, street, city, state, postal_code, phone_contact
 447         from patient_data
 448         where pid=?";
 449
 450         $result[0] = sqlStatement($sql, array($pid) );
 451
 452   $sql2 = "
 453         SELECT * FROM users AS u LEFT JOIN facility AS f ON u.facility_id = f.id WHERE u.id=?";
 454
 455         $result[1] = sqlStatement($sql2, array($_SESSION['authUserID']) );
 456
 457   $sql3 = "
 458   SELECT
 459     u.*
 460   FROM
 461     procedure_type AS pt
 462     LEFT JOIN procedure_order AS po
 463       ON po.procedure_type_id = pt.procedure_type_id
 464     LEFT JOIN forms AS f
 465       ON f.form_id = po.procedure_order_id
 466     LEFT JOIN list_options AS lo
 467       ON lo.title = f.form_name
 468     LEFT JOIN users AS u
 469     ON pt.lab_id = u.id
 470   WHERE f.pid = ?
 471     AND lo.list_id = 'proc_type'
 472     AND lo.option_id = 'ord'
 473     GROUP BY u.id";
 474
 475         $result[2] = sqlStatement($sql3, array($pid) );
 476
 477         return $result;
 478 }
 479
 480
 481 function getReportFilename() {
 482   global $pid;
 483
 484   $sql = "
 485     select fname, lname, pid
 486     from patient_data
 487     where pid=?";
 488
 489   $result = sqlQuery($sql, array($pid) );
 490         $result_filename = $result['lname']."-".$result['fname']."-".$result['pid']."-".date("mdY",time());
 491
 492   return $result_filename;
 493 }
 494
 495 ?>