Delphi Tip
[HOSxP Tip] บันทึก Vaccine แบบ Offline

[HOSxP Tip] บันทึก Vaccine แบบ Offline

ต้องบอกก่อนว่าจัดทำขึ้นเพื่อ อำนวยความสะดวกให้กับเจ้าหน้าที่
– หากท่านไหน นำไปใช้แล้วมีข้อเสนอแนะ ติดชม ก็แจ้งมาได้นะครับ
– เริ่มกันเลย

– จุดประสงค์คือ เอาไว้บันทึกเฉพาะหน้าไปก่อน แล้วค่อยส่งเข้า Moph ic อีกทีภายหลังจากหน้างาน ฉีดวัคซีนเรียบร้อยแล้ว
– ถ้า Moph ic ทำงานปกติ ก็ไม่จำเป็นต้องใช้งานระบบนี้นะครับ

– หลักการทำงานก็ทำงานแบบ vn script ที่หน้าจอ ซักประวัติ นั้นเอง

  • หลังเลือกคนไข้แล้ว ก็จะแสดง หน้าจอเล็ก ๆ ว่าจะเลือกบันทึก ฉีดวัคซีน ( offline ) แบบคีย์แล้วยังไม่ต้องส่งเข้า moph ic
  • หน้าจอจะแสดงแค่บันทึกให้เลือก หรือ ดูว่ามีการบันทึกไปแล้วหรือไม่ ที่ ประวัติการฉีดวัคซีน Covid-19
  • หน้าจอที่แรกที่จะต้องบันทึก
  • หลังจากกดบันทึก ระบบจะเก็บข้อมูลตาราง ovst_vaccine , ovst_vaccine_screen , oapp , ovst_treatment_plan , treatment_plan_type_schedule และ vaccine_inventory_label เท่านั้นนะครับ

  • จะใช้ ชื่อ vn script ชื่อ Fovst_vaccine_edit_f นะครับ มีหน้าที่คือเอาไว้ กดปุ่ม บันทึก วันซีน (offline) นะครับ
  • ดาวโหลดได้ที่นี้ครับ
    ANTVaccineCovid_for_HOSxP_update_640920 *new
    – เพิ่มเวลานัดถัดไป และ เวลาสิ้นสุด ให้แล้ว
    *** ANTVaccineCovid_for_HOSxP_update_640920 (315 downloads ) ***
  • และ อีกฟอร์มคือ vn script ชื่อ SYS_VN_PRE_SCRIPT เพื่อเช็คว่ามารับบริการ งานวัคซีนใช่หรือไม่
  • เอา script นี้ไปวาง ใน SYS_VN_PRE_SCRIPT ตรงตำแหน่งที่ว่างๆ นะครับ เพื่อเอาไว้เช็ค ที่หน้าจอ คัดกรอง ว่าเงื่อนไขตรงหรือไม่

if getsqldata(‘select count(*)as cc from ovst ‘+
‘ where vn=”‘+fvn+'” ‘+
‘ and hn in(select hn from oapp where nextdate=curdate() and clinic=”‘+fclinic_vaccine+'”) ‘) > 0 then
begin
//showmessage(‘start key vaccine’);
RunHOSxP_ScriptProgram(‘Fovst_vaccine_edit_f’);
end;

  • เพิ่มปุ่มพิมพ์ใบนัด กรณีมาฉีดเข็ม 1 นะครับ
  • ประมาณนี้ครับ ลองทดสอบในฐานสำรองดูก่อนนะครับ ติดปัญหาอะไรก็แจ้งมาได้นะครับ
  • ขอบคุณที่ติดตามแล้วพบกันใหม่ครับ


Loading

ใส่ความเห็น

อีเมลของคุณจะไม่แสดงให้คนอื่นเห็น ช่องข้อมูลจำเป็นถูกทำเครื่องหมาย *

This site uses Akismet to reduce spam. Learn how your comment data is processed.