2 error_reporting(E_COMPILE_ERROR|E_ERROR|E_CORE_ERROR
);
3 require('./roots.php');
4 require($root_path.'include/inc_environment_global.php');
6 * CARE2X Integrated Hospital Information System Deployment 2.2 - 2006-07-10
7 * GNU General Public License
8 * Copyright 2002,2003,2004,2005,2006 Elpidio Latorilla
11 * See the file "copy_notice.txt" for the licence notice
13 $lang_tables=array('person.php','actions.php');
14 define('LANG_FILE','stdpass.php');
15 define('NO_2LEVEL_CHK',1);
16 require_once($root_path.'include/inc_front_chain_lang.php');
18 require_once($root_path.'global_conf/areas_allow.php');
20 $allowedarea=&$allow_area['admit'];
21 $append=URL_REDIRECT_APPEND
;
22 //$fileforward='appt_show.php'.$append.'&origin=pass&target=list&dept_nr='.$dept_nr;
23 $fileforward='appt_show.php'.$append.'&origin=pass&target=list&dept_nr='.$dept_nr;
24 $lognote=$LDAppointments.'ok';
26 $thisfile=basename(__FILE__
);
27 # Set the break (return) file
28 switch($HTTP_SESSION_VARS['sess_user_origin']){
29 case 'amb': $breakfile=$root_path.'modules/ambulatory/ambulatory.php'.URL_APPEND
; break;
30 default: $breakfile=$root_path.'main/startframe.php'.URL_APPEND
;
33 $userck='aufnahme_user';
35 // reset all 2nd level lock cookies
36 setcookie($userck.$sid,'',0,'/');
37 require($root_path.'include/inc_2level_reset.php'); setcookie(ck_2level_sid
.$sid,'',0,'/');
39 require($root_path.'include/inc_passcheck_internchk.php');
40 if ($pass=='check') include($root_path.'include/inc_passcheck.php');
42 $errbuf=$LDAppointments;
44 require($root_path.'include/inc_passcheck_head.php');
47 <BODY onLoad
="document.passwindow.userid.focus();" bgcolor
=<?php
echo $cfg['body_bgcolor']; ?
>
48 <?php
if (!$cfg['dhtml']){ echo ' link='.$cfg['idx_txtcolor'].' alink='.$cfg['body_alink'].' vlink='.$cfg['idx_txtcolor']; } ?
>>
50 <FONT SIZE
=-1 FACE
="Arial">
55 if($dept) $buf.=' <nobr>:: '.$dept.'</nobr>';
57 <img '.createComIcon($root_path,'clockpaper.gif','0','top').'><FONT COLOR="'.$cfg['top_txtcolor'].'" SIZE=6 FACE="verdana"> <b>'.$buf.'</b></font>';
60 <table width
=100% border
=0 cellpadding
="0" cellspacing
="0">
62 <?php
require($root_path.'include/inc_passcheck_mask.php') ?
>
66 require($root_path.'include/inc_load_copyrite.php');