Routine: PSGAMS

Information

PSGAMS ;BIR/CML3-AMIS REPORT ;25 AUG 94 / 12:07 PM

Source file <PSGAMS.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!?32,"* WARNING *",!,"PICK LISTS need to be filed away for the following ward group",$E("s",P>1),", or this AMIS" Line Location: PSGAMS+5
Function Call: WRITE	Prompt: !?3,$S($D(^PS(57.5,Q,0)):$P(^(0),"^"),1:Q) Line Location: PSGAMS+6
Function Call: WRITE	Prompt: $C(7),!!?10,"* THERE IS NO DATA FOR THIS REPORT, YET. *" Line Location: ENDTS+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: DT+1
Function Call: WRITE	Prompt: !!,"Enter ",D," DATE: " Line Location: DT+1
Function Call: WRITE	Prompt: X="^" Condition for execution: '$T $C(7) S:'$T Line Location: DT+1
Function Call: WRITE	Prompt: "The start and stop dates may be the same, in effect, a one day report." Line Location: DTM+2
Function Call: WRITE	Prompt: " "_$S(X1:" ",1:"")_"The stop"_$S(X1:" ",1:"")_"date may not come before the start date." Condition for execution: D="STOP" Line Location: DTM+3
Function Call: WRITE	Prompt: !?2,"Dates are inclusive. (The first date found is "_FIRST_".)" Line Location: DTM+3
Function Call: WRITE	Prompt: $C(7),!!?10," There is no data for this report, yet. " Line Location: ENDC+1