You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
364 lines
11 KiB
364 lines
11 KiB
<?php |
|
|
|
/** |
|
* CCR Script. |
|
* |
|
* Copyright (C) 2010 Garden State Health Systems <http://www.gshsys.com/> |
|
* |
|
* LICENSE: This program is free software; you can redistribute it and/or |
|
* modify it under the terms of the GNU General Public License |
|
* as published by the Free Software Foundation; either version 3 |
|
* of the License, or (at your option) any later version. |
|
* This program is distributed in the hope that it will be useful, |
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
* GNU General Public License for more details. |
|
* You should have received a copy of the GNU General Public License |
|
* along with this program. If not, see <http://opensource.org/licenses/gpl-license.php>;. |
|
* |
|
* @package OpenEMR |
|
* @author Garden State Health Systems <http://www.gshsys.com/> |
|
* @link http://www.open-emr.org |
|
*/ |
|
|
|
$result = getActorData(); |
|
while ($row = sqlFetchArray($result[0])) { |
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Actors->appendChild($e_Actor); |
|
|
|
$e_ActorObjectID = $ccr->createElement('ActorObjectID', 'A1234'); // Refer createCCRHeader.php |
|
$e_Actor->appendChild($e_ActorObjectID); |
|
|
|
$e_Person = $ccr->createElement('Person'); |
|
$e_Actor->appendChild($e_Person); |
|
|
|
$e_Name = $ccr->createElement('Name'); |
|
$e_Person->appendChild($e_Name); |
|
|
|
$e_CurrentName = $ccr->createElement('CurrentName'); |
|
$e_Name->appendChild($e_CurrentName); |
|
|
|
$e_Given = $ccr->createElement('Given', $row['fname']); |
|
$e_CurrentName->appendChild($e_Given); |
|
|
|
$e_Family = $ccr->createElement('Family', $row['lname']); |
|
$e_CurrentName->appendChild($e_Family); |
|
|
|
$e_Suffix = $ccr->createElement('Suffix'); |
|
$e_CurrentName->appendChild($e_Suffix); |
|
|
|
$e_DateOfBirth = $ccr->createElement('DateOfBirth'); |
|
$e_Person->appendChild($e_DateOfBirth); |
|
|
|
$dob = date_create($row['DOB']); |
|
|
|
$e_ExactDateTime = $ccr->createElement('ExactDateTime', $dob->format('Y-m-d\TH:i:s\Z')); |
|
$e_DateOfBirth->appendChild($e_ExactDateTime); |
|
|
|
$e_Gender = $ccr->createElement('Gender'); |
|
$e_Person->appendChild($e_Gender); |
|
|
|
$e_Text = $ccr->createElement('Text', $row['sex']); |
|
$e_Gender->appendChild($e_Text); |
|
|
|
$e_Code = $ccr->createElement('Code'); |
|
$e_Gender->appendChild($e_Code); |
|
|
|
$e_Value = $ccr->createElement('Value'); |
|
$e_Code->appendChild($e_Value); |
|
|
|
$e_IDs = $ccr->createElement('IDs'); |
|
$e_Actor->appendChild($e_IDs); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_IDs->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'Patient ID'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_ID = $ccr->createElement('ID', $row['pid']); |
|
$e_IDs->appendChild($e_ID); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_IDs->appendChild($e_Source); |
|
|
|
$e_SourceActor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_SourceActor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', getUuid()); |
|
$e_SourceActor->appendChild($e_ActorID); |
|
|
|
// address |
|
$e_Address = $ccr->createElement('Address'); |
|
$e_Actor->appendChild($e_Address); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_Address->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'H'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_Line1 = $ccr->createElement('Line1', $row['street']); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_Line2 = $ccr->createElement('Line2'); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_City = $ccr->createElement('City', $row['city']); |
|
$e_Address->appendChild($e_City); |
|
|
|
$e_State = $ccr->createElement('State', $row['state']); |
|
$e_Address->appendChild($e_State); |
|
|
|
$e_PostalCode = $ccr->createElement('PostalCode', $row['postal_code']); |
|
$e_Address->appendChild($e_PostalCode); |
|
|
|
$e_Telephone = $ccr->createElement('Telephone'); |
|
$e_Actor->appendChild($e_Telephone); |
|
|
|
$e_Value = $ccr->createElement('Value', $row['phone_contact']); |
|
$e_Telephone->appendChild($e_Value); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_Actor->appendChild($e_Source); |
|
|
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_Actor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_Actor->appendChild($e_ActorID); |
|
} |
|
|
|
$row1 = sqlFetchArray($result[1]); |
|
//////// Actor Information Systems |
|
|
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Actors->appendChild($e_Actor); |
|
|
|
$e_ActorObjectID = $ccr->createElement('ActorObjectID', $authorID); |
|
$e_Actor->appendChild($e_ActorObjectID); |
|
|
|
$e_InformationSystem = $ccr->createElement('InformationSystem'); |
|
$e_Actor->appendChild($e_InformationSystem); |
|
|
|
$e_Name = $ccr->createElement('Name', $row1['facility']); |
|
$e_InformationSystem->appendChild($e_Name); |
|
|
|
$e_Type = $ccr->createElement('Type', 'Facility'); |
|
$e_InformationSystem->appendChild($e_Type); |
|
|
|
$e_IDs = $ccr->createElement('IDs'); |
|
$e_Actor->appendChild($e_IDs); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_IDs->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', ''); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_ID = $ccr->createElement('ID', ''); |
|
$e_IDs->appendChild($e_ID); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_IDs->appendChild($e_Source); |
|
|
|
$e_SourceActor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_SourceActor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_SourceActor->appendChild($e_ActorID); |
|
|
|
$e_Address = $ccr->createElement('Address'); |
|
$e_Actor->appendChild($e_Address); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_Address->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'WP'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_Line1 = $ccr->createElement('Line1', $row1['street']); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_Line2 = $ccr->createElement('Line2'); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_City = $ccr->createElement('City', $row1['city']); |
|
$e_Address->appendChild($e_City); |
|
|
|
$e_State = $ccr->createElement('State', $row1['state'] . ' '); |
|
$e_Address->appendChild($e_State); |
|
|
|
$e_PostalCode = $ccr->createElement('PostalCode', $row1['postal_code']); |
|
$e_Address->appendChild($e_PostalCode); |
|
|
|
$e_Telephone = $ccr->createElement('Telephone'); |
|
$e_Actor->appendChild($e_Telephone); |
|
|
|
$e_Phone = $ccr->createElement('Value', $row1['phone']); |
|
$e_Telephone->appendChild($e_Phone); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_Actor->appendChild($e_Source); |
|
|
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_Actor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_Actor->appendChild($e_ActorID); |
|
|
|
//////// Actor Information Systems |
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Actors->appendChild($e_Actor); |
|
|
|
$e_ActorObjectID = $ccr->createElement('ActorObjectID', $oemrID); |
|
$e_Actor->appendChild($e_ActorObjectID); |
|
|
|
$e_InformationSystem = $ccr->createElement('InformationSystem'); |
|
$e_Actor->appendChild($e_InformationSystem); |
|
|
|
$e_Name = $ccr->createElement('Name', 'OEMR'); |
|
$e_InformationSystem->appendChild($e_Name); |
|
|
|
$e_Type = $ccr->createElement('Type', 'OpenEMR'); |
|
$e_InformationSystem->appendChild($e_Type); |
|
|
|
$e_Version = $ccr->createElement('Version', '4.x'); |
|
$e_InformationSystem->appendChild($e_Version); |
|
|
|
$e_IDs = $ccr->createElement('IDs'); |
|
$e_Actor->appendChild($e_IDs); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_IDs->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'Certification #'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_ID = $ccr->createElement('ID', 'EHRX-OEMRXXXXXX-2011'); |
|
$e_IDs->appendChild($e_ID); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_IDs->appendChild($e_Source); |
|
|
|
$e_SourceActor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_SourceActor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_SourceActor->appendChild($e_ActorID); |
|
|
|
$e_Address = $ccr->createElement('Address'); |
|
$e_Actor->appendChild($e_Address); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_Address->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'WP'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_Line1 = $ccr->createElement('Line1', '2365 Springs Rd. NE'); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_Line2 = $ccr->createElement('Line2'); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_City = $ccr->createElement('City', 'Hickory'); |
|
$e_Address->appendChild($e_City); |
|
|
|
$e_State = $ccr->createElement('State', 'NC '); |
|
$e_Address->appendChild($e_State); |
|
|
|
$e_PostalCode = $ccr->createElement('PostalCode', '28601'); |
|
$e_Address->appendChild($e_PostalCode); |
|
|
|
$e_Telephone = $ccr->createElement('Telephone'); |
|
$e_Actor->appendChild($e_Telephone); |
|
|
|
$e_Phone = $ccr->createElement('Value', '000-000-0000'); |
|
$e_Telephone->appendChild($e_Phone); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_Actor->appendChild($e_Source); |
|
|
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_Actor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_Actor->appendChild($e_ActorID); |
|
|
|
while ($row2 = sqlFetchArray($result[2])) { |
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Actors->appendChild($e_Actor); |
|
|
|
$e_ActorObjectID = $ccr->createElement('ActorObjectID', ${"labID{$row2['id']}"}); |
|
$e_Actor->appendChild($e_ActorObjectID); |
|
|
|
$e_InformationSystem = $ccr->createElement('InformationSystem'); |
|
$e_Actor->appendChild($e_InformationSystem); |
|
|
|
$e_Name = $ccr->createElement('Name', $row2['lname'] . " " . $row2['fname']); |
|
$e_InformationSystem->appendChild($e_Name); |
|
|
|
$e_Type = $ccr->createElement('Type', 'Lab Service'); |
|
$e_InformationSystem->appendChild($e_Type); |
|
|
|
$e_IDs = $ccr->createElement('IDs'); |
|
$e_Actor->appendChild($e_IDs); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_IDs->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', ''); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_ID = $ccr->createElement('ID', ''); |
|
$e_IDs->appendChild($e_ID); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_IDs->appendChild($e_Source); |
|
|
|
$e_SourceActor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_SourceActor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_SourceActor->appendChild($e_ActorID); |
|
|
|
$e_Address = $ccr->createElement('Address'); |
|
$e_Actor->appendChild($e_Address); |
|
|
|
$e_Type = $ccr->createElement('Type'); |
|
$e_Address->appendChild($e_Type); |
|
|
|
$e_Text = $ccr->createElement('Text', 'WP'); |
|
$e_Type->appendChild($e_Text); |
|
|
|
$e_Line1 = $ccr->createElement('Line1', $row2['street']); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_Line2 = $ccr->createElement('Line2'); |
|
$e_Address->appendChild($e_Line1); |
|
|
|
$e_City = $ccr->createElement('City', $row2['city']); |
|
$e_Address->appendChild($e_City); |
|
|
|
$e_State = $ccr->createElement('State', $row2['state'] . ' '); |
|
$e_Address->appendChild($e_State); |
|
|
|
$e_PostalCode = $ccr->createElement('PostalCode', $row2['zip']); |
|
$e_Address->appendChild($e_PostalCode); |
|
|
|
$e_Telephone = $ccr->createElement('Telephone'); |
|
$e_Actor->appendChild($e_Telephone); |
|
|
|
$e_Phone = $ccr->createElement('Value', $row2['phone']); |
|
$e_Telephone->appendChild($e_Phone); |
|
|
|
$e_Source = $ccr->createElement('Source'); |
|
$e_Actor->appendChild($e_Source); |
|
|
|
$e_Actor = $ccr->createElement('Actor'); |
|
$e_Source->appendChild($e_Actor); |
|
|
|
$e_ActorID = $ccr->createElement('ActorID', $authorID); |
|
$e_Actor->appendChild($e_ActorID); |
|
}
|
|
|