PageRenderTime 89ms CodeModel.GetById 45ms RepoModel.GetById 0ms app.codeStats 1ms

/interface/modules/zend_modules/module/Carecoordination/src/Carecoordination/Model/EncounterccdadispatchTable.php

https://bitbucket.org/openemr/openemr
PHP | 2574 lines | 2004 code | 262 blank | 308 comment | 132 complexity | dc025a64b99cd19d539b4f84e70f047b MD5 | raw file
Possible License(s): Apache-2.0, AGPL-1.0, GPL-2.0, LGPL-3.0, BSD-3-Clause, Unlicense, MPL-2.0, GPL-3.0, LGPL-2.1

Large files files are truncated, but you can click here to view the full file

    

  1. <?php
    2. 

  2. 

  3. /**
    4. 

  4.  * interface/modules/zend_modules/module/Carecoordination/src/Carecoordination/Model/EncounterccdadispatchTable.php
    5. 

  5.  *
    6. 

  6.  * @package   OpenEMR
    7. 

  7.  * @link      https://www.open-emr.org
    8. 

  8.  * @author    Vinish K <vinish@zhservices.com>
    9. 

  9.  * @author    Riju K P <rijukp@zhservices.com>
    10. 

  10.  * @copyright Copyright (c) 2014 Z&H Consultancy Services Private Limited <sam@zhservices.com>
    11. 

  11.  * @license   https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
    12. 

  12.  */
    13. 

  13. 

  14. namespace Carecoordination\Model;
    15. 

  15. 

  16. use Application\Listener\Listener;
    17. 

  17. use Application\Model\ApplicationTable;
    18. 

  18. use Carecoordination\Model\CarecoordinationTable;
    19. 

  19. use CouchDB;
    20. 

  20. use Laminas\Db\Adapter\Driver\Pdo\Result;
    21. 

  21. use Laminas\Db\TableGateway\AbstractTableGateway;
    22. 

  22. use Matrix\Exception;
    23. 

  23. use OpenEMR\Common\Crypto\CryptoGen;
    24. 

  24. use OpenEMR\Common\Uuid\UuidRegistry;
    25. 

  25. 

  26. require_once(__DIR__ . "/../../../../../../../../custom/code_types.inc.php");
    27. 

  27. require_once(__DIR__ . "/../../../../../../../forms/vitals/report.php");
    28. 

  28. 

  29. class EncounterccdadispatchTable extends AbstractTableGateway
    30. 

  30. {
    31. 

  31.     public function __construct()
    32. 

  32.     {
    33. 

  33.     }
    34. 

  34. 

  35.     /*Fetch Patient data from EMR
    36. 

    37. 

  37.     * @param    $pid
    38. 

  38.     * @param    $encounter
    39. 

  39.     * @return   $patient_data   Patient Data in XML format
    40. 

  40.     */
    41. 

  41.     public function getPatientdata($pid, $encounter)
    42. 

  42.     {
    43. 

  43.         $query = "select patient_data.*, l1.notes AS race_code, l1.title as race_title, l2.notes AS ethnicity_code, l2.title as ethnicity_title, l3.title as religion, l3.notes as religion_code, l4.notes as language_code, l4.title as language_title
    44. 

  44.             from patient_data
    45. 

  45.             left join list_options as l1 on l1.list_id=? AND l1.option_id=race
    46. 

  46.             left join list_options as l2 on l2.list_id=? AND l2.option_id=ethnicity
    47. 

  47. 			left join list_options AS l3 ON l3.list_id=? AND l3.option_id=religion
    48. 

  48. 			left join list_options AS l4 ON l4.list_id=? AND l4.option_id=language
    49. 

  49.                         where pid=?";
    50. 

  50.         $appTable = new ApplicationTable();
    51. 

  51.         $row = $appTable->zQuery($query, array('race', 'ethnicity', 'religious_affiliation', 'language', $pid));
    52. 

  52. 

  53.         foreach ($row as $result) {
    54. 

  54.             $patient_data = "<patient>
    55. 

  55.             <id>" . xmlEscape($result['pid']) . "</id>
    56. 

  56.             <encounter>" . xmlEscape($encounter) . "</encounter>
    57. 

  57.             <prefix>" . xmlEscape($result['title']) . "</prefix>
    58. 

  58.             <fname>" . xmlEscape($result['fname']) . "</fname>
    59. 

  59.             <mname>" . xmlEscape($result['mname']) . "</mname>
    60. 

  60.             <lname>" . xmlEscape($result['lname']) . "</lname>
    61. 

  61.             <suffix>" . xmlEscape($result['suffix']) . "</suffix>
    62. 

  62.             <birth_fname>" . xmlEscape($result['birth_fname']) . "</birth_fname>
    63. 

  63.             <birth_mname>" . xmlEscape($result['birth_mname']) . "</birth_mname>
    64. 

  64.             <birth_lname>" . xmlEscape($result['birth_lname']) . "</birth_lname>
    65. 

  65.             <street>" . xmlEscape($result['street']) . "</street>
    66. 

  66.             <city>" . xmlEscape($result['city']) . "</city>
    67. 

  67.             <state>" . xmlEscape($result['state']) . "</state>
    68. 

  68.             <postalCode>" . xmlEscape($result['postal_code']) . "</postalCode>
    69. 

  69.             <country>" . xmlEscape($result['country_code']) . "</country>
    70. 

  70.             <ssn>" . xmlEscape($result['ss'] ?: '') . "</ssn>
    71. 

  71.             <dob>" . xmlEscape(str_replace('-', '', $result['DOB'])) . "</dob>
    72. 

  72.             <gender>" . xmlEscape($result['sex']) . "</gender>
    73. 

  73.             <gender_code>" . xmlEscape(strtoupper(substr($result['sex'], 0, 1))) . "</gender_code>
    74. 

  74.             <status>" . xmlEscape($result['status'] ?: "") . "</status>
    75. 

  75.             <status_code>" . xmlEscape($result['status'] ? strtoupper(substr($result['status'], 0, 1)) : 0) . "</status_code>
    76. 

  76.             <phone_home>" . xmlEscape(($result['phone_home'] ?: '')) . "</phone_home>
    77. 

  77.             <phone_mobile>" . xmlEscape(($result['phone_home'] ? $result['phone_cell'] : '')) . "</phone_mobile>
    78. 

  78.             <email>" . xmlEscape(($result['email'] ?: '')) . "</email>
    79. 

  79.             <religion>" . xmlEscape(Listener::z_xlt($result['religion'] ?: "")) . "</religion>
    80. 

  80.             <religion_code>" . xmlEscape($result['religion_code'] ?: '') . "</religion_code>
    81. 

  81.             <race>" . xmlEscape(Listener::z_xlt($result['race_title'])) . "</race>
    82. 

  82.             <race_code>" . xmlEscape($result['race_code']) . "</race_code>
    83. 

  83.             <ethnicity>" . xmlEscape(Listener::z_xlt($result['ethnicity_title'])) . "</ethnicity>
    84. 

  84.             <ethnicity_code>" . xmlEscape($result['ethnicity_code']) . "</ethnicity_code>
    85. 

  85.             <language>" . xmlEscape(Listener::z_xlt($result['language_title'])) . "</language>
    86. 

  86.             <language_code>" . xmlEscape($result['language_code']) . "</language_code>
    87. 

  87.             </patient>
    88. 

  88. 		<guardian>
    89. 

  89. 			<fname>" . xmlEscape($result['']) . "</fname>
    90. 

  90. 			<lname>" . xmlEscape($result['']) . "</lname>
    91. 

  91. 			<code>" . xmlEscape($result['']) . "</code>
    92. 

  92. 			<relation>" . xmlEscape($result['guardianrelationship']) . "</relation>
    93. 

  93. 			<display_name>" . xmlEscape($result['guardiansname']) . "</display_name>
    94. 

  94. 			<street>" . xmlEscape($result['guardianaddress']) . "</street>
    95. 

  95. 			<city>" . xmlEscape($result['guardiancity']) . "</city>
    96. 

  96. 			<state>" . xmlEscape($result['guardianstate']) . "</state>
    97. 

  97. 			<postalCode>" . xmlEscape($result['guardianpostalcode']) . "</postalCode>
    98. 

  98. 			<country>" . xmlEscape($result['guardiancountry']) . "</country>
    99. 

  99. 			<telecom>" . xmlEscape($result['guardianphone']) . "</telecom>
    100. 

  100. 		</guardian>";
    101. 

  101.         }
    102. 

  102. 

  103.         return $patient_data;
    104. 

  104.     }
    105. 

  105. 

  106.     public function getProviderDetails($pid, $encounter)
    107. 

  107.     {
    108. 

  108.         $provider_details = '';
    109. 

  109.         if (!$encounter) {
    110. 

  110.             $query_enc = "SELECT encounter FROM form_encounter WHERE pid=? ORDER BY date DESC LIMIT 1";
    111. 

  111.             $appTable = new ApplicationTable();
    112. 

  112.             $res_enc = $appTable->zQuery($query_enc, array($pid));
    113. 

  113.             foreach ($res_enc as $row_enc) {
    114. 

  114.                 $encounter = $row_enc['encounter'];
    115. 

  115.             }
    116. 

  116.         }
    117. 

  117. 

  118.         $query = "SELECT * FROM form_encounter as fe
    119. 

  119.                         JOIN users AS u ON u.id =  fe.provider_id
    120. 

  120.                         JOIN facility AS f ON f.id = u.facility_id
    121. 

  121.                         WHERE fe.pid = ? AND fe.encounter = ?";
    122. 

  122.         $appTable = new ApplicationTable();
    123. 

  123.         $row = $appTable->zQuery($query, array($pid, $encounter));
    124. 

  124. 

  125.         foreach ($row as $result) {
    126. 

  126.             $provider_details = "<encounter_provider>
    127. 

  127.                     <facility_id>" . xmlEscape($result['id']) . "</facility_id>
    128. 

  128.                     <facility_npi>" . xmlEscape($result['facility_npi']) . "</facility_npi>
    129. 

  129.                     <facility_oid>" . xmlEscape($result['oid']) . "</facility_oid>
    130. 

  130.                     <facility_name>" . xmlEscape($result['name']) . "</facility_name>
    131. 

  131.                     <facility_phone>" . xmlEscape(($result['phone'] ? $result['phone'] : 0)) . "</facility_phone>
    132. 

  132.                     <facility_fax>" . xmlEscape($result['fax']) . "</facility_fax>
    133. 

  133.                     <facility_street>" . xmlEscape($result['street']) . "</facility_street>
    134. 

  134.                     <facility_city>" . xmlEscape($result['city']) . "</facility_city>
    135. 

  135.                     <facility_state>" . xmlEscape($result['state']) . "</facility_state>
    136. 

  136.                     <facility_postal_code>" . xmlEscape($result['postal_code']) . "</facility_postal_code>
    137. 

  137.                     <facility_country_code>" . xmlEscape($result['country_code']) . "</facility_country_code>
    138. 

  138.                 </encounter_provider>
    139. 

  139.             ";
    140. 

  140.         }
    141. 

  141. 

  142.         return $provider_details;
    143. 

  143.     }
    144. 

  144. 

  145.     public function getAuthor($pid, $encounter)
    146. 

  146.     {
    147. 

  147.         $author = '';
    148. 

  148.         $details = $this->getDetails('hie_author_id');
    149. 

  149. 

  150.         $author = "
    151. 

  151.         <author>
    152. 

  152.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    153. 

  153.             <city>" . xmlEscape($details['city']) . "</city>
    154. 

  154.             <state>" . xmlEscape($details['state']) . "</state>
    155. 

  155.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    156. 

  156.             <country>" . xmlEscape($details['']) . "</country>
    157. 

  157.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    158. 

  158.             <fname>" . xmlEscape($details['fname']) . "</fname>
    159. 

  159.             <lname>" . xmlEscape($details['lname']) . "</lname>
    160. 

  160.             <npi>" . xmlEscape($details['npi']) . "</npi>
    161. 

  161.         </author>";
    162. 

    163. 

  163.         return $author;
    164. 

  164.     }
    165. 

  165. 

  166.     public function getDataEnterer($pid, $encounter)
    167. 

  167.     {
    168. 

  168.         $data_enterer = '';
    169. 

  169.         $details = $this->getDetails('hie_data_enterer_id');
    170. 

  170. 

  171.         $data_enterer = "
    172. 

  172.         <data_enterer>
    173. 

  173.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    174. 

  174.             <city>" . xmlEscape($details['city']) . "</city>
    175. 

  175.             <state>" . xmlEscape($details['state']) . "</state>
    176. 

  176.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    177. 

  177.             <country>" . xmlEscape($details['']) . "</country>
    178. 

  178.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    179. 

  179.             <fname>" . xmlEscape($details['fname']) . "</fname>
    180. 

  180.             <lname>" . xmlEscape($details['lname']) . "</lname>
    181. 

  181.         </data_enterer>";
    182. 

    183. 

  183.         return $data_enterer;
    184. 

  184.     }
    185. 

  185. 

  186.     public function getInformant($pid, $encounter)
    187. 

  187.     {
    188. 

  188.         $informant = '';
    189. 

  189.         $details = $this->getDetails('hie_informant_id');
    190. 

  190.         $personal_informant = $this->getDetails('hie_personal_informant_id');
    191. 

  191. 

  192.         $informant = "<informer>
    193. 

  193.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    194. 

  194.             <city>" . xmlEscape($details['city']) . "</city>
    195. 

  195.             <state>" . xmlEscape($details['state']) . "</state>
    196. 

  196.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    197. 

  197.             <country>" . xmlEscape($details['']) . "</country>
    198. 

  198.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    199. 

  199.             <fname>" . xmlEscape($details['fname']) . "</fname>
    200. 

  200.             <lname>" . xmlEscape($details['lname']) . "</lname>
    201. 

  201.             <personal_informant>" . xmlEscape($this->getSettings('Carecoordination', 'hie_personal_informant_id')) . "</personal_informant>
    202. 

  202.         </informer>";
    203. 

    204. 

  204.         return $informant;
    205. 

  205.     }
    206. 

  206. 

  207.     public function getCustodian($pid, $encounter)
    208. 

  208.     {
    209. 

  209.         $custodian = '';
    210. 

  210.         $details = $this->getDetails('hie_custodian_id');
    211. 

  211. 

  212.         $custodian = "<custodian>
    213. 

  213.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    214. 

  214.             <city>" . xmlEscape($details['city']) . "</city>
    215. 

  215.             <state>" . xmlEscape($details['state']) . "</state>
    216. 

  216.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    217. 

  217.             <country>" . xmlEscape($details['']) . "</country>
    218. 

  218.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    219. 

  219.             <name>" . xmlEscape($details['organization']) . "</name>
    220. 

  220.             <organization>" . xmlEscape($details['organization']) . "</organization>
    221. 

  221.         </custodian>";
    222. 

    223. 

  223.         return $custodian;
    224. 

  224.     }
    225. 

  225. 

  226.     public function getInformationRecipient($pid, $encounter, $recipients, $params)
    227. 

  227.     {
    228. 

  228.         $information_recipient = '';
    229. 

  229.         $field_name = array();
    230. 

  230.         $details = $this->getDetails('hie_recipient_id');
    231. 

  231. 

  232.         $appTable = new ApplicationTable();
    233. 

  233. 

  234.         if ($recipients == 'hie') {
    235. 

  235.             $details['fname'] = 'MyHealth';
    236. 

  236.             $details['lname'] = '';
    237. 

  237.             $details['organization'] = '';
    238. 

  238.         } elseif ($recipients == 'emr_direct') {
    239. 

  239.             $query = "select fname, lname, organization, street, city, state, zip, phonew1 from users where email = ?";
    240. 

  240.             $field_name[] = $params;
    241. 

  241.         } elseif ($recipients == 'patient') {
    242. 

  242.             $query = "select fname, lname from patient_data WHERE pid = ?";
    243. 

  243.             $field_name[] = $params;
    244. 

  244.         } else {
    245. 

  245.             if (!$params) {
    246. 

  246.                 $params = $_SESSION['authUserID'];
    247. 

  247.             }
    248. 

  248. 

  249.             $query = "select fname, lname, organization, street, city, state, zip, phonew1 from users where id = ?";
    250. 

  250.             $field_name[] = $params;
    251. 

  251.         }
    252. 

  252. 

  253.         if ($recipients != 'hie') {
    254. 

  254.             $res = $appTable->zQuery($query, $field_name);
    255. 

  255.             $result = $res->current();
    256. 

  256.             $details['fname'] = $result['fname'];
    257. 

  257.             $details['lname'] = $result['lname'];
    258. 

  258.             $details['organization'] = $result['organization'];
    259. 

  259.             $details['street'] = $result['street'];
    260. 

  260.             $details['city'] = $result['city'];
    261. 

  261.             $details['state'] = $result['state'];
    262. 

  262.             $details['zip'] = $result['zip'];
    263. 

  263.             $details['phonew1'] = $result['phonew1'];
    264. 

  264.         }
    265. 

  265. 

  266.         $information_recipient = "<information_recipient>
    267. 

  267.         <fname>" . xmlEscape($details['fname']) . "</fname>
    268. 

  268.         <lname>" . xmlEscape($details['lname']) . "</lname>
    269. 

  269.         <organization>" . xmlEscape($details['organization']) . "</organization>
    270. 

  270. 	    <street>" . xmlEscape($details['street']) . "</street>
    271. 

  271. 	    <city>" . xmlEscape($details['city']) . "</city>
    272. 

  272. 	    <state>" . xmlEscape($details['state']) . "</state>
    273. 

  273. 	    <zip>" . xmlEscape($details['zip']) . "</zip>
    274. 

  274. 	    <phonew1>" . xmlEscape($details['phonew1']) . "</phonew1>
    275. 

  275.         </information_recipient>";
    276. 

    277. 

  277.         return $information_recipient;
    278. 

  278.     }
    279. 

  279. 

  280.     public function getLegalAuthenticator($pid, $encounter)
    281. 

  281.     {
    282. 

  282.         $legal_authenticator = '';
    283. 

  283.         $details = $this->getDetails('hie_legal_authenticator_id');
    284. 

  284. 

  285.         $legal_authenticator = "<legal_authenticator>
    286. 

  286.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    287. 

  287.             <city>" . xmlEscape($details['city']) . "</city>
    288. 

  288.             <state>" . xmlEscape($details['state']) . "</state>
    289. 

  289.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    290. 

  290.             <country>" . xmlEscape($details['']) . "</country>
    291. 

  291.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    292. 

  292.             <fname>" . xmlEscape($details['fname']) . "</fname>
    293. 

  293.             <lname>" . xmlEscape($details['lname']) . "</lname>
    294. 

  294.         </legal_authenticator>";
    295. 

    296. 

  296.         return $legal_authenticator;
    297. 

  297.     }
    298. 

  298. 

  299.     public function getAuthenticator($pid, $encounter)
    300. 

  300.     {
    301. 

  301.         $authenticator = '';
    302. 

  302.         $details = $this->getDetails('hie_authenticator_id');
    303. 

  303. 

  304.         $authenticator = "<authenticator>
    305. 

  305.             <streetAddressLine>" . xmlEscape($details['street']) . "</streetAddressLine>
    306. 

  306.             <city>" . xmlEscape($details['city']) . "</city>
    307. 

  307.             <state>" . xmlEscape($details['state']) . "</state>
    308. 

  308.             <postalCode>" . xmlEscape($details['zip']) . "</postalCode>
    309. 

  309.             <country>" . xmlEscape($details['']) . "</country>
    310. 

  310.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    311. 

  311.             <fname>" . xmlEscape($details['fname']) . "</fname>
    312. 

  312.             <lname>" . xmlEscape($details['lname']) . "</lname>
    313. 

  313.         </authenticator>";
    314. 

    315. 

  315.         return $authenticator;
    316. 

  316.     }
    317. 

  317. 

  318.     public function getPrimaryCareProvider($pid, $encounter)
    319. 

  319.     {
    320. 

  320.         // primary from demo
    321. 

  321.         $getprovider = $this->getProviderId($pid);
    322. 

  322.         if (!empty($getprovider)) { // from patient_data
    323. 

  323.             $details = $this->getUserDetails($getprovider);
    324. 

  324.         } else { // get from CCM setup
    325. 

  325.             $details = $this->getDetails('hie_primary_care_provider_id');
    326. 

  326.         }
    327. 

  327.         // Note for NPI: Many times a care team member may not have an NPI so instead of
    328. 

  328.         // an NPI OID use facility/document unique OID with user table reference for extension.
    329. 

  329.         $get_care_team_provider = explode("|", $this->getCareTeamProviderId($pid));
    330. 

  330.         $primary_care_provider = "
    331. 

  331.         <primary_care_provider>
    332. 

  332.           <provider>
    333. 

  333.             <prefix>" . xmlEscape($details['title']) . "</prefix>
    334. 

  334.             <fname>" . xmlEscape($details['fname']) . "</fname>
    335. 

  335.             <lname>" . xmlEscape($details['lname']) . "</lname>
    336. 

  336.             <speciality>" . xmlEscape($details['specialty']) . "</speciality>
    337. 

  337.             <organization>" . xmlEscape($details['organization']) . "</organization>
    338. 

  338.             <telecom>" . xmlEscape(($details['phonew1'] ? $details['phonew1'] : 0)) . "</telecom>
    339. 

  339.             <addr>" . xmlEscape($details['']) . "</addr>
    340. 

  340.             <table_id>" . xmlEscape("provider-" . $getprovider) . "</table_id>
    341. 

  341.             <npi>" . xmlEscape($details['npi'] ?: '') . "</npi>
    342. 

  342.             <physician_type>" . xmlEscape($details['physician_type']) . "</physician_type>
    343. 

  343.             <physician_type_code>" . xmlEscape($details['physician_type_code']) . "</physician_type_code>
    344. 

  344.             <taxonomy>" . xmlEscape($details['taxonomy']) . "</taxonomy>
    345. 

  345.             <taxonomy_description>" . xmlEscape($details['taxonomy_desc']) . "</taxonomy_description>
    346. 

  346.           </provider>
    347. 

  347.         </primary_care_provider>";
    348. 

  348.         $care_team_provider = "<care_team>";
    349. 

  349.         foreach ($get_care_team_provider as $team_member) {
    350. 

  350.             if ((int)$getprovider === (int)$team_member) {
    351. 

  351.                 // primary should be a part of care team but just in case
    352. 

  352.                 // I've kept primary separate. So either way, primary gets included.
    353. 

  353.                 // in this case, we don't want to duplicate the provider.
    354. 

  354.                 continue;
    355. 

  355.             }
    356. 

  356.             $details2 = $this->getUserDetails($team_member);
    357. 

  357.             if (empty($details2)) {
    358. 

  358.                 continue;
    359. 

  359.             }
    360. 

  360.             $care_team_provider .= "<provider>
    361. 

  361.             <prefix>" . xmlEscape($details2['title']) . "</prefix>
    362. 

  362.             <fname>" . xmlEscape($details2['fname']) . "</fname>
    363. 

  363.             <lname>" . xmlEscape($details2['lname']) . "</lname>
    364. 

  364.             <speciality>" . xmlEscape($details2['specialty']) . "</speciality>
    365. 

  365.             <organization>" . xmlEscape($details2['organization']) . "</organization>
    366. 

  366.             <telecom>" . xmlEscape(($details2['phonew1'] ?: '')) . "</telecom>
    367. 

  367.             <addr>" . xmlEscape($details2['']) . "</addr>
    368. 

  368.             <table_id>" . xmlEscape("provider-" . $team_member) . "</table_id>
    369. 

  369.             <npi>" . xmlEscape($details2['npi']) . "</npi>
    370. 

  370.             <physician_type>" . xmlEscape($details2['physician_type']) . "</physician_type>
    371. 

  371.             <physician_type_code>" . xmlEscape($details2['physician_type_code']) . "</physician_type_code>
    372. 

  372.             <taxonomy>" . xmlEscape($details2['taxonomy']) . "</taxonomy>
    373. 

  373.             <taxonomy_description>" . xmlEscape($details2['taxonomy_desc']) . "</taxonomy_description>
    374. 

  374.           </provider>
    375. 

  375.           ";
    376. 

  376.         }
    377. 

  377.         $care_team_provider .= "</care_team>
    378. 

  378.         ";
    379. 

  379.         return $primary_care_provider . $care_team_provider;
    380. 

  380.     }
    381. 

  381. 

  382.     /*
    383. 

  383.     #******************************************************#
    384. 

  384.     #                  CONTINUITY OF CARE                  #
    385. 

  385.     #******************************************************#
    386. 

  386.     */
    387. 

  387.     public function getAllergies($pid, $encounter)
    388. 

  388.     {
    389. 

  389.         $allergies = '';
    390. 

  390.         $query = "SELECT l.id, l.title, l.begdate, l.enddate, lo.title AS observation,
    391. 

  391.             SUBSTRING(lo.codes, LOCATE(':',lo.codes)+1, LENGTH(lo.codes)) AS observation_code,
    392. 

  392. 						SUBSTRING(l.`diagnosis`,1,LOCATE(':',l.diagnosis)-1) AS code_type_real,
    393. 

  393. 						l.reaction, l.diagnosis, l.diagnosis AS code
    394. 

  394. 						FROM lists AS l
    395. 

  395. 						LEFT JOIN list_options AS lo ON lo.list_id = ? AND lo.option_id = l.severity_al
    396. 

  396. 						WHERE l.type = ? AND l.pid = ?";
    397. 

  397.         $appTable = new ApplicationTable();
    398. 

  398.         $res = $appTable->zQuery($query, array('severity_ccda', 'allergy', $pid));
    399. 

  399. 

  400.         $allergies = "<allergies>";
    401. 

  401.         foreach ($res as $row) {
    402. 

  402.             $split_codes = explode(';', $row['code']);
    403. 

  403.             foreach ($split_codes as $key => $single_code) {
    404. 

  404.                 $code = $code_text = $code_rx = $code_text_rx = $code_snomed = $code_text_snomed = $reaction_text = $reaction_code = '';
    405. 

  405.                 $get_code_details = explode(':', $single_code);
    406. 

  406. 

  407.                 if ($get_code_details[0] == 'RXNORM' || $get_code_details[0] == 'RXCUI') {
    408. 

  408.                     $code_rx = $get_code_details[1];
    409. 

  409.                     $code_text_rx = lookup_code_descriptions($single_code);
    410. 

  410.                 } elseif ($get_code_details[0] == 'SNOMED' || $get_code_details[0] == 'SNOMED-CT') {
    411. 

  411.                     $code_snomed = $get_code_details[1];
    412. 

  412.                     $code_text_snomed = lookup_code_descriptions($row['code']);
    413. 

  413.                 } else {
    414. 

  414.                     $code = $get_code_details[1];
    415. 

  415.                     $code_text = lookup_code_descriptions($single_code);
    416. 

  416.                 }
    417. 

  417. 

  418.                 $active = $status_table = '';
    419. 

  419. 

  420.                 if ($row['enddate']) {
    421. 

  421.                     $active = 'completed';
    422. 

  422.                     $allergy_status = 'completed';
    423. 

  423.                     $status_table = 'Resolved';
    424. 

  424.                     $status_code = '73425007';
    425. 

  425.                 } else {
    426. 

  426.                     $active = 'completed';
    427. 

  427.                     $allergy_status = 'active';
    428. 

  428.                     $status_table = 'Active';
    429. 

  429.                     $status_code = '55561003';
    430. 

  430.                 }
    431. 

  431. 

  432.                 if ($row['reaction']) {
    433. 

  433.                     $reaction_text = (new CarecoordinationTable())->getListTitle($row['reaction'], 'reaction', '');
    434. 

  434.                     $reaction_code = (new CarecoordinationTable())->getCodes($row['reaction'], 'reaction');
    435. 

  435.                     $reaction_code = explode(':', $reaction_code);
    436. 

  436.                 }
    437. 

  437. 

  438.                 $allergies .= "<allergy>
    439. 

  439.                 <id>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . $single_code)) . "</id>
    440. 

  440.                 <sha_id>" . xmlEscape("36e3e930-7b14-11db-9fe1-0800200c9a66") . "</sha_id>
    441. 

  441.                 <title>" . xmlEscape($row['title']) . ($single_code ? " [" . xmlEscape($single_code) . "]" : '') . "</title>
    442. 

  442.                 <diagnosis_code>" . xmlEscape(($code ? $code : 0)) . "</diagnosis_code>
    443. 

  443.                 <diagnosis>" . xmlEscape(($code_text ? Listener::z_xlt($code_text) : "")) . "</diagnosis>
    444. 

  444.                 <rxnorm_code>" . xmlEscape(($code_rx ? $code_rx : 0)) . "</rxnorm_code>
    445. 

  445.                 <rxnorm_code_text>" . xmlEscape(($code_text_rx ? Listener::z_xlt($code_text_rx) : "")) . "</rxnorm_code_text>
    446. 

  446.                 <snomed_code>" . xmlEscape(($code_snomed ? $code_snomed : 0)) . "</snomed_code>
    447. 

  447.                 <snomed_code_text>" . xmlEscape(($code_text_snomed ? Listener::z_xlt($code_text_snomed) : "")) . "</snomed_code_text>
    448. 

  448.                 <status_table>" . ($status_table ? xmlEscape($status_table) : "") . "</status_table>
    449. 

  449.                 <status>" . ($active ? xmlEscape($active) : "") . "</status>
    450. 

  450.                 <allergy_status>" . ($allergy_status ? xmlEscape($allergy_status) : "") . "</allergy_status>
    451. 

  451.                 <status_code>" . ($status_code ? xmlEscape($status_code) : 0) . "</status_code>
    452. 

  452.                 <outcome>" . xmlEscape(($row['observation'] ? Listener::z_xlt($row['observation']) : "")) . "</outcome>
    453. 

  453.                 <outcome_code>" . xmlEscape(($row['observation_code'] ? $row['observation_code'] : 0)) . "</outcome_code>
    454. 

  454.                 <startdate>" . xmlEscape($row['begdate'] ? preg_replace('/-/', '', $row['begdate']) : "00000000") . "</startdate>
    455. 

  455.                 <enddate>" . xmlEscape($row['enddate'] ? preg_replace('/-/', '', $row['enddate']) : "00000000") . "</enddate>
    456. 

  456.                 <reaction_text>" . xmlEscape($reaction_text ? Listener::z_xlt($reaction_text) : "") . "</reaction_text>
    457. 

  457.                 <reaction_code>" . xmlEscape($reaction_code[1] ?: '') . "</reaction_code>
    458. 

  458.                 <reaction_code_type>" . xmlEscape(str_replace('-', ' ', $reaction_code[0]) ?: '') . "</reaction_code_type>
    459. 

  459.                 <RxNormCode>" . xmlEscape($code_rx) . "</RxNormCode>
    460. 

  460.                 <RxNormCode_text>" . xmlEscape(!empty($code_text_rx) ? $code_text_rx : $row['title']) . "</RxNormCode_text>
    461. 

  461.                 </allergy>";
    462. 

  462.             }
    463. 

  463.         }
    464. 

  464. 

  465.         $allergies .= "</allergies>";
    466. 

  466.         return $allergies;
    467. 

  467.     }
    468. 

  468. 

  469.     public function getMedications($pid, $encounter)
    470. 

  470.     {
    471. 

  471.         $medications = '';
    472. 

  472.         $query = "select l.id, l.date_added, l.start_date, l.drug, l.dosage, l.quantity, l.size, l.substitute, l.drug_info_erx, l.active, SUBSTRING(l3.codes, LOCATE(':',l3.codes)+1, LENGTH(l3.codes)) AS route_code,
    473. 

  473.                        l.rxnorm_drugcode, l1.title as unit, l1.codes as unit_code,l2.title as form,SUBSTRING(l2.codes, LOCATE(':',l2.codes)+1, LENGTH(l2.codes)) AS form_code, l3.title as route, l4.title as `interval`,
    474. 

  474.                        u.title, u.fname, u.lname, u.mname, u.npi, u.street, u.streetb, u.city, u.state, u.zip, u.phonew1, l.note
    475. 

  475.                        from prescriptions as l
    476. 

  476.                        left join list_options as l1 on l1.option_id=unit AND l1.list_id = ?
    477. 

  477.                        left join list_options as l2 on l2.option_id=form AND l2.list_id = ?
    478. 

  478.                        left join list_options as l3 on l3.option_id=route AND l3.list_id = ?
    479. 

  479.                        left join list_options as l4 on l4.option_id=`interval` AND l4.list_id = ?
    480. 

  480.                        left join users as u on u.id = l.provider_id
    481. 

  481.                        where l.patient_id = ? and l.active = 1";
    482. 

  482.         $appTable = new ApplicationTable();
    483. 

  483.         $res = $appTable->zQuery($query, array('drug_units', 'drug_form', 'drug_route', 'drug_interval', $pid));
    484. 

  484. 

  485.         $medications = "<medications>";
    486. 

  486.         foreach ($res as $row) {
    487. 

  487.             if (!$row['rxnorm_drugcode']) {
    488. 

  488.                 $row['rxnorm_drugcode'] = $this->generate_code($row['drug']);
    489. 

  489.             }
    490. 

  490. 

  491.             $unit = $str = $active = '';
    492. 

  492. 

  493.             if ($row['size'] > 0) {
    494. 

  494.                 $unit = $row['size'] . " " . Listener::z_xlt($row['unit']) . " ";
    495. 

  495.             }
    496. 

  496. 

  497.             $str = $unit . " " . Listener::z_xlt($row['route']) . " " . $row['dosage'] . " " . Listener::z_xlt($row['form'] . " " . $row['interval']);
    498. 

  498. 

  499.             if ($row['active'] > 0) {
    500. 

  500.                 $active = 'active';
    501. 

  501.             } else {
    502. 

  502.                 $active = 'completed';
    503. 

  503.             }
    504. 

  504. 

  505.             if ($row['start_date']) {
    506. 

  506.                 $start_date = str_replace('-', '', $row['start_date']);
    507. 

  507.                 $start_date_formatted = \Application\Model\ApplicationTable::fixDate($row['start_date'], $GLOBALS['date_display_format'], 'yyyy-mm-dd');
    508. 

  508.                 ;
    509. 

  509.             }
    510. 

  510. 

  511.             $medications .= "<medication>
    512. 

  512.     <id>" . xmlEscape($row['id']) . "</id>
    513. 

  513.     <extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'])) . "</extension>
    514. 

  514.     <sha_extension>" . xmlEscape("cdbd33f0-6cde-11db-9fe1-0800200c9a66") . "</sha_extension>
    515. 

  515.     <performer_name>" . xmlEscape($row['fname'] . " " . $row['mname'] . " " . $row['lname']) . "</performer_name>
    516. 

  516.     <fname>" . xmlEscape($row['fname']) . "</fname>
    517. 

  517.     <mname>" . xmlEscape($row['mname']) . "</mname>
    518. 

  518.     <lname>" . xmlEscape($row['lname']) . "</lname>
    519. 

  519.     <title>" . xmlEscape($row['title']) . "</title>
    520. 

  520.     <npi>" . xmlEscape($row['npi']) . "</npi>
    521. 

  521.     <address>" . xmlEscape($row['street']) . "</address>
    522. 

  522.     <city>" . xmlEscape($row['city']) . "</city>
    523. 

  523.     <state>" . xmlEscape($row['state']) . "</state>
    524. 

  524.     <zip>" . xmlEscape($row['zip']) . "</zip>
    525. 

  525.     <work_phone>" . xmlEscape($row['phonew1']) . "</work_phone>
    526. 

  526.     <drug>" . xmlEscape($row['drug']) . "</drug>
    527. 

  527.     <direction>" . xmlEscape($str) . "</direction>
    528. 

  528.     <dosage>" . xmlEscape($row['dosage']) . "</dosage>
    529. 

  529.     <size>" . xmlEscape(($row['size'] ? $row['size'] : 0)) . "</size>
    530. 

  530.     <unit>" . xmlEscape(($row['unit'] ? preg_replace('/\s*/', '', Listener::z_xlt($row['unit'])) : '')) . "</unit>
    531. 

  531.     <unit_code>" . xmlEscape(($row['unit_code'] ? $row['unit_code'] : 0)) . "</unit_code>
    532. 

  532.     <form>" . xmlEscape(Listener::z_xlt($row['form'])) . "</form>
    533. 

  533.     <form_code>" . xmlEscape(Listener::z_xlt($row['form_code'])) . "</form_code>
    534. 

  534.     <route_code>" . xmlEscape($row['route_code'] ?: $row['route']) . "</route_code>
    535. 

  535.     <route>" . xmlEscape($row['route']) . "</route>
    536. 

  536.     <interval>" . xmlEscape(Listener::z_xlt($row['interval'])) . "</interval>
    537. 

  537.     <start_date>" . xmlEscape($start_date) . "</start_date>
    538. 

  538.     <start_date_formatted>" . xmlEscape($row['start_date']) . "</start_date_formatted>
    539. 

  539.     <end_date>" . xmlEscape('') . "</end_date>
    540. 

  540.     <status>" . xmlEscape($active) . "</status>
    541. 

  541.     <indications>" . xmlEscape(($row['pres_erx_diagnosis_name'] ? $row['pres_erx_diagnosis_name'] : "")) . "</indications>
    542. 

  542.     <indications_code>" . xmlEscape(($row['pres_erx_diagnosis'] ? $row['pres_erx_diagnosis'] : 0)) . "</indications_code>
    543. 

  543.     <instructions>" . xmlEscape($row['note']) . "</instructions>
    544. 

  544.     <rxnorm>" . xmlEscape($row['rxnorm_drugcode']) . "</rxnorm>
    545. 

  545.     <provider_id></provider_id>
    546. 

  546.     <provider_name></provider_name>
    547. 

  547.     </medication>";
    548. 

  548.         }
    549. 

  549. 

  550.         $medications .= "</medications>";
    551. 

  551.         return $medications;
    552. 

  552.     }
    553. 

  553. 

  554.     public function getProblemList($pid, $encounter)
    555. 

  555.     {
    556. 

  556.         UuidRegistry::createMissingUuidsForTables(['lists']);
    557. 

  557.         $problem_lists = '';
    558. 

  558.         $query = "select l.*, lo.title as observation, lo.codes as observation_code, l.diagnosis AS code
    559. 

  559.     from lists AS l
    560. 

  560.     left join list_options as lo on lo.option_id = l.outcome AND lo.list_id = ?
    561. 

  561.     where l.type = ? and l.pid = ? AND l.outcome != ?"; // patched out /* AND l.id NOT IN(SELECT list_id FROM issue_encounter WHERE pid = ?)*/
    562. 

  562.         $appTable = new ApplicationTable();
    563. 

  563.         $res = $appTable->zQuery($query, array('outcome', 'medical_problem', $pid, 1));
    564. 

  564. 

  565.         $problem_lists .= '<problem_lists>';
    566. 

  566.         foreach ($res as $row) {
    567. 

  567.             $row['uuid'] = UuidRegistry::uuidToString($row['uuid']);
    568. 

  568.             $split_codes = explode(';', $row['code']);
    569. 

  569.             foreach ($split_codes as $key => $single_code) {
    570. 

  570.                 $get_code_details = explode(':', $single_code);
    571. 

  571.                 $code_type = $get_code_details[0];
    572. 

  572.                 $code_type = ($code_type == 'SNOMED' || $code_type == 'SNOMED-CT') ? "SNOMED CT" : "ICD-10-CM";
    573. 

  573.                 $code = $get_code_details[1];
    574. 

  574.                 $code_text = lookup_code_descriptions($single_code);
    575. 

  575. 

  576.                 $age = $this->getAge($pid, $row['begdate']);
    577. 

  577.                 $start_date = str_replace('-', '', $row['begdate']);
    578. 

  578.                 $end_date = str_replace('-', '', $row['enddate']);
    579. 

  579. 

  580.                 $status = $status_table = '';
    581. 

  581.                 $start_date = $start_date ?: '0';
    582. 

  582.                 $end_date = $end_date ?: '0';
    583. 

  583. 

  584.                 //Active - 55561003     Completed - 73425007
    585. 

  585.                 if ($end_date) {
    586. 

  586.                     $status = 'completed';
    587. 

  587.                     $status_table = 'Resolved';
    588. 

  588.                     $status_code = '73425007';
    589. 

  589.                 } else {
    590. 

  590.                     $status = 'active';
    591. 

  591.                     $status_table = 'Active';
    592. 

  592.                     $status_code = '55561003';
    593. 

  593.                 }
    594. 

  594. 

  595.                 $observation = $row['observation'];
    596. 

  596.                 $observation_code = explode(':', $row['observation_code']);
    597. 

  597.                 $observation_code = $observation_code[1];
    598. 

  598.                 $problem_lists .= "<problem>
    599. 

  599.                 <problem_id>" . ($code ? xmlEscape($row['$id']) : '') . "</problem_id>
    600. 

  600.                 <extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'])) . "</extension>
    601. 

  601.                 <sha_extension>" . xmlEscape($row['uuid']) . "</sha_extension>
    602. 

  602.                 <title>" . xmlEscape($row['title']) . ($single_code ? " [" . xmlEscape($single_code) . "]" : '') . "</title>
    603. 

  603.                 <code>" . ($code ? xmlEscape($code) : '') . "</code>
    604. 

  604.                 <code_type>" . ($code ? xmlEscape($code_type) : '') . "</code_type>
    605. 

  605.                 <code_text>" . xmlEscape(($code_text ?: '')) . "</code_text>
    606. 

  606.                 <age>" . xmlEscape($age) . "</age>
    607. 

  607.                 <start_date_table>" . xmlEscape($row['begdate']) . "</start_date_table>
    608. 

  608.                 <start_date>" . xmlEscape($start_date) . "</start_date>
    609. 

  609.                 <end_date>" . xmlEscape($end_date) . "</end_date>
    610. 

  610.                 <status>" . xmlEscape($status) . "</status>
    611. 

  611.                 <status_table>" . xmlEscape($status_table) . "</status_table>
    612. 

  612.                 <status_code>" . xmlEscape($status_code) . "</status_code>
    613. 

  613.                 <observation>" . xmlEscape(($observation ? Listener::z_xlt($observation) : "")) . "</observation>
    614. 

  614.                 <observation_code>" . xmlEscape(($observation_code ?: '')) . "</observation_code>
    615. 

  615.                 <diagnosis>" . xmlEscape($code ?: '') . "</diagnosis>
    616. 

  616. 					</problem>";
    617. 

  617.             }
    618. 

  618.         }
    619. 

  619. 

  620.         $problem_lists .= '</problem_lists>';
    621. 

  621.         return $problem_lists;
    622. 

  622.     }
    623. 

  623. 

  624.     public function getMedicalDeviceList($pid, $encounter)
    625. 

  625.     {
    626. 

  626.         $medical_devices = '';
    627. 

  627.         $query = "select l.*, lo.title as observation, lo.codes as observation_code, l.diagnosis AS code
    628. 

  628.     from lists AS l
    629. 

  629.     left join list_options as lo on lo.option_id = l.outcome AND lo.list_id = ?
    630. 

  630.     where l.type = ? and l.pid = ? AND l.outcome != ? AND l.id NOT IN(SELECT list_id FROM issue_encounter WHERE pid = ?)";
    631. 

  631.         $appTable = new ApplicationTable();
    632. 

  632.         $res = $appTable->zQuery($query, array('outcome', 'medical_device', $pid, 1, $pid));
    633. 

  633. 

  634.         $medical_devices .= '<medical_devices>';
    635. 

  635.         foreach ($res as $row) {
    636. 

  636.             $split_codes = explode(';', $row['code']);
    637. 

  637.             foreach ($split_codes as $key => $single_code) {
    638. 

  638.                 $get_code_details = explode(':', $single_code);
    639. 

  639.                 $code_type = $get_code_details[0];
    640. 

  640.                 $code_type = ($code_type == 'SNOMED' || $code_type == 'SNOMED-CT') ? "SNOMED CT" : "ICD-10-CM";
    641. 

  641.                 $code = $get_code_details[1];
    642. 

  642.                 $code_text = lookup_code_descriptions($single_code);
    643. 

  643. 

  644.                 $start_date = str_replace('-', '', $row['begdate']);
    645. 

  645.                 $end_date = str_replace('-', '', $row['enddate']);
    646. 

  646. 

  647.                 $status = $status_table = '';
    648. 

  648.                 $start_date = $start_date ?: '';
    649. 

  649.                 $end_date = $end_date ?: '';
    650. 

  650. 

  651.                 //Active - 55561003     Completed - 73425007
    652. 

  652.                 if ($end_date) {
    653. 

  653.                     $status = 'completed';
    654. 

  654.                     $status_table = 'Resolved';
    655. 

  655.                     $status_code = '73425007';
    656. 

  656.                 } else {
    657. 

  657.                     $status = 'active';
    658. 

  658.                     $status_table = 'Active';
    659. 

  659.                     $status_code = '55561003';
    660. 

  660.                 }
    661. 

  661. 

  662.                 $observation = $row['observation'];
    663. 

  663.                 $observation_code = explode(':', $row['observation_code']);
    664. 

  664.                 $observation_code = $observation_code[1];
    665. 

  665. 

  666.                 $medical_devices .= "<device>
    667. 

  667.                 <extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'])) . "</extension>
    668. 

  668.                 <sha_extension>" . xmlEscape($this->formatUid($_SESSION['site_id'] . $row['udi'])) . "</sha_extension>
    669. 

  669.                 <title>" . xmlEscape($row['title']) . ($single_code ? " [" . xmlEscape($single_code) . "]" : '') . "</title>
    670. 

  670.                 <code>" . ($code ? xmlEscape($code) : '') . "</code>
    671. 

  671.                 <code_type>" . ($code ? xmlEscape($code_type) : '') . "</code_type>
    672. 

  672.                 <code_text>" . xmlEscape(($code_text ?: '')) . "</code_text>
    673. 

  673.                 <udi>" . xmlEscape($row['udi']) . "</udi>
    674. 

  674.                 <start_date_table>" . xmlEscape($row['begdate']) . "</start_date_table>
    675. 

  675.                 <start_date>" . xmlEscape($start_date) . "</start_date>
    676. 

  676.                 <end_date>" . xmlEscape($end_date) . "</end_date>
    677. 

  677.                 <status>" . xmlEscape($status) . "</status>
    678. 

  678.                 <status_table>" . xmlEscape($status_table) . "</status_table>
    679. 

  679.                 <status_code>" . xmlEscape($status_code) . "</status_code>
    680. 

  680.                 <observation>" . xmlEscape(($observation ? Listener::z_xlt($observation) : "")) . "</observation>
    681. 

  681.                 <observation_code>" . xmlEscape(($observation_code ?: '')) . "</observation_code>
    682. 

  682.                 <diagnosis>" . xmlEscape($code ?: '') . "</diagnosis>
    683. 

  683.                 </device>";
    684. 

  684.             }
    685. 

  685.         }
    686. 

  686. 

  687.         $medical_devices .= '</medical_devices>';
    688. 

  688.         return $medical_devices;
    689. 

  689.     }
    690. 

  690. 

  691.     public function getImmunization($pid, $encounter)
    692. 

  692.     {
    693. 

  693.         $immunizations = '';
    694. 

  694.         $query = "SELECT im.*, cd.code_text, DATE(administered_date) AS administered_date,
    695. 

  695. 		    DATE_FORMAT(administered_date,'%Y%m%d') AS administered_formatted, lo.title as route_of_administration,
    696. 

  696. 		    u.title, u.fname, u.mname, u.lname, u.npi, u.street, u.streetb, u.city, u.state, u.zip, u.phonew1,
    697. 

  697. 		    f.name, f.phone, SUBSTRING(lo.codes, LOCATE(':',lo.codes)+1, LENGTH(lo.codes)) AS route_code
    698. 

  698. 		    FROM immunizations AS im
    699. 

  699. 		    LEFT JOIN codes AS cd ON cd.code = im.cvx_code
    700. 

  700. 		    JOIN code_types AS ctype ON ctype.ct_key = 'CVX' AND ctype.ct_id=cd.code_type
    701. 

  701. 		    LEFT JOIN list_options AS lo ON lo.list_id = 'drug_route' AND lo.option_id = im.route
    702. 

  702. 		    LEFT JOIN users AS u ON u.id = im.administered_by_id
    703. 

  703. 		    LEFT JOIN facility AS f ON f.id = u.facility_id
    704. 

  704. 		    WHERE im.patient_id=? AND added_erroneously = 0";
    705. 

  705.         $appTable = new ApplicationTable();
    706. 

  706.         $res = $appTable->zQuery($query, array($pid));
    707. 

  707. 

  708.         $immunizations .= '<immunizations>';
    709. 

  709.         foreach ($res as $row) {
    710. 

  710.             $immunizations .= "
    711. 

  711. 	    <immunization>
    712. 

  712. 		<extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'])) . "</extension>
    713. 

  713. 		<sha_extension>" . xmlEscape("e6f1ba43-c0ed-4b9b-9f12-f435d8ad8f92") . "</sha_extension>
    714. 

  714. 		<id>" . xmlEscape($row['id']) . "</id>
    715. 

  715. 		<cvx_code>" . xmlEscape($row['cvx_code']) . "</cvx_code>
    716. 

  716. 		<code_text>" . xmlEscape($row['code_text']) . "</code_text>
    717. 

  717. 		<reaction>" . xmlEscape($row['reaction']) . "</reaction>
    718. 

  718. 		<npi>" . xmlEscape($row['npi']) . "</npi>
    719. 

  719. 		<administered_by>" . xmlEscape($row['administered_by']) . "</administered_by>
    720. 

  720. 		<fname>" . xmlEscape($row['fname']) . "</fname>
    721. 

  721. 		<mname>" . xmlEscape($row['mname']) . "</mname>
    722. 

  722. 		<lname>" . xmlEscape($row['lname']) . "</lname>
    723. 

  723. 		<title>" . xmlEscape($row['title']) . "</title>
    724. 

  724. 		<address>" . xmlEscape($row['street']) . "</address>
    725. 

  725. 		<city>" . xmlEscape($row['city']) . "</city>
    726. 

  726. 		<state>" . xmlEscape($row['state']) . "</state>
    727. 

  727. 		<zip>" . xmlEscape($row['zip']) . "</zip>
    728. 

  728. 		<work_phone>" . xmlEscape($row['phonew1']) . "</work_phone>
    729. 

  729. 		<administered_on>" . xmlEscape($row['administered_date']) . "</administered_on>
    730. 

  730. 		<administered_formatted>" . xmlEscape($row['administered_formatted']) . "</administered_formatted>
    731. 

  731. 		<note>" . xmlEscape($row['note']) . "</note>
    732. 

  732. 		<route_of_administration>" . xmlEscape(Listener::z_xlt($row['route_of_administration'])) . "</route_of_administration>
    733. 

  733. 		<route_code>" . xmlEscape($row['route_code']) . "</route_code>
    734. 

  734. 		<status>completed</status>
    735. 

  735. 		<facility_name>" . xmlEscape($row['name']) . "</facility_name>
    736. 

  736. 		<facility_phone>" . xmlEscape($row['phone']) . "</facility_phone>
    737. 

  737. 	    </immunization>";
    738. 

  738.         }
    739. 

  739. 

  740.         $immunizations .= '</immunizations>';
    741. 

  741. 

  742.         return $immunizations;
    743. 

  743.     }
    744. 

  744. 

  745.     public function getProcedures($pid, $encounter)
    746. 

  746.     {
    747. 

  747.         $wherCon = '';
    748. 

  748.         $sqlBindArray = [];
    749. 

  749.         if ($encounter) {
    750. 

  750.             $wherCon = " b.encounter = ? AND ";
    751. 

  751.             $sqlBindArray[] = $encounter;
    752. 

  752.         }
    753. 

  753. 

  754.         $procedure = '';
    755. 

  755.         $query = "select b.id, b.date as proc_date, b.code_text, b.code, fe.date,
    756. 

  756. 	u.fname, u.lname, u.mname, u.npi, u.street, u.city, u.state, u.zip,
    757. 

  757. 	f.id as fid, f.name, f.phone, f.street as fstreet, f.city as fcity, f.state as fstate, f.postal_code as fzip, f.country_code, f.phone as fphone
    758. 

  758. 	from billing as b
    759. 

  759.         LEFT join code_types as ct on ct.ct_key
    760. 

  760.         LEFT join codes as c on c.code = b.code AND c.code_type = ct.ct_id
    761. 

  761.         LEFT join form_encounter as fe on fe.pid = b.pid AND fe.encounter = b.encounter
    762. 

  762. 	LEFT JOIN users AS u ON u.id = b.provider_id
    763. 

  763. 	LEFT JOIN facility AS f ON f.id = fe.facility_id
    764. 

  764.         where $wherCon b.pid = ? and b.activity = ?";
    765. 

  765.         array_push($sqlBindArray, $pid, 1);
    766. 

  766.         $appTable = new ApplicationTable();
    767. 

  767.         $res = $appTable->zQuery($query, $sqlBindArray);
    768. 

  768. 

  769.         $procedure = '<procedures>';
    770. 

  770.         foreach ($res as $row) {
    771. 

  771.             $procedure .= "<procedure>
    772. 

  772. 		    <extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'])) . "</extension>
    773. 

  773. 		    <sha_extension>" . xmlEscape("d68b7e32-7810-4f5b-9cc2-acd54b0fd85d") . "</sha_extension>
    774. 

  774.                     <description>" . xmlEscape($row['code_text']) . "</description>
    775. 

  775. 		    <code>" . xmlEscape($row['code']) . "</code>
    776. 

  776.                     <date>" . xmlEscape(substr($row['date'], 0, 10)) . "</date>
    777. 

  777. 		    <npi>" . xmlEscape($row['npi']) . "</npi>
    778. 

  778. 		    <fname>" . xmlEscape($row['fname']) . "</fname>
    779. 

  779. 		    <mname>" . xmlEscape($row['mname']) . "</mname>
    780. 

  780. 		    <lname>" . xmlEscape($row['lname']) . "</lname>
    781. 

  781. 		    <address>" . xmlEscape($row['street']) . "</address>
    782. 

  782. 		    <city>" . xmlEscape($row['city']) . "</city>
    783. 

  783. 		    <state>" . xmlEscape($row['state']) . "</state>
    784. 

  784. 		    <zip>" . xmlEscape($row['zip']) . "</zip>
    785. 

  785. 		    <work_phone>" . xmlEscape($row['phonew1']) . "</work_phone>
    786. 

  786. 		    <facility_extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['fid'])) . "</facility_extension>
    787. 

  787. 		    <facility_sha_extension>" . xmlEscape("c2ee9ee9-ae31-4628-a919-fec1cbb58686") . "</facility_sha_extension>
    788. 

  788. 		    <facility_name>" . xmlEscape($row['name']) . "</facility_name>
    789. 

  789. 		    <facility_address>" . xmlEscape($row['fstreet']) . "</facility_address>
    790. 

  790. 		    <facility_city>" . xmlEscape($row['fcity']) . "</facility_city>
    791. 

  791. 		    <facility_state>" . xmlEscape($row['fstate']) . "</facility_state>
    792. 

  792. 		    <facility_country>" . xmlEscape($row['country_code']) . "</facility_country>
    793. 

  793. 		    <facility_zip>" . xmlEscape($row['fzip']) . "</facility_zip>
    794. 

  794. 		    <facility_phone>" . xmlEscape($row['fphone']) . "</facility_phone>
    795. 

  795. 		    <procedure_date>" . xmlEscape(preg_replace('/-/', '', substr($row['proc_date'], 0, 10))) . "</procedure_date>
    796. 

  796.                 </procedure>";
    797. 

  797.         }
    798. 

  798. 

  799.         $procedure .= '</procedures>';
    800. 

  800.         return $procedure;
    801. 

  801.     }
    802. 

  802. 

  803.     public function getResults($pid, $encounter)
    804. 

  804.     {
    805. 

  805.         $wherCon = '';
    806. 

  806.         $sqlBindArray = [];
    807. 

  807.         if ($encounter) {
    808. 

  808.             $wherCon = " po.encounter_id = ? AND ";
    809. 

  809.             $sqlBindArray[] = $encounter;
    810. 

  810.         }
    811. 

  811. 

  812.         $results = '';
    813. 

  813.         $query = "SELECT prs.result AS result_value, prs.units, prs.range, prs.result_text as order_title, prs.result_code, prs.procedure_result_id,
    814. 

  814. 	    prs.result_text as result_desc, prs.procedure_result_id AS test_code, poc.procedure_code, poc.procedure_name, poc.diagnoses, po.date_ordered, prs.date AS result_time, prs.abnormal AS abnormal_flag,po.order_status AS order_status
    815. 

  815. 	    FROM procedure_order AS po
    816. 

  816. 	    JOIN procedure_order_code as poc on poc.procedure_order_id = po.procedure_order_id
    817. 

  817. 	    JOIN procedure_report AS pr ON pr.procedure_order_id = po.procedure_order_id
    818. 

  818. 	    JOIN procedure_result AS prs ON prs.procedure_report_id = pr.procedure_report_id
    819. 

  819.         WHERE $wherCon po.patient_id = ? AND prs.result NOT IN ('DNR','TNP')";
    820. 

  820.         array_push($sqlBindArray, $pid);
    821. 

  821.         $appTable = new ApplicationTable();
    822. 

  822.         $res = $appTable->zQuery($query, $sqlBindArray);
    823. 

  823. 

  824.         $results_list = array();
    825. 

  825.         foreach ($res as $row) {
    826. 

  826.             if (empty($row['result_code']) && empty($row['abnormal_flag'])) {
    827. 

  827.                 continue;
    828. 

  828.             }
    829. 

  829.             $results_list[$row['test_code']]['test_code'] = $row['test_code'];
    830. 

  830.             $results_list[$row['test_code']]['order_title'] = $row['order_title'];
    831. 

  831.             $results_list[$row['test_code']]['order_status'] = $row['order_status'];
    832. 

  832.             $results_list[$row['test_code']]['date_ordered'] = substr(str_replace("-", '', $row['date_ordered']), 0, 8);
    833. 

  833.             $results_list[$row['test_code']]['date_ordered_table'] = $row['date_ordered'];
    834. 

  834.             $results_list[$row['test_code']]['procedure_code'] = $row['procedure_code'];
    835. 

  835.             $results_list[$row['test_code']]['procedure_name'] = $row['procedure_name'];
    836. 

  836.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['result_code'] = ($row['result_code'] ? $row['result_code'] : 0);
    837. 

  837.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['result_desc'] = $row['result_desc'];
    838. 

  838.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['units'] = $row['units'];
    839. 

  839.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['range'] = $row['range'];
    840. 

  840.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['result_value'] = $row['result_value'];
    841. 

  841.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['result_time'] = substr(preg_replace('/-/', '', $row['result_time']), 0, 8);
    842. 

  842.             $results_list[$row['test_code']]['subtest'][$row['procedure_result_id']]['abnormal_flag'] = $row['abnormal_flag'];
    843. 

  843.         }
    844. 

  844. 

  845.         $results = '<results>';
    846. 

  846.         foreach ($results_list as $row) {
    847. 

  847.             $order_status = $order_status_table = '';
    848. 

  848.             if ($row['order_status'] == 'complete') {
    849. 

  849.                 $order_status = 'completed';
    850. 

  850.                 $order_status_table = 'completed';
    851. 

  851.             } elseif ($row['order_status'] == 'pending') {
    852. 

  852.                 $order_status = 'active';
    853. 

  853.                 $order_status_table = 'pending';
    854. 

  854.             } else {
    855. 

  855.                 $order_status = 'completed';
    856. 

  856.                 $order_status_table = '';
    857. 

  857.             }
    858. 

  858. 

  859.             $results .= '<result>
    860. 

  860. 		<extension>' . xmlEscape(base64_encode($_SESSION['site_id'] . $row['test_code'])) . '</extension>
    861. 

  861. 		<root>' . xmlEscape("7d5a02b0-67a4-11db-bd13-0800200c9a66") . '</root>
    862. 

  862. 		<date_ordered>' . xmlEscape($row['date_ordered']) . '</date_ordered>
    863. 

  863. 		<date_ordered_table>' . xmlEscape($row['date_ordered_table']) . '</date_ordered_table>
    864. 

  864.         <title>' . xmlEscape($row['order_title']) . '</title>
    865. 

  865. 		<test_code>' . xmlEscape($row['procedure_code']) . '</test_code>
    866. 

  866. 		<test_name>' . xmlEscape($row['procedure_name']) . '</test_name>
    867. 

  867.         <order_status_table>' . xmlEscape($order_status_table) . '</order_status_table>
    868. 

  868.         <order_status>' . xmlEscape($order_status) . '</order_status>';
    869. 

  869.             foreach ($row['subtest'] as $row_1) {
    870. 

  870.                 $units = $row_1['units'] ?: '';
    871. 

  871.                 $highlow = preg_split("/[\s,-\--]+/", $row_1['range']);
    872. 

  872.                 $results .= '
    873. 

  873. 		    <subtest>
    874. 

  874. 			<extension>' . xmlEscape(base64_encode($_SESSION['site_id'] . $row['result_code'])) . '</extension>
    875. 

  875. 			<root>' . xmlEscape("7d5a02b0-67a4-11db-bd13-0800200c9a66") . '</root>
    876. 

  876. 			<range>' . xmlEscape($row_1['range']) . '</range>
    877. 

  877. 			<low>' . xmlEscape(trim($highlow[0])) . '</low>
    878. 

  878. 			<high>' . xmlEscape(trim($highlow[1])) . '</high>
    879. 

  879. 			<unit>' . xmlEscape($units) . '</unit>
    880. 

  880. 			<result_code>' . xmlEscape($row_1['result_code']) . '</result_code>
    881. 

  881. 			<result_desc>' . xmlEscape($row_1['result_desc']) . '</result_desc>
    882. 

  882. 			<result_value>' . xmlEscape(($row_1['result_value'] ? $row_1['result_value'] : 0)) . '</result_value>
    883. 

  883. 			<result_time>' . xmlEscape($row_1['result_time']) . '</result_time>
    884. 

  884. 			<abnormal_flag>' . xmlEscape($row_1['abnormal_flag']) . '</abnormal_flag>
    885. 

  885. 		    </subtest>';
    886. 

  886.             }
    887. 

  887. 

  888.             $results .= '
    889. 

  889. 	    </result>';
    890. 

  890.         }
    891. 

  891. 

  892.         $results .= '</results>';
    893. 

  893.         return $results;
    894. 

  894.     }
    895. 

  895. 

  896.     /*
    897. 

  897.     #**************************************************#
    898. 

  898.     #                ENCOUNTER HISTORY                 #
    899. 

  899.     #**************************************************#
    900. 

  900.     */
    901. 

  901.     public function getEncounterHistory($pid, $encounter)
    902. 

  902.     {
    903. 

  903.         $wherCon = '';
    904. 

  904.         $sqlBindArray = [];
    905. 

  905.         if ($encounter) {
    906. 

  906.             $wherCon = " fe.encounter = ? AND ";
    907. 

  907.             $sqlBindArray[] = $encounter;
    908. 

  908.         }
    909. 

  909. 

  910.         $results = "";
    911. 

  911.         $query = "SELECT fe.date, fe.encounter,fe.reason,
    912. 

  912. 	    f.id as fid, f.name, f.phone, f.street as fstreet, f.city as fcity, f.state as fstate, f.postal_code as fzip, f.country_code, f.phone as fphone, f.facility_npi as fnpi,
    913. 

  913. 	    f.facility_code as foid, u.fname, u.mname, u.lname, u.npi, u.street, u.city, u.state, u.zip, u.phonew1, cat.pc_catname, lo.title AS physician_type, lo.codes AS physician_type_code,
    914. 

  914. 	    SUBSTRING(ll.diagnosis, LENGTH('SNOMED-CT:')+1, LENGTH(ll.diagnosis)) AS encounter_diagnosis, ll.diagnosis as raw_diagnosis,  ll.title, ll.begdate, ll.enddate
    915. 

  915. 	    FROM form_encounter AS fe
    916. 

  916. 	    LEFT JOIN facility AS f ON f.id=fe.facility_id
    917. 

  917. 	    LEFT JOIN users AS u ON u.id=fe.provider_id
    918. 

  918. 	    LEFT JOIN openemr_postcalendar_categories AS cat ON cat.pc_catid=fe.pc_catid
    919. 

  919. 	    LEFT JOIN list_options AS lo ON lo.list_id = 'physician_type' AND lo.option_id = u.physician_type
    920. 

  920. 	    LEFT JOIN issue_encounter AS ie ON ie.encounter=fe.encounter AND ie.pid=fe.pid
    921. 

  921. 	    LEFT JOIN lists AS ll ON ll.id=ie.list_id AND ll.pid=fe.pid
    922. 

  922. 	    WHERE $wherCon fe.pid = ? ORDER BY fe.date";
    923. 

  923.         array_push($sqlBindArray, $pid);
    924. 

  924.         $appTable = new ApplicationTable();
    925. 

  925.         $res = $appTable->zQuery($query, $sqlBindArray);
    926. 

  926. 

  927.         $results = "<encounter_list>";
    928. 

  928.         foreach ($res as $row) {
    929. 

  929.             $tmp = explode(":", $row['physician_type_code']);
    930. 

  930.             $physician_code_type = str_replace('-', ' ', $tmp[0]);
    931. 

  931.             $row['physician_type_code'] = $tmp[1];
    932. 

  932.             $encounter_reason = '';
    933. 

  933.             if ($row['reason'] !== '') {
    934. 

  934.                 $encounter_reason = "<encounter_reason>" . xmlEscape($this->date_format(substr($row['date'], 0, 10)) . " - " . $row['reason']) . "</encounter_reason>";
    935. 

  935.             }
    936. 

  936. 

  937.             $codes = "";
    938. 

  938.             $query_procedures = "SELECT c.code, c.code_text FROM billing AS b
    939. 

  939. 			    JOIN code_types AS ct ON ct.ct_key = ?
    940. 

  940. 			    JOIN codes AS c ON c.code = b.code AND c.code_type = ct.ct_id
    941. 

  941. 			    WHERE b.pid = ? AND b.code_type = ? AND activity = 1 AND b.encounter = ?";
    942. 

  942.             $appTable_procedures = new ApplicationTable();
    943. 

  943.             $res_procedures = $appTable_procedures->zQuery($query_procedures, array('CPT4', $pid, 'CPT4', $row['encounter']));
    944. 

  944.             foreach ($res_procedures as $row_procedures) {
    945. 

  945.       …
    946.

Large files files are truncated, but you can click here to view the full file