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.
888 lines
58 KiB
888 lines
58 KiB
2 years ago
|
<?php
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Upgrade script for access controls.
|
||
|
|
*
|
||
|
|
* This script will update the phpGACL database, which include
|
||
|
|
* Access Control Objects(ACO), Groups(ARO), and Access Control
|
||
|
|
* Lists(ACL) to the most recent version.
|
||
|
|
* It will display whether each update already exist
|
||
|
|
* or if it was updated succesfully.
|
||
|
|
* To avoid reversing customizations, upgrade is done in versions,
|
||
|
|
* which are recorded in the database. To add another version of
|
||
|
|
* changes, use the following template:
|
||
|
|
* <pre>// Upgrade for acl_version <acl_version_here>
|
||
|
|
* $upgrade_acl = <acl_version_here>;
|
||
|
|
* if ($acl_version < $upgrade_acl) {
|
||
|
|
* echo "<B>UPGRADING ACCESS CONTROLS TO VERSION ".$upgrade_acl.":</B></BR>";
|
||
|
|
*
|
||
|
|
* //Collect the ACL ID numbers.
|
||
|
|
* echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
*
|
||
|
|
* //Add new object Sections
|
||
|
|
* echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
*
|
||
|
|
* //Add new Objects
|
||
|
|
* echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
*
|
||
|
|
* //Update already existing Objects
|
||
|
|
* echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
*
|
||
|
|
* //Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
* // (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
* echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
*
|
||
|
|
* //Update the ACLs
|
||
|
|
* echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
*
|
||
|
|
* //DONE with upgrading to this version
|
||
|
|
* $acl_version = $upgrade_acl;
|
||
|
|
* }
|
||
|
|
* </pre>
|
||
|
|
*
|
||
|
|
* Updates included:
|
||
|
|
* <pre>---VERSION 1 ACL---
|
||
|
|
* 2.8.2
|
||
|
|
* Section "sensitivities" (Sensitivities):
|
||
|
|
* ADD normal Normal (Administrators, Physicians, Clinicians(addonly))
|
||
|
|
* ADD high High (Administrators, Physicians)
|
||
|
|
* Section "admin" (Administration):
|
||
|
|
* ADD super Superuser (Adminstrators)
|
||
|
|
* 2.8.4
|
||
|
|
* Section "admin" (Administration):
|
||
|
|
* ADD drugs Pharmacy Dispensary (Administrators, Physicians, Clinicians(write))
|
||
|
|
* ADD acl ACL Administration (Administrators)
|
||
|
|
* Section "sensitivities" (Sensitivities):
|
||
|
|
* EDIT high High (ensure the order variable is '20')
|
||
|
|
* Section "acct" (Accounting):
|
||
|
|
* ADD disc Price Discounting (Administrators, Physicians, Accounting(write))
|
||
|
|
* 3.0.2
|
||
|
|
* ADD Section "lists" (Lists):
|
||
|
|
* ADD default Default List (write,addonly optional) (Administrators)
|
||
|
|
* ADD state State List (write,addonly optional) (Administrators)
|
||
|
|
* ADD country Country List (write,addonly optional) (Administrators)
|
||
|
|
* ADD language Language List (write,addonly optional) (Administrators)
|
||
|
|
* ADD ethrace Ethnicity-Race List (write,addonly optional) (Administrators)
|
||
|
|
* ADD Section "placeholder" (Placeholder):
|
||
|
|
* ADD filler Placeholder (Maintains empty ACLs)
|
||
|
|
* ACL/Group doc addonly "Physicians" (filler aco)
|
||
|
|
* ACL/Group front addonly "Front Office" (filler aco)
|
||
|
|
* ACL/Group back addonly "Accounting" (filler aco)
|
||
|
|
* 3.3.0
|
||
|
|
* Section "patients" (Patients):
|
||
|
|
* ADD sign Sign Lab Results (Physicians)
|
||
|
|
* ACL/Group breakglass write "Emergency Login" (added all aco's to it)
|
||
|
|
* 4.1.0
|
||
|
|
* Section "nationnotes" (Nation Notes):
|
||
|
|
* ADD nn_configure Nation Notes Configure (Administrators, Emergency Login)
|
||
|
|
* Section "patientportal" (Patient Portal):
|
||
|
|
* ADD portal Patient Portal (Administrators, Emergency Login)
|
||
|
|
* 4.1.1
|
||
|
|
* ACL/Group doc wsome "Physicians" (filler aco)
|
||
|
|
* ACL/Group clin wsome "Clinicians" (filler aco)
|
||
|
|
* ACL/Group front wsome "Front Office" (filler aco)
|
||
|
|
* ACL/Group back wsome "Accounting" (filler aco)
|
||
|
|
* ACL/Group doc view "Physicians" (filler aco)
|
||
|
|
* ACL/Group clin view "Clinicians" (filler aco)
|
||
|
|
* ACL/Group front view "Front Office" (filler aco)
|
||
|
|
* ACL/Group back view "Accounting" (filler aco)
|
||
|
|
* 4.1.3
|
||
|
|
* Section "menus" (Menus):
|
||
|
|
* ADD modle Module (Administrators, Emergency Login)
|
||
|
|
* 5.0.1
|
||
|
|
* Section "patients" (Patients):
|
||
|
|
* ADD reminder Patient Reminders (Physicians,Clinicians(addonly))
|
||
|
|
* ADD alert Clinical Reminders/Alerts (Physicians,Clinicians,Front Office(view),Accounting(view))
|
||
|
|
* ADD disclosure Disclosures (Physicians,Clinicians(addonly))
|
||
|
|
* ADD rx Prescriptions (Physicians,Clinicians(addonly))
|
||
|
|
* ADD amendment Amendments (Physicians,Clinicians(addonly))
|
||
|
|
* ADD lab Lab Results (Physicians,Clinicians(addonly))
|
||
|
|
* ADD docs_rm Documents Delete (Administrators)
|
||
|
|
* Section "admin" (Administration):
|
||
|
|
* ADD multipledb Multipledb (Administrators)
|
||
|
|
* ADD menu Menu (Administrators)
|
||
|
|
* Section "groups" (Groups):
|
||
|
|
* ADD gadd View/Add/Update groups (Administrators)
|
||
|
|
* ADD gcalendar View/Create/Update groups appointment in calendar (Administrators,Physicians,Clinicians)
|
||
|
|
* ADD glog Group encounter log (Administrators,Physicians, Clinicians)
|
||
|
|
* ADD gdlog Group detailed log of appointment in patient record (Administrators)
|
||
|
|
* ADD gm Send message from the permanent group therapist to the personal therapist (Administrators)
|
||
|
|
* 5.0.2
|
||
|
|
* Section "patients" (Patients):
|
||
|
|
* ADD pat_rep Patient Report (Administrators)
|
||
|
|
* </pre>
|
||
|
|
*
|
||
|
|
* @package OpenEMR
|
||
|
|
* @link http://www.open-emr.org
|
||
|
|
* @author Brady Miller <brady.g.miller@gmail.com>
|
||
|
|
* @copyright Copyright (c) 2012-2017 Brady Miller <brady.g.miller@gmail.com>
|
||
|
|
* @license https://github.com/openemr/openemr/blob/master/LICENSE GNU General Public License 3
|
||
|
|
*/
|
||
|
|
|
||
|
|
// Checks if the server's PHP version is compatible with OpenEMR:
|
||
|
|
require_once(dirname(__FILE__) . "/src/Common/Compatibility/Checker.php");
|
||
|
|
$response = OpenEMR\Common\Compatibility\Checker::checkPhpVersion();
|
||
|
|
if ($response !== true) {
|
||
|
|
die(htmlspecialchars($response));
|
||
|
|
}
|
||
|
|
|
||
|
|
$ignoreAuth = true; // no login required
|
||
|
|
|
||
|
|
require_once('interface/globals.php');
|
||
|
|
|
||
|
|
use OpenEMR\Common\Acl\AclExtended;
|
||
|
|
|
||
|
|
$acl_version = AclExtended::getAclVersion();
|
||
|
|
if (empty($acl_version)) {
|
||
|
|
$acl_version = 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 1
|
||
|
|
$upgrade_acl = 1;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
//Get Administrator ACL ID number
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
//Get Doctor ACL ID Number
|
||
|
|
$doc_write = AclExtended::getAclIdNumber('Physicians', 'write');
|
||
|
|
//Get Clinician ACL with write access ID number
|
||
|
|
$clin_write = AclExtended::getAclIdNumber('Clinicians', 'write');
|
||
|
|
//Get Clinician ACL with addonly access ID number
|
||
|
|
$clin_addonly = AclExtended::getAclIdNumber('Clinicians', 'addonly');
|
||
|
|
//Get Receptionist ACL ID number
|
||
|
|
$front_write = AclExtended::getAclIdNumber('Front Office', 'write');
|
||
|
|
//Get Accountant ACL ID number
|
||
|
|
$back_write = AclExtended::getAclIdNumber('Accounting', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
//Add 'Sensitivities' object section (added in 2.8.2)
|
||
|
|
AclExtended::addObjectSectionAcl('sensitivities', 'Sensitivities');
|
||
|
|
//Add 'Lists' object section (added in 3.0.2)
|
||
|
|
AclExtended::addObjectSectionAcl('lists', 'Lists');
|
||
|
|
//Add 'Placeholder' object section (added in 3.0.2)
|
||
|
|
AclExtended::addObjectSectionAcl('placeholder', 'Placeholder');
|
||
|
|
//Add 'Nation Notes' object section (added in 4.1.0)
|
||
|
|
AclExtended::addObjectSectionAcl('nationnotes', 'Nation Notes');
|
||
|
|
//Add 'Patient Portal' object section (added in 4.1.0)
|
||
|
|
AclExtended::addObjectSectionAcl('patientportal', 'Patient Portal');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
//Add 'Normal' sensitivity object, order variable is default 10 (added in 2.8.2)
|
||
|
|
AclExtended::addObjectAcl('sensitivities', 'Sensitivities', 'normal', 'Normal');
|
||
|
|
//Add 'High' sensitivity object, order variable is set to 20 (added in 2.8.2)
|
||
|
|
AclExtended::addObjectAclWithOrder('sensitivities', 'Sensitivities', 'high', 'High', 20);
|
||
|
|
//Add 'Pharmacy Dispensary' object (added in 2.8.4)
|
||
|
|
AclExtended::addObjectAcl('admin', 'Administration', 'drugs', 'Pharmacy Dispensary');
|
||
|
|
//Add 'ACL Administration' object (added in 2.8.4)
|
||
|
|
AclExtended::addObjectAcl('admin', 'Administration', 'acl', 'ACL Administration');
|
||
|
|
//Add 'Price Discounting' object (added in 2.8.4)
|
||
|
|
AclExtended::addObjectAcl('acct', 'Accounting', 'disc', 'Price Discounting');
|
||
|
|
//Add 'Default List (write,addonly optional)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('lists', 'Lists', 'default', 'Default List (write,addonly optional)');
|
||
|
|
//Add 'State List (write,addonly optional)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('lists', 'Lists', 'state', 'State List (write,addonly optional)');
|
||
|
|
//Add 'Country List (write,addonly optional)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('lists', 'Lists', 'country', 'Country List (write,addonly optional)');
|
||
|
|
//Add 'Language List (write,addonly optional)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('lists', 'Lists', 'language', 'Language List (write,addonly optional)');
|
||
|
|
//Add 'Ethnicity-Race List (write,addonly optional)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('lists', 'Lists', 'ethrace', 'Ethnicity-Race List (write,addonly optional)');
|
||
|
|
//Add 'Placeholder (Maintains empty ACLs)' object (added in 3.0.2)
|
||
|
|
AclExtended::addObjectAcl('placeholder', 'Placeholder', 'filler', 'Placeholder (Maintains empty ACLs)');
|
||
|
|
//Add 'Sign Lab Results (write,addonly optional)' object (added in 3.3.0)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'sign', 'Sign Lab Results (write,addonly optional)');
|
||
|
|
//Add 'nationnotes' object (added in 4.1.0)
|
||
|
|
AclExtended::addObjectAcl('nationnotes', 'Nation Notes', 'nn_configure', 'Nation Notes Configure');
|
||
|
|
//Add 'patientportal' object (added in 4.1.0)
|
||
|
|
AclExtended::addObjectAcl('patientportal', 'Patient Portal', 'portal', 'Patient Portal');
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
//Ensure that 'High' sensitivity object order variable is set to 20
|
||
|
|
AclExtended::editObjectAcl('sensitivities', 'Sensitivities', 'high', 'High', 20);
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
//Add 'Physicians' ACL with 'addonly' and collect the ID number (added in 3.0.2)
|
||
|
|
$doc_addonly = AclExtended::addNewACL('Physicians', 'doc', 'addonly', 'Things that physicians can read and enter but not modify');
|
||
|
|
//Add 'Front Office' ACL with 'addonly' and collect the ID number (added in 3.0.2)
|
||
|
|
$front_addonly = AclExtended::addNewACL('Front Office', 'front', 'addonly', 'Things that front office can read and enter but not modify');
|
||
|
|
//Add 'Accounting' ACL with 'addonly' and collect the ID number (added in 3.0.2)
|
||
|
|
$back_addonly = AclExtended::addNewACL('Accounting', 'back', 'addonly', 'Things that back office can read and enter but not modify');
|
||
|
|
//Add 'Emergency Login' ACL with 'write' and collect the ID number (added in 3.3.0)
|
||
|
|
$emergency_write = AclExtended::addNewACL('Emergency Login', 'breakglass', 'write', 'Things that can use for emergency login, can read and modify');
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
//Insert the 'super' object from the 'admin' section into the Administrators group write ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'super', 'Superuser', 'write');
|
||
|
|
//Insert the 'high' object from the 'sensitivities' section into the Administrators group write ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'sensitivities', 'Sensitivities', 'high', 'High', 'write');
|
||
|
|
//Insert the 'normal' object from the 'sensitivities' section into the Administrators group write ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'sensitivities', 'Sensitivities', 'normal', 'Normal', 'write');
|
||
|
|
//Insert the 'high' object from the 'sensitivities' section into the Physicians group write ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'sensitivities', 'Sensitivities', 'high', 'High', 'write');
|
||
|
|
//Insert the 'normal' object from the 'sensitivities' section into the Physicians group write ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'sensitivities', 'Sensitivities', 'normal', 'Normal', 'write');
|
||
|
|
//Insert the 'normal' object from the 'sensitivities' section into the Clinicians group addonly ACL (added in 2.8.2)
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'sensitivities', 'Sensitivities', 'normal', 'Normal', 'addonly');
|
||
|
|
//Insert the 'drugs' object from the 'admin' section into the Administrators group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'drugs', 'Pharmacy Dispensary', 'write');
|
||
|
|
//Insert the 'drugs' object from the 'admin' section into the Physicians group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'admin', 'Administration', 'drugs', 'Pharmacy Dispensary', 'write');
|
||
|
|
//Insert the 'drugs' object from the 'admin' section into the Clinicians group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($clin_write, 'Clinicians', 'admin', 'Administration', 'drugs', 'Pharmacy Dispensary', 'write');
|
||
|
|
//Insert the 'acl' object from the 'admin' section into the Administrators group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'acl', 'ACL Administration', 'write');
|
||
|
|
//Insert the 'disc' object from the 'acct' section into the Administrators group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'acct', 'Accounting', 'disc', 'Price Discounting', 'write');
|
||
|
|
//Insert the 'disc' object from the 'acct' section into the Accounting group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($back_write, 'Accounting', 'acct', 'Accounting', 'disc', 'Price Discounting', 'write');
|
||
|
|
//Insert the 'disc' object from the 'acct' section into the Physicians group write ACL (added in 2.8.4)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'acct', 'Accounting', 'disc', 'Price Discounting', 'write');
|
||
|
|
//Insert the 'default' object from the 'lists' section into the Administrators group write ACL (added in 3.0.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'lists', 'Lists', 'default', 'Default List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'state' object from the 'lists' section into the Administrators group write ACL (added in 3.0.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'lists', 'Lists', 'state', 'State List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'country' object from the 'lists' section into the Administrators group write ACL (added in 3.0.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'lists', 'Lists', 'country', 'Country List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'language' object from the 'lists' section into the Administrators group write ACL (added in 3.0.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'lists', 'Lists', 'language', 'Language List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'race' object from the 'lists' section into the Administrators group write ACL (added in 3.0.2)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'lists', 'Lists', 'ethrace', 'Ethnicity-Race List (write,addonly optional)', 'write');
|
||
|
|
//Update ACLs for Emergency Login
|
||
|
|
//Insert the 'disc' object from the 'acct' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'acct', 'Accounting', 'disc', 'Price Discounting', 'write');
|
||
|
|
//Insert the 'bill' object from the 'acct' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'acct', 'Accounting', 'bill', 'Billing (write optional)', 'write');
|
||
|
|
//Insert the 'eob' object from the 'acct' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'acct', 'Accounting', 'eob', 'EOB Data Entry', 'write');
|
||
|
|
//Insert the 'rep' object from the 'acct' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'acct', 'Accounting', 'rep', 'Financial Reporting - my encounters', 'write');
|
||
|
|
//Insert the 'rep_a' object from the 'acct' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'acct', 'Accounting', 'rep_a', 'Financial Reporting - anything', 'write');
|
||
|
|
//Insert the 'calendar' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'calendar', 'Calendar Settings', 'write');
|
||
|
|
//Insert the 'database' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'database', 'Database Reporting', 'write');
|
||
|
|
//Insert the 'forms' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'forms', 'Forms Administration', 'write');
|
||
|
|
//Insert the 'practice' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'practice', 'Practice Settings', 'write');
|
||
|
|
//Insert the 'superbill' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'superbill', 'Superbill Codes Administration', 'write');
|
||
|
|
//Insert the 'users' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'users', 'Users/Groups/Logs Administration', 'write');
|
||
|
|
//Insert the 'batchcom' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'batchcom', 'Batch Communication Tool', 'write');
|
||
|
|
//Insert the 'language' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'language', 'Language Interface Tool', 'write');
|
||
|
|
//Insert the 'super' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'super', 'Superuser', 'write');
|
||
|
|
//Insert the 'drugs' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'drugs', 'Pharmacy Dispensary', 'write');
|
||
|
|
//Insert the 'acl' object from the 'admin' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'acl', 'ACL Administration', 'write');
|
||
|
|
//Insert the 'auth_a' object from the 'encounters' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'auth_a', 'Authorize - any encounters', 'write');
|
||
|
|
//Insert the 'coding_a' object from the 'encounters' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'coding_a', 'Coding - any encounters (write,wsome optional)', 'write');
|
||
|
|
//Insert the 'notes_a' object from the 'encounters' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'notes_a', 'Notes - any encounters (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'date_a' object from the 'encounters' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'date_a', 'Fix encounter dates - any encounters', 'write');
|
||
|
|
//Insert the 'default' object from the 'lists' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'lists', 'Lists', 'default', 'Default List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'state' object from the 'lists' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'lists', 'Lists', 'state', 'State List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'country' object from the 'lists' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'lists', 'Lists', 'country', 'Country List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'language' object from the 'lists' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'lists', 'Lists', 'language', 'Language List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'ethrace' object from the 'lists' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'lists', 'Lists', 'ethrace', 'Ethnicity-Race List (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'appt' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'appt', 'Appointments (write,wsome optional)', 'write');
|
||
|
|
//Insert the 'demo' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'demo', 'Demographics (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'med' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'med', 'Medical/History (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'trans' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'trans', 'Transactions (write optional)', 'write');
|
||
|
|
//Insert the 'docs' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'docs', 'Documents (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'notes' object from the 'patients' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'notes', 'Patient Notes (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'high' object from the 'sensitivities' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'sensitivities', 'Sensitivities', 'high', 'High', 'write');
|
||
|
|
//Insert the 'normal' object from the 'sensitivities' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'sensitivities', 'Sensitivities', 'normal', 'Normal', 'write');
|
||
|
|
//Insert the 'sign' object from the 'patients' section into the Physicians group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'sign', 'Sign Lab Results (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'sign' object from the 'nationnotes' section into the Administrators group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'nationnotes', 'Nation Notes', 'nn_configure', 'Nation Notes Configure', 'write');
|
||
|
|
//Insert the 'sign' object from the 'nationnotes' section into the Emergency Login group write ACL (added in 3.3.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'nationnotes', 'Nation Notes', 'nn_configure', 'Nation Notes Configure', 'write');
|
||
|
|
//Insert the 'patientportal' object from the 'patientportal' section into the Administrators group write ACL (added in 4.1.0)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patientportal', 'Patient Portal', 'portal', 'Patient Portal', 'write');
|
||
|
|
//Insert the 'patientportal' object from the 'patientportal' section into the Emergency Login group write ACL (added in 4.1.0)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patientportal', 'Patient Portal', 'portal', 'Patient Portal', 'write');
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 2
|
||
|
|
$upgrade_acl = 2;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
AclExtended::addNewACL('Physicians', 'doc', 'wsome', 'Things that physicians can read and partly modify');
|
||
|
|
AclExtended::addNewACL('Clinicians', 'clin', 'wsome', 'Things that clinicians can read and partly modify');
|
||
|
|
AclExtended::addNewACL('Front Office', 'front', 'wsome', 'Things that front office can read and partly modify');
|
||
|
|
AclExtended::addNewACL('Accounting', 'back', 'wsome', 'Things that back office can read and partly modify');
|
||
|
|
AclExtended::addNewACL('Physicians', 'doc', 'view', 'Things that physicians can only read');
|
||
|
|
AclExtended::addNewACL('Clinicians', 'clin', 'view', 'Things that clinicians can only read');
|
||
|
|
AclExtended::addNewACL('Front Office', 'front', 'view', 'Things that front office can only read');
|
||
|
|
AclExtended::addNewACL('Accounting', 'back', 'view', 'Things that back office can only read');
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 3
|
||
|
|
$upgrade_acl = 3;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
//Get Administrator ACL ID number
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
//Get Emergency ACL ID number
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
//Add 'Menus' object section (added in 4.1.3)
|
||
|
|
AclExtended::addObjectSectionAcl('menus', 'Menus');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
//Add 'modules' object (added in 4.1.3)
|
||
|
|
AclExtended::addObjectAcl('menus', 'Menus', 'modle', 'Modules');
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
//Insert the 'Modules' object from the 'Menus' section into the Administrators group write ACL (added in 4.1.3)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'menus', 'Menus', 'modle', 'Modules', 'write');
|
||
|
|
//Insert the 'Modules' object from the 'Menus' section into the Emergency Login group write ACL (added in 4.1.3)
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'menus', 'Menus', 'modle', 'Modules', 'write');
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 4
|
||
|
|
$upgrade_acl = 4;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
//Get Administrator ACL ID number
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
//Get Doctor ACL ID Number
|
||
|
|
$doc_write = AclExtended::getAclIdNumber('Physicians', 'write');
|
||
|
|
//Get Clinician ACL with write access ID number
|
||
|
|
$clin_write = AclExtended::getAclIdNumber('Clinicians', 'write');
|
||
|
|
//Get Clinician ACL with addonly access ID number
|
||
|
|
$clin_addonly = AclExtended::getAclIdNumber('Clinicians', 'addonly');
|
||
|
|
//Get Receptionist ACL ID number
|
||
|
|
$front_write = AclExtended::getAclIdNumber('Front Office', 'write');
|
||
|
|
//Get Accountant ACL ID number
|
||
|
|
$back_write = AclExtended::getAclIdNumber('Accounting', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
// echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
// Add 'Patient Reminders (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'reminder', 'Patient Reminders (write,addonly optional)');
|
||
|
|
// Add 'Clinical Reminders/Alerts (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)');
|
||
|
|
// Add 'Disclosures (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'disclosure', 'Disclosures (write,addonly optional)');
|
||
|
|
// Add 'Prescriptions (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'rx', 'Prescriptions (write,addonly optional)');
|
||
|
|
// Add 'Amendments (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'amendment', 'Amendments (write,addonly optional)');
|
||
|
|
// Add 'Lab Results (write,addonly optional)' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'lab', 'Lab Results (write,addonly optional)');
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
// echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
// echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
//Insert the 'reminder' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'reminder', 'Patient Reminders (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'alert' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'disclosure' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'disclosure', 'Disclosures (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'rx' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'rx', 'Prescriptions (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'amendment' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'amendment', 'Amendments (write,addonly optional)', 'write');
|
||
|
|
//Insert the 'lab' object from the 'patients' section into the Physicians group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'patients', 'Patients', 'lab', 'Lab Results (write,addonly optional)', 'write');
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
//This is a template for a new revision, when needed
|
||
|
|
// Upgrade for acl_version 5
|
||
|
|
$upgrade_acl = 5;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
//Get Accountant ACL ID number
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
// Add 'Groups' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectSectionAcl('groups', 'Groups');
|
||
|
|
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
// Add 'Multipledb' object (added in 5.0.1)
|
||
|
|
AclExtended::addObjectAcl('admin', 'Administration', 'multipledb', 'Multipledb');
|
||
|
|
AclExtended::addObjectAcl('groups', 'Groups', 'gadd', 'View/Add/Update groups');
|
||
|
|
AclExtended::addObjectAcl('groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar');
|
||
|
|
AclExtended::addObjectAcl('groups', 'Groups', 'glog', 'Group encounter log');
|
||
|
|
AclExtended::addObjectAcl('groups', 'Groups', 'gdlog', 'Group detailed log of appointment in patient record');
|
||
|
|
AclExtended::addObjectAcl('groups', 'Groups', 'gm', 'Send message from the permanent group therapist to the personal therapist');
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'groups', 'Groups', 'gadd', 'View/Add/Update groups', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'groups', 'Groups', 'glog', 'Group encounter log', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'groups', 'Groups', 'gdlog', 'Group detailed log of appointment in patient record', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'groups', 'Groups', 'gm', 'Send message from the permanent group therapist to the personal therapist', 'write');
|
||
|
|
//Insert the 'Multipledb' object from the 'admin' section into the Administrators group write ACL (added in 5.0.1)
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'multipledb', 'Multipledb', 'write');
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 6
|
||
|
|
$upgrade_acl = 6;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
$doc_write = AclExtended::getAclIdNumber('Physicians', 'write');
|
||
|
|
$clin_addonly = AclExtended::getAclIdNumber('Clinicians', 'addonly');
|
||
|
|
$clin_write = AclExtended::getAclIdNumber('Clinicians', 'write');
|
||
|
|
$front_view = AclExtended::getAclIdNumber('Front Office', 'view');
|
||
|
|
$front_write = AclExtended::getAclIdNumber('Front Office', 'write');
|
||
|
|
$back_view = AclExtended::getAclIdNumber('Accounting', 'view');
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
AclExtended::addObjectAcl('admin', 'Administration', 'menu', 'Menu');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'menu', 'Menu', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'encounters', 'Encounters', 'auth', 'Authorize - my encounters', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'encounters', 'Encounters', 'coding', 'Coding - my encounters (write,wsome optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'encounters', 'Encounters', 'notes', 'Notes - my encounters (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'encounters', 'Encounters', 'relaxed', 'Less-private information (write,addonly optional)', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'sign', 'Sign Lab Results (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'reminder', 'Patient Reminders (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'disclosure', 'Disclosures (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'rx', 'Prescriptions (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'amendment', 'Amendments (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'lab', 'Lab Results (write,addonly optional)', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'encounters', 'Encounters', 'auth', 'Authorize - my encounters', 'write');
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'encounters', 'Encounters', 'coding', 'Coding - my encounters (write,wsome optional)', 'write');
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'encounters', 'Encounters', 'notes', 'Notes - my encounters (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'encounters', 'Encounters', 'relaxed', 'Less-private information (write,addonly optional)', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar', 'write');
|
||
|
|
AclExtended::updateAcl($doc_write, 'Physicians', 'groups', 'Groups', 'glog', 'Group encounter log', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'trans', 'Transactions (write optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'reminder', 'Patient Reminders (write,addonly optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'disclosure', 'Disclosures (write,addonly optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'rx', 'Prescriptions (write,addonly optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'amendment', 'Amendments (write,addonly optional)', 'addonly');
|
||
|
|
AclExtended::updateAcl($clin_addonly, 'Clinicians', 'patients', 'Patients', 'lab', 'Lab Results (write,addonly optional)', 'addonly');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($clin_write, 'Clinicians', 'groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar', 'write');
|
||
|
|
AclExtended::updateAcl($clin_write, 'Clinicians', 'groups', 'Groups', 'glog', 'Group encounter log', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($front_view, 'Front Office', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'view');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($front_write, 'Front Office', 'groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar', 'write');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($back_view, 'Accounting', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'view');
|
||
|
|
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'multipledb', 'Multipledb', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'menu', 'Menu', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'auth', 'Authorize - my encounters', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'coding', 'Coding - my encounters (write,wsome optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'notes', 'Notes - my encounters (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'encounters', 'Encounters', 'relaxed', 'Less-private information (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'sign', 'Sign Lab Results (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'reminder', 'Patient Reminders (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'alert', 'Clinical Reminders/Alerts (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'disclosure', 'Disclosures (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'rx', 'Prescriptions (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'amendment', 'Amendments (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'lab', 'Lab Results (write,addonly optional)', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'groups', 'Groups', 'gadd', 'View/Add/Update groups', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'groups', 'Groups', 'gcalendar', 'View/Create/Update groups appointment in calendar', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'groups', 'Groups', 'glog', 'Group encounter log', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'groups', 'Groups', 'gdlog', 'Group detailed log of appointment in patient record', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'groups', 'Groups', 'gm', 'Send message from the permanent group therapist to the personal therapist', 'write');
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
// Upgrade for acl_version 7
|
||
|
|
$upgrade_acl = 7;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
AclExtended::addObjectAcl('admin', 'Administration', 'manage_modules', 'Manage modules');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'admin', 'Administration', 'manage_modules', 'Manage modules', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'admin', 'Administration', 'manage_modules', 'Manage modules', 'write');
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 8
|
||
|
|
$upgrade_acl = 8;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'docs_rm', 'Documents Delete');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'docs_rm', 'Documents Delete', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'docs_rm', 'Documents Delete', 'write');
|
||
|
|
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 9
|
||
|
|
$upgrade_acl = 9;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
$accounting_view = AclExtended::getAclIdNumber('Accounting', 'view');
|
||
|
|
$clinicians_view = AclExtended::getAclIdNumber('Clinicians', 'view');
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
$frontoffice_view = AclExtended::getAclIdNumber('Front Office', 'view');
|
||
|
|
$physicians_view = AclExtended::getAclIdNumber('Physicians', 'view');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
AclExtended::addObjectAcl('patients', 'Patients', 'pat_rep', 'Patient Report');
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'write');
|
||
|
|
AclExtended::updateAcl($accounting_view, 'Accounting', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
AclExtended::updateAcl($clinicians_view, 'Clinicians', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'write');
|
||
|
|
AclExtended::updateAcl($frontoffice_view, 'Front Office', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
AclExtended::updateAcl($physicians_view, 'Physicians', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 10
|
||
|
|
$upgrade_acl = 10;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$admin_write = AclExtended::getAclIdNumber('Administrators', 'write');
|
||
|
|
$emergency_write = AclExtended::getAclIdNumber('Emergency Login', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
AclExtended::addObjectSectionAcl('inventory', 'Inventory');
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'lots', 'Lots');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'sales', 'Sales');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'purchases', 'Purchases');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'transfers', 'Transfers');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'adjustments', 'Adjustments');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'consumption', 'Consumption');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'destruction', 'Destruction');
|
||
|
|
AclExtended::addObjectAcl('inventory', 'Inventory', 'reporting', 'Reporting');
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
//Rename "Pharmacy Dispensary" to "Inventory Administration".
|
||
|
|
AclExtended::editObjectAcl('admin', 'Administration', 'drugs', 'Inventory Administration', 10);
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'lots', 'Lots', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'sales', 'Sales', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'purchases', 'Purchases', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'transfers', 'Transfers', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'adjustments', 'Adjustments', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'consumption', 'Consumption', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'destruction', 'Destruction', 'write');
|
||
|
|
AclExtended::updateAcl($admin_write, 'Administrators', 'inventory', 'Inventory', 'reporting', 'Reporting', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'lots', 'Lots', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'sales', 'Sales', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'purchases', 'Purchases', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'transfers', 'Transfers', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'adjustments', 'Adjustments', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'consumption', 'Consumption', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'destruction', 'Destruction', 'write');
|
||
|
|
AclExtended::updateAcl($emergency_write, 'Emergency Login', 'inventory', 'Inventory', 'reporting', 'Reporting', 'write');
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 11
|
||
|
|
$upgrade_acl = 11;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$clin_write = AclExtended::getAclIdNumber('Clinicians', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
AclExtended::updateAcl($clin_write, 'Clinicians', 'encounters', 'Encounters', 'auth', 'Authorize - my encounters', 'write');
|
||
|
|
AclExtended::updateAcl($clin_write, 'Clinicians', 'encounters', 'Encounters', 'notes', 'Notes - my encounters (write,addonly optional)', 'write');
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
// Upgrade for acl_version 12
|
||
|
|
$upgrade_acl = 12;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
$accounting_view = AclExtended::getAclIdNumber('Accounting', 'view');
|
||
|
|
$frontoffice_view = AclExtended::getAclIdNumber('Front Office', 'view');
|
||
|
|
$frontoffice_write = AclExtended::getAclIdNumber('Front Office', 'write');
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
AclExtended::shiftAcl($accounting_view, 'Accounting', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
AclExtended::shiftAcl($frontoffice_view, 'Front Office', 'patients', 'Patients', 'pat_rep', 'Patient Report', 'view');
|
||
|
|
AclExtended::shiftAcl($frontoffice_write, 'Front Office', 'patients', 'Patients', 'trans', 'Transactions (write,wsome optional)', 'write');
|
||
|
|
AclExtended::shiftAcl($frontoffice_write, 'Front Office', 'patients', 'Patients', 'notes', 'Patient Notes (write,wsome optional)', 'write');
|
||
|
|
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* This is a template for a new revision, when needed
|
||
|
|
// Upgrade for acl_version 13
|
||
|
|
$upgrade_acl = 13;
|
||
|
|
if ($acl_version < $upgrade_acl) {
|
||
|
|
echo "<B>UPGRADING ACCESS CONTROLS TO VERSION " . $upgrade_acl . ":</B></BR>";
|
||
|
|
|
||
|
|
//Collect the ACL ID numbers.
|
||
|
|
echo "<B>Checking to ensure all the proper ACL(access control list) are present:</B></BR>";
|
||
|
|
|
||
|
|
//Add new object Sections
|
||
|
|
echo "<BR/><B>Adding new object sections</B><BR/>";
|
||
|
|
|
||
|
|
//Add new Objects
|
||
|
|
echo "<BR/><B>Adding new objects</B><BR/>";
|
||
|
|
|
||
|
|
//Update already existing Objects
|
||
|
|
echo "<BR/><B>Upgrading objects</B><BR/>";
|
||
|
|
|
||
|
|
//Add new ACLs here (will return the ACL ID of newly created or already existant ACL)
|
||
|
|
// (will also place in the appropriate group and CREATE a new group if needed)
|
||
|
|
echo "<BR/><B>Adding ACLs(Access Control Lists) and groups</B><BR/>";
|
||
|
|
|
||
|
|
//Update the ACLs
|
||
|
|
echo "<BR/><B>Updating the ACLs(Access Control Lists)</B><BR/>";
|
||
|
|
|
||
|
|
//DONE with upgrading to this version
|
||
|
|
$acl_version = $upgrade_acl;
|
||
|
|
}
|
||
|
|
*/
|
||
|
|
|
||
|
|
//All done
|
||
|
|
AclExtended::setAclVersion($acl_version);
|
||
|
|
echo "DONE upgrading access controls";
|