patient

[ittipol]

อาจารย์ทุกท่าน
ขอถามอาจารย์ทุกท่านหน่อยครับว่า
ในการลงทะเบียนครั้งแรกนั้น มันเก็นวันที่ลงทะเบียนครั้งแรงไว้ที่ไหนครับ
อยู่ใน patient หรือเปล่าครับ
เพราะว่าในความถูกต้องลงทะเบียนจะต้องมีวัน
ลงทะเบียนครั้งแรกสุดด้วยครับ

[เกื้อกูล ครับ..]

คอลัมน์ firstday ของตาราง patient ครับ..ลองไปนำ Dbtext มาวางในฟอร์ม  RBT-102 ครับ

[ittipol]

เยี่ยมมากครับ
มีช่วงหลังๆๆนะครับเลยหาไม่เจอ

[เกื้อกูล ครับ..]

รบกวน กด Thank แทนก็ได้นะครับ..ไม่ต้องพิมพ์อธิบาย..เร็วกว่าเยอะเลย..

[ittipol]

อาจารย์ครับ
ขอทราบเพิ่มนะครับ
คือผู้ที่บันทึกการลงทะเบียนนะครับ
ไม่รู้ว่าข้อมูลเก็บไว้ที่ไหนครับและจะให้แสดงผลได้ยังงัยครับ
ขอบคุณครับ

[ittipol]

อาจารย์คับ
ผมใช้ผู้ที่ Login เข้าใช้งานนะเวลานั้นแทนนะครับ

  Value := GetSQLStringData('select o2.name from onlineuser o1,opduser o2 '+
           'where o1.kskloginname = o2.loginname '+
           'and o1.onlineid = "'+GetOnlineID+'" ');

[golf_win]

อาจารย์ครับ
ขอทราบเพิ่มนะครับ
คือผู้ที่บันทึกการลงทะเบียนนะครับ
ไม่รู้ว่าข้อมูลเก็บไว้ที่ไหนครับและจะให้แสดงผลได้ยังงัยครับ
ขอบคุณครับ

select * from patient_log where hn=xxxxxxx limit 1

[naydekdee]

ผมใช้ อันนี้อ่ะไม่รู้จะได้ป่าวครับ
==============================================

Value :='ชื่อผู้พิมพ์     '+ GetSQLStringData('select name from opduser where loginname="'+GetCurrentUser+'" ');


===============================================


เนื่องจากงานเวชระเบียน ถูก Audit  หลายรอบ ต้องมีชื่อคนพิมพ์  ลงเวลา วันที่ 

ไม่รู้จะ อันเด๋วกันป่าวครับ   อ่านไปอ่านมา ก็  งง  เล็ก น้อย ถึงมากที่สุด เพราะว่าปกติผมก้สื่อสารกะใครไม่ค่อยรู้เรื่อง อ่ะ   ---->คนส่วนใหญ่ว่ามา น่านะ  อิอิ


 555+

[udomchok]

Value :='ชื่อผู้พิมพ์     '+ GetSQLStringData('select name from opduser where loginname="'+GetCurrentUser+'" ');

มี "ชื่อผู้พิมพ์" อีกหน่อยคงต้องใส่ "ผู้โฆษณา" ไปด้วย 


ผมใช้แบบนี้ครับ

[เกื้อกูล ครับ..]

ผมว่า..ผมจะใช้วิธีบังคับคนให้ลงลายมือชื่อ   ก่อนจะส่งต่อเอกสารให้จุดงานถัดไป..ชัวร์กว่าครับ...ไม่ผิดตัว...