หน่วยปฐมภูมิขอรายงานอันดับโรคระดับหมู่บ้าน ช่วยหน่อยครับ
พี่เขาขอรายงานอันดับโรคผู้ป่วยที่มารับบริการในโรงพยาบาลแยกเป็นรายหมู่บ้าน
พอดีเขียนจะให้ออกที่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;