ccr/createCCRAlerts.php

   1 <?php
   2
   3 /**
   4  * CCR Script.
   5  *
   6  * Copyright (C) 2010 Garden State Health Systems <http://www.gshsys.com/>
   7  *
   8  * LICENSE: This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License
  10  * as published by the Free Software Foundation; either version 3
  11  * of the License, or (at your option) any later version.
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  15  * GNU General Public License for more details.
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program. If not, see <http://opensource.org/licenses/gpl-license.php>;.
  18  *
  19  * @package OpenEMR
  20  * @author  Garden State Health Systems <http://www.gshsys.com/>
  21  * @link    http://www.open-emr.org
  22  */
  23
  24 $result = getAlertData();
  25 $row = sqlFetchArray($result);
  26
  27 do {
  28 //while ($row = sqlFetchArray($result)) {
  29
  30     $e_Alert = $ccr->createElement('Alert');
  31     $e_Alerts->appendChild($e_Alert);
  32
  33     $e_CCRDataObjectID = $ccr->createElement('CCRDataObjectID', getUuid());
  34     $e_Alert->appendChild($e_CCRDataObjectID);
  35
  36     $e_DateTime = $ccr->createElement('DateTime');
  37     $e_Alert->appendChild($e_DateTime);
  38
  39     $date = date_create($row['date'] ?? '');
  40
  41     $e_ExactDateTime = $ccr->createElement('ExactDateTime', $date->format('Y-m-d\TH:i:s\Z'));
  42     $e_DateTime->appendChild($e_ExactDateTime);
  43
  44     $e_IDs = $ccr->createElement('IDs');
  45     $e_Alert->appendChild($e_IDs);
  46
  47     $e_ID = $ccr->createElement('ID', $row['pid'] ?? '');
  48     $e_IDs->appendChild($e_ID);
  49
  50     $e_IDs->appendChild(sourceType($ccr, $sourceID));
  51
  52     $e_Type = $ccr->createElement('Type');
  53     $e_Alert->appendChild($e_Type);
  54
  55     $e_Text = $ccr->createElement('Text', ($row['type'] ?? '') . '-' . ($row['alert_title'] ?? ''));
  56     $e_Type->appendChild($e_Text);
  57
  58     $e_Description = $ccr->createElement('Description');
  59     $e_Alert->appendChild($e_Description);
  60
  61     $e_Text = $ccr->createElement('Text', $row['code_text'] ?? '');
  62     $e_Description->appendChild($e_Text);
  63
  64     $e_Code = $ccr->createElement('Code');
  65     $e_Description->appendChild($e_Code);
  66
  67     $e_Value = $ccr->createElement('Value', $row['diagnosis'] ?? '');
  68     $e_Code->appendChild($e_Value);
  69
  70     $e_Alert->appendChild(sourceType($ccr, $sourceID));
  71
  72     $e_Agent = $ccr->createElement('Agent');
  73     $e_Alert->appendChild($e_Agent);
  74
  75     $e_EnvironmentalAgents = $ccr->createElement('EnvironmentalAgents');
  76     $e_Agent->appendChild($e_EnvironmentalAgents);
  77
  78     $e_EnvironmentalAgent = $ccr->createElement('EnvironmentalAgent');
  79     $e_EnvironmentalAgents->appendChild($e_EnvironmentalAgent);
  80
  81     $e_CCRDataObjectID = $ccr->createElement('CCRDataObjectID', getUuid());
  82     $e_EnvironmentalAgent->appendChild($e_CCRDataObjectID);
  83
  84     $e_DateTime = $ccr->createElement('DateTime');
  85     $e_EnvironmentalAgent->appendChild($e_DateTime);
  86
  87     $e_ExactDateTime = $ccr->createElement('ExactDateTime', $row['date'] ?? '');
  88     $e_DateTime->appendChild($e_ExactDateTime);
  89
  90     $e_Description = $ccr->createElement('Description');
  91     $e_EnvironmentalAgent->appendChild($e_Description);
  92
  93     $e_Text = $ccr->createElement('Text', $row['alert_title'] ?? '');
  94     $e_Description->appendChild($e_Text);
  95
  96     $e_Code = $ccr->createElement('Code');
  97     $e_Description->appendChild($e_Code);
  98
  99     $e_Value = $ccr->createElement('Value');//,$row['codetext']
 100     $e_Code->appendChild($e_Value);
 101
 102     $e_Status = $ccr->createElement('Status');
 103     $e_EnvironmentalAgent->appendChild($e_Status);
 104
 105     $e_Text = $ccr->createElement('Text', $row['outcome'] ?? '');
 106     $e_Status->appendChild($e_Text);
 107
 108     $e_EnvironmentalAgent->appendChild(sourceType($ccr, $sourceID));
 109
 110     $e_Reaction = $ccr->createElement('Reaction');
 111     $e_Alert->appendChild($e_Reaction);
 112
 113     $e_Description = $ccr->createElement('Description');
 114     $e_Reaction->appendChild($e_Description);
 115
 116     $e_Text = $ccr->createElement('Text', $row['reaction'] ?? '');
 117     $e_Description->appendChild($e_Text);
 118
 119     $e_Status = $ccr->createElement('Status');
 120     $e_Reaction->appendChild($e_Status);
 121
 122     $e_Text = $ccr->createElement('Text', 'None');
 123     $e_Status->appendChild($e_Text);
 124 } while ($row = sqlFetchArray($result));
 125     //}