Print Page as PDF
COMPACT ACT ICR (7327)

COMPACT ACT    ICR (7327)

Name Value
NUMBER 7327
IA # 7327
DATE CREATED 2023/12/04
CUSTODIAL PACKAGE PCE PATIENT CARE ENCOUNTER
USAGE Controlled Subscription
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PXCOMPACT
NAME COMPACT ACT
GENERAL DESCRIPTION
Patches DG*5.3*1104 and PX*1.0*240 will allow
Registration to make decisions on when to prompt for COMPACT Act clinical
information. For this decision-making process Registration needs to call the
entry point ASC^PXCOMPACT to determine if the patient is currently in an Acute
Suicidal Crisis.

Registration also needs to be able to add a new entry to the COMPACT ACT
EPISODE OF CARE file (#818) for a patient and this is allowed by a call made
to the ADMIT^PXCOMPACT entry point.

Other displays needed during the registration process are determined by the
entry point DISPLAY^PXCOMPACT.

Registration also needs to be able to use the entry point VISIT^PXCOMPACT to
set the Episode of Care (EOC) pointer to the PTF file.

If a new EOC needs to be opened or reopened during a patient transfer, or if
an EOC needs to be retracted during editing or deletion of a movement,
Registration needs to determine the appropriate EOC using $$GETEOC^PXCOMPACT
and $$GETEOCSEQ^PXCOMPACT, use SETENDDT to close an open outpatient episode,
and use NEWEOC^PXCOMPACT to create a new episode.

During an admission, Registration needs to access $$GETIPDT^PXCOMPACT and
$$GETSTDT^PXCOMPACT to determine benefit start and end dates.

Upon a discharge, Registration must use CHGTYPSTAT^PXCOMPACT to change the
COMPACT Act benefit from Inpatient to Outpatient.

During a transfer, Registration must call REOPNEOC^PXCOMPACT to reopen an
episode of care for a PTF that is already associated with an episode.


Revision History
10/22/24 - Added RESET component effective with patches PX*1.0*241 and
DG*5.3*1117
5/7/24 - Removed FILEMANERR component (moved to new routine)
4/25/24 - Removed $$ADMIN Component and hence removed Scheduling package as
subscriber, since Scheduling only used the $$ADMIN component.
7/17/24 - Added $$GETEOC component effective with patches PX*1.0*240 and
DG*5.3*1104
9/24/24 - Added SETENDDT component effective with patches PX*1.0*240 and
DG*5.3*1104
10/22/24 - Added RESET component effective with patches PX*1.0*241 and
DG*5.3*1117
STATUS Active
KEYWORDS COMPACT ACT
DURATION Till Otherwise Agreed
ID PXCOMPACT
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
$$ASC
Function call returns the Acute Suicidal Crisis flag
value of a patient's Open COMPACT ACT EPISODE OF CARE file (#818, "N" for No
or "Y" for Yes.

Sample Use
----------
S DFN=xxxxx
I $$ASC^PXCOMPACT(DFN)="Y") W !,"Patient is in an Acute Suicidal Crisis!"
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Pointer to PATIENT file (#2)
Output of function call Output
One of 2 valid statuses below:
"N" for no
"Y" for yes
$$DISPLAY
Function returns a delimited string of display values
based on various scenarios of the current state of a patient's COMPACT Act
Episode of Care.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient DFN.
Output of function call Output
Below are various scenarios that will be returned
about the state of a patient's COMPACT Act Episode of Care.

DISPLAY will contain one of the following groups of information:

1. If end date exists (episode has ended) and
there are no extensions,
"COMPACT Act Start Date"^EPISODE START
DATE^"End Date"^EPISODE END DATE^"IP
Benefit End Date"^INPATIENT BENEFIT END
DATE^"OP Benefit end date"^OUTPATIENT
BENEFIT END DATE

2. If end date exists (episode has ended) and
an extension exists,
"Extension Start Date"^EXTENSION START
DATE^"Episode End Date"^EPISODE END DATE

3. If end date does not exist (episode is
ongoing) and there are no extensions,
For an inpatient with an INPATIENT BENEFIT
END DATE,
"COMPACT Act Start Date"^EPISODE START
DATE^"Remaining Days"^REMAINING
INPATIENT DAYS^"Inpatient Benefit End
Date"^INPATIENT BENEFIT END DATE
Otherwise,
"COMPACT Act Start Date"^EPISODE START
DATE^"Remaining Days"^REMAINING
INPATIENT DAYS or REMAINING OUTPATIENT
DAYS

4. If end date does not exist (episode is
ongoing) and an extension exists,
"Extension Start Date"^EXTENSION START
DATE^"Remaining Days"^REMAINING INPATIENT
DAYS or REMAINING OUTPATIENT DAYS
ADMIT
This call will add a patient to the COMPACT ACT
EPISODE OF CARE file (#818) upon admission for COMPACT Act related care.  It
will also update the pointer in the file #818 to the PTF file (#45) that was
created during this admission event.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
STARTDT Input
The clinically determined start date for this Acute
Suicidal Crisis.
ADMIT Input
The Admit type:  "F" = Full admission
"P" = Partial admission

The ADMIT parameter is used to distinguish between a partial admit
(observation) with a value of P or a full admit (admitted to a facility other
than observation) with a value of F.  It is not required but failure to set
the parameter will result in the ADMIT process defaulting to a partial admit.
PTF Input
This is the internal entry number of the associated
PTF file (#45) of this admission movement.
VISIT
This call will set the pointer to the PTF file (#45)
in the COMPACT ACT EPISODE OF CARE file (#818) for an inpatient episode or the
COMPACT ACT EPISODE OF CARE file pointer to the VISIT file (#9000010) for an
outpatient episode. It will also set the Treatment Related To flag for the
inpatient or outpatient encounter.
VARIABLES TYPE VARIABLES DESCRIPTION
ENC Input
The Encounter ID (PTF or VISIT IEN).
PXTY Input
The benefit type:  "I" = Inpatient
"O" = Outpatient
PXEOCNUM Input
The EOC internal entry number for the patient.
DFN Input
Patient internal entry number.
$$GETEOC
This call will retrieve the Episode of Care number
assigned to a patient.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
GETEOC Output
The EOC number.
NEWEOC
This call will create a new Episode of Care.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
PXENC Input
The Encounter ID (PTF or VISIT IEN).
PXTY Input
The benefit type:  "I" = Inpatient
"O" = Outpatient
PXSTDT Input
The episode start date.
PXSRC Input
The episode source.
$$GETIPDT
This call will retrieve the inpatient benefit end
date for a patient.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
GETIPDT Output
The inpatient benefit end date.
$$GETSTDT
This call will retrieve the start date of the most
current episode.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
GETSTDT Output
The episode start date.
CHGTYPSTAT
This call will change the patient's benefit type
between Outpatient and Inpatient and update benefit end dates.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
PXTY Input
The benefit type to which to change:
"I" = Inpatient
"O" = Outpatient
PXCHNGDT Input
The date of the benefit type change.
REOPNEOC
This call will reopen an inpatient Episode of Care.
VARIABLES TYPE VARIABLES DESCRIPTION
PXEOCNUM Input
The EOC internal entry number for the patient.
PXEOCSEQ Input
The EOC sequence number.
STARTDT Input
The episode start date.
$$GETEOCSEQ
This call will retrieve the current or last Episode
of Care sequence for a patient.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
GETEOCSEQ Output
The EOC sequence number.
SETENDDT
This call will set an end date and end the current /
most recent episode of care.
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input
Patient internal entry number.
PXENDDT Input
The new end date (VA format).
PXENDSRC Input
The source of crisis end:  "PA" = Patient
"PR" = Provider
"TE" = Time Expired
PXAUTH Input
The person who authorized the crisis end.
PXCOMM Input
Other comments about the crisis end.
RESET
This call will reset the EOC Open/Close flag to 0 and
set the Benefit Type to null.
VARIABLES TYPE VARIABLES DESCRIPTION
PXEOCNUM Input
Internal episode of care number.
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
REGISTRATION

Added 12/04/23

4/25/24 - Removed $$ADMIN Component and added the following new components
effective with patches PX*1.0*240 and DG*5.3*1104:
VISIT
FILEMANERR
$$GETEOCSEQ
NEWEOC
$$GETIPDT
$$GETSTDT
CHGTYPSTAT
REOPNEOC

5/7/24 - Removed FILEMANERR Component

7/17/24 - Added $$GETEOC component effective with patches PX*1.0*240 and
DG*5.3*1104

9/24/24 - Added SETENDDT component effective with patches PX*1.0*240 and
DG*5.3*1104
ORDER ENTRY/RESULTS REPORTING
Added 12/22/23, effective with patches DG*5.3*1104 and
PX*1.0*240
DATE ACTIVATED 2024/10/24