Routine: AQAOPC12

Package	Total	Call Graph
Quality Assurance	3	SUMMARY^AQAOPC13 (HEADING,INIT,KILL,NEWPG)^AQAOUTIL PRTOPT^AQAOVAR
Kernel	2	^%ZISC ENDR^%ZISS
VA Fileman	1	YX^%DTC

Package	Total	Caller Graph
Quality Assurance	1	AQAOPC11

Entry Points

Name	Comments	DBIA/ICR reference
END	; >>> eoj
LOOPBACK
CRITPRT
HDG1	; >> SUBRTN to print second half of heading
LIST2	; >> SUBRTN for each AQAOSUB list occ and criteria
INIT	; >>> initialize variables
CRITLOOP	; >> SUBRTN to loop thru crit values for occurrence and print
LISTING	; >>> SUBRTN to print occurrence listing if selected
DLMHDG	; >> SUBRTN to print second half of heading for ASCII format

Name	Line Occurrences
Function Call: WRITE	Prompt: IOPTCH16 Line Location: INIT+3
Function Call: WRITE	Prompt: !!,7," STOP CAPTURE NOW *",! Line Location: END+1
Function Call: WRITE	Prompt: IOPTCH10 Line Location: END+3
Function Call: WRITE	Prompt: @IOF Line Location: END+4
Function Call: WRITE	Prompt: !!?AQAOIOMX-$L(AQAOSUB)/2,AQAOSUB,! Line Location: LIST2+1
Function Call: WRITE	Prompt: !,$P(AQAOSTR,U),AQAODLM,Y Line Location: LIST2+9
Function Call: WRITE	Prompt: !,$P(AQAOSTR,U),?10,$E(Y_" ",1,11) Line Location: LIST2+10
Function Call: WRITE	Prompt: ?AQAOIOMX-$L(X)/2,X,!?AQAOIOMX-$L(AQAORG)/2,AQAORG Line Location: HDG1+2
Function Call: WRITE	Prompt: !,AQAOLINE,!,"Case #",?11,"Occ Date " Line Location: HDG1+3
Function Call: WRITE	Prompt: Y Line Location: HDG1+4
Function Call: WRITE	Prompt: !!!!,"*OCCURRENCE LISTINGS*",!,AQAORG,! Line Location: DLMHDG+1
Function Call: WRITE	Prompt: !,"Printed by ",AQAODUZ," Printed on " Line Location: DLMHDG+2
Function Call: WRITE	Prompt: Y Line Location: DLMHDG+2
Function Call: WRITE	Prompt: !,"Case #",AQAODLM,"Occ Date " Line Location: DLMHDG+3
Function Call: WRITE	Prompt: AQAODLM,"CR",X Line Location: DLMHDG+4

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	INIT+2, END+2
^AQAO(2 - [#9002168.2]	HDG1+1
^DD("DD"	LIST2+8
^TMP("AQAOPC1"	END+6!, LISTING+1, LISTING+6, LIST2+3, LIST2+5, LIST2+6
^TMP("AQAOPC11"	END+6!

Name	Field # of Occurrence
^(0	HDG1+1

Name	Field # of Occurrence
>> %H	DLMHDG+2*
>> AQAOBD	INIT+6
>> AQAOCR(	LOOPBACK+5, HDG1+4, DLMHDG+4
AQAOCX	CRITLOOP+1!
AQAOCX(	LOOPBACK, LOOPBACK+1, LOOPBACK+6, CRITPRT, CRITPRT+2, CRITPRT+3
>> AQAODLM	END+1, LISTING+2, LIST2+7, LIST2+8, LIST2+9, CRITPRT+3, DLMHDG+3, DLMHDG+4
>> AQAODT	LIST2+2, LIST2+3, LIST2+5, LIST2+6, LIST2+8
>> AQAODUZ	DLMHDG+2
>> AQAOED	INIT+7
>> AQAOHCON	INIT+4*
>> AQAOIND	HDG1+1
>> AQAOIOMX	INIT+1, INIT+2, END+2, LIST2+1, HDG1+2
>> AQAOLINE	HDG1+3
>> AQAON	LIST2+4, LIST2+5, LIST2+6
>> AQAORG	INIT+6, INIT+7, HDG1+2, DLMHDG+1
>> AQAOSTOP	INIT+11, END+4, END+5, LISTING+6, LIST2+3, LIST2+5, LIST2+7
>> AQAOSTR	LIST2+6*, LIST2+9, LIST2+10, CRITLOOP+3
>> AQAOSUB	LISTING+4, LISTING+6, LIST2+1, LIST2+3, LIST2+5, LIST2+6
>> AQAOSV	CRITLOOP+1, LOOPBACK+2, LOOPBACK+4, LOOPBACK+6
>> AQAOTY	INIT+5*
>> AQAOTYP	INIT+10
>> AQAOXSN	LISTING+4
>> I	CRITLOOP+3*
IOF	END+4
IOM	END+2
IOPTCH10	END+3, END+7!
IOPTCH16	INIT+3, END+3, END+7!
IOSL	LIST2+7
>> IOT	INIT+1, END+2, END+3
U	INIT+11, END+4, LISTING+6, LIST2+3, LIST2+5, LIST2+7, LIST2+9, LIST2+10, CRITLOOP+3, HDG1+1
>> X	INIT+2, INIT+3, END+2, END+3, CRITLOOP+3, LOOPBACK, LOOPBACK+1, LOOPBACK+5, LOOPBACK+6, CRITPRT+1* , CRITPRT+2, CRITPRT+3, HDG1+1, HDG1+2, HDG1+4, DLMHDG+4
>> Y	LIST2+8, LIST2+9, LIST2+10, CRITLOOP+3, CRITLOOP+4, LOOPBACK+1, HDG1+4, DLMHDG+2
>> Z	CRITLOOP+1, LOOPBACK, LOOPBACK+1, LOOPBACK+2, LOOPBACK+6, CRITPRT*, CRITPRT+2, CRITPRT+3
>> ZTQUEUED	END+5