ตัวอย่างรายงาน หนังสือรับรองยานอกบัญชี OPD & IPD
HOSxP Community
HOSxP Community Forum
HOSxP Community
ข่าว: SMF - Just Installed
 
*
ยินดีต้อนรับคุณ, บุคคลทั่วไป กรุณา เข้าสู่ระบบ หรือ ลงทะเบียน กันยายน 02, 2014, 01:55:10 AM


เข้าสู่ระบบด้วยชื่อผู้ใช้ รหัสผ่าน และระยะเวลาในเซสชั่น


หน้า: [1]   ลงล่าง
  พิมพ์  
ผู้เขียน หัวข้อ: ตัวอย่างรายงาน หนังสือรับรองยานอกบัญชี OPD & IPD  (อ่าน 4424 ครั้ง)
0 สมาชิก และ 0 บุคคลทั่วไป กำลังดูหัวข้อนี้ Send to Stock topic | Answer point : 0
naj
Hero Member
*****

Karma: -4
ออฟไลน์ ออฟไลน์

กระทู้: 2439


najhosxp@homail.com
ดูรายละเอียด เว็บไซต์
« เมื่อ: กุมภาพันธ์ 26, 2010, 12:59:21 PM »

CUSTOM-Finance  หนังสือรับรองเพื่อประกอบการเบิกจ่ายยานอกบัญชียาหลักแห่งชาติ รพ.หลวงพ่อเปิ่น กรณีเป็นคนไข้ OPD ขนาด A5
เพิ่มเติม
ผมได้เขียนให้ตรวจสอบเงื่อนในกรณีที่กรณีคนไข้นอกตรวจกับแพทย์แล้วแพทย์ส่งตรวจไปจุดอื่น เช่น ER แผนไทย  กายภาพ เวลาบันทึก ให้นำ ชื่อแพทย์ที่เป็น รคส (command_doctor ของตาราง ovst) มาแสดงแทน
CUSTOM-หนังสือรับรองยานอก ผู้ป่วยใน   กรณีเป็นคนไข้ IPD ครับ --ผมจะพิมพ์ตอนที่จำหน่ายคนไข้กลับบ้าน ขนาด A4
ตัวอย่าง code ที่ใช้ครับ
โค๊ด
  1. procedure Variable5OnCalc(var Value: Variant);

  2. begin

  3.  

  4. If  GetSQLIntegerData('select count(*) as dd from doctor where code="'+ DBPipeline['doctor']+'" '+

  5.      'and position_id="1"')=1  then

  6.       Value :='('+GetSQLStringData('select name from doctor where code="'+ DBPipeline['doctor']+'" ')+')'

  7.       else

  8.       Value :='('+GetSQLStringData('select name from doctor where code="'+ DBPipeline['command_doctor']+'" ')+')';

  9.  

  10. end;
Created by GeSHI 1.0.7.20
หมายเหตุ
ยังไม่ได้ลองกรณีที่ตรวจกับแพทยืมากกว่า 1 ท่านครับ ยังคิดไม่ออก Cheesy Cheesy Cheesy Cheesy
« แก้ไขครั้งสุดท้าย: กุมภาพันธ์ 26, 2010, 01:12:10 PM โดย naj » Thanks : (Manit, nahos, jdadmin1, srwood, Neo, grawat, pong3plas, aroonchai, blacksimon, pharmsena, carbopolnph, kookkaija, pakorn011, tont, mixer_79, supranee, autobotz, kittih) 113.53.150.9 (?)

Yindee And Tan
kitisak
Sr. Member
****

Karma: -2
ออฟไลน์ ออฟไลน์

กระทู้: 345


จะไม่ยอมแพ้..ต้องไปให้ถึง

kitisak_ping@hotmail.com
ดูรายละเอียด เว็บไซต์
« ตอบ #1 เมื่อ: กุมภาพันธ์ 26, 2010, 01:59:46 PM »

ขอบคุณ  อ.naj มากครับ จะนำไปประยุกต์ใช้  Grin Grin
Thanks : () 125.26.211.199 (?)

โรงพยาบาลเอราวัณ จ.เลย (ขนาด 30 เตียง)
MASTER:server "Acer" รุ่น G540
       Intel XEON Quad Core E5405(2.0GHz,L2 cache 12MB)
       OS CentOS 5.2  
RAM   ECC Fully BUFFER=4GB
HDD  SAS 146GB 15,000RPM = 3ลูก
GIgabit Ethernet = 2 port
SLAVE: server "ACER" รุ่น "altos G330 MK2"
            Ram 2GB
HOSxP version = 3.55.8.21
http://cloud1.hosxp.net/$

ขึ้นระบบ วันที่ 8 มกราคม 2552 
ขอขอบคุณ  อ.DECHA ,อ.อาร์ม  และทุกท่านในที่นี้ด้วยครับ

_____________________________________________

kitisak pingkasarn  Admin รพ.เอราวัณ จ.เลย
หน้า: [1]   ขึ้นบน
  พิมพ์  
 
กระโดดไป:  

Powered by MySQL Powered by PHP Powered by SMF 1.1 RC2 | SMF © 2001-2006, Lewis Media
Joomla Bridge by JoomlaHacks.com


Valid XHTML 1.0! Valid CSS! Dilber MC Theme by HarzeM
หน้านี้ถูกสร้างขึ้นภายในเวลา 0.034 วินาที กับ 25 คำสั่ง

กระทู้ล่าสุด

All recent post | Most value member | Topic stock
Copyright © 2006 Bangkok Medical Software Co.,Ltd.
SourceForge.net Logo web site monitoring tool