BMS-HOSxP Community
HOSxP => Report Exchange => ข้อความที่เริ่มโดย: Khuad ที่ กรกฎาคม 22, 2009, 21:44:21 PM
-
... ลองทดสอบดูก่อนนะครับ ไม่รู้ตรงใจหรือเปล่า แต่ยังคงให้แสดงรายการได้หน้าละ 10 รายการเหมือนเดิมนะครับ(แต่รายละเอียดของผู้ป่วยจะมีทุกหน้าแล้วนะครับ) ....
... ส่วนของ variable ที่เกี่ยวกับวันนัด ของเดิมผมยังเก็บไว้อยู่นะครับ แต่ผมยกเลิกการเลือก visible เอาไว้ ...
... ให้แก้ไข lab_items_code ของ LAB ทั้งสามตัวให้ตรงกับของ หนองหาน ด้วยนะครับ ตัวละ 2 จุด ตามรูปที่แนบครับ ...
... ในส่วนของผล FBS ที่แสดงในฟอร์ม จะดูจาก ตาราง lab_order ก่อน ถ้าไม่มีข้อมูลที่ ตาราง lab_order ก็จะไปดูข้อมูลจาก ตาราง opdscreen สำหรับกรณีที่ส่งเสริมฯ ตรวจ DTX เองแล้วเอาผลไปลงที่หน้า Screen โดยไม่ผ่านระบบห้อง LAB ตามที่ได้บอกมานะครับ
ส่วนอีก 2 ตัวที่เหลือ ดูจาก ตาราง lab_order อย่างเดียวครับ ....
... เครื่องหมายถูกหน้ารายการ LAB ถ้ามีการสั่ง ถึงจะยังไม่มีการรายงานผล ก็จะแสดงนะครับ(สำหรับ FBS ถ้าไม่มีการสั่งผ่าน LAB ก็จะดูไปจาก ตาราง opdscreen ด้วยครับ)
ส่วนผลการตรวจที่มาจาก ตาราง lab_order ต้องมีการยืนยันผลด้วยนะครับ ถึงจะแสดงในฟอร์ม ....
... ส่วนตั้งครรภ์ กับ ให้นมบุตร เอามาจาก opdscreen ตามปกติ ส่วน ให้นมบุตร นี่ สงสัย อ.mn จะยังไม่ได้เอาไปแสดงที่หน้าจอห้องตรวจแพทย์ ผมหาไม่เจอเลย มีแต่ที่หน้าจอซักประวัติ ....
... ถ้าผิดพลาดตกหล่นตรงใหนก็แจ้งด้วยนะครับ ... :D ....
-
... ตัวฟอร์มใบสั่งยาครับ แต่ชื่อของฟอร์มจะเป็น FORM-Doctor-RxORDER-หนองหาน นะครับ
ถ้าจะใช้จริงๆ ค่อย save แล้วเปลี่ยนชื่อเป็น FORM-Doctor-RxORDER ..... :D ...
-
ขอบคุณอาจารย์ขวดมากครับ ห้องยาฝากมาอีกแล้วครับอยากได้ฟอร์มบันทึกรายการยากลับบ้านครับของผู้ป่วยในครับ ยังไงผมจะฝากทาง mail ให้เพื่อพิจารณาดูครับ
-
ขอเก็บอีกแล้วครับท่าน
-
ฝากให้อาจารย์ขวดครับ
ค่าของ FBS
s := GetSQLStringData('select l2.lab_order_result from lab_head l1 '+
'left outer join lab_order l2 on l2.lab_order_number = l1.lab_order_number '+
'where l1.vn = "'+DBPipeline['vn']+'" and l2.lab_items_code in("116","305","597") and l2.confirm = "Y" ') ;
Value := s;
if s = '' then
Value := GetSQLStringData('select fbs from opdscreen where vn = "'+DBPipeline['vn']+'" ') ;
ผลคือ ไม่ได้ตรวจจาก LAB และค่าใน opdscreen เป็น 0 จะโชว์ว่า เลือก FBS และแสดงค่า 0
สิ่งที่ต้องการคือ ถ้าไม่มีการตรวจ ไม่ต้องมีการเลือกและให้เป้นค่าว่างครับ
***********************************************************
ค่า Creatinine
Value := GetSQLStringData('select l2.lab_order_result from lab_head l1 '+
'left outer join lab_order l2 on l2.lab_order_number = l1.lab_order_number '+
'where l1.vn = "'+DBPipeline['vn']+'" and l2.lab_items_code in("114") and l2.confirm = "Y" ') ;
*****************************************************************
ค่า INR
Value := GetSQLStringData('select l2.lab_order_result from lab_head l1 '+
'left outer join lab_order l2 on l2.lab_order_number = l1.lab_order_number '+
'where l1.vn = "'+DBPipeline['vn']+'" and l2.lab_items_code in("78") and l2.confirm = "Y" ') ;
ขอบคุณล่วงหน้าครับ
-
ฝากให้อาจารย์ขวดครับ
... ต้องขออภัยด้วยนะครับ ไปดูตาราง opdscreen ของ version ที่ รพ. ผมใช้จริงอยู่ เลยไม่ได้สังเกตุว่า ใน version ใหม่ๆ fbs ใน opdscreen มีค่า default เป็น 0 แล้ว ;D ;D ...
... ขออนุญาตถามเพิ่มเติมนิดนะครับ เห็นในส่วนของ FBS ของพี่ pongsa มีอยู่ 3 ตัว ไม่ทราบว่า 3 รายการนี้มีโอกาสที่จะถูกสั่งตรวจพร้อมกันในคนไข้ visit เดียวกันบ้างหรือเปล่าครับ ... :D ....
-
ไม่น่าจะมีครับ สำหรับที่เอามาจาก opdscreen นี้สำหรับคนไข้ที่ตรวจที่ PCU โรงพยาบาล เขาเจาะน้ำตาลเองแล้งลงผลในหน้าซักประวัติ เท่าที่ทดสอบจากฐาน ถ้าหาเป้นการตรวจผ่านห้อง lab รายการ lab จะไม่มาปรากฎอยู่ใน opdscreen ครับ (สรุปถ้าเป้นค่าว่างให้เอาค่าจาก opdscreen มาแทนเลยครับ)
-
... แก้ไขให้แล้วนะครับ พี่ pongsa ลองทดสอบดูนะครับ ... :D ...
-
ขอบคุณครับ ประมาณ 3 ทุ่มจะรายงานผลครับ
-
ขอบคุณครับ ประมาณ 3 ทุ่มจะรายงานผลครับ
นี่ 4 ทุ่มกว่าแล้วครับ ได้ผลเป็นอย่างไรบ้าง ;) ;) ;) ;) ;)
-
นี่ 4 ทุ่มกว่าแล้วครับ ได้ผลเป็นอย่างไรบ้าง Wink Wink Wink Wink Wink
;D ;D ;D มิวายเก็บเล็กเก็บน้อยนะครับ ;D ;D ;D
-
รพ.หนองหาน พันธมิตร เยอะจริงๆ ;D ;D ;D ;D ;D ;D ;D ;D
-
ผลการทดสอบผ่านตลอดครับ ใช้ในฐานจริงอย่างเป็นทางการแล้วครับ