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';