Print Page as PDF
DBIA2502 ICR (2502)

DBIA2502    ICR (2502)

Name Value
NUMBER 2502
IA # 2502
DATE CREATED 1998/08/18
CUSTODIAL PACKAGE PCE PATIENT CARE ENCOUNTER
CUSTODIAL ISC Albany
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PXKMAIN
NAME DBIA2502
GENERAL DESCRIPTION
An integration agreement is needed with the PCE package
for the Scheduling data conversion project.  The PCE package's standard filer
entrypoints require that all providers added to PCE for a visit have a valid
provider class.  The problem is that some of the encounters that the
Scheduling conversion can convert will consist of old provider data where the
provider class for the provider does not exist. As a result, many many
providers will not be able to be converted with their visits/encounters
because they do not have a valid provider class.  Denis Eaton was consulted
about this and he concluded the only way to store these old providers in PCE
would be to pre-set the global array that PCE uses to file the data to what it
would look like after all the edit checks were done, and call the filer
directly.  Since the affected provider data is old and its corresponding visit
will be flagged as historical in PCE, there should not be a data integrity
issue with storing a provider without a valid provider class. It also makes
the conversion more consistent and complete.  This exemption is requested
specifically for filing the new provider data and would be a one-time
exemption to be used only when new visits are created as a result of the
conversion.  All other data added to PCE via this project would flow through
the normal PCE edits.  The agreement would only exist for the life of the
conversion.

The array definition follows:

^TMP("PXK",$J,"SOR") = Source ien

^TMP("PXK",$J,"VST",1,0,"BEFORE") = the 0-node of the visit file
^TMP("PXK",$J,"VST",1,0,"AFTER") = the same as "BEFORE"
^TMP("PXK",$J,"VST",provider counter,"IEN") = ""

^TMP("PXK",$J,"PRV",provider counter,0,"BEFORE") = ""
^TMP("PXK",$J,"PRV",provider counter,0,"AFTER") = Provider id^DFN^Visit
ien^P/S for primary/secondary
^TMP("PXK",$J,"PRV",provider counter,"IEN") = "" ^TMP("PXK",$J,"PRV",provider
counter,"BEFORE") = "" ^TMP("PXK",$J,"PRV",provider counter,"AFTER") =
^Package ien^Source ien

The entrypoint to call for the post-edit filer is EN1^PXKMAIN
STATUS Active
DURATION Till Otherwise Agreed
EXPIRATION DATE 1999/12/31
ID PXKMAIN
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT VARIABLES
EN1
VARIABLES TYPE VARIABLES DESCRIPTION
PXKNOEVT Input
We need approval to set the variable PXKNOEVT before
making the calls to EN1^PXKMAIN and $$DATA2PCE^PXAPI. Setting this variable
prevents the PXK VISIT DATA EVENT driver protocol from being executed. Since
the data is coming from Scheduling initially and it is old 'historical'
information, there is no need to notify Scheduling when the encounter data has
been added to the PCE database.

Also, by not executing this event driver, conversion processing is faster and
less complicated.

SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
SCHEDULING Albany