ต้องการกำหมดช่วง diag f20-f29 ต้องเพื่มคำสั่งตรงไหนครับลองมาหลายวิธีแล้วไม่สำเร็จครับ
GetDateRangeDialog(date1, date2);
GetDateRangeDialog(date3, date4);
ds1 := Formatdatetime('yyyy-mm-dd',date1);
ds2 := Formatdatetime('yyyy-mm-dd',date2);
ds3 := Formatdatetime('yyyy-mm-dd',date3);
ds4 := Formatdatetime('yyyy-mm-dd',date4);
ChangeReportSQL('select o.oapp_id,concat(p.pname,p.fname," ",p.lname) as ptname, '+
'c.name as clinic_name,d.name as doctor_name,o.app_user, o.hn,o.vstdate,o.nextdate,v1.main_pdx, '+
'o.nexttime,o.note,o.vn,k.department,count(v.hn) as visit_count '+
'from oapp o '+
'left outer join patient p on p.hn=o.hn '+
'left outer join clinic c on c.clinic=o.clinic '+
'left outer join doctor d on d.code=o.doctor '+
'left outer join kskdepartment k on k.depcode = o.depcode '+
'left outer join ovst v on v.vstdate=o.nextdate and v.hn=o.hn '+
'left outer join vn_stat v1 on v1.vn=v.vn '+
'where o.nextdate between "'+ds1+'" and "'+ds2+'" '+
'and o.hn not in(select hn from ovst where vstdate between "'+ds3+'" and "'+ds4+'") '+
'group by o.nextdate,o.clinic,p.pname,v1.main_pdx ');