Routine: AQAOPR8

Package	Total	Call Graph
Quality Assurance	4	MATRIX^AQAOHPRT ^AQAOPR81 KILL^AQAOUTIL PRTOPT^AQAOVAR
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	^DIC ^DIR

Package	Total	Caller Graph
Quality Assurance	1	AQAOPR1

Entry Points

Name	Comments	DBIA/ICR reference
FUNCTION	; -- SUBRTN to ask user for functions to include
F2
MOST()	; -- SUBRTN to return # of functions that can fit on this report
DEV	; -- SUBRTN to get print device and call print rtn
EXIT	; -- SUBRTN for eoj
CHOOSE	; -- ask user which grouping to include
MSG(X)	; -- SUBRTN to print warning messages
CRITERIA	; -- SUBRTN to ask is criteria should be included in report
MARGIN80()	; -- SUBRTN to return # of functions to fit in 80 columns

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: CHOOSE+1
Function Call: WRITE	Prompt: !! Line Location: DEV+1
Function Call: WRITE	Prompt: ! Line Location: F2+2
Function Call: WRITE	Prompt: !!?3,"You have selected:" Line Location: F2+9
Function Call: WRITE	Prompt: !?3,$P(AQAOFNC(X),U,2) Line Location: F2+11
Function Call: WRITE	Prompt: !! Line Location: F2+14
Function Call: WRITE	Prompt: ! Line Location: CRITERIA+8
Function Call: WRITE	Prompt: !!?5,*7,X Line Location: MSG+1
Routine Call	DIC Line Location: F2+2
Routine Call	DIR Line Location: CHOOSE+22 F2+16 CRITERIA+8
Routine Call	%ZIS Line Location: DEV+1

FileNo	Call Tags
^AQAO(1 - [#9002168.1]	Classic Fileman Calls

Name	Field # of Occurrence
>> %ZIS	DEV+1*
AQAOCNT	FUNCTION+1~, F2+1, F2+3, F2+4, F2+5, F2+7, F2+13
>> AQAOCRT	CHOOSE+29, CRITERIA+1, CRITERIA+8*
AQAOFNC	CHOOSE+26, FUNCTION+1!, F2+8, F2+9
AQAOFNC(	CHOOSE+32, F2+3*, F2+10, F2+11
>> AQAOIOMX	CHOOSE+32*, CHOOSE+33
>> AQAOSEL	CHOOSE+23*, CHOOSE+26, CHOOSE+29, MOST+1, MARGIN80+1
DIC	FUNCTION+1~, F2*
DIC(0	F2*
DIR	CHOOSE+1!, F2+14!, CRITERIA+1~
DIR("?"	CHOOSE+9, CHOOSE+10, CHOOSE+11, CHOOSE+12, CHOOSE+13, CHOOSE+14, CHOOSE+15, CHOOSE+16, CHOOSE+17, CHOOSE+18 , CHOOSE+19, CHOOSE+20, CHOOSE+21, CRITERIA+4, CRITERIA+5, CRITERIA+6, CRITERIA+7*
DIR("A"	CHOOSE+2, CHOOSE+3, CHOOSE+4, CHOOSE+5, CHOOSE+6, CHOOSE+7, CHOOSE+8, F2+15, CRITERIA+3*
DIR("B"	CHOOSE+1, F2+14, CRITERIA+2*
DIR(0	CHOOSE+1, F2+14, CRITERIA+2*
>> DIRUT	CHOOSE+22, CHOOSE+29
>> DTOUT	CHOOSE+26, F2+1, F2+2
>> DUOUT	CHOOSE+26, F2+1, F2+2
>> I	CHOOSE+21, DEV+5
IO("Q"	DEV+3, DEV+4!
IOST	EXIT+1
>> POP	DEV+2
U	F2+3, F2+11
X	FUNCTION+1~, F2+1, F2+10, F2+11, CRITERIA+1~, MSG~, MSG+1
Y	CHOOSE+22, CHOOSE+23, FUNCTION+1~, F2+2, F2+3, F2+13, CRITERIA+1~, CRITERIA+8
Y(0	F2+3
>> ZTDESC	DEV+4*
>> ZTQUEUED	EXIT+1
>> ZTRTN	DEV+4*
>> ZTSAVE(	DEV+5*
ZTSK	DEV+6!