Routine: LRACM1

Information

LRACM1 ;SLC/DCM - MENU FOR CUMULATIVE REPORTS CONT. ;2/20/91 08:36 ;

Source file <LRACM1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,"NO DATA IN THE CROSS-REFERENCE FOR THIS LOCATION!" Line Location: LOOP+1
Function Call: WRITE	Prompt: I_"."_" ",$P(^TMP($J,"LRIF",I),U,1) Line Location: N+0
Function Call: READ	Formatting: !! Prompt: "Start with patient #: " Variable: X Timeout: DTIME Line Location: NUM+0
Function Call: WRITE	Prompt: $C(7),!!,"NO DATA IN THE CROSS-REFERENCE FOR THIS LOCATION!" Line Location: LRLOCA+1
Function Call: WRITE	Prompt: I_"."_" ",$P(^TMP($J,"LRIF",I),U,1) Line Location: N1+0
Function Call: READ	Formatting: !! Prompt: "End with patient #: " Variable: X Timeout: DTIME Line Location: NUM1+0
Function Call: WRITE	Prompt: I_"."_" ",L Line Location: DIC+0
Function Call: WRITE	Prompt: " is empty." Line Location: DIC+1
Function Call: READ	Prompt: "LOCATION #: " Variable: X Timeout: DTIME Line Location: DIC+2
Function Call: WRITE	Prompt: !,$C(7),"LOCATION NOT DEFINED!" Line Location: DIC+3
Function Call: WRITE	Prompt: !!,"Last run: ",Y Line Location: DIC1+3
Function Call: WRITE	Prompt: !,"DO NOT try to reprint reports that have not finished!",! Line Location: A+3
Function Call: WRITE	Prompt: !!,"Last run: ",Y Line Location: ASK+3