3 เรื่องเด่น ครับ อาจาย์

[tiae]

หวัดดีครับ อ.ชัยพร วันนี้มี 3 เรื่อง รบกวนสอบถามนะครับ

ค่า BMI ที่จุดซักประวัติครับ การแปลผลถ้าข้อความยาวๆ จะถูกซ่อนด้านหลังรูปถ่ายครับ
และการแปลผลบางคนก็เพี้ยนๆ ครับ ค่าปกติ ต้องตามนี้ครับ
ค่า BMI   / การแปลผลภาวะอ้วน - ผอมของร่างกาย ครับ
น้อยกว่า 18.5  = ผอม
18.5 - 22.9 = ปกติ
23-24.9 = น้ำหนักตัวมากเกิน
25-29.9 = อ้วนระดับ1
มากกว่า 30 = อ้วนมากระดับ2
--------------------------------------------------------------
คนไข้มา 2 visit
visit 1 ตรวจรับยากลับบ้านไปแล้ว   ถ้ามา visit 2 ต้องการให้ซ่อน visit 1 จะได้หรือเปล่าครับ แพทย์ไม่ทันได้ดูตอนเรียกคนไข้ครับ
--------------------------------------------------------------
ซักประวัติ ตรวจร่างกาย
ออกใบรับรองแพทย์ และข้อมูลอื่นๆ ระบบ จะจดจำข้อมูลผู้ป่วยก่อนหน้านี้ทั้งหมด เลยครับ พยาบาลลืมเข้าไป คลิก ข้อมูลก่อนหน้านี้ก็จะติดไปกับ คนไข้ รายถัดไป เรื่อยๆๆๆๆๆๆ
ต้องการให้ ระบบ ไม่จดจำข้อมูลในส่วนนี้ ครับ
ตามรูปนะครับ
ขอบคุณครับ

[tiae]

บ่ายนี้ลอง เปิด หน้าซักประวัติ >>ตรวจร่างกาย   รายการที่ได้ลงไว้กับคนไข้ถ้ามีการเปลี่ยนแปลง 1 คน ผลที่เปลี่ยนแปลง จะเป็นกับคนไข้ทั้งหมดที่มารับบริการครับ น่าจะเป็นบั๊ก แน่ๆๆ เลยครับ
ผมใช้ เวอร์ชั่น 3 นะครับ  อ. ตรวจสอบด้วยนะครับ
ขอบคุณครับ

[manoi]

แก้ไขให้แล้วครับ

ส่วน code ตรวจสอบ bmi เขียน Logic ไว้ดังนี้ครับ

โค๊ด: Delphi

1. if bmi > 0 then
2.   begin
3.     if bmi < 20 then
4.     begin
5.       if ((bmi >= 18.5) and (bmi < 20)) then
6.         screenbmilabel.caption := 'ภาวะทุพโภชนาการ ระดับ 1' else
7.         if ((bmi >= 17) and (bmi < 18.5)) then
8.           screenbmilabel.caption := 'ภาวะทุพโภชนาการ ระดับ 2' else
9.           if ((bmi >= 16) and (bmi < 17)) then
10.             screenbmilabel.caption := 'ภาวะทุพโภชนาการ ระดับ 3' else
11.             if (bmi < 16) then
12.               screenbmilabel.caption := 'ภาวะทุพโภชนาการ ระดับ 4';
13.  
14.  
15.       screenbmilabel.font.color := clred;
16.     end else
17.       if (bmi >= 20) and (bmi <= 24.9) then
18.       begin
19.         screenbmilabel.caption := 'ภาวะโภชนาการปกติ';
20.         screenbmilabel.font.color := clgreen;
21.       end else
22.         if bmi > 24.9 then
23.         begin
24.           if (bmi > 24.9) and (bmi < 30) then
25.             screenbmilabel.caption := 'ภาวะโภชนาการเกิน ระดับ 1' else
26.  
27.             if (bmi >= 30) and (bmi < 40) then
28.               screenbmilabel.caption := 'ภาวะโภชนาการเกิน ระดับ 2' else
29.  
30.               if (bmi >= 40) then
31.                 screenbmilabel.caption := 'ภาวะโภชนาการเกิน ระดับ 3';
32.  
33.           screenbmilabel.font.color := clred;
34.         end;
35.  
36.   end;
37.  

[tiae]

แก้ไขในส่วนไหน ให้ครับ
ข้อ 1 หรือ 2 ครับ

[manoi]

แก้ไขข้อ 3 ครับ
ส่วนข้อแรก อธิบายไว้ด้านบน (bmi)
ส่วนข้อ 2 แนะนำให้ใช้ระบบห้องจ่ายยาบันทึกจ่ายยาและปิด Visit ครับ

[tiae]

อีกนิดครับ ปิด visit จากตรงหน้าจอไหน ของ ห้องจ่ายยา ครับ
หาไม่เจอ จริงๆๆ ครับ

[wiphusit]

อาจารย์ครับเด็กอายุต่ำกว่า 5 ปีมันฟ้อง ภาวะโภชนาการเกิน  ทุกคนเลยครับ