หน้า 1 จากทั้งหมด 1
พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
พุธ ธ.ค. 11, 2013 2:28 pm
โดย sutthipongr
ใช้ p_regis ในการพิมพ์ประวัติผู้ป่วยเก็บใน opdcard ตรงรายการยาจะไม่มีจำนวนเม็ดยา เช่น
6.การรักษา------------------------------------
Ferrous fumarate 200 mgtab.:ORAL 1 TAB BID PC M E
Salbutalmol 2 mg. :ORAL 1 TAB TID PC M N E
ที่แพทย์ต้องการคือ
Ferrous fumarate 200 mgtab.:ORAL 1 TAB BID PC M E #
60 TABSalbutalmol 2 mg. :ORAL 1 TAB TID PC M N E #
30 TAB เป็นต้นครับ
code อยู่ใน p_regis ตรง
- โค้ด: เลือกทั้งหมด
? " 6.การรักษา :"+repl(fm,61)
do pword with ddrug,7
รบกวนขอเพิ่มครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
ศุกร์ ธ.ค. 13, 2013 1:47 pm
โดย mit
วันนี้ 13/12/2556
ได้แก้ไขโปรแกรม mit-net ให้เตรียมตัวแปรARRAY ขนาด 60*2 ชื่อ D_PRICE(60,2) ใช้สำหรับข้อมูลยา 60 รายการ
เพื่อใช้แทนตัวแปร ddrug เวลาพิมพ์ก็ใช้การวนรอบเอาครับเช่น
for iii = 1 to 60
if type('D_PRICE(iii,1)')='L'
EXIT
else
? d_price(iii,1)+d_price(iii,2)
endif
next
จากตัวอย่างจะพิมพ์ออกมาเท่าจำนวนยาที่สั่งครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
อาทิตย์ ธ.ค. 15, 2013 6:49 am
โดย sutthipongr
หลังจากทดลองเพิ่มแบบนี้ครับ
- โค้ด: เลือกทั้งหมด
? ' 6.การรักษา :' + ;
REPLICATE(fm, 61)
*DO pword WITH ddrug,1
for iii = 1 to 60
if type('D_PRICE(iii,1)')='L'
EXIT
else
? left(d_price(iii,1),25)+d_price(iii,2)
endif
next
จะได้แบบนี้ครับ
- โค้ด: เลือกทั้งหมด
Paracet tab.500 mg 20 TAB
Moduretic tab(D") 60 tab
Amlodipine 10 mg tab 60 tab
Simvastatin 20 mg.(X) 30 TAB
Sodamint tab 120 TAB.
Folic acid 5 mg tab. 60 TAB.
Diclofenac tab 25mg(D") 20 TAB
Colchicine tab 0.6 mg 30 TAB
ปัญหาคือ
1.ขาดวิธีกิน(การบริหารยา)ครับ จริงๆสำคัญกว่าจำนวนเม็ดครับ
2.หัตถการ/กิจกรรมไม่มีด้วยครับยังต้องการอยู่ต้องการให้เป็นแบบเดิมครับ แบบเดิมคือขึ้นมาก่อนยา และเรียงต่อกันจากซ้ายไปขวาแล้วตามด้วยยาเรียงจากบนลงล่าง เช่น- โค้ด: เลือกทั้งหมด
advice;dressing wound;คัดกรองซึมเศร้า;วัดรอบเอว
Paracet tab.500 mg : 20 TAB ORAL 1 TAB PRNP1 OQ1 Q4-6
Moduretic tab(D") : 60 tab ORAL 1 TAB OD PC M
Amlodipine 10 mg tab : 60 tab ORAL 1 TAB OD PC M
Simvastatin 20 mg.(X) :30 TAB ORAL 1 TAB OD PC M
Sodamint tab :120 TAB. ORAL 1 TAB BID PC M E
Folic acid 5 mg tab. :60 TAB. ORAL 1 TAB OD PC M
Diclofenac tab 25mg(D") : 20 TAB ORAL 1 TAB TID PCS M N E
Colchicine tab 0.6 mg :30 TAB ORAL 0.5 TAB OD PC M
วิธีใช้ยาอยู่หลังชื่อยา จำนวนเม็ด เหมือนกับมุมมองเมื่อดูกับ mitnet น่าจะทำให้คุ้นชินกว่าครับ
คือจริงๆแล้วต้องการเหมือนเดิมแต่เพิ่มจำนวนเม็ดแค่นั้นครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
พุธ ธ.ค. 18, 2013 12:42 pm
โดย mit
ไม่มีการบริหารยาเพราะ left(d_price(iii,1),25) เป็นการตัดคำเอาการบริหารยาออกไป ถ้าต้องการตามที่แจ้งก็สามารถทำได้โดยต่อด้วยคำสั่ง +substr(d_price(iii,26))
ส่วนหัตถการได้เพิ่มตัวแปร array ชื่อ o_price(60,2) ให้ครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
พฤหัสฯ. ธ.ค. 19, 2013 10:33 am
โดย mit
ตรวจสอบแล้ว d_price(X,1) เป็นข้อมูลเดิมที่มีวิธีบริหารยาอยู่ด้วย
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
พฤหัสฯ. ธ.ค. 26, 2013 9:58 am
โดย sutthipongr
ขอบคุณครับ
ถ้าเป็นไปได้อยากให้ตัดค่าบริการ ' SERV' ต่างๆ
ออกจากตัวแปรหัตถการ o_price(60,2) ครับ (เปลืองพื้นที่พิมพ์ครับ)
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
อังคาร เม.ย. 29, 2014 10:04 am
โดย sutthipongr
พบปัญหา กรณีที่ ห้องยากดลบ ที่ตัวยา ซึ่งใน mitnet จะขึ้นว่า "งดจ่าย" แต่ในประวัติ opdcard (p_regis) ไม่บอกว่างดจ่าย ทำให้แพทย์อ่านประวัติย้อนหลัง เข้าใจผิดได้ว่า pt.ได้รับยาดังกล่าวไปด้วย
ต้องการให้ขึ้นว่า "(งดจ่าย)" หน้าตัวยาเหมือนในใบสั่งยา(p_order)ครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
พุธ เม.ย. 30, 2014 1:20 pm
โดย mit
ทำให้แล้วครับ
Re: พิมพ์ประวัติด้วย p_regis แพทย์ต้องการจำนวนเม็ดยาด้วย
โพสต์แล้ว:
ศุกร์ พ.ค. 02, 2014 4:52 am
โดย sutthipongr
ทำได้แล้วครับ โดยเพิ่ม arrayอีก 1 มิติ
for iii = 1 to 60
if type('D_PRICE(iii,1)')='L'
EXIT
else
? d_price(iii,1)+d_price(iii,2)+d_price(iii,3)
endif
next