ใบ Admit ลำลูกกา

[atthapon]

หมอครับ อยากให้ vital sign ในหัวข้อ 3 เรื่อง BP,TEMP ,P ,R ,H ,W ออกที่ใบ admit ด้วยครับ

[mit]

ได้ทำ function ไว้ให้ในส่วน MIT-NET เพื่อคืนค่าเป็น VITAL SIGN คือ
vitalsig(cHN,dDATE,cTime,lLast) โดยคืนค่าเป็นตัวหนังสือขนาด 80 ตัวอักษร จะใช้ค่าใด ก็ตัดเอาได้ครับด้วย function SUBSTR() เช่น
1.ต้องการเฉพาะน้ำหนักที่บันทึกในครั้งหลังสุด ของผู้ป่วย HN='000000001' ;วันที่ 09/08/2553 ; Visit ที่ 1
cWeight = Substr(vitalsig('000000001',ctod('09/08/2010'),'1',.T.),71,6)
2.ต้องการค่า vital sign ที่บันทึกในครั้งแรก ของผู้ป่วย HN='000000001' ;วันที่ 09/08/2553 ; Visit ที่ 1
cVital = vitalsig('000000001',ctod('09/08/2010'),'1')

ดังนั้นใน P_ADMIT แบบส่งข้อมูลก็เพียงเพิ่มบรรทัด
? "vital"+CHR(1)+vitalsig('000000001',ctod('09/08/2010'),'1')

ด้าน Mit-Utility จะมีตัวแปร DOS_VITAL เอาไปใช้งานได้เลย

[sutthipongr]

ดังนั้นใน P_ADMIT แบบส่งข้อมูลก็เพียงเพิ่มบรรทัด
? "vital"+CHR(1)+vitalsig('000000001',ctod('09/08/2010'),'1')

***
('000000001',ctod('09/08/2010'),'1')

ถ้าใช้ตัวแปรแทน
m.hn='000000001'
h.rgtdate=ctod('09/08/2010')
h.time='1'

แล้วใส่ใน p_admit เป็น
"vital"+CHR(1)+vitalsig(h.hn,h.rgtdate,h.time)

ไม่ทราบว่า เข้าใจถูกต้องไหมครับ

[mit]

ขอบคุณครับ ยกตัวอย่างไม่รอบครอบ copy บรรทัดบนมาแล้วลืมแก้ไข ต้องขอโทษด้วยครับ แต่ก็เข้าใจถูกแล้ว แต่ h.time ต้องเป็น h.times
สรุป
ถ้าใช้การบันทึกครั้งแรก
"vital"+CHR(1)+vitalsig(h.hn,h.rgtdate,h.times)

ถ้าใช้การบันทึกครั้งสุดท้าย
"vital"+CHR(1)+vitalsig(h.hn,h.rgtdate,h.times,.T.)

[atthapon]

ขอบคุณครับ จะลองทำดูก่อนครับ

[atthapon]

ใช้ได้แล้วครับ ขอบคุณหมอมิตรมากครับ