ช่วยแก้รายงานสติ๊กเกอร์ติดซองเอกซเรย์เพศไม่ออกครับ

[SV_Phichit]

ช่วยแก้รายงานสติ๊กเกอร์ติดซองเอกซเรย์เพศไม่ออกครับ...ขอบคุณครับ

[pa_net]

ลองเปลี่ยน variable ตามนี้ครับ
  Value := GetSQLStringData('select s.name from patient p  '+
  ' left outer join sex s on p.sex=s.sex '+
  ' where code="'+DBPipeline['hn']+'"');

[pop_hosxp]

ผมเพิ่ม sex ให้แล้ว ตรงตัวหนังสือสีแดง และตัดตรงตัวหนังสือสีน้ำเงินออก เพราะคิดว่าไม่น่าจะได้ใช้

select x.*,concat(p.pname,p.fname,'  ',p.lname) as ptname ,vn.age_y,vn.age_m,vn.age_d,r.xn as real_xn,xh.xray_list, s.name as sex
from xray_report x
left outer join patient p on p.hn=x.hn
left outer join vn_stat vn on vn.vn=x.vn
left outer join xrayxn r on r.hn=x.hn
left outer join sex s on s.code=p.sex
left outer join xray_head xh on xh.vn=vn.vn and r.regdate between '2002-01-23' and '2200-01-23'
where x.xn="17" 

[SV_Phichit]

ขอบคุณครับ