OE/RR calls to GMPLX ICR (2742)

Name

Value

NUMBER

2742

IA #

2742

DATE CREATED

1999/01/28

CUSTODIAL PACKAGE

PROBLEM LIST

CUSTODIAL ISC

Salt Lake City

USAGE

Private

TYPE

Routine

DBIC APPROVAL STATUS

APPROVED

ROUTINE

GMPLX

NAME

OE/RR calls to GMPLX

GENERAL DESCRIPTION

This DBIA documents OE/RR calls to routine GMPLX.

STATUS

Active

DURATION

Till Otherwise Agreed

GMPLX

COMPONENT/ENTRY POINT

COMPONENT DESCRIPTION

VARIABLES

$$PROBTEXT(IEN)

Returns external format of PROVIDER NARATIVE field
(#.05) in PROBLEM file (#9000011).

VARIABLES	TYPE	VARIABLES DESCRIPTION
IEN	Input	IEN of PROBLEM file.

DTMOD(IEN)

Updates DATE LAST MODIFIED field (#.03) to value of
system variable DT.  Used by CPRS GUI only.

VARIABLES	TYPE	VARIABLES DESCRIPTION
IEN	Input	IEN of PROBLEM file

AUDIT(NODE0,NODE1)

Store data in AUDIT file (used by CPRS GUI)

VARIABLES	TYPE	VARIABLES DESCRIPTION
NODE0	Input	0 node to be placed in PROBLEM LIST AUDIT file (#125.8)
NODE1	Input	1 node to be placed in PROBLEM LIST AUDIT file (#125.8)

$$DUPL(DFN,TERM,TEXT)

This entry point checks a patient's problem list and
returns an IEN if there is already a matching entry on file.

VARIABLES	TYPE	VARIABLES DESCRIPTION
DFN	Input	IEN of the PATIENT file
TERM	Input	The value for the PROBLEM field of the PROBLEM file (#9000011).
TEXT	Input	The value of the PROVIDER NARRATIVE (#.05) field of the PROBLEM file (#9000011).

$$CODESTS(PROB,ADATE)

This component accepts a pointer to the PROBLEM
(#9000011) file and a VA Fileman date as input. The component checks the
status of the ICD9 code attached to the problem on the date passed. The
component returns a boolean value of 1 (one) if the code is active on the
specified date, a 0 (zero) is returned if inactive.

VARIABLES	TYPE	VARIABLES DESCRIPTION
PROB	Input	This variable is a pointer to the PROBLEM (#9000011) file.
ADATE	Input	This variable is a FM date on which to check the status of the ICD9 code associated with the problem.

SUBSCRIBING PACKAGE

SUBSCRIBING PACKAGE	ISC
ORDER ENTRY/RESULTS REPORTING	Salt Lake City
VA POINT OF SERVICE (KIOSKS)