BMS-HOSxP Community

HOSxP => Development => ข้อความที่เริ่มโดย: ittipol ที่ มิถุนายน 09, 2011, 15:29:50 PM

หัวข้อ: patient
เริ่มหัวข้อโดย: ittipol ที่ มิถุนายน 09, 2011, 15:29:50 PM
อาจารย์ทุกท่าน
ขอถามอาจารย์ทุกท่านหน่อยครับว่า
ในการลงทะเบียนครั้งแรกนั้น มันเก็นวันที่ลงทะเบียนครั้งแรงไว้ที่ไหนครับ
อยู่ใน patient หรือเปล่าครับ
เพราะว่าในความถูกต้องลงทะเบียนจะต้องมีวัน
ลงทะเบียนครั้งแรกสุดด้วยครับ
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ มิถุนายน 09, 2011, 15:31:55 PM
คอลัมน์ firstday ของตาราง patient ครับ..ลองไปนำ Dbtext มาวางในฟอร์ม  RBT-102 ครับ
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: ittipol ที่ มิถุนายน 09, 2011, 16:17:54 PM
เยี่ยมมากครับ
มีช่วงหลังๆๆนะครับเลยหาไม่เจอ
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ มิถุนายน 09, 2011, 18:04:01 PM
รบกวน กด Thank แทนก็ได้นะครับ..ไม่ต้องพิมพ์อธิบาย..เร็วกว่าเยอะเลย.. ;D
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: ittipol ที่ ธันวาคม 09, 2011, 11:05:40 AM
อาจารย์ครับ
ขอทราบเพิ่มนะครับ
คือผู้ที่บันทึกการลงทะเบียนนะครับ
ไม่รู้ว่าข้อมูลเก็บไว้ที่ไหนครับและจะให้แสดงผลได้ยังงัยครับ
ขอบคุณครับ
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: ittipol ที่ ธันวาคม 09, 2011, 11:31:27 AM
อาจารย์คับ
ผมใช้ผู้ที่ Login เข้าใช้งานนะเวลานั้นแทนนะครับ

  Value := GetSQLStringData('select o2.name from onlineuser o1,opduser o2 '+
           'where o1.kskloginname = o2.loginname '+
           'and o1.onlineid = "'+GetOnlineID+'" ');
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: golf_win ที่ ธันวาคม 09, 2011, 11:42:07 AM
อาจารย์ครับ
ขอทราบเพิ่มนะครับ
คือผู้ที่บันทึกการลงทะเบียนนะครับ
ไม่รู้ว่าข้อมูลเก็บไว้ที่ไหนครับและจะให้แสดงผลได้ยังงัยครับ
ขอบคุณครับ
select * from patient_log where hn=xxxxxxx limit 1
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: naydekdee ที่ ธันวาคม 09, 2011, 11:48:37 AM
ผมใช้ อันนี้อ่ะไม่รู้จะได้ป่าวครับ
==============================================

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


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


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

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


 555+
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: udomchok ที่ ธันวาคม 14, 2011, 11:26:35 AM
Value :='ชื่อผู้พิมพ์     '+ GetSQLStringData('select name from opduser where loginname="'+GetCurrentUser+'" ');
มี "ชื่อผู้พิมพ์" อีกหน่อยคงต้องใส่ "ผู้โฆษณา" ไปด้วย  ;D ;D ;D ;D ;D


ผมใช้แบบนี้ครับ
หัวข้อ: Re: patient
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ ธันวาคม 14, 2011, 21:33:09 PM
ผมว่า..ผมจะใช้วิธีบังคับคนให้ลงลายมือชื่อ   ก่อนจะส่งต่อเอกสารให้จุดงานถัดไป..ชัวร์กว่าครับ...ไม่ผิดตัว... ;D ;D ;D