if (!isset($rows) || !$rows) {
require_once $root_path . 'include/care_api_classes/class_encounter.php';
require_once $root_path . 'include/care_api_classes/class_ward.php';
include_once $root_path . 'include/care_api_classes/class_insurance.php';
require_once $root_path . 'include/care_api_classes/class_department.php';
# Create encounter object
$encounter_obj = new Encounter();
# Load the wards info
$ward_obj = new Ward();
$items = 'nr,name';
$ward_info =& $ward_obj->getAllWardsItemsObject($items);
# Load the departments info
$dept_obj = new Department();
$medical_depts = $dept_obj->getAllMedical();
# Get all encounter classes
$encounter_classes = $encounter_obj->AllEncounterClassesObject();
# Get the insurance classes */
# Create new person�s insurance object */
$insurance_obj = new Insurance();
$insurance_classes =& $insurance_obj->getInsuranceClassInfoObject('class_nr,LD_var,name');
/* Load the discharge types */
$discharge_types =& $encounter_obj->getDischargeTypesData();
if (!$GLOBAL_CONFIG['patient_service_care_hide']) {
# Get the care service classes
$care_service = $encounter_obj->AllCareServiceClassesObject();
}
if (!$GLOBAL_CONFIG['patient_service_room_hide']) {
# Get the room service classes
$room_service = $encounter_obj->AllRoomServiceClassesObject();
}
if (!$GLOBAL_CONFIG['patient_service_att_dr_hide']) {
* CARE2X Integrated Hospital Information System beta 2.0.1 - 2004-07-04
* GNU General Public License
* Copyright 2002,2003,2004,2005 Elpidio Latorilla
* elpidio@care2x.org,
*
* See the file "copy_notice.txt" for the licence notice
*/
$thisfile = basename($_SERVER['PHP_SELF']);
if (!isset($mode)) {
$mode = 'show';
}
require './include/init_show.php';
# Get all encounter records of this person
$list_obj =& $person_obj->EncounterList($pid);
$rows = $person_obj->LastRecordCount();
//echo $obj->getLastQuery();
# Create encounter object
require_once $root_path . 'include/care_api_classes/class_encounter.php';
$enc_obj = new Encounter();
# Get all encounter classes & load in array
if ($eclass_obj = $enc_obj->AllEncounterClassesObject()) {
while ($ec_row = $eclass_obj->FetchRow()) {
$enc_class[$ec_row['class_nr']] = $ec_row;
}
}
$subtitle = $LDListEncounters;
$_SESSION['sess_file_return'] = $thisfile;
$buffer = str_replace('~tag~', $title . ' ' . $name_last, $LDNoRecordFor);
$norecordyet = str_replace('~obj~', strtolower($subtitle), $buffer);
/* Load GUI page */
require './gui_bridge/default/gui_show.php';
