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.
33 lines
947 B
33 lines
947 B
<?php |
|
|
|
/** |
|
* Encounter form new script. |
|
* |
|
* @package OpenEMR |
|
* @link http://www.open-emr.org |
|
* @author Brady Miller <brady.g.miller@gmail.com> |
|
* @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(__DIR__ . "/../../globals.php"); |
|
require_once("$srcdir/lists.inc"); |
|
require_once("$srcdir/patient.inc"); |
|
|
|
use OpenEMR\Common\Acl\AclMain; |
|
|
|
// Check permission to create encounters. |
|
$tmp = getPatientData($pid, "squad"); |
|
if ( |
|
($tmp['squad'] && ! AclMain::aclCheckCore('squads', $tmp['squad'])) || |
|
!AclMain::aclCheckForm('newpatient', '', array('write', 'addonly')) |
|
) { |
|
// TODO: why is this reversed? |
|
echo "<body>\n<html>\n"; |
|
echo "<p>(" . xlt('New encounters not authorized') . ")</p>\n"; |
|
echo "</body>\n</html>\n"; |
|
exit(); |
|
} |
|
|
|
$viewmode = false; |
|
require_once("common.php");
|
|
|