BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: sulaiman_hosxp ที่ ธันวาคม 08, 2010, 08:18:34 AM

หัวข้อ: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: sulaiman_hosxp ที่ ธันวาคม 08, 2010, 08:18:34 AM
ตามรูป ไม่ทราบว่ามันเกิดจากอะไรครับ ในส่วนของการลงทะเบียนใหม่ ในสิทธิการรักษาครับ วันที่ออกบัตร และวันที่หมดอายุ เปลี่ยนเป็นปัจจุบันแล้ว แล้วก็ ตรวจสอบที่ NHSO แล้ว แต่พอเวลาเราพริ้ม ออก จะเป็น 30-9-2552
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ ธันวาคม 08, 2010, 08:24:02 AM
คงต้องตรวจสอบชุดคำสั่งที่ใช้แสดงสิทธิในปก OPDCARD หรือ ใบสั่งยา ด้วยน่ะครับ..ว่าดึงมาจากตารางไหน
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: sulaiman_hosxp ที่ ธันวาคม 08, 2010, 08:40:30 AM
ครับ ปกติใช้ได้ครับ พึ่งเป็นเช้าวันนี้เองครับ ผมจะแนบไฟล์ให้ดูครับ
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ ธันวาคม 08, 2010, 08:57:19 AM
ตาราง 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 ');


   ด้วยน่ะครับ

ใน
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: sulaiman_hosxp ที่ ธันวาคม 08, 2010, 09:06:05 AM
เพิ่มในส่วนใหนครับ
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ ธันวาคม 08, 2010, 09:12:57 AM
แก้ไขให้แล้ว...

ลองใช้อันนี้ดูครับ
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: sulaiman_hosxp ที่ ธันวาคม 22, 2010, 14:23:26 PM
แก้ไขให้แล้ว...

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

ผมลองใช้แล้วครับ ก็ยังเป็นอีกครับ สมมุติ หมดอายุ 31-12-2596 เวลาออก เป็นยังอีนๆ ครับ เป็นของปีนี้ครับ
ช่วยดูให้หน่อยครับท่าน
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ ธันวาคม 22, 2010, 14:42:55 PM
วันเริ่มใช้ แก้ไข เป็น

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']+'" ');
หัวข้อ: Re: opd card วันที่เปลี่ยน
เริ่มหัวข้อโดย: udomchok ที่ ธันวาคม 22, 2010, 19:27:56 PM
วันเริ่มใช้ แก้ไข เป็น

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