BMS-HOSxP Community

HOSxP => แจ้งปัญหา / ขอความช่วยเหลือ => ข้อความที่เริ่มโดย: yungsiam ที่ สิงหาคม 01, 2011, 12:07:36 PM

หัวข้อ: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: yungsiam ที่ สิงหาคม 01, 2011, 12:07:36 PM
แพทย์สั่ง admit ไปแล้วแต่เปลี่ยนเป็น refer และมีการสั่ง Xray ไปแล้วเจ้าหน้าที่เวชระเบียนสั่งลบ admit ไม่ได้
ฟ้อง Error ว่า Xray order Data Exists! แต่ทางห้อง Xray แจ้งว่าได้ลบรายการ Xray ไปแล้ว  พอเข้าไปดูที่หน้าจอของ
Xray ปรากฎดังภาพครับ  ผมคลิกขวาเพื่อที่จะยกเลิกรายการ ก็ไม่ได้  พบ Error ดังนี้ครับ 


EurekaLog 6.1.02

Application:
-------------------------------------------------------
  1.1 Start Date      : Mon, 1 Aug 2011 08:37:42 +0700
  1.2 Name/Description: HOSMy.exe
  1.3 Version Number  : 3.54.7.21
  1.4 Parameters      :
  1.5 Compilation Date: Fri, 22 Jul 2011 14:05:21 +0700
  1.6 Up Time         : 3 hours, 26 minutes, 57 seconds

Exception:
-----------------------------------------------------------------------------------
  2.1 Date          : Mon, 1 Aug 2011 12:04:40 +0700
  2.2 Address       : 0041C564
  2.3 Module Name   : HOSMy.exe
  2.4 Module Version: 3.54.7.21
  2.5 Type          : EVariantTypeCastError
  2.6 Message       : Could not convert variant of type (Null) into type (Integer).
  2.7 ID            : A57A
  2.8 Count         : 1
  2.9 Status        : New
  2.10 Note         :

User:
-------------------------------------------------------
  3.1 ID        : NB-YUNG
  3.2 Name      : NB-YUNG
  3.3 Email     :
  3.4 Company   :
  3.5 Privileges: SeIncreaseQuotaPrivilege        - OFF
                  SeSecurityPrivilege             - OFF
                  SeTakeOwnershipPrivilege        - OFF
                  SeLoadDriverPrivilege           - OFF
                  SeSystemProfilePrivilege        - OFF
                  SeSystemtimePrivilege           - OFF
                  SeProfileSingleProcessPrivilege - OFF
                  SeIncreaseBasePriorityPrivilege - OFF
                  SeCreatePagefilePrivilege       - OFF
                  SeBackupPrivilege               - OFF
                  SeRestorePrivilege              - OFF
                  SeShutdownPrivilege             - OFF
                  SeDebugPrivilege                - OFF
                  SeSystemEnvironmentPrivilege    - OFF
                  SeChangeNotifyPrivilege         - ON
                  SeRemoteShutdownPrivilege       - OFF
                  SeUndockPrivilege               - OFF
                  SeManageVolumePrivilege         - OFF
                  SeImpersonatePrivilege          - ON
                  SeCreateGlobalPrivilege         - ON
                  SeIncreaseWorkingSetPrivilege   - OFF
                  SeTimeZonePrivilege             - OFF
                  SeCreateSymbolicLinkPrivilege   - OFF

Active Controls:
----------------------------------
  4.1 Form Class   : TfrmXRayOrder
  4.2 Form Text    : X-Ray Order
  4.3 Control Class: TdxTreeList
  4.4 Control Text :

Computer:
-------------------------------------------------------------------------------------
  5.1 Name          : NB-YUNG
  5.2 Total Memory  : 3006 Mb
  5.3 Free Memory   : 1560 Mb
  5.4 Total Disk    : 100.15 Gb
  5.5 Free Disk     : 78.8 Gb
  5.6 System Up Time: 3 hours, 40 minutes, 46 seconds
  5.7 Processor     : Intel(R) Core(TM) i7 CPU       Q 720  @ 1.60GHz
  5.8 Display Mode  : 1366 x 768, 32 bit
  5.9 Display DPI   : 96
  5.10 Video Card   : ATI Mobility Radeon HD 5450 (driver 8.741.1.1000 - RAM 1024 MB)
  5.11 Printer      : PDFCreator (driver 5.2.3790.1830)

Operating System:
-----------------------------------
  6.1 Type    : Microsoft Windows 7
  6.2 Build # : 7600
  6.3 Update  :
  6.4 Language: Thai
  6.5 Charset : 222

Network:
---------------------------------------------------------------------
  7.1 IP Address: 000.000.000.000 - 192.168.000.020 - 000.000.000.000
  7.2 Submask   : 000.000.000.000 - 255.255.255.000 - 000.000.000.000
  7.3 Gateway   : 000.000.000.000 - 192.168.000.003 - 000.000.000.000
  7.4 DNS 1     : 000.000.000.000 - 202.069.137.137 - 000.000.000.000
  7.5 DNS 2     : 000.000.000.000 - 202.069.137.138 - 000.000.000.000
  7.6 DHCP      : ON              - OFF             - ON             


ต้องแก้ไขยังไงจึงจะยกเลิก admit ได้ครับ
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ สิงหาคม 01, 2011, 12:50:39 PM
ไปยกเลิกการสั่งที่ คลินิกบริการแทนครับ..และก็ตรวจสอบด้วย เข้าใจว่า ระบบทำการเปลี่ยน vn request เป็น an แล้ว ค่าจะอยู่ในตาราง opitemrece ทำให้ยังลบรายการไม่ได้ครับ...ลองตรวจสอบ HN +AN นี้ในตาราง opitemrece ดูครับ
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: yungsiam ที่ สิงหาคม 01, 2011, 14:06:55 PM
ไปยกเลิกการสั่งที่ คลินิกบริการแทนครับ..และก็ตรวจสอบด้วย เข้าใจว่า ระบบทำการเปลี่ยน vn request เป็น an แล้ว ค่าจะอยู่ในตาราง opitemrece ทำให้ยังลบรายการไม่ได้ครับ...ลองตรวจสอบ HN +AN นี้ในตาราง opitemrece ดูครับ

แก้ไขโดยการไปยกเลิกที่ "คลีนิกบริการ"  ก็ไม่ได้ครับ  พอ Error แบบเดียวกัน  ผมใช้วิธีไปที่สายฟ้า

select * from xray_report where xn =12052

แล้วเลือกลบเอาครับ  จึงถอยมายกเลิก admit ได้ครับ

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

แต่ไม่รู้ว่า วิธีที่ผมทำนี้ถูกต้องหรือป่าว?  ตอนนี้ผมทดลองทำในเครื่องโน๊ตบุ๊คตัวเองก่อนครับ
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: taw2010 ที่ สิงหาคม 02, 2011, 22:50:59 PM
แล้วผู้ป่วยไม่ได้ทำการ x-ray หรือ
ถ้าผู้ป่วยได้ทำการ x-ray ค่าใช้จ่ายจะหายไปนะ
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: เกื้อกูล ครับ.. ที่ สิงหาคม 03, 2011, 00:12:26 AM
แล้วผู้ป่วยไม่ได้ทำการ x-ray หรือ
ถ้าผู้ป่วยได้ทำการ x-ray ค่าใช้จ่ายจะหายไปนะ

  ไม่หายถ้าไม่ไปลบในตารางแบบตรง ๆ ผ่าน Sql ต้องทำการปรับเปลี่ยน an--->vn ของ op service ให้สมบูรณ์มากที่สุด  อาจผ่าน GUI ของโปรแกรมหรือแก้ Manual แต่ต้อง full Resync vn นี้อีกครั้ง น่ะจะ OK ครับ
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: udomchok ที่ สิงหาคม 22, 2011, 12:52:43 PM
update xray_head xh
join ovst ov on ov.an=xh.vn
set xh.vn=ov.vn, department="OPD"
where xh.vn="xxxxxxxxx"

update xray_report xr
join ovst ov on ov.an=xh.an
set xr.an=""
where xr.an="xxxxxxxxx"
http://hosxp.net/index.php?option=com_smf&Itemid=28&/topic,21859.msg191971.html#msg191971
หัวข้อ: Re: ยกเลิก admit ไมได้ ติด Xray order Data Exists!
เริ่มหัวข้อโดย: sukkla_01 ที่ ธันวาคม 01, 2011, 21:09:16 PM
อันนี้เลย ยกเลิก admit
http://hosxp.net/index.php?option=com_smf&Itemid=28&topic=23912.0