BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: kittih ที่ กันยายน 26, 2011, 22:37:40 PM

หัวข้อ: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: kittih ที่ กันยายน 26, 2011, 22:37:40 PM

รบกวนอาจารย์ทุกท่านช่วยทีครับ คืออยากให้ "ใบสั่งยาผู้ป่วยนอก" แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยาด้วย ต้องดึงข้อมูลจากที่ไหนครับ

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ กันยายน 26, 2011, 22:51:52 PM

ใช้คำสั่งนี้ครับ value:= GetSQLStringData('select servername from onlineuser where onlineid ="'+GetOnlineID+'"')

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: kittih ที่ กันยายน 27, 2011, 07:21:24 AM

ขอบคุณ อ. pop ครับ
แต่ปัญหาอยู่ที่ว่า ห้องยาเป็นคน print ใบสั่งยานี้
ชื่อจึงไม่ใช่แพทย์ที่สั่งยาครับ (ถ้าผมเข้าใจไม่ผิด)

แล้วพอจะมีทางอื่นไหมครับ อ.pop

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ กันยายน 27, 2011, 08:34:18 AM

ลองนำมาจากตาราง ksklog   ดูตรงส่วนชื่อ loginname คือชื่อแพทย์ และ detail คือส่วนของ from computerอะไร..ลองดูครับ..ว่าพอได้หรือไม่  ;)

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: pop_hosxp ที่ กันยายน 27, 2011, 08:52:31 AM

ลองอันนี้ดูครับ

โค๊ด: Delphi

1. value:=GetSQLStringData('select computer_name
2. from ksklog
3. where detail="'+dbpipeline['vn']+'"
4. and tablename="doctor" ');

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: BMS MA Team ที่ กันยายน 27, 2011, 09:04:27 AM

อ้างจาก: pop_hosxp ที่ กันยายน 27, 2011, 08:52:31 AM

ลองอันนี้ดูครับ

โค๊ด: Delphi

1. value:=GetSQLStringData('select computer_name
2. from ksklog
3. where detail="'+dbpipeline['vn']+'"
4. and tablename="doctor" ');

ตามนี้เลยคะ คุณกิตติ    ขอบคุณคุณ pop มากคะ  ตอบไม่ทันเลย   :D

หมายเหตุ : ถ้าทาง รพ. ต้องการให้ทีม MA ใส่คำสั่งในแบบฟอร์มให้  สามารถส่งเข้า E-Mail ตั๊กได้เลยคะ

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: kittih ที่ กันยายน 27, 2011, 10:26:37 AM

ขอบคุณทุกท่านครับ ยังไงแล้วจะลองทำดู แล้วจะแจ้งให้ทราบอีกครั้ง  :D

อ้างจาก: BMS MA Team ที่ กันยายน 27, 2011, 09:04:27 AM

อ้างจาก: pop_hosxp ที่ กันยายน 27, 2011, 08:52:31 AM

ลองอันนี้ดูครับ

โค๊ด: Delphi

1. value:=GetSQLStringData('select computer_name
2. from ksklog
3. where detail="'+dbpipeline['vn']+'"
4. and tablename="doctor" ');

ตามนี้เลยคะ คุณกิตติ    ขอบคุณคุณ pop มากคะ  ตอบไม่ทันเลย   :D

หมายเหตุ : ถ้าทาง รพ. ต้องการให้ทีม MA ใส่คำสั่งในแบบฟอร์มให้  สามารถส่งเข้า E-Mail ตั๊กได้เลยคะ

หัวข้อ: Re: *0* อยากให้ใบสั่งยาผู้ป่วยนอก แสดงชื่อเครื่องคอมฯ ที่แพทย์ใช้คีย์สั่งยา ครับ
เริ่มหัวข้อโดย: kittih ที่ กันยายน 27, 2011, 11:23:31 AM

ทำได้แล้วครับ
ขอบคุณ อ.ทุกท่านมากครับ  ;)