Routine: LREXECU1

Package	Total	Call Graph
Lab Service	2	RCS^LRORD2 RCS^LRXO9
VA Fileman	1	^DIR

Entry Points

Name	Comments	DBIA/ICR reference
VIRAL	;ANMC-IHS/RGG;VIRAL SERUM TITER SAMPLE;JAN 31,1992
HEP	;ANMC-IHS/RGG;HEPATITIS INTERPETATIONS;MARCH 16,1992
ENDLDL
ADDCCOM	;
LOADCCOM	;
CHLAMYDI	;ANMC-IHS/RGG ; NON STANDARD COLLECTION SPECIMEN ; 10/15/92
LDL	;ANMC-IHS/RGG ; ROUTINE TO CALCULATE THE LDL ; 12/7/92
CHOLHDL
OPTIONS	;
HIVRISK	;ANMC-IHS/RGG;HIV RISK PROMPT;4/11/92

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,"YOU MUST ANSWER THIS QUESTION!" Line Location: VIRAL+5
Function Call: WRITE	Prompt: !!," Hold sample in freezer and submit to Reference Lab" Line Location: VIRAL+6
Function Call: WRITE	Prompt: !," with the Convalescent sample." Line Location: VIRAL+6
Function Call: WRITE	Prompt: !!," Submit this sample to the Reference Lab with the" Line Location: VIRAL+7
Function Call: WRITE	Prompt: !," previous sample being held in the freezer." Line Location: VIRAL+7
Function Call: READ	Prompt: "ADDITIONAL COMMENT: " Formatting: !! Timeout: DTIME Variable: LRCCOM Line Location: VIRAL+9
Function Call: READ	Prompt: "ADDITIONAL COMMENTS: " Formatting: ! Timeout: DTIME Variable: LRCCOM Line Location: ADDCCOM+1
Function Call: WRITE	Prompt: !,"UNABLE TO CALCULATE LDL, DUE TO ELEVATED TRIG OR LACK OF DATA." Line Location: LDL+2
Function Call: WRITE	Prompt: !!,"UNABLE TO CALCULATE RATIO DUE TO LACK OF DATA" Line Location: CHOLHDL+1
Function Call: READ	Prompt: "ADDITIONAL COMMENTS: " Formatting: ! Timeout: DTIME Variable: LRCCOM Line Location: CHLAMYDI+2
Function Call: WRITE	Prompt: *7,!,"You MUST Supply a HIV RISK Category!" Line Location: HIVRISK+20
Routine Call	DIR Line Location: VIRAL+4 HIVRISK+19

Name	Field # of Occurrence
DIR	VIRAL+1!, HIVRISK+1!
DIR("?"	VIRAL+3, VIRAL+4, HIVRISK+3, HIVRISK+4, HIVRISK+5, HIVRISK+6, HIVRISK+7, HIVRISK+8, HIVRISK+9, HIVRISK+10 , HIVRISK+11, HIVRISK+12, HIVRISK+13, HIVRISK+14, HIVRISK+15, HIVRISK+16, HIVRISK+17, HIVRISK+18
DIR("A"	VIRAL+2, HIVRISK+2
DIR("T"	VIRAL+1, HIVRISK+1
DIR(0	VIRAL+1, HIVRISK+1
DTIME	VIRAL+9, ADDCCOM+1, CHLAMYDI+2, HIVRISK+23
>> INDEX	HEP+2, HEP+5, HEP+8, HEP+11, HEP+14*
>> LRCCOM	VIRAL+8, VIRAL+9, HEP+1, HEP+2, HEP+4, HEP+5, HEP+7, HEP+8, HEP+10, HEP+11 , HEP+13, HEP+14, ADDCCOM+1, CHLAMYDI+1, CHLAMYDI+2, HIVRISK+24
LRCHOL	LDL+3, CHOLHDL, CHOLHDL+1, CHOLHDL+3, ENDLDL!
>> LRCOM(	HIVRISK+21*
LRHDL	LDL+3, CHOLHDL, CHOLHDL+1, CHOLHDL+2, CHOLHDL+3, ENDLDL!
>> LRSAMP	HIVRISK+21
>> LRSB(12	LDL+1, LDL+2, LDL+3, CHOLHDL
>> LRSB(292	LDL+2, LDL+3
>> LRSB(293	LDL+3, CHOLHDL+1, CHOLHDL+2, CHOLHDL+3
>> LRSB(47	LDL+1, LDL+2, LDL+3
>> LRSB(80	LDL+1, LDL+2, LDL+3, CHOLHDL
>> LRSPEC	HIVRISK+21
LRTRIG	LDL+3*, ENDLDL!
>> REMCOM	HIVRISK+23*, HIVRISK+24
>> RISKCOM	HIVRISK+22*, HIVRISK+24
>> VAR	HEP+1*, HEP+2, HEP+4, HEP+5, HEP+7, HEP+8, HEP+10, HEP+11, HEP+13, HEP+14
>> X	VIRAL+5, VIRAL+6, VIRAL+7, VIRAL+8, HIVRISK+20, HIVRISK+22
>> Y	VIRAL+6, VIRAL+7

Name	Field # of Occurrence
$T(OPTIONS+INDEX	HEP+2, HEP+5, HEP+8, HEP+11, HEP+14