Routine: QAPDEMS1

Information

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

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Survey Generator	3	LIKRTLAB^QAPCHX EN^QAPDEMS EXIT^QAPUTIL
Registration	1	$$SITE^VASITE
VA FileMan	1	^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Survey Generator	1	QAPDEMS

Entry Points

Name	Comments	DBIA/ICR reference
PRINT
WP	;WP responses
HDR
PAUSE

External References

Name	Field # of Occurrence
^DIR	PRINT+44, PAUSE
LIKRTLAB^QAPCHX	PRINT+29
EN^QAPDEMS	PRINT+44
EXIT^QAPUTIL	PRINT+24, PRINT+44, PRINT+45
$$SITE^VASITE	PRINT+6

Interaction Calls

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
Routine Call	DIR Line Location: PRINT+44 PAUSE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRINT+11, PRINT+38
^DIC(4 - [#4]	PRINT+6
^QA(748.25 - [#748.25]	PRINT+19, PRINT+26, PRINT+28, PRINT+29
^QA(748.3 - [#748.3]	PRINT+7, PRINT+8, PRINT+10, PRINT+14, PRINT+15, PRINT+16, PRINT+18, PRINT+30, WP+2, WP+3
^TMP($J	PRINT!, PRINT+13, PRINT+16, PRINT+17, PRINT+18, PRINT+20, PRINT+21, PRINT+32, PRINT+34, PRINT+35 , WP+2
^XTMP($J	PRINT+19!*, PRINT+20, PRINT+21, PRINT+45!

Label References

Name	Line Occurrences
HDR	PRINT+24, PRINT+26
WP	PRINT+36

Naked Globals

Name	Field # of Occurrence
^(0	PRINT+20, PRINT+21, PRINT+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ANS	PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+20, PRINT+21, PRINT+24, PRINT+31, PRINT+32 , PRINT+34, PRINT+35, PRINT+36, PRINT+37, PRINT+41, PRINT+42, PRINT+43
>> ANSTEXT	PRINT+32, PRINT+37, PRINT+41
>> ANSTYPE	PRINT+29*
ANSX	PRINT+19*, PRINT+45!
>> BANNER	PRINT+2*, HDR
>> BANNER1	PRINT+2*, HDR
>> BLANKNA	PRINT+35*, PRINT+43
>> BLANKS	PRINT+34*, PRINT+42
>> BYPASS	PRINT+34, PRINT+41, PRINT+42, HDR+1
>> BYPASSNA	PRINT+35, PRINT+41, PRINT+43, HDR+1
CNTR	PRINT+19*, PRINT+45!
DEMOG	PRINT!, PRINT+10, PRINT+11, PRINT+12, PRINT+13, PRINT+16, PRINT+17, PRINT+18, PRINT+20, PRINT+21 , PRINT+22, PRINT+31, PRINT+32, PRINT+34, PRINT+35, PRINT+38*, PRINT+39, PRINT+41, PRINT+42, PRINT+43 , WP+2
>> DEMPTR	PRINT+8*, PRINT+10
>> DEMTYPE	PRINT+11, PRINT+38
DIR	PRINT+44!, PAUSE!
DIR(0	PRINT+44, PAUSE
DIRUT	PRINT+26, PRINT+28, PRINT+30, PRINT+32, PRINT+44!, WP+2, WP+3, PAUSE!
>> DISP	PRINT+26*, PRINT+28
DT	PRINT+3
>> DTA	PRINT+32*, PRINT+36
DTIME	PRINT+24
>> GRADIENT	PRINT+29*
>> I	PRINT+28*
IO	PRINT+1
IOF	HDR
IOM	PRINT+3, HDR
IOST	PRINT+4, PRINT+5, PRINT+24, PRINT+44, HDR, PAUSE
>> LINE	PRINT+3*, HDR+1
LPART	PRINT!, PRINT+9*, PRINT+30
>> PART	PRINT+7*, PRINT+8, PRINT+9, PRINT+10, PRINT+13, PRINT+14, PRINT+15, PRINT+16, PRINT+18
>> PART1	WP+2*, WP+3
>> PCNT	PRINT+39*, PRINT+41
>> PG	PRINT+1, HDR, HDR+1
>> PQUES	PRINT+18*, PRINT+19, PRINT+20, PRINT+21
>> QAPDATE	PRINT+3*, HDR
>> QAPOUT	PRINT+1*
>> QNUM	PRINT+14, PRINT+15, PRINT+16, PRINT+17, PRINT+18, PRINT+20, PRINT+21, PRINT+26, PRINT+28, PRINT+29 , PRINT+30
QUES	PRINT+29~, PRINT+30, PRINT+32*, PRINT+34, PRINT+35
>> QUES1	PRINT+36*, WP+2, WP+3
>> QY	WP+3*
>> QZ	WP+3*
>> RESPD	PRINT+40*, PRINT+41
>> SITE	PRINT+6*, HDR
>> SORT	PRINT+8
>> SORTTXT	PRINT+2
>> SURVEY	PRINT+7, PRINT+19, PRINT+20, PRINT+21, PRINT+26, PRINT+28, PRINT+29
>> TITLE	HDR
>> TOF	PRINT+4, PRINT+5, PRINT+27, PRINT+28, PRINT+41, WP+2, WP+3
TOTANS	PRINT!, PRINT+32*, PRINT+39, PRINT+40, PRINT+41
TOTPART	PRINT!, PRINT+1, PRINT+9, PRINT+24, HDR+1
TOTPART(	PRINT+12, PRINT+22, PRINT+34, PRINT+35, PRINT+39, PRINT+42, PRINT+43
U	PRINT+6, PRINT+8, PRINT+10, PRINT+14, PRINT+16, PRINT+18, PRINT+20, PRINT+21, PRINT+28, PRINT+29 , PRINT+32, PRINT+34, PRINT+35, PRINT+36, PRINT+44
>> WPPRT	WP+1
>> X	PRINT+28*, PRINT+44
>> Y	PRINT+11, PRINT+38

Customize PDF page

Package: Survey Generator