PageRenderTime 69ms CodeModel.GetById 22ms 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 
    

  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.                 $codes .= "
    946. 

  946.                 <procedures>
    947. 

  947.                 <code>" . xmlEscape($row_procedures['code']) . "</code>
    948. 

  948.                 <code_type>" . xmlEscape("CPT4") . "</code_type>
    949. 

  949.                 <text>" . xmlEscape($row_procedures['code_text']) . "</text>
    950. 

  950.                 </procedures>";
    951. 

  951.             }
    952. 

  952.             $encounter_diagnosis = "";
    953. 

  953.             if ($row['encounter_diagnosis']) {
    954. 

  954.                 $tmp = explode(":", $row['raw_diagnosis']);
    955. 

  955.                 $code_type = str_replace('-', ' ', $tmp[0]);
    956. 

  956.                 $encounter_activity = '';
    957. 

  957.                 if ($row['enddate'] !== '') {
    958. 

  958.                     $encounter_activity = 'Completed';
    959. 

  959.                 } else {
    960. 

  960.                     $encounter_activity = 'Active';
    961. 

  961.                 }
    962. 

  962.                 // this just duplicates in all procedures.
    963. 

  963.                 // from problem attached to encounter
    964. 

  964.                 $encounter_diagnosis = "
    965. 

  965.                 <encounter_diagnosis>
    966. 

  966.                 <code>" . xmlEscape($tmp[1]) . "</code>
    967. 

  967.                 <code_type>" . xmlEscape($code_type) . "</code_type>
    968. 

  968.                 <text>" . xmlEscape(Listener::z_xlt($row['title'])) . "</text>
    969. 

  969.                 <status>" . xmlEscape($encounter_activity) . "</status>
    970. 

  970.                 </encounter_diagnosis>";
    971. 

  971.                 $codes .= $encounter_diagnosis;
    972. 

  972.             }
    973. 

  973.             $location_details = ($row['name'] !== '') ? (',' . $row['fstreet'] . ',' . $row['fcity'] . ',' . $row['fstate'] . ' ' . $row['fzip']) : '';
    974. 

  974.             $results .= "
    975. 

  975. 	    <encounter>
    976. 

  976. 		<extension>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['encounter'])) . "</extension>
    977. 

  977. 		<sha_extension>" . xmlEscape($this->formatUid($_SESSION['site_id'] . $row['encounter'])) . "</sha_extension>
    978. 

  978. 		<encounter_id>" . xmlEscape($row['encounter']) . "</encounter_id>
    979. 

  979. 		<visit_category>" . xmlEscape($row['pc_catname']) . "</visit_category>
    980. 

  980. 		<performer>" . xmlEscape($row['fname'] . " " . $row['mname'] . " " . $row['lname']) . "</performer>
    981. 

  981. 		<physician_type_code>" . xmlEscape($row['physician_type_code']) . "</physician_type_code>
    982. 

  982. 		<physician_type>" . xmlEscape($row['physician_type']) . "</physician_type>
    983. 

  983.         <physician_code_type>" . xmlEscape($physician_code_type) . "</physician_code_type>
    984. 

  984. 		<npi>" . xmlEscape($row['npi']) . "</npi>
    985. 

  985. 		<fname>" . xmlEscape($row['fname']) . "</fname>
    986. 

  986. 		<mname>" . xmlEscape($row['mname']) . "</mname>
    987. 

  987. 		<lname>" . xmlEscape($row['lname']) . "</lname>
    988. 

  988. 		<street>" . xmlEscape($row['street']) . "</street>
    989. 

  989. 		<city>" . xmlEscape($row['city']) . "</city>
    990. 

  990. 		<state>" . xmlEscape($row['state']) . "</state>
    991. 

  991. 		<zip>" . xmlEscape($row['zip']) . "</zip>
    992. 

  992. 		<work_phone>" . xmlEscape($row['phonew1']) . "</work_phone>
    993. 

  993. 		<location>" . xmlEscape($row['name']) . "</location>
    994. 

  994.         <location_details>" . xmlEscape($location_details) . "</location_details>
    995. 

  995. 		<date>" . xmlEscape($this->date_format(substr($row['date'], 0, 10))) . "</date>
    996. 

  996. 		<date_formatted>" . xmlEscape(str_replace("-", '', substr($row['date'], 0, 10))) . "</date_formatted>
    997. 

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

  998. 		<facility_sha_extension>" . xmlEscape($this->formatUid($_SESSION['site_id'] . $row['fid'])) . "</facility_sha_extension>
    999. 

  999. 		<facility_npi>" . xmlEscape($row['fnpi']) . "</facility_npi>
    1000. 

  1000. 		<facility_oid>" . xmlEscape($row['foid']) . "</facility_oid>
    1001. 

  1001. 		<facility_name>" . xmlEscape($row['name']) . "</facility_name>
    1002. 

  1002. 		<facility_address>" . xmlEscape($row['fstreet']) . "</facility_address>
    1003. 

  1003. 		<facility_city>" . xmlEscape($row['fcity']) . "</facility_city>
    1004. 

  1004. 		<facility_state>" . xmlEscape($row['fstate']) . "</facility_state>
    1005. 

  1005. 		<facility_country>" . xmlEscape($row['country_code']) . "</facility_country>
    1006. 

  1006. 		<facility_zip>" . xmlEscape($row['fzip']) . "</facility_zip>
    1007. 

  1007. 		<facility_phone>" . xmlEscape($row['fphone']) . "</facility_phone>
    1008. 

  1008. 		<encounter_procedures>$codes</encounter_procedures>
    1009. 

  1009. 		$encounter_diagnosis
    1010. 

  1010.         $encounter_reason
    1011. 

  1011. 	    </encounter>";
    1012. 

  1012.         }
    1013. 

  1013. 

  1014.         $results .= "</encounter_list>";
    1015. 

  1015.         return $results;
    1016. 

  1016.     }
    1017. 

  1017. 

  1018.     /*
    1019. 

  1019.     #**************************************************#
    1020. 

  1020.     #                  PROGRESS NOTES                  #
    1021. 

  1021.     #**************************************************#
    1022. 

  1022.     */
    1023. 

  1023.     public function getProgressNotes($pid, $encounter)
    1024. 

  1024.     {
    1025. 

  1025.         $progress_notes = '';
    1026. 

  1026.         $formTables_details = $this->fetchFields('progress_note', 'assessment_plan', 1);
    1027. 

  1027.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1028. 

  1028. 

  1029.         $progress_notes .= "<progressNotes>";
    1030. 

  1030.         foreach ($result as $row) {
    1031. 

  1031.             foreach ($row as $key => $value) {
    1032. 

  1032.                 $progress_notes .= "<item>" . xmlEscape($value) . "</item>";
    1033. 

  1033.             }
    1034. 

  1034.         }
    1035. 

  1035. 

  1036.         $progress_notes .= "</progressNotes>";
    1037. 

  1037. 

  1038.         return $progress_notes;
    1039. 

  1039.     }
    1040. 

  1040. 

  1041.     /*
    1042. 

  1042.     #**************************************************#
    1043. 

  1043.     #                DISCHARGE SUMMARY                 #
    1044. 

  1044.     #**************************************************#
    1045. 

  1045.     */
    1046. 

  1046.     public function getHospitalCourse($pid, $encounter)
    1047. 

  1047.     {
    1048. 

  1048.         $hospital_course = '';
    1049. 

  1049.         $formTables_details = $this->fetchFields('discharge_summary', 'hospital_course', 1);
    1050. 

  1050.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1051. 

  1051. 

  1052.         $hospital_course .= "<hospitalCourse><item>";
    1053. 

  1053.         foreach ($result as $row) {
    1054. 

  1054.             $hospital_course .= xmlEscape(implode(' ', $row));
    1055. 

  1055.         }
    1056. 

  1056. 

  1057.         $hospital_course .= "</item></hospitalCourse>";
    1058. 

  1058. 

  1059.         return $hospital_course;
    1060. 

  1060.     }
    1061. 

  1061. 

  1062.     public function getDischargeDiagnosis($pid, $encounter)
    1063. 

  1063.     {
    1064. 

  1064.         $discharge_diagnosis = '';
    1065. 

  1065.         $formTables_details = $this->fetchFields('discharge_summary', 'hospital_discharge_diagnosis', 1);
    1066. 

  1066.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1067. 

  1067. 

  1068.         $discharge_diagnosis .= "<dischargediagnosis><item>";
    1069. 

  1069.         foreach ($result as $row) {
    1070. 

  1070.             $discharge_diagnosis .= xmlEscape(implode(' ', $row));
    1071. 

  1071.         }
    1072. 

  1072. 

  1073.         $discharge_diagnosis .= "</item></dischargediagnosis>";
    1074. 

  1074. 

  1075.         return $discharge_diagnosis;
    1076. 

  1076.     }
    1077. 

  1077. 

  1078.     public function getDischargeMedications($pid, $encounter)
    1079. 

  1079.     {
    1080. 

  1080.         $discharge_medications = '';
    1081. 

  1081.         $formTables_details = $this->fetchFields('discharge_summary', 'hospital_discharge_medications', 1);
    1082. 

  1082.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1083. 

  1083. 

  1084.         $discharge_medications .= "<dischargemedication><item>";
    1085. 

  1085.         foreach ($result as $row) {
    1086. 

  1086.             $discharge_medications .= xmlEscape(implode(' ', $row));
    1087. 

  1087.         }
    1088. 

  1088. 

  1089.         $discharge_medications .= "</item></dischargemedication>";
    1090. 

  1090. 

  1091.         return $discharge_medications;
    1092. 

  1092.     }
    1093. 

  1093. 

  1094.     /*
    1095. 

  1095.     #***********************************************#
    1096. 

  1096.     #               PROCEDURE NOTES                 #
    1097. 

  1097.     #***********************************************#
    1098. 

  1098.     Sub section of PROCEDURE NOTES in CCDA.
    1099. 

  1099.     * @param    int     $pid           Patient Internal Identifier.
    1100. 

  1100.     * @param    int     $encounter     Current selected encounter.
    1101. 

    1102. 

  1102.     * return    string  $complications  XML which contains the details collected from the patient.
    1103. 

  1103.     */
    1104. 

  1104.     public function getComplications($pid, $encounter)
    1105. 

  1105.     {
    1106. 

  1106.         $complications = '';
    1107. 

  1107.         $formTables_details = $this->fetchFields('procedure_note', 'complications', 1);
    1108. 

  1108.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1109. 

  1109. 

  1110.         $complications .= "<complications>";
    1111. 

  1111.         $complications .= "<age>" . xmlEscape($this->getAge($pid)) . "</age><item>";
    1112. 

  1112.         foreach ($result as $row) {
    1113. 

  1113.             $complications .= xmlEscape(implode(' ', $row));
    1114. 

  1114.         }
    1115. 

  1115. 

  1116.         $complications .= "</item></complications>";
    1117. 

  1117. 

  1118.         return $complications;
    1119. 

  1119.     }
    1120. 

  1120. 

  1121.     /*
    1122. 

  1122.     Sub section of PROCEDURE NOTES in CCDA.
    1123. 

  1123.     * @param    int     $pid           Patient Internal Identifier.
    1124. 

  1124.     * @param    int     $encounter     Current selected encounter.
    1125. 

    1126. 

  1126.     * return    string  $procedure_diag  XML which contains the details collected from the patient.
    1127. 

  1127.     */
    1128. 

  1128.     public function getPostProcedureDiag($pid, $encounter)
    1129. 

  1129.     {
    1130. 

  1130.         $procedure_diag = '';
    1131. 

  1131.         $formTables_details = $this->fetchFields('procedure_note', 'postprocedure_diagnosis', 1);
    1132. 

  1132.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1133. 

  1133. 

  1134.         $procedure_diag .= '<procedure_diagnosis>';
    1135. 

  1135.         $procedure_diag .= "<age>" . xmlEscape($this->getAge($pid)) . "</age><item>";
    1136. 

  1136.         foreach ($result as $row) {
    1137. 

  1137.             $procedure_diag .= xmlEscape(implode(' ', $row));
    1138. 

  1138.         }
    1139. 

  1139. 

  1140.         $procedure_diag .= '</item></procedure_diagnosis>';
    1141. 

  1141. 

  1142.         return $procedure_diag;
    1143. 

  1143.     }
    1144. 

  1144. 

  1145.     /*
    1146. 

  1146.     Sub section of PROCEDURE NOTES in CCDA.
    1147. 

  1147.     * @param    int     $pid           Patient Internal Identifier.
    1148. 

  1148.     * @param    int     $encounter     Current selected encounter.
    1149. 

    1150. 

  1150.     * return    string  $procedure_description  XML which contains the details collected from the patient.
    1151. 

  1151.     */
    1152. 

  1152.     public function getProcedureDescription($pid, $encounter)
    1153. 

  1153.     {
    1154. 

  1154.         $procedure_description = '';
    1155. 

  1155.         $formTables_details = $this->fetchFields('procedure_note', 'procedure_description', 1);
    1156. 

  1156.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1157. 

  1157. 

  1158.         $procedure_description .= "<procedure_description><item>";
    1159. 

  1159.         foreach ($result as $row) {
    1160. 

  1160.             $procedure_description .= xmlEscape(implode(' ', $row));
    1161. 

  1161.         }
    1162. 

  1162. 

  1163.         $procedure_description .= "</item></procedure_description>";
    1164. 

  1164. 

  1165.         return $procedure_description;
    1166. 

  1166.     }
    1167. 

  1167. 

  1168.     /*
    1169. 

  1169.     Sub section of PROCEDURE NOTES in CCDA.
    1170. 

  1170.     * @param    int     $pid           Patient Internal Identifier.
    1171. 

  1171.     * @param    int     $encounter     Current selected encounter.
    1172. 

    1173. 

  1173.     * return    string  $procedure_indications  XML which contains the details collected from the patient.
    1174. 

  1174.     */
    1175. 

  1175.     public function getProcedureIndications($pid, $encounter)
    1176. 

  1176.     {
    1177. 

  1177.         $procedure_indications = '';
    1178. 

  1178.         $formTables_details = $this->fetchFields('procedure_note', 'procedure_indications', 1);
    1179. 

  1179.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1180. 

  1180. 

  1181.         $procedure_indications .= "<procedure_indications><item>";
    1182. 

  1182.         foreach ($result as $row) {
    1183. 

  1183.             $procedure_indications .= xmlEscape(implode(' ', $row));
    1184. 

  1184.         }
    1185. 

  1185. 

  1186.         $procedure_indications .= "</item></procedure_indications>";
    1187. 

  1187. 

  1188.         return $procedure_indications;
    1189. 

  1189.     }
    1190. 

  1190. 

  1191.     /*
    1192. 

  1192.     #***********************************************#
    1193. 

  1193.     #                OPERATIVE NOTES                #
    1194. 

  1194.     #***********************************************#
    1195. 

  1195.     Sub section of OPERATIVE NOTES in CCDA.
    1196. 

  1196.     * @param    int     $pid           Patient Internal Identifier.
    1197. 

  1197.     * @param    int     $encounter     Current selected encounter.
    1198. 

    1199. 

  1199.     * return    string  $anesthesia  XML which contains the details collected from the patient.
    1200. 

  1200.     */
    1201. 

  1201.     public function getAnesthesia($pid, $encounter)
    1202. 

  1202.     {
    1203. 

  1203.         $anesthesia = '';
    1204. 

  1204.         $formTables_details = $this->fetchFields('operative_note', 'anesthesia', 1);
    1205. 

  1205.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1206. 

  1206. 

  1207.         $anesthesia .= "<anesthesia><item>";
    1208. 

  1208.         foreach ($result as $row) {
    1209. 

  1209.             $anesthesia .= xmlEscape(implode(' ', $row));
    1210. 

  1210.         }
    1211. 

  1211. 

  1212.         $anesthesia .= "</item></anesthesia>";
    1213. 

  1213.         return $anesthesia;
    1214. 

  1214.     }
    1215. 

  1215. 

  1216.     /*
    1217. 

  1217.     Sub section of OPERATIVE NOTES in CCDA.
    1218. 

  1218.     * @param    int     $pid           Patient Internal Identifier.
    1219. 

  1219.     * @param    int     $encounter     Current selected encounter.
    1220. 

    1221. 

  1221.     * return    string  $post_operative_diag  XML which contains the details collected from the patient.
    1222. 

  1222.     */
    1223. 

  1223.     public function getPostoperativeDiag($pid, $encounter)
    1224. 

  1224.     {
    1225. 

  1225.         $post_operative_diag = '';
    1226. 

  1226.         $formTables_details = $this->fetchFields('operative_note', 'post_operative_diagnosis', 1);
    1227. 

  1227.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1228. 

  1228. 

  1229.         $post_operative_diag .= "<post_operative_diag><item>";
    1230. 

  1230.         foreach ($result as $row) {
    1231. 

  1231.             $post_operative_diag .= xmlEscape(implode(' ', $row));
    1232. 

  1232.         }
    1233. 

  1233. 

  1234.         $post_operative_diag .= "</item></post_operative_diag>";
    1235. 

  1235.         return $post_operative_diag;
    1236. 

  1236.     }
    1237. 

  1237. 

  1238.     /*
    1239. 

  1239.     Sub section of OPERATIVE NOTES in CCDA.
    1240. 

  1240.     * @param    int     $pid           Patient Internal Identifier.
    1241. 

  1241.     * @param    int     $encounter     Current selected encounter.
    1242. 

    1243. 

  1243.     * return    string  $pre_operative_diag  XML which contains the details collected from the patient.
    1244. 

  1244.     */
    1245. 

  1245.     public function getPreOperativeDiag($pid, $encounter)
    1246. 

  1246.     {
    1247. 

  1247.         $pre_operative_diag = '';
    1248. 

  1248.         $formTables_details = $this->fetchFields('operative_note', 'pre_operative_diagnosis', 1);
    1249. 

  1249.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1250. 

  1250. 

  1251.         $pre_operative_diag .= "<pre_operative_diag><item>";
    1252. 

  1252.         foreach ($result as $row) {
    1253. 

  1253.             $pre_operative_diag .= xmlEscape(implode(' ', $row));
    1254. 

  1254.         }
    1255. 

  1255. 

  1256.         $pre_operative_diag .= "</item></pre_operative_diag>";
    1257. 

  1257.         return $pre_operative_diag;
    1258. 

  1258.     }
    1259. 

  1259. 

  1260.     /*
    1261. 

  1261.     Sub section of OPERATIVE NOTES in CCDA.
    1262. 

  1262.     * @param    int     $pid           Patient Internal Identifier.
    1263. 

  1263.     * @param    int     $encounter     Current selected encounter.
    1264. 

    1265. 

  1265.     * return    string  $pre_operative_diag  XML which contains the details collected from the patient.
    1266. 

  1266.     */
    1267. 

  1267.     public function getEstimatedBloodLoss($pid, $encounter)
    1268. 

  1268.     {
    1269. 

  1269.         $estimated_blood_loss = '';
    1270. 

  1270.         $formTables_details = $this->fetchFields('operative_note', 'procedure_estimated_blood_loss', 1);
    1271. 

  1271.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1272. 

  1272. 

  1273.         $estimated_blood_loss .= "<blood_loss><item>";
    1274. 

  1274.         foreach ($result as $row) {
    1275. 

  1275.             $estimated_blood_loss .= xmlEscape(implode(' ', $row));
    1276. 

  1276.         }
    1277. 

  1277. 

  1278.         $estimated_blood_loss .= "</item></blood_loss>";
    1279. 

  1279.         return $estimated_blood_loss;
    1280. 

  1280.     }
    1281. 

  1281. 

  1282.     /*
    1283. 

  1283.     Sub section of OPERATIVE NOTES in CCDA.
    1284. 

  1284.     * @param    int     $pid           Patient Internal Identifier.
    1285. 

  1285.     * @param    int     $encounter     Current selected encounter.
    1286. 

    1287. 

  1287.     * return    string  $pre_operative_diag  XML which contains the details collected from the patient.
    1288. 

  1288.     */
    1289. 

  1289.     public function getProcedureFindings($pid, $encounter)
    1290. 

  1290.     {
    1291. 

  1291.         $procedure_findings = '';
    1292. 

  1292.         $formTables_details = $this->fetchFields('operative_note', 'procedure_findings', 1);
    1293. 

  1293.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1294. 

  1294. 

  1295.         $procedure_findings .= "<procedure_findings><item>";
    1296. 

  1296.         foreach ($result as $row) {
    1297. 

  1297.             $procedure_findings .= xmlEscape(implode(' ', $row));
    1298. 

  1298.         }
    1299. 

  1299. 

  1300.         $procedure_findings .= "</item><age>" . xmlEscape($this->getAge($pid)) . "</age></procedure_findings>";
    1301. 

  1301.         return $procedure_findings;
    1302. 

  1302.     }
    1303. 

  1303. 

  1304.     /*
    1305. 

  1305.     Sub section of OPERATIVE NOTES in CCDA.
    1306. 

  1306.     * @param    int     $pid           Patient Internal Identifier.
    1307. 

  1307.     * @param    int     $encounter     Current selected encounter.
    1308. 

    1309. 

  1309.     * return    string  $pre_operative_diag  XML which contains the details collected from the patient.
    1310. 

  1310.     */
    1311. 

  1311.     public function getProcedureSpecimensTaken($pid, $encounter)
    1312. 

  1312.     {
    1313. 

  1313.         $procedure_specimens = '';
    1314. 

  1314.         $formTables_details = $this->fetchFields('operative_note', 'procedure_specimens_taken', 1);
    1315. 

  1315.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1316. 

  1316. 

  1317.         $procedure_specimens .= "<procedure_specimens><item>";
    1318. 

  1318.         foreach ($result as $row) {
    1319. 

  1319.             $procedure_specimens .= xmlEscape(implode(' ', $row));
    1320. 

  1320.         }
    1321. 

  1321. 

  1322.         $procedure_specimens .= "</item></procedure_specimens>";
    1323. 

  1323.         return $procedure_specimens;
    1324. 

  1324.     }
    1325. 

  1325. 

  1326.     /*
    1327. 

  1327.     #***********************************************#
    1328. 

  1328.     #             CONSULTATION NOTES                #
    1329. 

  1329.     #***********************************************#
    1330. 

  1330.     Sub section of CONSULTATION NOTES in CCDA.
    1331. 

  1331.     * @param    int     $pid           Patient Internal Identifier.
    1332. 

  1332.     * @param    int     $encounter     Current selected encounter.
    1333. 

    1334. 

  1334.     * return    string  $hp  XML which contains the details collected from the patient.
    1335. 

  1335.     */
    1336. 

  1336.     public function getHP($pid, $encounter)
    1337. 

  1337.     {
    1338. 

  1338.         $hp = '';
    1339. 

  1339.         $formTables_details = $this->fetchFields('consultation_note', 'history_of_present_illness', 1);
    1340. 

  1340.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1341. 

  1341. 

  1342.         $hp .= "<hp><item>";
    1343. 

  1343.         foreach ($result as $row) {
    1344. 

  1344.             $hp .= xmlEscape(implode(' ', $row));
    1345. 

  1345.         }
    1346. 

  1346. 

  1347.         $hp .= "</item></hp>";
    1348. 

  1348.         return $hp;
    1349. 

  1349.     }
    1350. 

  1350. 

  1351.     /*
    1352. 

  1352.     Sub section of CONSULTATION NOTES in CCDA.
    1353. 

  1353.     * @param    int     $pid           Patient Internal Identifier.
    1354. 

  1354.     * @param    int     $encounter     Current selected encounter.
    1355. 

    1356. 

  1356.     * return    string  $physical_exam  XML which contains the details collected from the patient.
    1357. 

  1357.     */
    1358. 

  1358.     public function getPhysicalExam($pid, $encounter)
    1359. 

  1359.     {
    1360. 

  1360.         $physical_exam = '';
    1361. 

  1361.         $formTables_details = $this->fetchFields('consultation_note', 'physical_exam', 1);
    1362. 

  1362.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1363. 

  1363. 

  1364.         $physical_exam .= "<physical_exam><item>";
    1365. 

  1365.         foreach ($result as $row) {
    1366. 

  1366.             $physical_exam .= xmlEscape(implode(' ', $row));
    1367. 

  1367.         }
    1368. 

  1368. 

  1369.         $physical_exam .= "</item></physical_exam>";
    1370. 

  1370.         return $physical_exam;
    1371. 

  1371.     }
    1372. 

  1372. 

  1373.     /*
    1374. 

  1374.     #********************************************************#
    1375. 

  1375.     #                HISTORY AND PHYSICAL NOTES              #
    1376. 

  1376.     #********************************************************#
    1377. 

  1377.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1378. 

  1378.     * @param    int     $pid           Patient Internal Identifier.
    1379. 

  1379.     * @param    int     $encounter     Current selected encounter.
    1380. 

    1381. 

  1381.     * return    string  $chief_complaint  XML which contains the details collected from the patient.
    1382. 

  1382.     */
    1383. 

  1383.     public function getChiefComplaint($pid, $encounter)
    1384. 

  1384.     {
    1385. 

  1385.         $chief_complaint = '';
    1386. 

  1386.         $formTables_details = $this->fetchFields('history_physical_note', 'chief_complaint', 1);
    1387. 

  1387.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1388. 

  1388. 

  1389.         $chief_complaint .= "<chief_complaint><item>";
    1390. 

  1390.         foreach ($result as $row) {
    1391. 

  1391.             $chief_complaint .= xmlEscape(implode(' ', $row));
    1392. 

  1392.         }
    1393. 

  1393. 

  1394.         $chief_complaint .= "</item></chief_complaint>";
    1395. 

  1395.         return $chief_complaint;
    1396. 

  1396.     }
    1397. 

  1397. 

  1398.     /*
    1399. 

  1399.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1400. 

  1400.     * @param    int     $pid           Patient Internal Identifier.
    1401. 

  1401.     * @param    int     $encounter     Current selected encounter.
    1402. 

    1403. 

  1403.     * return    string  $general_status  XML which contains the details collected from the patient.
    1404. 

  1404.     */
    1405. 

  1405.     public function getGeneralStatus($pid, $encounter)
    1406. 

  1406.     {
    1407. 

  1407.         $general_status = '';
    1408. 

  1408.         $formTables_details = $this->fetchFields('history_physical_note', 'general_status', 1);
    1409. 

  1409.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1410. 

  1410. 

  1411.         $general_status .= "<general_status><item>";
    1412. 

  1412.         foreach ($result as $row) {
    1413. 

  1413.             $general_status .= xmlEscape(implode(' ', $row));
    1414. 

  1414.         }
    1415. 

  1415. 

  1416.         $general_status .= "</item></general_status>";
    1417. 

  1417.         return $general_status;
    1418. 

  1418.     }
    1419. 

  1419. 

  1420.     /*
    1421. 

  1421.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1422. 

  1422.     * @param    int     $pid           Patient Internal Identifier.
    1423. 

  1423.     * @param    int     $encounter     Current selected encounter.
    1424. 

    1425. 

  1425.     * return    string  $history_past_illness  XML which contains the details collected from the patient.
    1426. 

  1426.     */
    1427. 

  1427.     public function getHistoryOfPastIllness($pid, $encounter)
    1428. 

  1428.     {
    1429. 

  1429.         $history_past_illness = '';
    1430. 

  1430.         $formTables_details = $this->fetchFields('history_physical_note', 'hpi_past_med', 1);
    1431. 

  1431.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1432. 

  1432. 

  1433.         $history_past_illness .= "<history_past_illness><item>";
    1434. 

  1434.         foreach ($result as $row) {
    1435. 

  1435.             $history_past_illness .= xmlEscape(implode(' ', $row));
    1436. 

  1436.         }
    1437. 

  1437. 

  1438.         $history_past_illness .= "</item></history_past_illness>";
    1439. 

  1439.         return $history_past_illness;
    1440. 

  1440.     }
    1441. 

  1441. 

  1442.     /*
    1443. 

  1443.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1444. 

  1444.     * @param    int     $pid           Patient Internal Identifier.
    1445. 

  1445.     * @param    int     $encounter     Current selected encounter.
    1446. 

    1447. 

  1447.     * return    string  $review_of_systems  XML which contains the details collected from the patient.
    1448. 

  1448.     */
    1449. 

  1449.     public function getReviewOfSystems($pid, $encounter)
    1450. 

  1450.     {
    1451. 

  1451.         $review_of_systems = '';
    1452. 

  1452.         $formTables_details = $this->fetchFields('history_physical_note', 'review_of_systems', 1);
    1453. 

  1453.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1454. 

  1454. 

  1455.         $review_of_systems .= "<review_of_systems><item>";
    1456. 

  1456.         foreach ($result as $row) {
    1457. 

  1457.             $review_of_systems .= xmlEscape(implode(' ', $row));
    1458. 

  1458.         }
    1459. 

  1459. 

  1460.         $review_of_systems .= "</item></review_of_systems>";
    1461. 

  1461.         return $review_of_systems;
    1462. 

  1462.     }
    1463. 

  1463. 

  1464.     /*
    1465. 

  1465.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1466. 

  1466.     * @param    int     $pid           Patient Internal Identifier.
    1467. 

  1467.     * @param    int     $encounter     Current selected encounter.
    1468. 

    1469. 

  1469.     * return    string  $vitals  XML which contains the details collected from the patient.
    1470. 

  1470.     */
    1471. 

  1471.     public function getVitals($pid, $encounter)
    1472. 

  1472.     {
    1473. 

  1473.         $wherCon = '';
    1474. 

  1474.         if ($encounter) {
    1475. 

  1475.             $wherCon = "AND fe.encounter = $encounter";
    1476. 

  1476.         }
    1477. 

  1477. 

  1478.         $vitals = '';
    1479. 

  1479.         $query = "SELECT DATE(fe.date) AS date, fv.id, fv.* FROM forms AS f
    1480. 

  1480.                 JOIN form_encounter AS fe ON fe.encounter = f.encounter AND fe.pid = f.pid
    1481. 

  1481.                 JOIN form_vitals AS fv ON fv.id = f.form_id
    1482. 

  1482.                 WHERE f.pid = ? AND f.formdir = 'vitals' AND f.deleted=0 $wherCon
    1483. 

  1483.                 ORDER BY fe.date DESC LIMIT 1";
    1484. 

  1484.         $appTable = new ApplicationTable();
    1485. 

  1485.         $res = $appTable->zQuery($query, array($pid));
    1486. 

  1486. 

  1487. 

  1488.         $vitals .= "<vitals_list>";
    1489. 

  1489.         foreach ($res as $row) {
    1490. 

  1490.             $convWeightValue = number_format($row['weight'] * 0.45359237, 2);
    1491. 

  1491.             $convHeightValue = round(number_format($row['height'] * 2.54, 2), 1);
    1492. 

  1492.             $convTempValue = round(number_format(($row['temperature'] - 32) * (5 / 9), 1));
    1493. 

  1493.             if ($GLOBALS['units_of_measurement'] == 2 || $GLOBALS['units_of_measurement'] == 4) {
    1494. 

  1494.                 $weight_value = $convWeightValue;
    1495. 

  1495.                 $weight_unit = 'kg';
    1496. 

  1496.                 $height_value = $convHeightValue;
    1497. 

  1497.                 $height_unit = 'cm';
    1498. 

  1498.                 $temp_value = $convTempValue;
    1499. 

  1499.                 $temp_unit = 'Cel';
    1500. 

  1500.             } else {
    1501. 

  1501.                 $temp = US_weight($row['weight'], 1);
    1502. 

  1502.                 $tempArr = explode(" ", $temp);
    1503. 

  1503.                 $weight_value = (float)$tempArr[0];
    1504. 

  1504.                 $weight_unit = 'lb';
    1505. 

  1505.                 $height_value = (float)$row['height'];
    1506. 

  1506.                 $height_unit = 'in';
    1507. 

  1507.                 $temp_value = (float)$row['temperature'];
    1508. 

  1508.                 $temp_unit = 'degF';
    1509. 

  1509.             }
    1510. 

  1510. 

  1511.             $vitals .= "<vitals>
    1512. 

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

  1513.             <sha_extension>" . xmlEscape("c6f88321-67ad-11db-bd13-0800200c9a66") . "</sha_extension>
    1514. 

  1514.             <date>" . xmlEscape(date('Y-m-d', strtotime($row['date'])) ?: '') . "</date>
    1515. 

  1515.             <effectivetime>" . xmlEscape(date('Y-m-d H:i:s', strtotime($row['date']))) . "</effectivetime>
    1516. 

  1516.             <temperature>" . xmlEscape($temp_value ?: '') . "</temperature>
    1517. 

  1517.             <unit_temperature>" . xmlEscape($temp_unit ?: '') . "</unit_temperature>
    1518. 

  1518.             <extension_temperature>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'temperature')) . "</extension_temperature>
    1519. 

  1519.             <bpd>" . xmlEscape(($row['bpd'] ?: '')) . "</bpd>
    1520. 

  1520.             <extension_bpd>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'bpd')) . "</extension_bpd>
    1521. 

  1521.             <bps>" . xmlEscape(($row['bps'] ?: '')) . "</bps>
    1522. 

  1522.             <extension_bps>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'bps')) . "</extension_bps>
    1523. 

  1523.             <head_circ>" . xmlEscape(((float)$row['head_circ'] ?: '')) . "</head_circ>
    1524. 

  1524.             <extension_head_circ>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'head_circ')) . "</extension_head_circ>
    1525. 

  1525.             <pulse>" . xmlEscape(((float)$row['pulse'] ?: '')) . "</pulse>
    1526. 

  1526.             <extension_pulse>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'pulse')) . "</extension_pulse>
    1527. 

  1527.             <height>" . xmlEscape($height_value ?: '') . "</height>
    1528. 

  1528.             <extension_height>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'height')) . "</extension_height>
    1529. 

  1529.             <unit_height>" . xmlEscape($height_unit ?: '') . "</unit_height>
    1530. 

  1530.             <oxygen_saturation>" . xmlEscape(((float)$row['oxygen_saturation'] ?: '')) . "</oxygen_saturation>
    1531. 

  1531.             <extension_oxygen_saturation>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'oxygen_saturation')) . "</extension_oxygen_saturation>
    1532. 

  1532.             <breath>" . xmlEscape(((float)$row['respiration'] ?: '')) . "</breath>
    1533. 

  1533.             <extension_breath>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'breath')) . "</extension_breath>
    1534. 

  1534.             <weight>" . xmlEscape($weight_value ?: '') . "</weight>
    1535. 

  1535.             <extension_weight>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'weight')) . "</extension_weight>
    1536. 

  1536.             <unit_weight>" . xmlEscape($weight_unit ?: '') . "</unit_weight>
    1537. 

  1537.             <BMI>" . xmlEscape(((float)$row['BMI'] ?: '')) . "</BMI>
    1538. 

  1538.             <extension_BMI>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'BMI')) . "</extension_BMI>
    1539. 

  1539.             <BMI_status>" . xmlEscape(($row['BMI_status'] ?: '')) . "</BMI_status>
    1540. 

  1540.             <extension_oxygen_flow_rate>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'oxygen_flow_rate')) . "</extension_oxygen_flow_rate>
    1541. 

  1541.             <oxygen_flow_rate>" . xmlEscape(((float)$row['oxygen_flow_rate'] ?: '')) . "</oxygen_flow_rate>
    1542. 

  1542.             <extension_ped_weight_height>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'ped_weight_height')) . "</extension_ped_weight_height>
    1543. 

  1543.             <ped_weight_height>" . xmlEscape(((float)$row['ped_weight_height'] ?: '')) . "</ped_weight_height>
    1544. 

  1544.             <extension_ped_bmi>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'ped_bmi')) . "</extension_ped_bmi>
    1545. 

  1545.             <ped_bmi>" . xmlEscape(((float)$row['ped_bmi'] ?: '')) . "</ped_bmi>
    1546. 

  1546.             <extension_ped_head_circ>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'ped_head_circ')) . "</extension_ped_head_circ>
    1547. 

  1547.             <ped_head_circ>" . xmlEscape(((float)$row['ped_head_circ'] ?: '')) . "</ped_head_circ>
    1548. 

  1548.             <extension_inhaled_oxygen_concentration>" . xmlEscape(base64_encode($_SESSION['site_id'] . $row['id'] . 'inhaled_oxygen_concentration')) . "</extension_inhaled_oxygen_concentration>
    1549. 

  1549.             <inhaled_oxygen_concentration>" . xmlEscape(((float)$row['inhaled_oxygen_concentration'] ?: '')) . "</inhaled_oxygen_concentration>
    1550. 

  1550.             </vitals>";
    1551. 

  1551.         }
    1552. 

  1552. 

  1553.         $vitals .= "</vitals_list>";
    1554. 

  1554.         return $vitals;
    1555. 

  1555.     }
    1556. 

  1556. 

  1557.     /*
    1558. 

  1558.     Sub section of HISTORY AND PHYSICAL NOTES in CCDA.
    1559. 

  1559.     * @param    int     $pid           Patient Internal Identifier.
    1560. 

  1560.     * @param    int     $encounter     Current selected encounter.
    1561. 

    1562. 

  1562.     * return    string  $social_history  XML which contains the details collected from the patient.
    1563. 

  1563.     */
    1564. 

  1564.     public function getSocialHistory($pid, $encounter)
    1565. 

  1565.     {
    1566. 

  1566.         $social_history = '';
    1567. 

  1567.         $arr = array(
    1568. 

  1568.             'alcohol' => '160573003',
    1569. 

  1569.             'drug' => '363908000',
    1570. 

  1570.             'employment' => '364703007',
    1571. 

  1571.             'exercise' => '256235009',
    1572. 

  1572.             'other_social_history' => '228272008',
    1573. 

  1573.             'diet' => '364393001',
    1574. 

  1574.             'smoking' => '229819007',
    1575. 

  1575.             'toxic_exposure' => '425400000'
    1576. 

  1576.         );
    1577. 

  1577.         $arr_status = array(
    1578. 

  1578.             'currenttobacco' => 'Current',
    1579. 

  1579.             'quittobacco' => 'Quit',
    1580. 

  1580.             'nevertobacco' => 'Never',
    1581. 

  1581.             'currentalcohol' => 'Current',
    1582. 

  1582.             'quitalcohol' => 'Quit',
    1583. 

  1583.             'neveralcohol' => 'Never'
    1584. 

  1584.         );
    1585. 

  1585. 

  1586.         $snomeds_status = array(
    1587. 

  1587.             'currenttobacco' => 'completed',
    1588. 

  1588.             'quittobacco' => 'completed',
    1589. 

  1589.             'nevertobacco' => 'completed',
    1590. 

  1590.             'not_applicabletobacco' => 'completed'
    1591. 

  1591.         );
    1592. 

  1592. 

  1593.         $snomeds = array(
    1594. 

  1594.             '1' => '449868002',
    1595. 

  1595.             '2' => '428041000124106',
    1596. 

  1596.             '3' => '8517006',
    1597. 

  1597.             '4' => '266919005',
    1598. 

  1598.             '5' => '77176002'
    1599. 

  1599.         );
    1600. 

  1600. 

  1601.         $alcohol_status = array(
    1602. 

  1602.             'currentalcohol' => 'completed',
    1603. 

  1603.             'quitalcohol' => 'completed',
    1604. 

  1604.             'neveralcohol' => 'completed'
    1605. 

  1605.         );
    1606. 

  1606. 

  1607.         $alcohol_status_codes = array(
    1608. 

  1608.             'currentalcohol' => '11',
    1609. 

  1609.             'quitalcohol' => '22',
    1610. 

  1610.             'neveralcohol' => '33'
    1611. 

  1611.         );
    1612. 

  1612. 

  1613.         $query = "SELECT id, tobacco, alcohol, exercise_patterns, recreational_drugs FROM history_data WHERE pid=? ORDER BY id DESC LIMIT 1";
    1614. 

  1614.         $appTable = new ApplicationTable();
    1615. 

  1615.         $res = $appTable->zQuery($query, array($pid));
    1616. 

  1616. 

  1617.         $social_history .= "<social_history>";
    1618. 

  1618.         foreach ($res as $row) {
    1619. 

  1619.             $tobacco = explode('|', $row['tobacco']);
    1620. 

  1620.             $status_code = (new CarecoordinationTable())->getListCodes($tobacco[3], 'smoking_status');
    1621. 

  1621.             $status_code = str_replace("SNOMED-CT:", "", $status_code);
    1622. 

  1622.             $social_history .= "<history_element>
    1623. 

  1623.                                   <extension>" . xmlEscape(base64_encode('smoking' . $_SESSION['site_id'] . $row['id'])) . "</extension>
    1624. 

  1624.                                   <sha_extension>" . xmlEscape("9b56c25d-9104-45ee-9fa4-e0f3afaa01c1") . "</sha_extension>
    1625. 

  1625.                                   <element>" . xmlEscape('Smoking') . "</element>
    1626. 

  1626.                                   <description>" . xmlEscape((new CarecoordinationTable())->getListTitle($tobacco[3], 'smoking_status')) . "</description>
    1627. 

  1627.                                   <status_code>" . xmlEscape(($status_code ? $status_code : '')) . "</status_code>
    1628. 

  1628.                                   <status>" . xmlEscape(($snomeds_status[$tobacco[1]] ? $snomeds_status[$tobacco[1]] : "")) . "</status>
    1629. 

  1629.                                   <date>" . ($tobacco[2] ? xmlEscape($this->date_format($tobacco[2])) : '') . "</date>
    1630. 

  1630.                                   <date_formatted>" . ($tobacco[2] ? xmlEscape(preg_replace('/-/', '', $tobacco[2])) : '') . "</date_formatted>
    1631. 

  1631.                                   <code>" . xmlEscape(($arr['smoking'] ? $arr['smoking'] : '')) . "</code>
    1632. 

  1632.                             </history_element>";
    1633. 

  1633.             $alcohol = explode('|', $row['alcohol']);
    1634. 

  1634.             $social_history .= "<history_element>
    1635. 

  1635.                                   <extension>" . xmlEscape(base64_encode('alcohol' . $_SESSION['site_id'] . $row['id'])) . "</extension>
    1636. 

  1636.                                   <sha_extension>" . xmlEscape("37f76c51-6411-4e1d-8a37-957fd49d2cef") . "</sha_extension>
    1637. 

  1637.                                   <element>" . xmlEscape('Alcohol') . "</element>
    1638. 

  1638.                                   <description>" . xmlEscape($alcohol[0]) . "</description>
    1639. 

  1639.                                   <status_code>" . xmlEscape(($alcohol_status_codes[$alcohol[1]] ? $alcohol_status_codes[$alcohol[1]] : '')) . "</status_code>
    1640. 

  1640.                                   <status>" . xmlEscape(($alcohol_status[$alcohol[1]] ? $alcohol_status[$alcohol[1]] : 'completed')) . "</status>
    1641. 

  1641.                                   <date>" . ($alcohol[2] ? xmlEscape($this->date_format($alcohol[2])) : '') . "</date>
    1642. 

  1642.                                   <date_formatted>" . ($alcohol[2] ? xmlEscape(preg_replace('/-/', '', $alcohol[2])) : '') . "</date_formatted>
    1643. 

  1643.                                   <code>" . xmlEscape($arr['alcohol']) . "</code>
    1644. 

  1644.                             </history_element>";
    1645. 

  1645.         }
    1646. 

  1646. 

  1647.         $social_history .= "</social_history>";
    1648. 

  1648.         return $social_history;
    1649. 

  1649.     }
    1650. 

  1650. 

  1651.     /*
    1652. 

  1652.     #********************************************************#
    1653. 

  1653.     #                  UNSTRUCTURED DOCUMENTS                #
    1654. 

  1654.     #********************************************************#
    1655. 

  1655.     */
    1656. 

  1656.     public function getUnstructuredDocuments($pid, $encounter)
    1657. 

  1657.     {
    1658. 

  1658.         $image = '';
    1659. 

  1659.         $formTables_details = $this->fetchFields('unstructured_document', 'unstructured_doc', 1);
    1660. 

  1660.         $result = $this->fetchFormValues($pid, $encounter, $formTables_details);
    1661. 

  1661. 

  1662.         $image .= "<document>";
    1663. 

  1663.         foreach ($result as $row) {
    1664. 

  1664.             foreach ($row as $key => $value) {
    1665. 

  1665.                 $image .= "<item>";
    1666. 

  1666.                 $image .= "<type>" . xmlEscape($row[$key][1]) . "</type>";
    1667. 

  1667.                 $image .= "<content>" . xmlEscape($row[$key][0]) . "</content>";
    1668. 

  1668.                 $image .= "</item>";
    1669. 

  1669.             }
    1670. 

  1670.         }
    1671. 

  1671. 

  1672.         $image .= "</document>";
    1673. 

  1673.         return $image;
    1674. 

  1674.     }
    1675. 

  1675. 

  1676.     public function getDetails($field_name)
    1677. 

  1677.     {
    1678. 

  1678.         if ($field_name == 'hie_custodian_id') {
    1679. 

  1679.             $query = "SELECT f.name AS organization, f.street, f.city, f.state, f.postal_code AS zip, f.phone AS phonew1
    1680. 

  1680. 			FROM facility AS f
    1681. 

  1681. 			JOIN modules AS mo ON mo.mod_directory='Carecoordination'
    1682. 

  1682. 			JOIN module_configuration AS conf ON conf.field_value=f.id AND mo.mod_id=conf.module_id
    1683. 

  1683. 			WHERE conf.field_name=?";
    1684. 

  1684.         } else {
    1685. 

  1685.             $query = "SELECT u.title, u.fname, u.mname, u.lname, u.npi, u.street, u.city, u.state, u.zip, CONCAT_WS(' ','',u.phonew1) AS phonew1, u.organization, u.specialty, conf.field_name, mo.mod_name, lo.title as  physician_type, SUBSTRING(lo.codes, LENGTH('SNOMED-CT:')+1, LENGTH(lo.codes)) as  physician_type_code
    1686. 

  1686.             FROM users AS u
    1687. 

  1687. 	    LEFT JOIN list_options AS lo ON lo.list_id = 'physician_type' AND lo.option_id = u.physician_type
    1688. 

  1688.             JOIN modules AS mo ON mo.mod_directory='Carecoordination'
    1689. 

  1689.             JOIN module_configuration AS conf ON conf.field_value=u.id AND mo.mod_id=conf.module_id
    1690. 

  1690.             WHERE conf.field_name=?";
    1691. 

  1691.         }
    1692. 

  1692. 

  1693.         $appTable = new ApplicationTable();
    1694. 

  1694.         $res = $appTable->zQuery($query, array($field_name));
    1695. 

  1695.         foreach ($res as $result) {
    1696. 

  1696.             return $result;
    1697. 

  1697.         }
    1698. 

  1698.     }
    1699. 

  1699. 

  1700.     /*
    1701. 

  1701.     Get the Age of a patient
    1702. 

  1702.     * @param    int     $pid    Patient Internal Identifier.
    1703. 

    1704. 

  1704.     * return    int     $age    Age of a patient will be returned
    1705. 

  1705.     */
    1706. 

  1706.     public function getAge($pid, $date = null)
    1707. 

  1707.     {
    1708. 

  1708.         if ($date != '') {
    1709. 

  1709.             $date = $date;
    1710. 

  1710.         } else {
    1711. 

  1711.             $date = date('Y-m-d H:i:s');
    1712. 

  1712.         }
    1713. 

  1713. 

  1714.         $age = 0;
    1715. 

  1715.         $query = "select ROUND(DATEDIFF('$date',DOB)/365.25) AS age from patient_data where pid= ? ";
    1716. 

  1716.         $appTable = new ApplicationTable();
    1717. 

  1717.         $res = $appTable->zQuery($query, array($pid));
    1718. 

  1718. 

  1719.         foreach ($res as $row) {
    1720. 

  1720.             $age = $row['age'];
    1721. 

  1721.         }
    1722. 

  1722. 

  1723.         return $age;
    1724. 

  1724.     }
    1725. 

  1725. 

  1726.     public function getRepresentedOrganization()
    1727. 

  1727.     {
    1728. 

  1728.         $query = "select * from facility where primary_business_entity = ?";
    1729. 

  1729.         $appTable = new ApplicationTable();
    1730. 

  1730.         $res = $appTable->zQuery($query, array(1));
    1731. 

  1731. 

  1732.         $records = array();
    1733. 

  1733.         foreach ($res as $row) {
    1734. 

  1734.             $records = $row;
    1735. 

  1735.         }
    1736. 

  1736. 

  1737.         return $records;
    1738. 

  1738.     }
    1739. 

  1739. 

  1740.     /*Get the list of items mapped to a particular CCDA section
    1741. 

    1742. 

  1742.     * @param        $ccda_component     CCDA component
    1743. 

  1743.     * @param        $ccda_section       CCDA section of the above component
    1744. 

  1744.     * @param        $user_id            1
    1745. 

  1745.     * @return       $ret                Array containing the list of items mapped in a particular CCDA section.
    1746. 

  1746.     */
    1747. 

  1747.     public function fetchFields($ccda_component, $ccda_section, $user_id)
    1748. 

  1748.     {
    1749. 

  1749.         $form_type = $table_name = $field_names = '';
    1750. 

  1750.         $query = "select * from ccda_table_mapping
    1751. 

  1751.             left join ccda_field_mapping as ccf on ccf.table_id = ccda_table_mapping.id
    1752. 

  1752.             where ccda_component = ? and ccda_component_section = ? and user_id = ? and deleted = 0";
    1753. 

  1753.         $appTable = new ApplicationTable();
    1754. 

  1754.         $res = $appTable->zQuery($query, array($ccda_component, $ccda_section, $user_id));
    1755. 

  1755.         $field_names_type3 = '';
    1756. 

  1756.         $ret = array();
    1757. 

  1757.         $field_names_type1 = '';
    1758. 

  1758.         $field_names_type2 = '';
    1759. 

  1759.         foreach ($res as $row) {
    1760. 

  1760.             $form_type = $row['form_type'];
    1761. 

  1761.             $table_name = $row['form_table'];
    1762. 

  1762.             $form_dir = $row['form_dir'];
    1763. 

  1763.             if ($form_type == 1) {
    1764. 

  1764.                 if ($field_names_type1) {
    1765. 

  1765.                     $field_names_type1 .= ',';
    1766. 

  1766.                 }
    1767. 

  1767. 

  1768.                 $field_names_type1 .= $row['ccda_field'];
    1769. 

  1769.                 $ret[$row['ccda_component_section'] . "_" . $form_dir] = array($form_type, $table_name, $form_dir, $field_names_type1);
    1770. 

  1770.             } elseif ($form_type == 2) {
    1771. 

  1771.                 if ($field_names_type2) {
    1772. 

  1772.                     $field_names_type2 .= ',';
    1773. 

  1773.                 }
    1774. 

  1774. 

  1775.                 $field_names_type2 .= $row['ccda_field'];
    1776. 

  1776.                 $ret[$row['ccda_component_section'] . "_" . $form_dir] = array($form_type, $table_name, $form_dir, $field_names_type2);
    1777. 

  1777.             } elseif ($form_type == 3) {
    1778. 

  1778.                 if ($field_names_type3) {
    1779. 

  1779.                     $field_names_type3 .= ',';
    1780. 

  1780.                 }
    1781. 

  1781. 

  1782.                 $field_names_type3 .= $row['ccda_field'];
    1783. 

  1783.                 $ret[$row['ccda_component_section'] . "_" . $form_dir] = array($form_type, $table_name, $form_dir, $field_names_type3);
    1784. 

  1784.             }
    1785. 

  1785.         }
    1786. 

  1786. 

  1787.         return $ret;
    1788. 

  1788.     }
    1789. 

  1789. 

  1790.     /*Fetch the form values
    1791. 

    1792. 

  1792.     * @param        $pid
    1793. 

  1793.     * @param        $encounter
    1794. 

  1794.     * @param        $formTables
    1795. 

  1795.     * @return       $res            Array of forms values of a single section
    1796. 

  1796.     */
    1797. 

  1797.     public function fetchFormValues($pid, $encounter, $formTables)
    1798. 

  1798.     {
    1799. 

  1799.         if (empty($encounter)) {
    1800. 

  1800.             return "";
    1801. 

  1801.         }
    1802. 

  1802.         $res = array();
    1803. 

  1803.         $count_folder = 0;
    1804. 

  1804.         foreach ($formTables as $formTables_details) {
    1805. 

  1805.             /***************Fetching the form id for the patient***************/
    1806. 

  1806.             $query = "select form_id,encounter from forms where pid = ? and formdir = ? AND deleted=0";
    1807. 

  1807.             $appTable = new ApplicationTable();
    1808. 

  1808.             $form_ids = $appTable->zQuery($query, array($pid, $formTables_details[2]));
    1809. 

  1809.             /***************Fetching the form id for the patient***************/
    1810. 

  1810. 

  1811.             if ($formTables_details[0] == 1) {//Fetching the values from an HTML form
    1812. 

  1812.                 if (!$formTables_details[1]) {//Fetching the complete form
    1813. 

  1813.                     foreach ($form_ids as $row) {//Fetching the values of each forms
    1814. 

  1814.                         foreach ($row as $key => $value) {
    1815. 

  1815.                             ob_start();
    1816. 

  1816.                             if (file_exists($GLOBALS['fileroot'] . '/interface/forms/' . $formTables_details[2] . '/report.php')) {
    1817. 

  1817.                                 include_once($GLOBALS['fileroot'] . '/interface/forms/' . $formTables_details[2] . '/report.php');
    1818. 

  1818.                                 call_user_func($formTables_details[2] . "_report", $pid, $encounter, 2, $value);
    1819. 

  1819.                             }
    1820. 

  1820. 

  1821.                             $res[0][$value] = ob_get_clean();
    1822. 

  1822.                         }
    1823. 

  1823.                     }
    1824. 

  1824.                 } else {//Fetching a single field from the table
    1825. 

  1825.                     $primary_key = '';
    1826. 

  1826.                     $query = "SHOW INDEX FROM ? WHERE Key_name='PRIMARY'";
    1827. 

  1827.                     $appTable = new ApplicationTable();
    1828. 

  1828.                     $res_primary = $appTable->zQuery($query, array($formTables_details[1]));
    1829. 

  1829.                     foreach ($res_primary as $row_primary) {
    1830. 

  1830.                         $primary_key = $row_primary['Column_name'];
    1831. 

  1831.                     }
    1832. 

  1832. 

  1833.                     unset($res_primary);
    1834. 

  1834. 

  1835.                     $query = "select " . $formTables_details[3] . " from " . $formTables_details[1] . "
    1836. 

  1836.                     join forms as f on f.pid=? AND f.encounter=? AND f.form_id=" . $formTables_details[1] . "." . $primary_key . " AND f.formdir=?
    1837. 

  1837.                     where 1 = 1 ";
    1838. 

  1838.                     $appTable = new ApplicationTable();
    1839. 

  1839.                     $result = $appTable->zQuery($query, array($pid, $encounter, $formTables_details[2]));
    1840. 

  1840. 

  1841.                     foreach ($result as $row) {
    1842. 

  1842.                         foreach ($row as $key => $value) {
    1843. 

  1843.                             $res[0][$key] .= trim($value);
    1844. 

  1844.                         }
    1845. 

  1845.                     }
    1846. 

  1846.                 }
    1847. 

  1847.             } elseif ($formTables_details[0] == 2) {//Fetching the values from an LBF form
    1848. 

  1848.                 if (!$formTables_details[1]) {//Fetching the complete LBF
    1849. 

  1849.                     foreach ($form_ids as $row) {
    1850. 

  1850.                         foreach ($row as $key => $value) {
    1851. 

  1851.                             //This section will be used to fetch complete LBF. This has to be completed. We are working on this.
    1852. 

  1852.                         }
    1853. 

  1853.                     }
    1854. 

  1854.                 } elseif (!$formTables_details[3]) {//Fetching the complete group from an LBF
    1855. 

  1855.                     foreach ($form_ids as $row) {//Fetching the values of each encounters
    1856. 

  1856.                         foreach ($row as $key => $value) {
    1857. 

  1857.                             ob_start();
    1858. 

  1858.                             ?>
    1859. 

  1859.                             <table>
    1860. 

  1860.                                 <?php
    1861. 

  1861.                                 display_layout_rows_group_new($formTables_details[2], '', '', $pid, $value, array($formTables_details[1]), '');
    1862. 

  1862.                                 ?>
    1863. 

  1863.                             </table>
    1864. 

  1864.                             <?php
    1865. 

  1865.                             $res[0][$value] = ob_get_clean();
    1866. 

  1866.                         }
    1867. 

  1867.                     }
    1868. 

  1868.                 } else {
    1869. 

  1869.                     $formid_list = "";
    1870. 

  1870.                     foreach ($form_ids as $row) {//Fetching the values of each forms
    1871. 

  1871.                         foreach ($row as $key => $value) {
    1872. 

  1872.                             if ($formid_list) {
    1873. 

  1873.                                 $formid_list .= ',';
    1874. 

  1874.                             }
    1875. 

  1875. 

  1876.                             $formid_list .= $value;
    1877. 

  1877.                         }
    1878. 

  1878.                     }
    1879. 

  1879. 

  1880.                     $formid_list = $formid_list ? $formid_list : "''";
    1881. 

  1881.                     $lbf = "lbf_data";
    1882. 

  1882.                     $filename = "{$GLOBALS['srcdir']}/" . $formTables_details[2] . "/" . $formTables_details[2] . "_db.php";
    1883. 

  1883.                     if (file_exists($filename)) {
    1884. 

  1884.                         include_once($filename);
    1885. 

  1885.                     }
    1886. 

  1886. 

  1887.                     $field_ids = explode(',', $formTables_details[3]);
    1888. 

  1888.                     $fields_str = '';
    1889. 

  1889.                     foreach ($field_ids as $key => $value) {
    1890. 

  1890.                         if ($fields_str != '') {
    1891. 

  1891.                             $fields_str .= ",";
    1892. 

  1892.                         }
    1893. 

  1893. 

  1894.                         $fields_str .= "'$value'";
    1895. 

  1895.                     }
    1896. 

  1896. 

  1897.                     $query = "select * from " . $lbf . "
    1898. 

  1898.                     join forms as f on f.pid = ? AND f.form_id = " . $lbf . ".form_id AND f.formdir = ? AND " . $lbf . ".field_id IN (" . $fields_str . ")
    1899. 

  1899.                     where deleted = 0";
    1900. 

  1900.                     $appTable = new ApplicationTable();
    1901. 

  1901.                     $result = $appTable->zQuery($query, array($pid, $formTables_details[2]));
    1902. 

  1902. 

  1903.                     foreach ($result as $row) {
    1904. 

  1904.                         preg_match('/\.$/', trim($row['field_value']), $matches);
    1905. 

  1905.                         if (count($matches) == 0) {
    1906. 

  1906.                             $row['field_value'] .= ". ";
    1907. 

  1907.                         }
    1908. 

  1908. 

  1909.                         $res[0][$row['field_id']] .= $row['field_value'];
    1910. 

  1910.                     }
    1911. 

  1911.                 }
    1912. 

  1912.             } elseif ($formTables_details[0] == 3) {//Fetching documents from mapped folders
    1913. 

  1913.                 $query = "SELECT c.id, c.name, d.id AS document_id, d.type, d.mimetype, d.url, d.docdate
    1914. 

  1914.                 FROM categories AS c, documents AS d, categories_to_documents AS c2d
    1915. 

  1915.                 WHERE c.id = ? AND c.id = c2d.category_id AND c2d.document_id = d.id AND d.foreign_id = ?";
    1916. 

    1917. 

  1917.                 $appTable = new ApplicationTable();
    1918. 

  1918.                 $result = $appTable->zQuery($query, array($formTables_details[2], $pid));
    1919. 

  1919. 

  1920.                 foreach ($result as $row_folders) {
    1921. 

  1921.                     $r = \Documents\Plugin\Documents::getDocument($row_folders['document_id']);
    1922. 

  1922.                     $res[0][$count_folder][0] = base64_encode($r);
    1923. 

  1923.                     $res[0][$count_folder][1] = $row_folders['mimetype'];
    1924. 

  1924.                     $res[0][$count_folder][2] = $row_folders['url'];
    1925. 

  1925.                     $count_folder++;
    1926. 

  1926.                 }
    1927. 

  1927.             }
    1928. 

  1928.         }
    1929. 

  1929. 

  1930.         return $res;
    1931. 

  1931.     }
    1932. 

  1932. 

  1933.     /*
    1934. 

  1934.     * Retrive the saved settings of the module from database
    1935. 

  1935.     *
    1936. 

  1936.     * @param    string      $module_directory       module directory name
    1937. 

  1937.     * @param    string      $field_name             field name as in the module_settings table
    1938. 

  1938.     */
    1939. 

  1939.     public function getSettings($module_directory, $field_name)
    1940. 

  1940.     {
    1941. 

  1941.         $query = "SELECT mo_conf.field_value FROM modules AS mo
    1942. 

  1942.         LEFT JOIN module_configuration AS mo_conf ON mo_conf.module_id = mo.mod_id
    1943. 

  1943.         WHERE mo.mod_directory = ? AND mo_conf.field_name = ?";
    1944. 

  1944.         $appTable = new ApplicationTable();
    1945. 

  1945.         $result = $appTable->zQuery($query, array($module_directory, $field_name));
    1946. 

  1946.         foreach ($result as $row) {
    1947. 

  1947.             return $row['field_value'];
    1948. 

  1948.         }
    1949. 

  1949.     }
    1950. 

  1950. 

  1951.     /*
    1952. 

  1952.     * Get the encounters in a particular date
    1953. 

  1953.     *
    1954. 

  1954.     * @param    Date    $date           Date format yyyy-mm-dd
    1955. 

  1955.     * $return   Array   $date_list      List of encounter in the given date.
    1956. 

  1956.     */
    1957. 

  1957.     public function getEncounterDate($date)
    1958. 

  1958.     {
    1959. 

  1959.         $date_list = array();
    1960. 

  1960.         $query = "select pid, encounter from form_encounter where date between ? and ?";
    1961. 

  1961.         $appTable = new ApplicationTable();
    1962. 

  1962.         $result = $appTable->zQuery($query, array($date, $date));
    1963. 

  1963. 

  1964.         $count = 0;
    1965. 

  1965.         foreach ($result as $row) {
    1966. 

  1966.             $date_list[$count]['pid'] = $row['pid'];
    1967. 

  1967.             $date_list[$count]['encounter'] = $row['encounter'];
    1968. 

  1968.             $count++;
    1969. 

  1969.         }
    1970. 

  1970. 

  1971.         return $date_list;
    1972. 

  1972.     }
    1973. 

  1973. 

  1974.     /*
    1975. 

  1975.     * Sign Off an encounter
    1976. 

  1976.     *
    1977. 

  1977.     * @param    integer     $pid
    1978. 

  1978.     * @param    integer     $encounter
    1979. 

  1979.     * @return   array       $forms          List of locked forms
    1980. 

  1980.     */
    1981. 

  1981.     public function signOff($pid, $encounter)
    1982. 

  1982.     {
    1983. 

  1983.         /*Saving Demographics to locked data*/
    1984. 

  1984.         $query_patient_data = "SELECT * FROM patient_data WHERE pid = ?";
    1985. 

  1985.         $appTable = new ApplicationTable();
    1986. 

  1986.         $result_patient_data = $appTable->zQuery($query_patient_data, array($pid));
    1987. 

  1987.         foreach ($result_patient_data as $row_patient_data) {
    1988. 

  1988.         }
    1989. 

  1989. 

  1990.         $query_dem = "SELECT field_id FROM layout_options WHERE form_id = ?";
    1991. 

  1991.         $appTable = new ApplicationTable();
    1992. 

  1992.         $result_dem = $appTable->zQuery($query_dem, array('DEM'));
    1993. 

  1993. 

  1994.         foreach ($result_dem as $row_dem) {
    1995. 

  1995.             $query_insert_patient_data = "INSERT INTO combination_form_locked_data SET pid = ?, encounter = ?, form_dir = ?, field_name = ?, field_value = ?";
    1996. 

  1996.             $appTable = new ApplicationTable();
    1997. 

  1997.             $result_dem = $appTable->zQuery($query_insert_patient_data, array($pid, $encounter, 'DEM', $row_dem['field_id'], $row_patient_data[$row_dem['field_id']]));
    1998. 

  1998.         }
    1999. 

  1999. 

  2000.         /*************************************/
    2001. 

  2001. 

  2002.         $query_saved_forms = "SELECT formid FROM combined_encountersaved_forms WHERE pid = ? AND encounter = ?";
    2003. 

  2003.         $appTable = new ApplicationTable();
    2004. 

  2004.         $result_saved_forms = $appTable->zQuery($query_saved_forms, array($pid, $encounter));
    2005. 

  2005.         $count = 0;
    2006. 

  2006.         foreach ($result_saved_forms as $row_saved_forms) {
    2007. 

  2007.             $form_dir = '';
    2008. 

  2008.             $form_type = 0;
    2009. 

  2009.             $form_id = 0;
    2010. 

  2010.             $temp = explode('***', $row_saved_forms['formid']);
    2011. 

  2011.             if ($temp[1] == 1) { //Fetch HTML form id from the Combination form template
    2012. 

  2012.                 $form_type = 0;
    2013. 

  2013.                 $form_dir = $temp[0];
    2014. 

  2014.             } else { //Fetch LBF form from the Combination form template
    2015. 

  2015.                 $temp_1 = explode('*', $temp[1]);
    2016. 

  2016.                 if ($temp_1[1] == 1) { //Complete LBF in Combination form
    2017. 

  2017.                     $form_type = 1;
    2018. 

  2018.                     $form_dir = $temp[0];
    2019. 

  2019.                 } elseif ($temp_1[1] == 2) { //Particular section from LBF in Combination form
    2020. 

  2020.                     $temp_2 = explode('|', $temp[0]);
    2021. 

  2021.                     $form_type = 1;
    2022. 

  2022.                     $form_dir = $temp_2[0];
    2023. 

  2023.                 }
    2024. 

  2024.             }
    2025. 

  2025. 

  2026.             /*Fetch form id from the concerned tables*/
    2027. 

  2027.             if ($form_dir == 'HIS') { //Fetching History form id
    2028. 

  2028.                 $query_form_id = "SELECT MAX(id) AS form_id FROM history_data WHERE pid = ?";
    2029. 

  2029.                 $appTable = new ApplicationTable();
    2030. 

  2030.                 $result_form_id = $appTable->zQuery($query_form_id, array($pid));
    2031. 

  2031.             } else { //Fetching normal form id
    2032. 

  2032.                 $query_form_id = "select form_id from forms where pid = ? and encounter = ? and formdir = ?";
    2033. 

  2033.                 $appTable = new ApplicationTable();
    2034. 

  2034.                 $result_form_id = $appTable->zQuery($query_form_id, array($pid, $encounter, $form_dir));
    2035. 

  2035.             }
    2036. 

  2036. 

  2037.             foreach ($result_form_id as $row_form_id) {
    2038. 

  2038.                 $form_id = $row_form_id['form_id'];
    2039. 

  2039.             }
    2040. 

  2040. 

  2041.             /****************************************/
    2042. 

  2042.             $forms[$count]['formdir'] = $form_dir;
    2043. 

  2043.             $forms[$count]['formtype'] = $form_type;
    2044. 

  2044.             $forms[$count]['formid'] = $form_id;
    2045. 

  2045.             $this->lockedthisform($pid, $encounter, $form_dir, $form_type, $form_id);
    2046. 

  2046.             $count++;
    2047. 

  2047.         }
    2048. 

  2048. 

  2049.         return $forms;
    2050. 

  2050.     }
    2051. 

  2051. 

  2052.     /*
    2053. 

  2053.     * Lock a component in combination form
    2054. 

  2054.     *
    2055. 

  2055.     * @param    integer     $pid
    2056. 

  2056.     * @param    integer     $encounter
    2057. 

  2057.     * @param    integer     $formdir        Form directory
    2058. 

  2058.     * @param    integer     $formtype       Form type, 0 => HTML, 1 => LBF
    2059. 

  2059.     * @param    integer     $formid         Saved form id from forms table
    2060. 

  2060.     *
    2061. 

  2061.     * @return   None
    2062. 

  2062.     */
    2063. 

  2063.     public function lockedthisform($pid, $encounter, $formdir, $formtype, $formid)
    2064. 

  2064.     {
    2065. 

  2065.         $query = "select count(*) as count from combination_form where pid = ? and encounter = ? and form_dir = ? and form_type = ? and form_id = ?";
    2066. 

  2066.         $appTable = new ApplicationTable();
    2067. 

  2067.         $result = $appTable->zQuery($query, array($pid, $encounter, $formdir, $formtype, $formid));
    2068. 

  2068.         foreach ($result as $count) {
    2069. 

  2069.         }
    2070. 

  2070. 

  2071.         if ($count['count'] == 0) {
    2072. 

  2072.             $query_insert = "INSERT INTO combination_form SET pid = ?, encounter = ?, form_dir = ?, form_type = ?, form_id = ?";
    2073. 

  2073.             $appTable = new ApplicationTable();
    2074. 

  2074.             $result = $appTable->zQuery($query_insert, array($pid, $encounter, $formdir, $formtype, $formid));
    2075. 

  2075.         }
    2076. 

  2076.     }
    2077. 

  2077. 

  2078.     /*
    2079. 

  2079.     * Return the list of CCDA components
    2080. 

  2080.     *
    2081. 

  2081.     * @param    $type
    2082. 

  2082.     * @return   Array       $components
    2083. 

  2083.     */
    2084. 

  2084.     public function getCCDAComponents($type)
    2085. 

  2085.     {
    2086. 

  2086.         $components = array();
    2087. 

  2087.         $query = "select * from ccda_components where ccda_type = ?";
    2088. 

  2088.         $appTable = new ApplicationTable();
    2089. 

  2089.         $result = $appTable->zQuery($query, array($type));
    2090. 

  2090. 

  2091.         foreach ($result as $row) {
    2092. 

  2092.             $components[$row['ccda_components_field']] = $row['ccda_components_name'];
    2093. 

  2093.         }
    2094. 

  2094. 

  2095.         return $components;
    2096. 

  2096.     }
    2097. 

  2097. 

  2098.     /*
    2099. 

  2099.     * Store the status of the CCDA sent to HIE
    2100. 

  2100.     *
    2101. 

  2101.     * @param    integer     $pid
    2102. 

  2102.     * @param    integer     $encounter
    2103. 

  2103.     * @param    integer     $content
    2104. 

  2104.     * @param    integer     $time
    2105. 

  2105.     * @param    integer     $status
    2106. 

  2106.     * @return   None
    2107. 

  2107.     */
    2108. 

  2108.     public function logCCDA($pid, $encounter, $content, $time, $status, $user_id, $view = 0, $transfer = 0, $emr_transfer = 0)
    2109. 

  2109.     {
    2110. 

  2110.         $content = base64_decode($content);
    2111. 

  2111.         $file_path = '';
    2112. 

  2112.         $docid = '';
    2113. 

  2113.         $revid = '';
    2114. 

  2114.         if ($GLOBALS['document_storage_method'] == 1) {
    2115. 

  2115.             $couch = new CouchDB();
    2116. 

  2116.             $docid = $couch->createDocId('ccda');
    2117. 

  2117.             $binaryUuid = UuidRegistry::uuidToBytes($docid);
    2118. 

  2118.             if ($GLOBALS['couchdb_encryption']) {
    2119. 

  2119.                 $encrypted = 1;
    2120. 

  2120.                 $cryptoGen = new CryptoGen();
    2121. 

  2121.                 $resp = $couch->save_doc(['_id' => $docid, 'data' => $cryptoGen->encryptStandard($content, null, 'database')]);
    2122. 

  2122.             } else {
    2123. 

  2123.                 $encrypted = 0;
    2124. 

  2124.                 $resp = $couch->save_doc(['_id' => $docid, 'data' => base64_encode($content)]);
    2125. 

  2125.             }
    2126. 

  2126.             $docid = $resp->id;
    2127. 

  2127.             $revid = $resp->rev;
    2128. 

  2128.         } else {
    2129. 

  2129.             $binaryUuid = (new UuidRegistry(['table_name' => 'ccda']))->createUuid();
    2130. 

  2130.             $file_name = UuidRegistry::uuidToString($binaryUuid);
    2131. 

  2131.             $file_path = $GLOBALS['OE_SITE_DIR'] . '/documents/' . $pid . '/CCDA';
    2132. 

  2132.             if (!is_dir($file_path)) {
    2133. 

  2133.                 if (!mkdir($file_path, 0777, true) && !is_dir($file_path)) {
    2134. 

  2134.                     // php Exception extends RunTimeException
    2135. 

  2135.                     throw new Exception(sprintf('Directory "%s" was not created', $file_path));
    2136. 

  2136.                 }
    2137. 

  2137.             }
    2138. 

  2138. 

  2139.             $fccda = fopen($file_path . "/" . $file_name, "w");
    2140. 

  2140.             if ($GLOBALS['drive_encryption']) {
    2141. 

  2141.                 $encrypted = 1;
    2142. 

  2142.                 $cryptoGen = new CryptoGen();
    2143. 

  2143.                 fwrite($fccda, $cryptoGen->encryptStandard($content, null, 'database'));
    2144. 

  2144.             } else {
    2145. 

  2145.                 $encrypted = 0;
    2146. 

  2146.                 fwrite($fccda, $content);
    2147. 

  2147.             }
    2148. 

  2148.             fclose($fccda);
    2149. 

  2149.             $file_path = $file_path . "/" . $file_name;
    2150. 

  2150.         }
    2151. 

  2151. 

  2152.         $query = "insert into ccda (`uuid`, `pid`, `encounter`, `ccda_data`, `time`, `status`, `user_id`, `couch_docid`, `couch_revid`, `hash`, `view`, `transfer`, `emr_transfer`, `encrypted`) values (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)";
    2153. 

  2153.         $hash = hash('sha3-512', $content);
    2154. 

  2154.         $appTable = new ApplicationTable();
    2155. 

  2155.         $result = $appTable->zQuery($query, array($binaryUuid, $pid, $encounter, $file_path, $time, $status, $user_id, $docid, $revid, $hash, $view, $transfer, $emr_transfer, $encrypted));
    2156. 

  2156.         return $moduleInsertId = $result->getGeneratedValue();
    2157. 

  2157.     }
    2158. 

  2158. 

  2159.     public function getCcdaLogDetails($logID = 0)
    2160. 

  2160.     {
    2161. 

  2161.         $query_ccda_log = "SELECT pid, encounter, ccda_data, time, status, user_id, couch_docid, couch_revid, view, transfer,emr_transfer FROM ccda WHERE id = ?";
    2162. 

  2162.         $appTable = new ApplicationTable();
    2163. 

  2163.         $res_ccda_log = $appTable->zQuery($query_ccda_log, array($logID));
    2164. 

  2164.         return $res_ccda_log->current();
    2165. 

  2165.     }
    2166. 

  2166. 

  2167.     /*
    2168. 

  2168.     * Convert date from database format to required format
    2169. 

  2169.     *
    2170. 

  2170.     * @param    String      $date       Date from database (format: YYYY-MM-DD)
    2171. 

  2171.     * @param    String      $format     Required date format
    2172. 

  2172.     *
    2173. 

  2173.     * @return   String      $formatted_date New formatted date
    2174. 

  2174.     */
    2175. 

  2175.     public function date_format($date, $format = null)
    2176. 

  2176.     {
    2177. 

  2177.         if (!$date) {
    2178. 

  2178.             return;
    2179. 

  2179.         }
    2180. 

  2180. 

  2181.         $format = $format ?: 'm/d/y';
    2182. 

  2182.         $temp = explode(' ', $date); //split using space and consider the first portion, incase of date with time
    2183. 

  2183.         $date = $temp[0];
    2184. 

  2184.         $date = str_replace('/', '-', $date);
    2185. 

  2185.         $arr = explode('-', $date);
    2186. 

  2186. 

  2187.         if ($format == 'm/d/y') {
    2188. 

  2188.             $formatted_date = $arr[1] . "/" . $arr[2] . "/" . $arr[0];
    2189. 

  2189.         }
    2190. 

  2190. 

  2191.         $formatted_date = $temp[1] ? $formatted_date . " " . $temp[1] : $formatted_date; //append the time, if exists, with the new formatted date
    2192. 

  2192.         return $formatted_date;
    2193. 

  2193.     }
    2194. 

  2194. 

  2195.     /*
    2196. 

  2196.     * Generate CODE for medication, allergies etc.. if the code is not present by default.
    2197. 

  2197.     * The code is generated from the text that we give for medications or allergies.
    2198. 

  2198.     *
    2199. 

  2199.     * The text is encrypted using SHA1() and the string is parsed. Alternate letters from the SHA1 string is fetched
    2200. 

  2200.     * and the result is again parsed. We again take the alternate letters from the string. This is done twice to reduce
    2201. 

  2201.     * duplicate codes beign generated from this function.
    2202. 

  2202.     *
    2203. 

  2203.     * @param    String      Code text
    2204. 

  2204.     *
    2205. 

  2205.     * @return   String      Code
    2206. 

  2206.     */
    2207. 

  2207.     public function generate_code($code_text)
    2208. 

  2208.     {
    2209. 

  2209.         $rx = sqlQuery("Select drug_code From drugs Where name = ?", array("$code_text"));
    2210. 

  2210.         if (!empty($rx)) {
    2211. 

  2211.             return $rx['drug_code'];
    2212. 

  2212.         }
    2213. 

  2213.         $encrypted = sha1($code_text);
    2214. 

  2214.         $code = '';
    2215. 

  2215.         for ($i = 0, $iMax = strlen($encrypted); $i <= $iMax;) {
    2216. 

  2216.             $code .= $encrypted[$i];
    2217. 

  2217.             $i = $i + 2;
    2218. 

  2218.         }
    2219. 

  2219. 

  2220.         $encrypted = $code;
    2221. 

  2221.         $code = '';
    2222. 

  2222.         for ($i = 0, $iMax = strlen($encrypted); $i <= $iMax;) {
    2223. 

  2223.             $code .= $encrypted[$i];
    2224. 

  2224.             $i = $i + 2;
    2225. 

  2225.         }
    2226. 

  2226. 

  2227.         $code = strtoupper(substr($code, 0, 6));
    2228. 

  2228.         return $code;
    2229. 

  2229.     }
    2230. 

  2230. 

  2231.     public function getProviderId($pid)
    2232. 

  2232.     {
    2233. 

  2233.         $appTable = new ApplicationTable();
    2234. 

  2234.         $query = "SELECT providerID FROM patient_data WHERE `pid`  = ?";
    2235. 

  2235.         $result = $appTable->zQuery($query, array($pid));
    2236. 

  2236.         $row = $result->current();
    2237. 

  2237.         return $row['providerID'];
    2238. 

  2238.     }
    2239. 

  2239. 

  2240.     public function getUserDetails($uid)
    2241. 

  2241.     {
    2242. 

  2242.         $query = "SELECT u.title,npi,fname,mname,lname,street,city,state,zip,CONCAT_WS(' ','',phonew1) AS phonew1, lo.title as  physician_type, facility As organization, taxonomy, lous.title as taxonomy_desc, specialty, SUBSTRING(lo.codes, LENGTH('SNOMED-CT:')+1, LENGTH(lo.codes)) as physician_type_code FROM users as u
    2243. 

  2243.         LEFT JOIN list_options AS lo ON lo.list_id = 'physician_type' AND lo.option_id = u.physician_type
    2244. 

  2244.         LEFT JOIN list_options AS lous ON lous.list_id = 'us-core-provider-specialty' AND lous.option_id = u.taxonomy
    2245. 

  2245.         WHERE `id` = ?";
    2246. 

  2246.         $appTable = new ApplicationTable();
    2247. 

  2247.         $res = $appTable->zQuery($query, array($uid));
    2248. 

  2248.         foreach ($res as $result) {
    2249. 

  2249.             return $result;
    2250. 

  2250.         }
    2251. 

  2251.     }
    2252. 

  2252. 

  2253.     /**
    2254. 

  2254.      * Checks to see if the snomed codes are installed and we can then query against them.
    2255. 

  2255.      */
    2256. 

  2256.     private function is_snomed_codes_installed(ApplicationTable $appTable)
    2257. 

  2257.     {
    2258. 

  2258.         $codes_installed = false;
    2259. 

  2259.         // this throws an exception... which is sad
    2260. 

  2260.         // TODO: is there a better way to know if the snomed codes are installed instead of using this method?
    2261. 

  2261.         // we set $error=false or else it will display on the screen, which seems counterintuitive... it also supresses the exception
    2262. 

  2262.         $result = $appTable->zQuery("Describe `sct_descriptions`", $params = '', $log = true, $error = false);
    2263. 

  2263.         if ($result !== false) { // will return false if there is an error
    2264. 

  2264.             $codes_installed = true;
    2265. 

  2265.         }
    2266. 

  2266. 

  2267. 

  2268.         return $codes_installed;
    2269. 

  2269.     }
    2270. 

  2270. 

  2271.     /*
    2272. 

  2272.     * get details from care plan form
    2273. 

  2273.     * @param    int     $pid           Patient Internal Identifier.
    2274. 

  2274.     * @param    int     $encounter     Current selected encounter.
    2275. 

    2276. 

  2276.     * return    string  $planofcare  XML which contains the details collected from the patient.
    2277. 

  2277.     */
    2278. 

  2278.     public function getPlanOfCare($pid, $encounter)
    2279. 

  2279.     {
    2280. 

  2280.         $wherCon = '';
    2281. 

  2281.         $appTable = new ApplicationTable();
    2282. 

  2282.         if ($encounter) {
    2283. 

  2283.             $query = "SELECT form_id, encounter FROM forms  WHERE pid = ? AND formdir = ? AND deleted = 0 ORDER BY date DESC LIMIT 1";
    2284. 

  2284.             $result = $appTable->zQuery($query, array($pid, 'care_plan'));
    2285. 

  2285.             foreach ($result as $row) {
    2286. 

  2286.                 $form_id = $row['form_id'];
    2287. 

  2287.             }
    2288. 

  2288. 

  2289.             if ($form_id) {
    2290. 

  2290.                 $wherCon = "AND f.form_id = '" . add_escape_custom($form_id) . "'";
    2291. 

  2291.             }
    2292. 

  2292.         }
    2293. 

  2293. 

  2294.         UuidRegistry::createMissingUuidsForTables(['lists']);
    2295. 

  2295. 

  2296.         $query = "SELECT 'care_plan' AS source,fcp.encounter,fcp.code,fcp.codetext,fcp.description,fcp.date,l.`notes` AS moodCode,fcp.care_plan_type AS care_plan_type,fcp.note_related_to as note_issues
    2297. 

  2297.             FROM forms AS f
    2298. 

  2298.             LEFT JOIN form_care_plan AS fcp ON fcp.id = f.form_id
    2299. 

  2299.             LEFT JOIN codes AS c ON c.code = fcp.code
    2300. 

  2300.             LEFT JOIN code_types AS ct ON c.`code_type` = ct.ct_id
    2301. 

  2301.             LEFT JOIN `list_options` l ON l.`option_id` = fcp.`care_plan_type` AND l.`list_id`=?
    2302. 

  2302.             WHERE f.pid = ? AND f.formdir = ? AND f.deleted = ? $wherCon
    2303. 

  2303.             UNION
    2304. 

  2304.             SELECT 'referral' AS source,'' encounter,'' AS CODE,'' AS codetext,CONCAT_WS(', ',l1.field_value,CONCAT_WS(' ',u.fname,u.lname),CONCAT('Tel:',u.phonew1),u.street,u.city,CONCAT_WS(' ',u.state,u.zip),CONCAT('Schedule Date: ',l2.field_value)) AS description,l2.field_value AS DATE,'' moodCode,'' care_plan_type, '' note_issues
    2305. 

  2305.             FROM transactions AS t
    2306. 

  2306.             LEFT JOIN lbt_data AS l1 ON l1.form_id=t.id AND l1.field_id = 'body'
    2307. 

  2307.             LEFT JOIN lbt_data AS l2 ON l2.form_id=t.id AND l2.field_id = 'refer_date'
    2308. 

  2308.             LEFT JOIN lbt_data AS l3 ON l3.form_id=t.id AND l3.field_id = 'refer_to'
    2309. 

  2309.             LEFT JOIN users AS u ON u.id = l3.field_value
    2310. 

  2310.             WHERE t.pid = ?";
    2311. 

  2311.         $res = $appTable->zQuery($query, ['Plan_of_Care_Type', $pid, 'care_plan', 0, $pid]);
    2312. 

  2312.         $status = 'Pending';
    2313. 

  2313.         $status_entry = 'active';
    2314. 

  2314.         $planofcare = '<planofcare>';
    2315. 

  2315.         $goals = '<goals>';
    2316. 

  2316.         $concerns = '<health_concerns>';
    2317. 

  2317.         foreach ($res as $row) {
    2318. 

  2318.             $row['description'] = preg_replace("/\{\|([^\]]*)\|}/", '', $row['description']);
    2319. 

  2319.             $tmp = explode(":", $row['code']);
    2320. 

  2320.             $code_type = $tmp[0];
    2321. 

  2321.             $code = $tmp[1];
    2322. 

  2322.             if ($row['source'] === 'referral') {
    2323. 

  2323.                 if (empty($row['code'])) {
    2324. 

  2324.                     continue;
    2325. 

  2325.                 }
    2326. 

  2326.                 $row['care_plan_type'] = 'referral';
    2327. 

  2327.             }
    2328. 

  2328.             if ($row['care_plan_type'] === 'health_concern') {
    2329. 

  2329.                 $issue_uuid = "<issues>\n";
    2330. 

  2330.                 if (!empty($row['note_issues'])) {
    2331. 

  2331.                     $issues = json_decode($row['note_issues'], true);
    2332. 

  2332.                     foreach ($issues as $issue) {
    2333. 

  2333.                         $q = "Select uuid from lists Where id = ?";
    2334. 

  2334.                         $uuid = sqlQuery($q, array($issue))['uuid'];
    2335. 

  2335.                         if (empty($uuid)) {
    2336. 

  2336.                             continue;
    2337. 

  2337.                         }
    2338. 

  2338.                         $uuid_problem = UuidRegistry::uuidToString($uuid);
    2339. 

  2339.                         $issue_uuid .= "<issue_uuid>" . xmlEscape($uuid_problem) . "</issue_uuid>\n";
    2340. 

  2340.                     }
    2341. 

  2341.                 }
    2342. 

  2342.                 $concerns .= "<concern>" .
    2343. 

  2343.                 $issue_uuid . "</issues>" .
    2344. 

  2344.                 "<encounter>" . xmlEscape($row['encounter']) . "</encounter>
    2345. 

  2345.                 <extension>" . xmlEscape(base64_encode($row['form_id'] . $row['code'])) . "</extension>
    2346. 

  2346.                 <sha_extension>" . xmlEscape($this->formatUid($row['form_id'] . $row['description'])) . "</sha_extension>
    2347. 

  2347.                 <text>" . xmlEscape($row['date'] . " " . $row['description']) . '</text>
    2348. 

  2348.                 <code>' . xmlEscape($code) . '</code>
    2349. 

  2349.                 <code_type>' . xmlEscape($code_type) . '</code_type>
    2350. 

  2350.                 <code_text>' . xmlEscape($row['codetext']) . '</code_text>
    2351. 

  2351.                 <date>' . xmlEscape($row['date']) . '</date>
    2352. 

  2352.                 <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2353. 

  2353.                 </concern>';
    2354. 

  2354.             }
    2355. 

  2355.             if ($row['care_plan_type'] === 'goal') {
    2356. 

  2356.                 $goals .= '<item>
    2357. 

  2357.                 <extension>' . xmlEscape(base64_encode($row['form_id'] . $row['code'])) . '</extension>
    2358. 

  2358.                 <sha_extension>' . xmlEscape($this->formatUid($row['form_id'] . $row['description'])) . '</sha_extension>
    2359. 

  2359.                 <care_plan_type>' . xmlEscape($row['care_plan_type']) . '</care_plan_type>
    2360. 

  2360.                 <encounter>' . xmlEscape($row['encounter']) . '</encounter>
    2361. 

  2361.                 <code>' . xmlEscape($code) . '</code>
    2362. 

  2362.                 <code_text>' . xmlEscape($row['codetext']) . '</code_text>
    2363. 

  2363.                 <description>' . xmlEscape($row['description']) . '</description>
    2364. 

  2364.                 <date>' . xmlEscape($row['date']) . '</date>
    2365. 

  2365.                 <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2366. 

  2366.                 <status>' . xmlEscape($status) . '</status>
    2367. 

  2367.                 <status_entry>' . xmlEscape($status_entry) . '</status_entry>
    2368. 

  2368.                 <code_type>' . xmlEscape($code_type) . '</code_type>
    2369. 

  2369.                 <moodCode>' . xmlEscape($row['moodCode']) . '</moodCode>
    2370. 

  2370.                 </item>';
    2371. 

  2371.             } elseif ($row['care_plan_type'] !== 'health_concern') {
    2372. 

  2372.                 $planofcare .= '<item>
    2373. 

  2373.                 <extension>' . xmlEscape(base64_encode($row['form_id'] . $row['code'])) . '</extension>
    2374. 

  2374.                 <sha_extension>' . xmlEscape($this->formatUid($row['form_id'] . $row['description'])) . '</sha_extension>
    2375. 

  2375.                 <care_plan_type>' . xmlEscape($row['care_plan_type']) . '</care_plan_type>
    2376. 

  2376.                 <encounter>' . xmlEscape($row['encounter']) . '</encounter>
    2377. 

  2377.                 <code>' . xmlEscape($code) . '</code>
    2378. 

  2378.                 <code_text>' . xmlEscape($row['codetext']) . '</code_text>
    2379. 

  2379.                 <description>' . xmlEscape($row['description']) . '</description>
    2380. 

  2380.                 <date>' . xmlEscape($row['date']) . '</date>
    2381. 

  2381.                 <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2382. 

  2382.                 <status>' . xmlEscape($status) . '</status>
    2383. 

  2383.                 <status_entry>' . xmlEscape($status_entry) . '</status_entry>
    2384. 

  2384.                 <code_type>' . xmlEscape($code_type) . '</code_type>
    2385. 

  2385.                 <moodCode>' . xmlEscape($row['moodCode']) . '</moodCode>
    2386. 

  2386.                 </item>';
    2387. 

  2387.             }
    2388. 

  2388.         }
    2389. 

  2389. 

  2390.         $planofcare .= '</planofcare>';
    2391. 

  2391.         $goals .= '</goals>';
    2392. 

  2392.         $concerns .= '</health_concerns>';
    2393. 

  2393.         return $planofcare . $goals . $concerns;
    2394. 

  2394.     }
    2395. 

  2395. 

  2396.     /*
    2397. 

  2397.    * get details from functional and cognitive status form
    2398. 

  2398.    * @param    int     $pid           Patient Internal Identifier.
    2399. 

  2399.    * @param    int     $encounter     Current selected encounter.
    2400. 

    2401. 

  2401.    * return    string  $functional_cognitive  XML which contains the details collected from the patient.
    2402. 

  2402.    */
    2403. 

  2403.     public function getFunctionalCognitiveStatus($pid, $encounter)
    2404. 

  2404.     {
    2405. 

  2405.         $wherCon = '';
    2406. 

  2406.         $sqlBindArray = [];
    2407. 

  2407.         if ($encounter) {
    2408. 

  2408.             $wherCon = " f.encounter = ? AND ";
    2409. 

  2409.             $sqlBindArray[] = $encounter;
    2410. 

  2410.         }
    2411. 

  2411. 

  2412.         $functional_status = '<functional_status>';
    2413. 

  2413.         $cognitive_status = '<mental_status>';
    2414. 

  2414.         $query = "SELECT ffcs.* FROM forms AS f
    2415. 

  2415.                 LEFT JOIN form_functional_cognitive_status AS ffcs ON ffcs.id = f.form_id
    2416. 

  2416.                 WHERE $wherCon f.pid = ? AND f.formdir = ? AND f.deleted = ?";
    2417. 

  2417.         array_push($sqlBindArray, $pid, 'functional_cognitive_status', 0);
    2418. 

  2418.         $appTable = new ApplicationTable();
    2419. 

  2419.         $res = $appTable->zQuery($query, $sqlBindArray);
    2420. 

  2420. 

  2421.         foreach ($res as $row) {
    2422. 

  2422.             if ($row['activity'] == 1) {
    2423. 

  2423.                 $cognitive_status .= '<item>
    2424. 

  2424.         <code>' . xmlEscape(($row['code'] ?: '')) . '</code>
    2425. 

  2425.         <code_text>' . xmlEscape(($row['codetext'] ?: '')) . '</code_text>
    2426. 

  2426.         <description>' . xmlEscape($row['date'] . ' ' . $row['description']) . '</description>
    2427. 

  2427.         <date>' . xmlEscape($row['date']) . '</date>
    2428. 

  2428.         <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2429. 

  2429.         <status>' . xmlEscape('completed') . '</status>
    2430. 

  2430.         <age>' . xmlEscape($this->getAge($pid)) . '</age>
    2431. 

  2431.         </item>';
    2432. 

  2432.             } else {
    2433. 

  2433.                 $functional_status .= '<item>
    2434. 

  2434.         <code>' . xmlEscape(($row['code'] ?: '')) . '</code>
    2435. 

  2435.         <code_text>' . xmlEscape(($row['codetext'] ?: '')) . '</code_text>
    2436. 

  2436.         <description>' . xmlEscape($row['date'] . ' ' . $row['description']) . '</description>
    2437. 

  2437.         <date>' . xmlEscape($row['date']) . '</date>
    2438. 

  2438.         <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2439. 

  2439.         <status>' . xmlEscape('completed') . '</status>
    2440. 

  2440.         <age>' . xmlEscape($this->getAge($pid)) . '</age>
    2441. 

  2441.         </item>';
    2442. 

  2442.             }
    2443. 

  2443.         }
    2444. 

  2444.         $functional_status .= '</functional_status>';
    2445. 

  2445.         $cognitive_status .= '</mental_status>';
    2446. 

  2446.         return $functional_status . $cognitive_status;
    2447. 

  2447.     }
    2448. 

  2448. 

  2449.     public function getClinicalNotes($pid, $encounter)
    2450. 

  2450.     {
    2451. 

  2451.         $wherCon = '';
    2452. 

  2452.         $sqlBindArray = [];
    2453. 

  2453.         if ($encounter) {
    2454. 

  2454.             $wherCon = " f.encounter = ? AND ";
    2455. 

  2455.             $sqlBindArray[] = $encounter;
    2456. 

  2456.         }
    2457. 

  2457. 

  2458.         $clinical_notes = '';
    2459. 

  2459.         $query = "SELECT fnote.*, u.*, fac.* FROM forms AS f
    2460. 

  2460.                 LEFT JOIN `form_clinical_notes` AS fnote ON fnote.`form_id` = f.`form_id`
    2461. 

  2461.                 LEFT JOIN users as u on u.username = fnote.user
    2462. 

  2462.                 LEFT JOIN facility as fac on fac.id = u.facility_id
    2463. 

  2463.                 WHERE $wherCon f.`pid` = ? AND f.`formdir` = ? AND f.`deleted` = ? Order By fnote.`encounter`, fnote.`date`, fnote.`clinical_notes_type` DESC";
    2464. 

  2464.         array_push($sqlBindArray, $pid, 'clinical_notes', 0);
    2465. 

  2465.         $appTable = new ApplicationTable();
    2466. 

  2466.         $res = $appTable->zQuery($query, $sqlBindArray);
    2467. 

  2467. 

  2468.         $clinical_notes .= '<clinical_notes>';
    2469. 

  2469.         foreach ($res as $row) {
    2470. 

  2470.             if (empty($row['clinical_notes_type'])) {
    2471. 

  2471.                 continue;
    2472. 

  2472.             }
    2473. 

  2473.             $tmp = explode(":", $row['code']);
    2474. 

  2474.             $code_type = $tmp[0];
    2475. 

  2475.             $code = $tmp[1];
    2476. 

  2476.             $clt = xmlEscape($row['clinical_notes_type']);
    2477. 

  2477.             $clinical_notes .= "<$clt>" .
    2478. 

  2478.             '<clinical_notes_type>' . $clt . '</clinical_notes_type>
    2479. 

  2479.             <encounter>' . xmlEscape($row['encounter']) . '</encounter>
    2480. 

  2480.             <author_title>' . xmlEscape($row['title']) . '</author_title>
    2481. 

  2481.             <author_first>' . xmlEscape($row['fname']) . '</author_first>
    2482. 

  2482.             <author_last>' . xmlEscape($row['lname']) . '</author_last>
    2483. 

  2483.             <author_npi>' . xmlEscape($row['npi']) . '</author_npi>
    2484. 

  2484.             <facility_name>' . xmlEscape($row['name']) . '</facility_name>
    2485. 

  2485.             <facility_npi>' . xmlEscape($row['facility_npi']) . '</facility_npi>
    2486. 

  2486.             <facility_oid>' . xmlEscape($row['facility_oid']) . '</facility_oid>
    2487. 

  2487.             <code>' . xmlEscape($code) . '</code>
    2488. 

  2488.             <code_text>' . xmlEscape($row['codetext']) . '</code_text>
    2489. 

  2489.             <description>' . xmlEscape($row['description']) . '</description>
    2490. 

  2490.             <date>' . xmlEscape($row['date']) . '</date>
    2491. 

  2491.             <date_formatted>' . xmlEscape(str_replace("-", '', $row['date'])) . '</date_formatted>
    2492. 

  2492.             <code_type>' . xmlEscape($code_type) . "</code_type>
    2493. 

  2493.             </$clt>";
    2494. 

  2494.         }
    2495. 

  2495. 

  2496.         $clinical_notes .= '</clinical_notes>';
    2497. 

  2497.         return $clinical_notes;
    2498. 

  2498.     }
    2499. 

  2499. 

  2500.     public function getCareTeamProviderId($pid)
    2501. 

  2501.     {
    2502. 

  2502.         $appTable = new ApplicationTable();
    2503. 

  2503.         $query = "SELECT care_team_provider FROM patient_data WHERE `pid`  = ?";
    2504. 

  2504.         $result = $appTable->zQuery($query, array($pid));
    2505. 

  2505.         $row = $result->current();
    2506. 

  2506.         return $row['care_team_provider'];
    2507. 

  2507.     }
    2508. 

  2508. 

  2509.     public function getClinicalInstructions($pid, $encounter)
    2510. 

  2510.     {
    2511. 

  2511.         $wherCon = '';
    2512. 

  2512.         $sqlBindArray = [];
    2513. 

  2513.         if ($encounter) {
    2514. 

  2514.             $wherCon = " f.encounter = ? AND ";
    2515. 

  2515.             $sqlBindArray[] = $encounter;
    2516. 

  2516.         }
    2517. 

  2517. 

  2518.         $query = "SELECT fci.* FROM forms AS f
    2519. 

  2519.                 LEFT JOIN form_clinical_instructions AS fci ON fci.id = f.form_id
    2520. 

  2520.                 WHERE $wherCon f.pid = ? AND f.formdir = ? AND f.deleted = ?";
    2521. 

  2521.         array_push($sqlBindArray, $pid, 'clinical_instructions', 0);
    2522. 

  2522.         $appTable = new ApplicationTable();
    2523. 

  2523.         $res = $appTable->zQuery($query, $sqlBindArray);
    2524. 

  2524.         $clinical_instructions = '<clinical_instruction>';
    2525. 

  2525.         foreach ($res as $row) {
    2526. 

  2526.             $clinical_instructions .= '<item>' . xmlEscape($row['instruction']) . '</item>';
    2527. 

  2527.         }
    2528. 

  2528. 

  2529.         $clinical_instructions .= '</clinical_instruction>';
    2530. 

  2530.         return $clinical_instructions;
    2531. 

  2531.     }
    2532. 

  2532. 

  2533.     public function getReferrals($pid, $encounter)
    2534. 

  2534.     {
    2535. 

  2535.         // patched out because I can't think of a reason to send a list of referrals
    2536. 

  2536.         /*$wherCon = '';
    2537. 

  2537.         if ($encounter) {
    2538. 

  2538.             $wherCon = "ORDER BY date DESC LIMIT 1";
    2539. 

  2539.         }*/
    2540. 

  2540.         $wherCon = "ORDER BY date DESC LIMIT 1";
    2541. 

  2541. 

  2542.         $appTable = new ApplicationTable();
    2543. 

  2543.         $query = "SELECT field_value FROM transactions JOIN lbt_data ON form_id=id AND field_id = 'body' WHERE pid = ? $wherCon";
    2544. 

  2544.         $result = $appTable->zQuery($query, array($pid));
    2545. 

  2545.         $referrals = '<referral_reason>';
    2546. 

  2546.         foreach ($result as $row) {
    2547. 

  2547.             $referrals .= '<text>' . xmlEscape($row['field_value']) . '</text>';
    2548. 

  2548.         }
    2549. 

  2549. 

  2550.         $referrals .= '</referral_reason>';
    2551. 

  2551.         return $referrals;
    2552. 

  2552.     }
    2553. 

  2553. 

  2554.     public function getLatestEncounter($pid)
    2555. 

  2555.     {
    2556. 

  2556.         $encounter = '';
    2557. 

  2557.         $appTable = new ApplicationTable();
    2558. 

  2558.         $query = "SELECT encounter FROM form_encounter  WHERE pid = ? ORDER BY id DESC LIMIT 1";
    2559. 

  2559.         $result = $appTable->zQuery($query, array($pid));
    2560. 

  2560.         foreach ($result as $row) {
    2561. 

  2561.             $encounter = $row['encounter'];
    2562. 

  2562.         }
    2563. 

  2563. 

  2564.         return $encounter;
    2565. 

  2565.     }
    2566. 

  2566. 

  2567.     public function formatUid($str)
    2568. 

  2568.     {
    2569. 

  2569.         $sha = sha1($str);
    2570. 

  2570.         return substr(preg_replace('/^.{8}|.{4}/', '\0-', $sha, 4), 0, 36);
    2571. 

  2571.     }
    2572. 

  2572. }
    2573. 

  2573. 

  2574. ?>
    2575. 

  2575.