- แบบคัดกรองปัญหาสุราฯ คลิก
- แผนผังการคัดกรองปัญหาการดื่มสุราฯ +รหัส specialpp คลิก
- แบบรายงานสรุปผลการคัดกรองสุราฯ คลิก
การบันทึกการคัดกรอง
1.เลือกผู้รับบริการ และเข้าบันทึก (1) - (5) และเลือก บุหรี่/สุรา
2.จากแบบฟอร์ม ข้อคำถาม (ข้อ 1)ให้เลือกว่า เคย หรือ ไม่เคยดื่ม
2.1 กรณี
- "ไม่เคยดื่ม" ให้รหัส 1B600
- "เคยดื่มแต่หยุดมาแล้ว 1 ปี ขึ้นไป" ให้รหัส 1B601
(ตัวอย่าง)
และลงรหัส ดังนี้
3.ส่วนข้อ 2 -7 ให้ดูผลรวมคะแนนที่ได้ ช่องสุดท้ายด้านขวามือ
3.2 ระดับความเสี่ยง ตามผลรวมคะแนนที่ได้
(ตัวอย่าง ผลรวมได้ 27 คะแนน แสดงว่า เสี่ยงสูง)
วิธีลงรหัส ดังนี้
3.3เสี่ยงต่ำ(lower risk) คะแนน 0-10 ให้ รหัส 1B602 และ 1B610
3.4 เสี่ยงปานกลาง(Moderate risk)คะแนน 11-26 รหัส 1B603 และ 1B611
3.5 เสี่ยงสูง(High risk)คะแนน >= 27 รหัส 1B604 และ 1B611 + (refer) 1B612
3.6 อื่นๆ ..คือ ในข้อคำถาม ข้อ 2 "เคยดื่ม แต่ไม่ระบุรายละเอียด" ให้รหัส 1B609 (คือ สอบถามแล้วรู้ว่าดื่ม แต่ข้อมูลไม่ชัดเจน จึงจำเป็นต้องให้รหัสนี้จ้า)
4.scpt หากลุ่มเป้าหมาย 15 ปี ขึ้นไป เพื่อคัดกรองสุรา
.....................................
SELECT p.pid,ct.titlename,p.fname,p.lname,p.birth,getAgeYearNum(p.birth,CURDATE()) AS'อายุ (ปี)',p.idcard,h.hno,Right(h.villcode,2)AS 'moo' FROM person p INNER JOIN ctitle ct ON p.prename = ct.titlecode INNER JOIN house h ON p.hcode=h.hcode WHERE getAgeYearNum(p.birth,CURDATE())>='15' AND p.pid NOT IN (SELECT pd.pid FROM persondeath pd) ORDER BY p.birth DESC;
.....................................
5.scpt หาคนที่คัดกรองสุราแล้ว
....................................
SELECT f43.visitno,ct.titlename,p.pid,p.fname,p.lname,p.birth,p.sex,p.idcard,
h.hno,Right(h.villcode,2)AS 'moo',f43.dateserv,f43.ppspecial
FROM person p INNER JOIN ctitle ct ON p.prename = ct.titlecode
INNER JOIN house h ON p.hcode=h.hcode INNER JOIN f43specialpp f43 ON p.pid=f43.pid
WHERE f43.ppspecial IN ('1B600','1B601','1B602','1B603','1B604','1B609')
AND f43.dateserv BETWEEN '2020-10-01'AND CURDATE()
GROUP BY f43.pid ORDER BY dateserv DESC;
6.scpt หารายชื่อที่คัดกรองและที่ยังไม่คัดกรองสุรา ตามนี้
...................................
SELECT *
FROM (SELECT p.pid,ct.titlename,p.fname,p.lname,p.birth,getAgeYearNum(p.birth,CURDATE())AS'age',h.hno,RIGHT(h.villcode,2) AS'moo' FROM person p INNER JOIN ctitle ct ON p.prename = ct.titlecode
INNER JOIN house h ON p.hcode=h.hcode
WHERE getAgeYearNum(p.birth,CURDATE())>='15' AND p.typelive IN ('1','3') AND p.dischargetype ='9')as p1
LEFT JOIN
(SELECT f43.pid,f43.visitno,f43.dateserv,f43.ppspecial,
case WHEN f43.ppspecial = '1B600' THEN 'ผู้มารับบริการไม่เคยดื่มเครื่องดื่มแอลกอฮอล์ ตลอดชีวิตที่ผ่านมา'
WHEN f43.ppspecial = '1B601' THEN 'ผู้มารับบริการ เคยดื่มเครื่องดื่มแอลกอฮอล์ แต่เลิกดื่มมาแล้ว 1 ปีขึ้นไป'
WHEN f43.ppspecial = '1B602' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงต่ำ (คะแนน 0-10)'
WHEN f43.ppspecial = '1B603' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงปานกลาง (คะแนน 11-26)'
WHEN f43.ppspecial = '1B604' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงสูง (คะแนน 27 ขึ้นไป)'
WHEN f43.ppspecial = '1B609' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ไม่ระบุรายละเอียด' ELSE '' END AS 'level of risk'
FROM f43specialpp f43
WHERE f43.ppspecial IN ('1B600','1B601','1B602','1B603','1B604','1B609','1B610','1B611','1B612')
AND f43.dateserv BETWEEN '2019-10-01'AND CURDATE() GROUP BY f43.pid ORDER BY f43.dateserv) AS f3
ON p1.pid = f3.pid;
...................................หมายเหตุ: หากต้องการตรวจสอบรายชื่อเป็นปี 2564 ให้เปลี่ยน ข้อความที่ตำแหน่ง BETWEEN '2019-10-01' เป็น BETWEEN '2020-10-01'
7.scpt ออกรายงานสุรา
.....................................
SELECT f43.visitno,p.pid,f43.dateserv,ct.titlename,
p.fname,p.lname,p.birth,h.hno,Right(h.villcode,2)AS 'moo',f43.ppspecial,case WHEN f43.ppspecial = '1B600' THEN 'ผู้มารับบริการไม่เคยดื่มเครื่องดื่มแอลกอฮอล์ ตลอดชีวิตที่ผ่านมา'
WHEN f43.ppspecial = '1B601' THEN 'ผู้มารับบริการ เคยดื่มเครื่องดื่มแอลกอฮอล์ แต่เลิกดื่มมาแล้ว 1 ปีขึ้นไป' WHEN f43.ppspecial = '1B602' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงต่ำ (คะแนน 0-10)' WHEN f43.ppspecial = '1B603' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงปานกลาง (คะแนน 11-26)' WHEN f43.ppspecial = '1B604' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ในระดับเสี่ยงสูง (คะแนน 27 ขึ้นไป)' WHEN f43.ppspecial = '1B609' THEN 'ผู้มารับบริการ ดื่มเครื่องดื่มแอลกอฮอล์ ไม่ระบุรายละเอียด' ELSE '' END AS 'level of risk'
FROM person p INNER JOIN ctitle ct ON p.prename = ct.titlecode INNER JOIN house h ON p.hcode=h.hcode INNER JOIN f43specialpp f43 ON p.pid=h.pid WHERE f43.ppspecial IN ('1B600','1B601','1B602','1B603','1B604','1B609','1B610','1B611','1B612') AND f43.dateserv BETWEEN '2020-10-01'AND CURDATE() GROUP BY p.pid ORDER BY f43.dateserv DESC;
....................................
ไม่มีความคิดเห็น:
แสดงความคิดเห็น