Routine: SROREA1

Information

SROREA1 ;B'HAM ISC/MAM - DELAY REASONS, ONE SPECIALTY ; [ 04/04/00 11:54 AM ]

Source file <SROREA1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?3,"TOTAL DELAYS FOR "_SRSSNM,?65,$J($P(^TMP("SR",$J),"^"),5),! Line Location: SROREA1+7
Function Call: WRITE	Prompt: !,SRCAUS,?65,$J($P(^TMP("SR",$J,CAUSE),"^"),5) Line Location: CAUSE+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: PAGE+0
Function Call: WRITE	Prompt: !!,"Enter RETURN to continue printing this report, or '^' to exit from this option." Line Location: PAGE+1
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: !,?(80-$L(SRINST)\2),SRINST,?70,"PAGE: "_PAGE,!,?32,"SURGICAL SERVICE" Line Location: HDR+3
Function Call: WRITE	Prompt: !,?28,"REPORT OF DELAY REASONS",!,?27,"FROM "_X_" TO "_Y,!,?(80-$L(SRSSNM)\2),SRSSNM Line Location: HDR+4
Function Call: WRITE	Prompt: !!,?21,"REVIEWED BY:",?45,"DATE REVIEWED:" Line Location: HDR+5
Function Call: WRITE	Prompt: !! Line Location: HDR+6
Function Call: WRITE	Prompt: "=" Line Location: HDR+6
Function Call: WRITE	Prompt: ! Line Location: HDR+7