Routine: SRTPASS

Information

SRTPASS ;BIR/SJA - SELECT ASSESSMENT ;02/28/08

Source file <SRTPASS.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: SRTPASS+2
Function Call: WRITE	Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID"),! Line Location: LIST+1
Function Call: WRITE	Prompt: CNT_". " Line Location: DISP+4
Function Call: WRITE	Prompt: $E(SRSDATE,4,5)_"-"_$E(SRSDATE,6,7)_"-"_$E(SRSDATE,2,3),?14,SROPER Line Location: CASE+0
Function Call: WRITE	Prompt: !! Line Location: CASE+2
Function Call: READ	Variable: X Timeout: DTIME Line Location: SEL+1
Function Call: WRITE	Prompt: @IOF,!,?1,VADM(1)_" "_VA("PID"),!! Line Location: SEL+2
Function Call: WRITE	Prompt: !!,"Please enter the number corresponding to the Transplant Assessment you want",!,"to edit. If the assessment desired does not appear, enter <RET> to continue",!,"listing additional assessments." Line Location: SEL+3
Function Call: READ	Variable: X Timeout: DTIME Line Location: SEL+4