บันทึกบุหรี่3ล้าน3ปี jhcis

1.ตรวจสอบผลงาน ใน HDC ตามนี้ "กลุ่มรายงานมาตรฐาน >> ข้อมูลเพื่อตอบสนอง Service Plan สาขายาเสพติด"

2.ข้อ 9.9 ร้อยละผู้เข้าร่วมโครงการฯ และเลิกบุหรี่ได้ 6 เดือน

3.เป้าหมายคือ จำนวน อสม.X 3 และ ผู้เข้าร่วมโครงการสะสม 3 ปี @ ร้อยละ

เมื่อเห็นเป้าหมายแล้วต่อไปคือการบันทึกให้ผ่านตามเกณฑ์ HDC กำหนด ดังนี้
4.ก่อนอื่น ต้องรู้ก่อนว่า "ใครสูบบุหรี่" และ ใครบันทึกเข้าร่วมโครงการ 3ล้านฯแล้ว ให้ใช้ scpt ตามนี้จ้า
......................................
SELECT  p1.pid,p1.titlename,p1.fname,p1.lname,p1.birth,p1.sex,p1.screen_date,
p1.behv,sp1.dateserv,sp1.ppspecial FROM (SELECT p.pid,ct.titlename,p.fname,p.lname,p.birth,p.sex,nc.screen_date,
CASE WHEN nc.smoke = '2'THEN 'สูบนานครั้ง' WHEN nc.smoke = '3' THEN 'สูบเป็นครั้งคราว' WHEN nc.smoke = '4' THEN 'สูบเป็นประจำ' WHEN nc.smoke = '9' THEN 'ไม่ทราบ' ELSE ''END AS 'behv' FROM person p INNER JOIN ctitle ct on p.prename =ct.titlecode
INNER JOIN ncd_person_ncd_screen nc ON p.pid = nc.pid
 WHERE nc.screen_date BETWEEN '2018-10-01'AND CURDATE() AND nc.pid NOT IN (SELECT pd.pid from persondeath pd) AND nc.smoke <> '1'  GROUP BY p.pid) AS p1
LEFT JOIN (SELECT f43.pid,f43.dateserv,f43.ppspecial from f43specialpp f43 WHERE f43.dateserv BETWEEN '2018-10-01' AND CURDATE() AND LEFT(f43.ppspecial,3)= '1B5' GROUP BY f43.pid) AS sp1 ON p1.pid=sp1.pid
#WHERE sp1.ppspecial IS NULL
ORDER BY sp1.dateserv DESC,sp1.ppspecial DESC;
....................................
หมายเหตุ : จะนับเอาเฉพาะคนที่มีประวัติการสูบใน NCDScreen นะจ๊ะ
และ หากอยากได้เฉพาะราชื่อที่ยังไม่คีย์บุหรี่เลยในรอบปีงบฯ ที่ผ่านมา ให้เอา เครื่องหมาย  "#" ออกที่บรรทัด #WHERE sp1.ppspecial IS NULL แล้วรันดูอีกรอบจ้า
5.เมื่อรัน Scpt แล้วจะได้ ดังนี้
   - screen_date คือ วันรับบริการNCDScreenล่าสุด
   - behv คือ พฤติกรรมการสูบบุหรี่
   - dateserv คือ วันคัดกรองบุหรี่ และ
   - ppspecial  คือ รหัสคัดกรองบุหรี่
และหาก dateserve และ ppspecial เป็นช่องว่าง นั่นหมายถึง คนนี้ยังไม่ได้คัดกรองบุหรี่

6.นำรายชื่อมาบันทึกในJHCIS >> เข้ารับบริการ

7.บุหรี่/สุรา >>พฤติกรรมการสูบบุหรี่
 7.1 ไม่เคยสูบ(1ฺB52)  ติ๊ก 1 ที่
หมายเหตุ : ติ๊กตรงนี้ HDC ไม่นับ เข้าร่วมโครงการ3ล้านฯ..นั่นหมายถึง caseนี้ไม่นับเข้าหัวข้อ 9.9 ..แต่ข้ออื่นยังคงนับให้จ้า

7.2 สูบบุหรี่ (1B501,2,3,9) ติ๊ก 3-4 ที่ 
    คือ ติ๊ก 1-2 ที่ จาก 1B50X  และอีก 1 ที่จาก 1B53X (ติ๊กตามนี้ HDC ถึงจะนับเข้าร่วมโครงการ 3ล้านฯ.จ้า
8.การติดตาม แยกได้ 2 กรณี คือ
  8.1 ติดตาม ผู้ที่เคยสูบแต่เลิกแล้ว(1ฺB51) ติ๊ก 2 ที่ (หัวข้อนี้ เอาไว้ติดตาม คนที่เลิกบุหรี่ได้ 1 เดือน,3 เดือน, 6 เดือน) ซึ่ง HDC จะนับให้ โดยเฉพาะ เลิกได้ ครบ 6 เดือน (1B562)

  8.2 ติดตาม ผู้ที่สูบแต่เลิกยังไม่ได้ ตามนี้

9.วินิจฉัย Z71.6-การให้คำปรึกษาผู้ติดบุหรี่ (Auto Diag)

10.ตรวจสอบ รายชื่อ อสม.ที่กำหนดไว้ใน JHCIS และหลังคาเรือนที่รับผิดชอบ ตามนี้
....................................
SELECT h.pcucode,ct.titlename,p.fname,p.lname,RIGHT(h.villcode,2) AS'moo',
GROUP_CONCAT(h.hno) AS 'บ้านเลขที่รับผิดชอบ',COUNT(h.hno)AS 'จำนวนหลัง'
FROM house h INNER JOIN person p ON p.pid = h.pidvola
LEFT JOIN ctitle ct ON p.prename=ct.titlecode GROUP BY h.pidvola,h.villcode;
...................................
(ตัวอย่าง)

สรุป การบันทึกให้ได้ผู้ที่เข้าร่วมโครงการ 3ล้าน 3ปี ...ท่านต้องบันทึกคนที่สูบบุหรี่หรือเคยมีประวัติการสูบแต่เลิกแล้ว ...ตามหัวข้อ 7.2 และควรมีการติดตามในครั้งต่อๆมา...ตามหัวข้อ 8.1และ 8.2 นะจ๊ะ

เพิ่มเติม
1.ตรวจสอบจำนวนที่บันทึกได้ต่อวัน ตามนี้
...................................
SELECT f43.pcucodeperson,f43.dateserv,f43.ppspecial,f43.pcucode,
COUNT(DISTINCT f43.visitno) AS 'คีย์ต่อวัน',f43.servplace,f43.ppsplace
FROM f43specialpp f43 WHERE LEFT(f43.ppspecial,4)='1b50'
AND f43.dateserv BETWEEN '2018-10-01'AND CURDATE() GROUP BY f43.dateserv;
..................................
(Ex)

2.กรณี ให้บริการแล้วเลือก "ในสถานบริการ" (จากรูปด้านบนหากพบสถานบริการว่างและservplace เป็น 1 สามารถใช้ scpt ต่อไปนี้ อัพเดดได้จ้า
..............................
update f43specialpp f43
SET f43.ppsplace = f43.pcucode
WHERE f43.servplace ='1'

AND f43.dateserv BETWEEN '2018-10-01' AND CURDATE();
..............................
3.ก่อนส่ง 43 แฟ้ม ให้ตรวจสอบด้วยว่า แฟ้ม specialpp มี รหัส '1B50X' และ '1B53X' ต่อ 1 visit หรือไม่? หากมี ผ่าน...คั๊ก
(EX)

4.กรณีบันทึกไปมากแล้วแต่ผลงานไม่ขึ้น ให้ตรวจสอบดังนี้

 4.1 อาจเป็นเพราะบันทึก '1B50' อย่างเดียวแต่ลืม '1B53' ให้รันดูตามscpt นี้ 
.........................................................
SELECT vt1.pcucodeperson,vt1.visitno,vt1.pid,vt1.dateserv,vt1.Tdiag,vt2.ppspecial AS 'code1B53X' FROM (SELECT  f43.pcucodeperson,f43.pid,f43.dateserv,
GROUP_CONCAT(f43.ppspecial)AS 'Tdiag',f43.visitno FROM f43specialpp f43 
WHERE f43.dateserv BETWEEN '2018-10-01'AND CURDATE() AND LEFT(f43.ppspecial,4) in ('1b50') GROUP BY f43.visitno) AS vt1 LEFT JOIN (SELECT f43.pid,f43.dateserv,f43.ppspecial,f43.visitno FROM f43specialpp f43
WHERE LEFT(f43.ppspecial,4) in ('1b53') AND f43.dateserv BETWEEN '2018-10-01'AND CURDATE()) AS vt2 ON vt1.visitno = vt2.visitno 
WHERE vt1.Tdiag NOT IN ('1B51','1B52','1B542','1B552','1b562')
AND vt2.ppspecial IS NULL ORDER BY vt2.ppspecial ASC;
.......................................................
(ตัวอย่าง)
................................................
4.2 หรือดูรหัส 1ฺB5Xและ1B53X แบบภาพรวม ตามนี้
SELECT vt1.pcucodeperson,vt1.visitno,vt1.pid,vt1.dateserv,vt1.Tdiag,vt2.ppspecial AS 'code1B53' FROM (SELECT f43.pcucodeperson,f43.pid,f43.dateserv,GROUP_CONCAT(f43.ppspecial)AS 'Tdiag',f43.visitno FROM f43specialpp f43 WHERE f43.dateserv BETWEEN '2018-10-01'AND CURDATE() AND LEFT(f43.ppspecial,3) in ('1b5') GROUP BY f43.visitno) AS vt1 LEFT JOIN (SELECT f43.pid,f43.dateserv,f43.ppspecial,f43.visitno
FROM f43specialpp f43 WHERE LEFT(f43.ppspecial,4) in ('1b53') AND f43.dateserv BETWEEN '2018-10-01'AND CURDATE()) AS vt2 ON vt1.visitno = vt2.visitno
ORDER BY vt1.dateserv DESC;
...............................................


หมายเหตุ: ช่อง "Code1B53" หากเป็นช่องว่าง ให้ตามกลับไปบันทึกให้ครบนะจ๊ะ 
 ยกเว้น ที่ช่อง Tdiag มีรหัส ('1ฺฺB51','1B52 '1B42','1B52','1B62') ตัวใดตัวหนึ่ง ไม่ต้องกลับไปบันทึกจ้า
 4.3 นอกจากผู้เข้าร่วมโครงการแล้วยังมีอีกส่วนคือผู้ที่เลิกบุหรี่ได้ครบ 1.3. 6 เดือน  ซึ่งHDC นับผลงานจาก รหัส "1B542"."1B552"."1B562"
สามารถตรวจสอบผลงานการเลิกบุหรี่ได้ตาม script นี้จ้า
............................................................
SELECT f43.pcucodeperson,f43.pid,f43.visitno,ct.titlename,p.fname,p.lname,f43.dateserv,
case WHEN f43.ppspecial ='1b542' THEN 'เลิกบุหรี่  1 เดือน' WHEN f43.ppspecial ='1b552' THEN 'เลิกบุหรี่  3 เดือน'  WHEN f43.ppspecial ='1b562' THEN 'เลิกบุหรี่  6 เดือน' ELSE '' END AS 'พฤติกรรมสูบบุหรี่' FROM f43specialpp f43 INNER JOIN person p ON f43.pid=p.pid
LEFT JOIN ctitle ct ON p.prename=ct.titlecode WHERE f43.dateserv BETWEEN '2018-10-01'AND CURDATE() AND f43.ppspecial in ('1b512','1b552','1b562') AND p.typelive IN ('1','3')
GROUP BY f43.pid;
...........................................................




😁😁😁.......................มีแต่ใซ่..ใซ่และใซ่...มอตะไซต์บ่ซื้อให้จ๊ากๆๆๆเทือ.........💆💆💆



ไม่มีความคิดเห็น:

https://www.blogs

 kllgnsgkj[jtlm'oahd bfldkb'pdojgaojp mfigjdo;sjgaij misjgo;sjagijwo;