ผู้เขียน หัวข้อ: ขอความช่วยเหลือครับ  (อ่าน 2002 ครั้ง)

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

ออฟไลน์ tuk2501

  • Full Member
  • ***
  • กระทู้: 105
  • Respect: 0
    • ดูรายละเอียด
ขอความช่วยเหลือครับ
« เมื่อ: พฤศจิกายน 07, 2013, 14:41:04 PM »
0
ขอความช่วยเหลือครับ ต้องการเอาข้อความเกี่ยวกับสภาวะโภชนาการที่แสดงในหน้า ซักประวัติ มาแสดงในการพิมพ์เวชระเบียนด้วย ไม่ทราบว่าเก็บไว้ในตรางอะไร หรือถ้าเป็นการคำนวณ มีสูตรคำนวนอย่างไรครับ ตามรูปที่แนบมา
Mr.Krisanapong Dilokwilas(ตุ๊ก)Borai Hospital Trat Tel 0817622101
Mail boraihospital@gmail.com
Server HP Intel® Xeon® Processor E5520
RAM 4 GB HD 164 G X2
ขึ้นระบบ 7 ม.ค. 52 ด้วยความช่วยเหลือจาก รพ.แหลมงอบ

ออฟไลน์ golf_win

  • Hero Member
  • *****
  • กระทู้: 3,481
  • Respect: +112
    • ดูรายละเอียด
Re: ขอความช่วยเหลือครับ
« ตอบกลับ #1 เมื่อ: พฤศจิกายน 07, 2013, 15:51:53 PM »
0
ลองประยุกต์ตามนี้ก็น่าจะได้นะครับ

Value:= GetSqlStringData('select bmi from opdscreen where vn="'+DBPipeline['vn']+'"');
if (Value > 0) and (Value < 18.5) then
  Value := '- น้ำหนักน้อยกว่ามาตรฐาน'
else if (Value >= 18.5) and (Value <= 22.9) then
  Value := '- ปกติ'
else if (Value >= 23) and (Value <= 24.9) then
  Value := '- อ้วนระดับ1'
else if (Value >= 25) and (Value <= 29.9) then
  Value := '- อ้วนระดับ 2'
else if Value >= 30 then
  Value := '- อ้วนระดับ 3';
โรงพยาบาลเจ็ดเสมียน จังหวัดราชบุรี
Start 19-1-51    35 station
HOSxP  3.59.5.18 Activate License
Tel. 032-305096-7 ต่อ 118
Web. http://csmhos.thaiddns.com:8080
         http://csmhos.thaieasydns.com:8080

ออฟไลน์ tuk2501

  • Full Member
  • ***
  • กระทู้: 105
  • Respect: 0
    • ดูรายละเอียด
Re: ขอความช่วยเหลือครับ
« ตอบกลับ #2 เมื่อ: พฤศจิกายน 07, 2013, 15:55:00 PM »
0
ขอบคุณครับ
Mr.Krisanapong Dilokwilas(ตุ๊ก)Borai Hospital Trat Tel 0817622101
Mail boraihospital@gmail.com
Server HP Intel&reg; Xeon&reg; Processor E5520
RAM 4 GB HD 164 G X2
ขึ้นระบบ 7 ม.ค. 52 ด้วยความช่วยเหลือจาก รพ.แหลมงอบ