Print Page as PDF
PXXDPT - File 9000001 ICR (4601)

PXXDPT - File 9000001    ICR (4601)

Name Value
NUMBER 4601
IA # 4601
DATE CREATED 2005/07/19
CUSTODIAL PACKAGE PCE PATIENT CARE ENCOUNTER
USAGE Private
TYPE Routine
ROUTINE PXXDPT
NAME PXXDPT - File 9000001
GENERAL DESCRIPTION
My patch originated because user's were unable to
perform the check out process on certain encounters.  We couldn't find the
source of the problem but we found out how to fix the encounters so that the
check out could be done. (The main problem was that you had Appt's pointing to
an encounter that did not have a pointer to a visit. Somehow the visit entry
did not get created along with the encounter as it should have.)

Now, during site testing we found some that still couldn't be checked out.
This was because of bad pointers in the IHS/Patient file (9000001).

After fixing this file, everything checked out properly.  When we found that,
after looking into further we found that this patient file was also causing
the initial problem of the visit not being created when the encounter is
created.  I then found some existing routine (PXXDPT)  that builds/re-build
this patient file.

So, I've changed my fix utility (PXDELENC/PXDELFIX) to repair or build the
entries in the IHS/Patient file (9000001) also.  And, here's where to
agreement comes into play. I want to put a check in the SD routine SDCO1 to
check this IHS/Patient file (9000001) file and if it needs repaired go ahead
and repair just before the check out process so that the check out would then
run with out issues.

May agreement will be between SD and PCE.  My routine is PXDELFIX and there is
a FIXIHS line tag that does a couple calls to the PXXDPT routine.
STATUS Retired
DURATION Till Otherwise Agreed
ID PXXDPT
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT VARIABLES
CHECK
VARIABLES TYPE
DA Input
GETSSN
VARIABLES TYPE
PX Input
SUBSCRIBING PACKAGE SCHEDULING
MAIL MESSAGE 40292421