ผู้เขียน หัวข้อ: หน่วยปฐมภูมิขอรายงานอันดับโรคระดับหมู่บ้าน ช่วยหน่อยครับ  (อ่าน 4325 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ mixer_79

  • Hero Member
  • *****
  • กระทู้: 670
  • กำลังใจในการทำงาน
  • Respect: +1
    • ดูรายละเอียด
หน่วยปฐมภูมิขอรายงานอันดับโรคระดับหมู่บ้าน ช่วยหน่อยครับ
พี่เขาขอรายงานอันดับโรคผู้ป่วยที่มารับบริการในโรงพยาบาลแยกเป็นรายหมู่บ้าน
พอดีเขียนจะให้ออกที่ReportDesigner แล้วยังติดที่เวลาเลือกวันที่--->รหัสจังหวัด อำเภอ ตำบล (ผมใช้ vn_stat.aid  ไม่แน่ใจว่าที่อื่นใช้ตัวนี้ไหม)----->รหัสหมู่บ้าน
ช่วยดูCode ให้หน่อยนะครับ พอดีติดไม่รู้ว่าจะไปยังไงต่อ
begin
      GetDateRangeDialog(date1,date2);
      ds1:= FormatDateTime('yyyy-mm-dd', date1);
      ds2:= FormatDateTime('yyyy-mm-dd', date2);
      pod :=GetPickupList('select aid from vn_stat  ');
      pod :=GetSQLStringData('select aid from vn_stat  where aid = "'+pod +'"');
      ChangeReportSQL('   SELECT vn_stat.pdx, Count(vn_stat.pdx) AS cc'+
'   FROM ovst INNER JOIN'+
'  vn_stat ON vn_stat.vn = ovst.vn INNER JOIN'+
'  patient ON patient.hn = vn_stat.hn'+
'   WHERE vn_stat.vstdate BETWEEN "'+ds1+'" AND "'+ds2+'" AND'+
'  patient.moopart IN ("7", "07") AND vn_stat.aid = "'+pod +'"'+
'   GROUP BY vn_stat.pdx'+
'   ORDER BY Count(vn_stat.pdx) DESC');

end;
นายทองคูณ พรมผักแว่น 0819550235
โรงพยาบาลสีคิ้ว อ.สีคิ้ว จ.นครราชสีมา 30140  
รพ.ขนาด 90 เตียง   thongkoon13@gmail.com
เริ่มใช้โปรแกรม 05 มีนาคม 2553
HOSxP V.3.56.2.15
______________________________________

ออฟไลน์ mixer_79

  • Hero Member
  • *****
  • กระทู้: 670
  • กำลังใจในการทำงาน
  • Respect: +1
    • ดูรายละเอียด
ช่วยหน่อยครับ
นายทองคูณ พรมผักแว่น 0819550235
โรงพยาบาลสีคิ้ว อ.สีคิ้ว จ.นครราชสีมา 30140  
รพ.ขนาด 90 เตียง   thongkoon13@gmail.com
เริ่มใช้โปรแกรม 05 มีนาคม 2553
HOSxP V.3.56.2.15
______________________________________

ออฟไลน์ Bordin

  • Hero Member
  • *****
  • กระทู้: 1,089
  • อย่าคิดว่าทำไม่ได้ ถ้ายังไม่ลองทำ
  • Respect: +1
    • ดูรายละเอียด
    • ADMIN PCB. sz
หน่วยปฐมภูมิขอรายงานอันดับโรคระดับหมู่บ้าน ช่วยหน่อยครับ
พี่เขาขอรายงานอันดับโรคผู้ป่วยที่มารับบริการในโรงพยาบาลแยกเป็นรายหมู่บ้าน
พอดีเขียนจะให้ออกที่ReportDesigner แล้วยังติดที่เวลาเลือกวันที่--->รหัสจังหวัด อำเภอ ตำบล (ผมใช้ vn_stat.aid  ไม่แน่ใจว่าที่อื่นใช้ตัวนี้ไหม)----->รหัสหมู่บ้าน
ช่วยดูCode ให้หน่อยนะครับ พอดีติดไม่รู้ว่าจะไปยังไงต่อ
begin
      GetDateRangeDialog(date1,date2);
      ds1:= FormatDateTime('yyyy-mm-dd', date1);
      ds2:= FormatDateTime('yyyy-mm-dd', date2);
      pod :=GetPickupList('select aid from vn_stat  ');
      pod :=GetSQLStringData('select aid from vn_stat  where aid = "'+pod +'"');
      ChangeReportSQL('   SELECT vn_stat.pdx, Count(vn_stat.pdx) AS cc'+
'   FROM ovst INNER JOIN'+
'  vn_stat ON vn_stat.vn = ovst.vn INNER JOIN'+
'  patient ON patient.hn = vn_stat.hn'+
'   WHERE vn_stat.vstdate BETWEEN "'+ds1+'" AND "'+ds2+'" AND'+
'  patient.moopart IN ("7", "07") AND vn_stat.aid = "'+pod +'"'+
'   GROUP BY vn_stat.pdx'+
'   ORDER BY Count(vn_stat.pdx) DESC');

end;


มันก็ได้เหมือนกันครับ vn_stat.aid ก็คือรหัสจังหวัด อำเภอ ตำบล

หรือจะใช้ patient.chwpart patient.amppart patient.tmbpart ก็ได้

ออฟไลน์ udomchok

  • Hero Member
  • *****
  • กระทู้: 8,358
  • Respect: +589
    • ดูรายละเอียด
    • ร.พ.สมเด็จพระสังฆราช องค์ที่ 17
ทำด้วยหัวใจร.พ.สมเด็จพระสังฆราช องค์ที่ 17 อ.สองพี่น้อง จ.สุพรรณบุรี
อบรมโดย BMS Team เมื่อ พ.ย. 49 ขึ้นระบบห้องบัตรเมื่อ X'Mas 2007
2008 : X-Ray กายภาพบำบัด แพทย์แผนไทย กิจกรรมบำบัด OPD ตา
2009 : ทันตกรรม ห้องตรวจตา OPD (พยาบาลและห้องตรวจแพทย์บางห้อง)

ออฟไลน์ mixer_79

  • Hero Member
  • *****
  • กระทู้: 670
  • กำลังใจในการทำงาน
  • Respect: +1
    • ดูรายละเอียด
ผมต้องการทำ  GetPickupList 2ชั้นในการเลือก รหัส จังหวัด อำเภอ ตำบล และอีกชั้นในการเลือก รหัสหมู่บ้านนะครับ ตามรูปนะครับ..และลองส่งcds ที่ผมเขียนให้อ.ทุกท่านดูด้วยครับ
นายทองคูณ พรมผักแว่น 0819550235
โรงพยาบาลสีคิ้ว อ.สีคิ้ว จ.นครราชสีมา 30140  
รพ.ขนาด 90 เตียง   thongkoon13@gmail.com
เริ่มใช้โปรแกรม 05 มีนาคม 2553
HOSxP V.3.56.2.15
______________________________________