เรียนเจ้าหน้าที่ BMS ช่วยต่อยอดรายงานให้ด้วยครับ

[yuttasak]

เรียนาหน้าที่ BMS เนื่องจากผมได้ SQL รายงานที่ขอจากเพื่อนสมาชิกแล้ว แต่ยังขาดไปอีกนิดหนึ่งคืออยากให้ตัวรายงานมี
HN แสดงออกมาด้วยครับ และก็สามารถเรียกแยกตามห้องตรวจได้ด้วยครับ เช่นห้องตรวจอายุรกรรม(001),เวชปฎิบัติ(402) ห้องตวจเบาหวาน(007)ไม่ทราบว่าต้องต่อยอดยังงัยครับ
SQL ที่ได้มาตามนี้ครับ
select vn.vstdate,concat(pt.pname,fname,'  ',lname) as ptname,pt.cid,vn.pttype,ptt.name,
vn.pdx,icd.name,vn.income,ost.name
from vn_stat vn
left outer join patient pt on pt.hn=vn.hn
left outer join pttype ptt on ptt.pttype=vn.pttype
left outer join icd101 icd on icd.code=vn.pdx
left outer join ovst ovs on ovs.vn=vn.vn
left outer join ovstost ost on ost.ovstost=ovs.ovstost
where vn.vstdate between '2010-11-01' and '2010-11-01'

[nahos]

ออกหน่วยมีห้องตรวจด้วยเหรอครับ

 

[yuttasak]

ออกหน่วยตรวจข้างนอก.....แต่เวลาเอามากรอกในโรงพยาบาลเป็นห้องตรวจ ออกหน่วยแพทย์ครับผม

[phatipan2]

ลองใช้คำสั่งนี้ ไปเขียนรายงานดูครับ
 GetDateRangeDialog(d1, d2);
ds1:=formatdatetime('yyyy-mm-dd',d1);
ds2:=formatdatetime('yyyy-mm-dd',d2);

    suchat:= GetPickupList('select department from kskdepartment');

   ChangeReportSQL('select vn.vstdate,vn.hn,concat(pt.pname,pt.fname,"  ",pt.lname) as ptname,pt.cid,vn.pttype,ptt.name,  '+
'vn.pdx,icd.name,vn.income,ost.name ,k1.department,k2.department  '+
'from vn_stat vn      '+
'left outer join patient pt on pt.hn=vn.hn    '+
'left outer join pttype ptt on ptt.pttype=vn.pttype  '+
'left outer join icd101 icd on icd.code=vn.pdx  '+
'left outer join ovst ovs on ovs.vn=vn.vn  '+
'left outer join ovstost ost on ost.ovstost=ovs.ovstost  '+
'left outer join kskdepartment k1 on k1.depcode = ovs.main_dep '+
'left outer join kskdepartment k2 on k2.depcode = ovs.last_dep '+
'where vn.vstdate between "'+ds1+'" and "'+ds2+'" '+
'and (k1.department = "'+suchat+'"  or k2.department = "'+suchat+'")');
end;

[yuttasak]

นำเข้าแล้วไม่ได้ครับผม...เป็นแบบนี้แหละครับ

[เกื้อกูล ครับ..]

ลอลเอาเครื่องหมาย  ( ' ) ออกให้หมดครับ... เหลือไว้แค่ (" " )