สถานะการรักษา
clinic_member_status_Rx:=getsqlsubquerydata('select clinic_member_status_id from clinic_member_status '+
' where provis_typedis not in ("01","02" ) ');
ผู้ป่วยที่เป็น DM และ รักษาอยู่
clinic_member_dm_hn:=getsqlsubquerydata('select hn from clinicmember '+
' where clinic="'+clinic_code_dm+'" and clinic_member_status_id in ('+clinic_member_status_Rx+') ');
ผู้ป่วยที่เป็น HT และ รักษาอยู่
clinic_member_ht_hn:=getsqlsubquerydata('select hn from clinicmember '+
' where clinic="'+clinic_code_ht+'" and clinic_member_status_id in ('+clinic_member_status_Rx+') ');
ยาเบาหวาน
drug_icode_RxDM:=getsqlsubquerydata('select icode from drugitems where did in'+
' (select std_code from drugitems_register'+
' where'+
' std_code like "10143400000%" or std_code like "10144100000%" or'+
' std_code like "12407800000%" or std_code like "10144400000%" or'+
' std_code like "20110011001%" or std_code like "10144514913%" or'+
' std_code like "14053913300%" or std_code like "12497700000%" or'+
' std_code like "10144514900%"'+
' ) group by icode ');
ยาความดัน
drug_icode_RxHT:=getsqlsubquerydata('select icode from drugitems where did in'+
' (select std_code from drugitems_register'+
' where'+
' std_code like "12481300000%" or std_code like "10061800000%" or'+
' std_code like "10060500000%" or std_code like "10107000000%" or'+
' std_code like "10106300000%" or std_code like "10065313300%" or'+
' std_code like "12488900000%" or std_code like "10059800000%" or'+
' std_code like "20303015001%" or std_code like "12491213300%" or'+
' std_code like "10045500000%" or std_code like "14408099900%" or'+
' std_code like "10104800000%"'+
' ) group by icode ');
ยาจะมีกี่ยี่ห้อ กี่บริษัทก็ได้ครับ
ฝาก อ.โก้ ช่วยตรวจสอบให้ด้วยนะครับ ว่าขาดยาตัวใหนบ้าง