[vn script] สำหรับแจ้งเตือนว่าได้ Authen Code แล้ว

สำหรับ HOSxP V3 นะครับ
vn script สำหรับแจ้งเตือนว่า ได้รับการขอเลข Authen Code แล้ว

ชื่อว่า SYS_VN_PRE_SCRIPT และ visit_pttype_check
โดยผมจะดึงข้อมูลในตาราง visit_pttype ที่มีฟิวล์ auth_code เก็บอยู่นะครับ (โดยเราจะไปดาวโหลดหรือดึงข้อมูลจาก web new authen มาเก็บไว้ในฐาน hosxp ในตาราง visit_pttype ฟิล์ว auth_code อีกทีนะครับ จะทำทุกๆ 1 ชั่วโมง ก็ได้ )
ดาวโหลด script นี้ไปก่อนนะครับ เพื่อนำเข้าไปยังตาราง doraemon
visit_pttype_check
*** visit_pttype_check_u (49 downloads ) ***
*******
// โค้ดหลักๆ ประมาณนี้นะครับ ดึงข้อมูล ตาราง visit_pttype มาแสดง

visit_pttype_cds.close;
pttypelistcds.data := HOSxP_GetDataset(‘select i.*,p.name as pttype_name ‘ +
‘ from visit_pttype i ‘ +
‘ left outer join pttype p on p.pttype = i.pttype ‘ +
‘ where i.vn = “‘ + fvn + ‘” order by i.pttype_number’);

if pttypelistcds.recordcount > 0 then
begin
visit_pttype_cds.data :=
hosxp_getdataset(‘select o.hn,if(v.auth_code <>””,”Y”,”N”)as status, ‘+
‘ v.auth_code,concat(p.pname,p.fname,” “,p.lname)as ptname ‘+
‘ from visit_pttype v ‘+
‘ left outer join ovst o on o.vn=v.vn ‘+
‘ left outer join patient p on p.hn=o.hn ‘+
‘ where v.vn = “‘ + fvn +'” ‘);
begin_date_show.date := pttypelistcds[‘begin_date’];
expire_date_show.date := pttypelistcds[‘expire_date’];
end;
*****************

 

วิธีนำเข้า มีหลายแบบ เอาแบบที่ผมแนะนำละกัน
ดาวโหลด script ชื่อ visit_pttype_check แล้วทำการแตกไฟล์ zip ไว้
ต่อมาเปิด hosxp ไปเมนูสายฟ้า ( HOSxP SQL Query ) ไปที่แท็บ Script แล้วไปที่ช่อง File name สำหรับดึงไฟล์ .pas มาแล้วปุ่ม Run

กดปุ่ม brows เพื่อไปเลือกไฟล์ visit_pttype_check_u.pas แล้วกด open

ต่อมาก็กดปุ่ม Run (ครั้งแรก จะแจ้งเตือนว่ายังไม่ข้อมูลใน Global Value ของ VN ) ไม่เป็นไรข้ามไปได้ กด ok

ต่อมาทำการติ๊ก ช่อง Allow User Run แล้วค่อยมากดปุ่ม Save ตั้งชื่อ script นี้ว่า visit_pttype_check

เป็นอันเสร็จสำหรับนำเข้า script นี้นะครับ
ต่อมามาเขียน script ต่อที่ script ชื่อ SYS_VN_PRE_SCRIPT

เขียนต่อตรงไหนก็ได้ที่ว่างสำหรับให้มันทำงานก่อน หรือหลัง เงื่อนไขอันไหนก็ได้ (ในที่นี้ผมมี script หลายตัวที่ทำไว้อยู่แล้ว)

ผมจะใช้คำสั่ง (procudure ชื่อ RunHOSxP_ScriptProgram() เป็นตัวเรียก script ชื่อ visit_pttype_check ขึ้นมาอีกทีนะครับ
ต่อมาก็ติ๊ก Allow User Run แล้วกดปุ่ม Save ตามระเบียน

ต่อมาก็มาทดสอบการทำงานกัน โดยอย่าลืมเปิดการใช้งาน vn_script ก่อนใน system setting ด้วยนะครับ และกำหนด ห้อตรวจ ที่จะ ยอมให้ Run Pre processing vn script ด้วยนะครับ

ถ้าไม่มีอะไรผิดพลาด ระบบจะทำงานตามเงื่อนไขครับ ตามแผนกที่เราได้กำหนดไว้นั้นเองครับ

วิธีการดึงข้อมูล auth_code มาเก็บใน hosxp เราก็มี หลายวิธีนะครับ
ตัวอย่างดาวโหลดได้จากเว็บ authenservice.nhso.co.th

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