You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
41 lines
1.8 KiB
41 lines
1.8 KiB
<?php |
|
|
|
/** |
|
* Encounter form report function. |
|
* |
|
* @package OpenEMR |
|
* @link http://www.open-emr.org |
|
* @author Amiel Elboim <amielel@matrix.co.il> |
|
* @author Shachar Zilbershlag <shaharzi@matrix.co.il> |
|
* @author Brady Miller <brady.g.miller@gmail.com> |
|
* @copyright Copyright (c) 2016 Shachar Zilbershlag <shaharzi@matrix.co.il> |
|
* @copyright Copyright (c) 2016 Amiel Elboim <amielel@matrix.co.il> |
|
* @copyright Copyright (c) 2019 Brady Miller <brady.g.miller@gmail.com> |
|
* @license https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3 |
|
*/ |
|
|
|
require_once(dirname(__file__) . "/../../globals.php"); |
|
require_once("$srcdir/group.inc"); |
|
|
|
use OpenEMR\Common\Acl\AclMain; |
|
|
|
function newGroupEncounter_report($group_id, $encounter, $cols, $id) |
|
{ |
|
$res = sqlStatement("select * from form_groups_encounter where group_id=? and id=?", array($group_id,$id)); |
|
print "<table><tr><td>\n"; |
|
while ($result = sqlFetchArray($res)) { |
|
print "<span class='font-weight-bold'>" . xlt('Facility') . ": </span><span class='text'>" . text($result["facility"]) . "</span><br />\n"; |
|
if (AclMain::aclCheckCore('sensitivities', $result['sensitivity'])) { |
|
print "<span class='font-weight-bold'>" . xlt('Reason') . ": </span><span class='text'>" . nl2br(text($result["reason"])) . "</span><br />\n"; |
|
$counselors = ''; |
|
foreach (explode(',', $result["counselors"]) as $userId) { |
|
$counselors .= getUserNameById($userId) . ', '; |
|
} |
|
|
|
$counselors = rtrim($counselors, ", "); |
|
print "<span class='font-weight-bold'>" . xlt('Counselors') . ": </span><span class='text'>" . nl2br(text($counselors)) . "</span><br />\n"; |
|
} |
|
} |
|
|
|
print "</td></tr></table>\n"; |
|
}
|
|
|