MILITARY SERVICE EPISODE API ICR (5783)

Name

Value

NUMBER

5783

IA #

5783

DATE CREATED

2012/03/20

CUSTODIAL PACKAGE

REGISTRATION

USAGE

Controlled Subscription

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

DGMSEUTL

NAME

MILITARY SERVICE EPISODE API

GENERAL DESCRIPTION

The HINQ (DVB) application and the Enrollment
Application System (EAS) have a need to obtain military service episode (MSE)
data from the PATIENT (#2) file.  This can be accomplished by using the APIs
in military service episode utility routine, DGMSETUL.

STATUS

Active

DURATION

Till Otherwise Agreed

DGMSEUTL

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

MOVMSE

Move MSE data from .32 node to .3216 multiple in
PATIENT (#2) file.

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	Internal entry number (IEN) of the PATIENT (#2) file.

GETMSE

Return all records in MSE sub-file #2.3216 in MSE
array.  Records are sorted in reverse chronological order and the second
subscript is the MSE IEN in the multiple  e.g. MSE(1,4)=last

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	Internal entry number (IEN) of the PATIENT (#2) file.
MSE(	Output	An array of all MSEs sorted in reverse chronological order.

LAST

Returns the patient's last (most recent) MSE.

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	Internal entry number (IEN) of the PATIENT (#2) file.
MSE	Output	The most recent MSE for the patient consisting of the 0 node of the MILITARY SERVICE EPISODE sub-file #2.3216.

ESRDATA

Checks if any of the patient's MSEs are verified
(received from ESR).

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	Internal entry number (IEN) of the PATIENT (#2) file.
LOCKED	Output	Returns 0 if none of the MSEs are verified. Returns 1 if at least one of the MSEs is verified.

SUBSCRIBING PACKAGE

SUBSCRIBING DETAILS

ENROLLMENT APPLICATION SYSTEM

HINQ

VIRTUAL PATIENT RECORD

Added 4/4/24, documenting historical use of
GETMSE^DGMSEUTL routine. Additionally, effective with patch VPR*1*35, VPR is
also using GETMSE^DGMSEUTL to support SDA Patient Container code in the AMPL
Phase 2 project.

DATE ACTIVATED

2024/04/04