BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: Knott ที่ พฤศจิกายน 07, 2012, 10:20:19 AM

หัวข้อ: รบกวนดู code ค่า GFR ใน opdcard หน่อยครับ
เริ่มหัวข้อโดย: Knott ที่ พฤศจิกายน 07, 2012, 10:20:19 AM
ผมทำ variable คำนวนค่า GFR เพิ่มใน opdcard แต่เมื่อเวลาพิมพ์แล้ว ฟ้อง error กรณีที่คนไข้ไม่มีการตรวจ creatinine แต่คนที่มีการตรวจ พิมพ์และโชว์ค่าได้ตามปกติครับ

ไม่ทราบว่าจะแก้ไขอย่างไรดีครับ

ตัวอย่าง Code ใน variable ครับ

gfr_cr:=getsqlstringdata('select lo.lab_order_result from lab_head lh, lab_order lo '+
      ' where lh.lab_order_number=lo.lab_order_number and lo.lab_items_code=(select lab_items_code from lab_items where lab_items_name= '+
      '(select sys_value from sys_var where sys_name="lab_link_cr" limit 1)) '+
      ' and lh.vn="'+DBPipeline['vn']+'" ');

gfr_age :=  DBPipeline['age_y'];

gfr_sex:=getsqldoubledata('select if(sex=1,1,0.742) as factor from patient where hn="'+DBPipeline['hn']+'"');

if gfr_cr='' then
        gfr_cr1:=0.00
   else
        gfr_cr1:=strtoint(gfr_cr);

value:=175*exp(-1.154*ln(gfr_cr1))*exp(-0.203*ln(gfr_age))*gfr_sex;