Routine: LRBLPRA

Information

LRBLPRA ;AVAMC/REG - BB PT RECORD ;2/18/93 09:46 ;

Source file <LRBLPRA.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?20,"PRINT PATIENT BLOOD BANK RECORDS",!! Line Location: EN+1
Function Call: WRITE	Prompt: "Print only patients with antibodies/special instructions " Line Location: EN+2
Function Call: READ	Variable: LR(8) Timeout: DTIME Line Location: ASK+0
Function Call: WRITE	Prompt: !!,"Enter the maximum number of specimens to display",!,"in reverse chronological order for each patient: " Line Location: ASK+0
Function Call: WRITE	Prompt: $C(7),!,"ENTER A WHOLE NUMBER FROM 0-99" Line Location: ASK+1
Function Call: READ	Formatting: !! Prompt: "START WITH PATIENT NAME: FIRST// " Variable: X Timeout: DTIME Line Location: S+0
Function Call: READ	Formatting: ! Prompt: "GO TO PATIENT NAME: LAST// " Variable: X Timeout: DTIME Line Location: F+0
Function Call: WRITE	Prompt: D:$Y>(IOSL-6) Line Location: W+0
Function Call: WRITE	Prompt: !,LRP,?31,SSN,?43,Y,?56,$J($P(LR(4),"^",3),2),?59,$P(LR(4),"^",4) Line Location: W+0