Routine: LRPXAPPU

Information

LRPXAPPU ;SLC/STAFF - Test Lab APIs Utilities ;1/29/04 14:35

Name	Comments	DBIA/ICR reference
DISPLAY	; from LRPXAPP ; displays results stored in a TMP global
GETTYPE(TYPE,ERR)	; from LRPXAPP ; asks for type of data (C, M, A), returned as TYPE
GETPT(DFN,ERR)	; from LRPXAPP ; asks for a patient, returns DFN
GETCOND(COND,TYPE,ERR)	; from LRPXAPI6,LRPXAPP ; asks for a conditional expression, returned as COND
GETDATE(FROM,TO,ERR)	; from LRPXAPP ; asks for a date range ; FROM return as oldest date selection, TO as most recent
GETTEST(TEST,TYPE,ERR)	; from LRPXAPP ; asks for a lab test, returned as TEST
GETAP(CODE,ERR)	; from LRPXAPP ; asks for an AP item, returned as CODE
GETMICRO(CODE,ERR)	; from LRPXAPP ; asks for a Micro item, returned as CODE

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DISPLAY+3
Function Call: WRITE	Prompt: !,^(NUM) Line Location: DISPLAY+5
Function Call: WRITE	Prompt: !,NUM,",",NUM1 Line Location: DISPLAY+7
Function Call: WRITE	Prompt: ! Line Location: GETTYPE+10
Function Call: WRITE	Prompt: ! Line Location: GETPT+7
Function Call: WRITE	Prompt: ! Line Location: GETCOND+10
Function Call: WRITE	Prompt: ! Line Location: GETDATE+18
Function Call: WRITE	Prompt: ! Line Location: GETTEST+11
Function Call: WRITE	Prompt: ! Line Location: GETAP+27
Function Call: WRITE	Prompt: ! Line Location: GETMICRO+19