ผู้เขียน หัวข้อ: opd card วันที่เปลี่ยน  (อ่าน 4765 ครั้ง)

0 สมาชิก และ 2 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ sulaiman_hosxp

  • Sr. Member
  • ****
  • กระทู้: 420
  • Respect: -1
    • ดูรายละเอียด
opd card วันที่เปลี่ยน
« เมื่อ: ธันวาคม 08, 2010, 08:18:34 AM »
0
ตามรูป ไม่ทราบว่ามันเกิดจากอะไรครับ ในส่วนของการลงทะเบียนใหม่ ในสิทธิการรักษาครับ วันที่ออกบัตร และวันที่หมดอายุ เปลี่ยนเป็นปัจจุบันแล้ว แล้วก็ ตรวจสอบที่ NHSO แล้ว แต่พอเวลาเราพริ้ม ออก จะเป็น 30-9-2552
HOSPITAL YINGOฯ
SERVER>>>DELL PowerEdge
RAM>>> 4Gb
LINUX>>> CentOS 7
HOsXP>>>3.60.6.10
MySQL>>>mysql 5.1.39

ออฟไลน์ เกื้อกูล ครับ..

  • Hero Member
  • *****
  • กระทู้: 12,611
  • Respect: +169
    • ดูรายละเอียด
    • โรงพยาบาลปากท่อ
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #1 เมื่อ: ธันวาคม 08, 2010, 08:24:02 AM »
0
คงต้องตรวจสอบชุดคำสั่งที่ใช้แสดงสิทธิในปก OPDCARD หรือ ใบสั่งยา ด้วยน่ะครับ..ว่าดึงมาจากตารางไหน
Implement  HOSxP  Start 2548 ---> NOW!
Station : 140 Client   V.3 Version  3.67.7.8
Server  : CENTOS 7 +MySQL maria 10.x.x

ออฟไลน์ sulaiman_hosxp

  • Sr. Member
  • ****
  • กระทู้: 420
  • Respect: -1
    • ดูรายละเอียด
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #2 เมื่อ: ธันวาคม 08, 2010, 08:40:30 AM »
0
ครับ ปกติใช้ได้ครับ พึ่งเป็นเช้าวันนี้เองครับ ผมจะแนบไฟล์ให้ดูครับ
HOSPITAL YINGOฯ
SERVER>>>DELL PowerEdge
RAM>>> 4Gb
LINUX>>> CentOS 7
HOsXP>>>3.60.6.10
MySQL>>>mysql 5.1.39

ออฟไลน์ เกื้อกูล ครับ..

  • Hero Member
  • *****
  • กระทู้: 12,611
  • Respect: +169
    • ดูรายละเอียด
    • โรงพยาบาลปากท่อ
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #3 เมื่อ: ธันวาคม 08, 2010, 08:57:19 AM »
0
ตาราง pttypeno   บาง  HN จะมีข้อมูลสิทธิมากกว่า 1 record ครับ..
ถ้าจะใช้ข้อมูล  อาจจะต้องเพิ่ม

Value :=   GetSQLdateData('select expiredate from pttypeno where hn="'+DBPipeline['hn']+'" order by expiredate desc limit 1 ');


กับ

Value :=   GetSQLdateData('select begindate from pttypeno where hn="'+DBPipeline['hn']+'" order by begindate desc limit 1 ');


   ด้วยน่ะครับ

ใน
Implement  HOSxP  Start 2548 ---> NOW!
Station : 140 Client   V.3 Version  3.67.7.8
Server  : CENTOS 7 +MySQL maria 10.x.x

ออฟไลน์ sulaiman_hosxp

  • Sr. Member
  • ****
  • กระทู้: 420
  • Respect: -1
    • ดูรายละเอียด
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #4 เมื่อ: ธันวาคม 08, 2010, 09:06:05 AM »
0
เพิ่มในส่วนใหนครับ
HOSPITAL YINGOฯ
SERVER>>>DELL PowerEdge
RAM>>> 4Gb
LINUX>>> CentOS 7
HOsXP>>>3.60.6.10
MySQL>>>mysql 5.1.39

ออฟไลน์ เกื้อกูล ครับ..

  • Hero Member
  • *****
  • กระทู้: 12,611
  • Respect: +169
    • ดูรายละเอียด
    • โรงพยาบาลปากท่อ
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #5 เมื่อ: ธันวาคม 08, 2010, 09:12:57 AM »
0
แก้ไขให้แล้ว...

ลองใช้อันนี้ดูครับ
Implement  HOSxP  Start 2548 ---> NOW!
Station : 140 Client   V.3 Version  3.67.7.8
Server  : CENTOS 7 +MySQL maria 10.x.x

ออฟไลน์ sulaiman_hosxp

  • Sr. Member
  • ****
  • กระทู้: 420
  • Respect: -1
    • ดูรายละเอียด
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #6 เมื่อ: ธันวาคม 22, 2010, 14:23:26 PM »
0
แก้ไขให้แล้ว...

ลองใช้อันนี้ดูครับ

ผมลองใช้แล้วครับ ก็ยังเป็นอีกครับ สมมุติ หมดอายุ 31-12-2596 เวลาออก เป็นยังอีนๆ ครับ เป็นของปีนี้ครับ
ช่วยดูให้หน่อยครับท่าน
HOSPITAL YINGOฯ
SERVER>>>DELL PowerEdge
RAM>>> 4Gb
LINUX>>> CentOS 7
HOsXP>>>3.60.6.10
MySQL>>>mysql 5.1.39

ออฟไลน์ เกื้อกูล ครับ..

  • Hero Member
  • *****
  • กระทู้: 12,611
  • Respect: +169
    • ดูรายละเอียด
    • โรงพยาบาลปากท่อ
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #7 เมื่อ: ธันวาคม 22, 2010, 14:42:55 PM »
0
วันเริ่มใช้ แก้ไข เป็น

Value :=   GetSQLdateData('select begindate from ptcardno where hn="'+DBPipeline['hn']+'" and ptrightcode="'+DBPipeline['PtRightCode']+'"');

วันหมดอายุ แก้ไข เป็น

Value :=   GetSQLdateData('select expiredate from pttypeno where hn="'+DBPipeline['hn']+'" and ptrightcode="'+DBPipeline['PtRightCode']+'" ');
« แก้ไขครั้งสุดท้าย: ธันวาคม 22, 2010, 14:45:26 PM โดย Kuakool.. »
Implement  HOSxP  Start 2548 ---> NOW!
Station : 140 Client   V.3 Version  3.67.7.8
Server  : CENTOS 7 +MySQL maria 10.x.x

ออฟไลน์ udomchok

  • Hero Member
  • *****
  • กระทู้: 8,358
  • Respect: +589
    • ดูรายละเอียด
    • ร.พ.สมเด็จพระสังฆราช องค์ที่ 17
Re: opd card วันที่เปลี่ยน
« ตอบกลับ #8 เมื่อ: ธันวาคม 22, 2010, 19:27:56 PM »
0
วันเริ่มใช้ แก้ไข เป็น

Value :=   GetSQLdateData('select begindate from ptcardno where hn="'+DBPipeline['hn']+'" and ptrightcode="'+DBPipeline['PtRightCode']+'"');

วันหมดอายุ แก้ไข เป็น

Value :=   GetSQLdateData('select expiredate from pttypeno where hn="'+DBPipeline['hn']+'" and ptrightcode="'+DBPipeline['PtRightCode']+'" ');
แล้วไม่เอา order by แถมไปด้วยล่ะ  ;D ;D
ทำด้วยหัวใจร.พ.สมเด็จพระสังฆราช องค์ที่ 17 อ.สองพี่น้อง จ.สุพรรณบุรี
อบรมโดย BMS Team เมื่อ พ.ย. 49 ขึ้นระบบห้องบัตรเมื่อ X'Mas 2007
2008 : X-Ray กายภาพบำบัด แพทย์แผนไทย กิจกรรมบำบัด OPD ตา
2009 : ทันตกรรม ห้องตรวจตา OPD (พยาบาลและห้องตรวจแพทย์บางห้อง)