Routine: QAPDEMS1

Information

QAPDEMS1 ;557/THM-DEMOGRAPHICAL STATISTICS,PART 2 [ 08/28/95 2:16 PM ]

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!?20,"No one has yet participated in this survey.",!! Line Location: PRINT+24
Function Call: WRITE	Prompt: ! Line Location: PRINT+27
Function Call: WRITE	Prompt: X,! Line Location: PRINT+28
Function Call: WRITE	Prompt: ! Line Location: PRINT+29
Function Call: WRITE	Prompt: !! Line Location: PRINT+31
Function Call: WRITE	Prompt: ?3,QY,! Line Location: WP+3
Function Call: WRITE	Prompt: @IOF Condition for execution: PG>1!(IOST?1"C-".E) Line Location: HDR+0
Function Call: WRITE	Prompt: !,QAPDATE,?(IOM-$L(TITLE)\2),TITLE,?(IOM-12),"Page: ",PG,!,?(IOM-$L(SITE)\2),SITE,!,?(IOM-$L(BANNER)\2),BANNER,!,?(IOM-$L(BANNER1)\2),BANNER1,! Line Location: HDR+0
Function Call: WRITE	Prompt: !,"Total responses: ",TOTPART,?49,$S(BYPASSNA=2:"Not including",1:"Including")_" 'NA' answers",!?49,$S(BYPASS=2:"Not including",1:"Including")," bypassed answers" Condition for execution: PG=1 Line Location: HDR+1
Function Call: WRITE	Prompt: !,LINE,! Line Location: HDR+1
Function Call: WRITE	Prompt: ! Line Location: PAUSE+0