Print Page as PDF
OE/RR calls to GMPLX ICR (2742)

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
ID GMPLX
COMPONENT/ENTRY POINT
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)