<?
//หา ip ของเครื่องที่ดูแสกนชาร์ท = $_SERVER["REMOTE_ADDR"]
//กรณีมี Proxy = $_SERVER["REMOTE_ADDRHTTP_X_FORWARDED_FOR"];
if(($_SERVER["REMOTE_ADDR"]<>"192.168.0.40") and ($_SERVER["REMOTE_ADDR"]<>"")){
$req_ip=$_SERVER["REMOTE_ADDRHTTP_X_FORWARDED_FOR"];
}else{
$req_ip=$_SERVER[""];
}
//connect HOS database
//echo 'Connected successfully';
//หา user ที่ online
$query = "SELECT kskloginname FROM onlineuser where computername='".$req_ip."' ";
$hosxpuser = $line[0];
//ตรวจสอบสิทธิการดู ในที่นี้ คือ admin, View_EMR
//ในอนาคตถ้ามีสิทธิ สำหรับดูแสกนชาร์ท ต่างหาก ก็มากำหนดตรงนี้
$query1 = "SELECT accessright FROM opduser where loginname='".$hosxpuser."' ";
$accessright = $line1[0];
//ถ้าสิทธิถูกต้อง
if(ereg("ADMIN",$accessright) or
ereg("View_EMR",$accessright)){ $an = $_REQUEST["an"];
$folder = "25".substr($an,0,2); $chartfile= "H:\\inpatient_ipd_card/".$folder."/".$an.".pdf";
//ตรวจสอบว่า มีเอกสารที่แสกนอยู่?
echo "ไม่พบเอกสารสแกนที่ต้องการ";
}else{
header('Content-type: application/pdf'); $tempscan = "H:\\temp_chart\\scan.pdf";
$showfile = "H:\\temp_chart\\scanW.pdf";
$chartfile= "H:\\inpatient_ipd_card\\".$folder."\\".$an.".pdf";
//copy chart ไปยัง folder ที่จะ stamp pdf
$cmd1 = "copy $chartfile $tempscan";
$time_req = date("d/m/Y H:i:s"); //stamp pdf รายละเอียด AN user เวลาที่เรียกดู
$cmd2 = "pdfstamp -PDF \"$tempscan\" -o \"$showfile\" -AT \"AN $an chart \\n Request by $hosxpuser \\n At $time_req \" -p9 -R45 -Opacity30 -fn300 -FS20 -C#44cc88 ";
//load fileที่ stamp แล้ว ไปแสดงผ่านเวบ
//เก็บ log เป็น text
$myFile = "H:\\charts\\viewhx.txt";
$fh = fopen($myFile, 'a') or
die("can't open file"); $stringData = "AN $an chart Request by $hosxpuser $req_ip At $time_req\n" ;
}
}else{
//กรณีไม่พบ useronline ใน hosxp
echo " ไม่มีสิทธิเปิดดูเอกสาร : no access right";
}
?>