Routine: AQAOPQ1

Information

AQAOPQ1 ; IHS/ORDC/LJF - QIK REF-OUTCOME LEVELS ;

Source file <AQAOPQ1.m>

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Quality Assurance	2	(HEADING,INIT,KILL,NEWPG)^AQAOUTIL PRTOPT^AQAOVAR

Name	Comments	DBIA/ICR reference
PRINT	;
INIT	; >>> initialize variables
EXIT	; >> eoj
LOOP	; >> loop thru qi outcome file and set array
DEV	; >> get print device

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: DEV+1
Function Call: WRITE	Prompt: !,AQAOLINE,! Line Location: INIT+4
Function Call: WRITE	Prompt: ! Line Location: PRINT+3
Function Call: WRITE	Prompt: !,AQAOLINE,! Line Location: PRINT+7
Function Call: WRITE	Prompt: !,AQAOY,?20,AQAOZ," = ",AQAOAR(AQAOX,AQAOY,AQAOZ) Line Location: PRINT+8
Routine Call	%ZIS Line Location: DEV+4
Routine Call	%ZIS Line Location: DEV+1

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	INIT+1
^AQAO1(3 - [#9002169.3]	LOOP+2, LOOP+3

Name	Line Occurrences
EXIT	DEV+1, DEV+4
LOOP	DEV+2

Name	Field # of Occurrence
>> %ZIS	DEV+1*
>> AQAOAR(	PRINT+2, PRINT+4, PRINT+6, PRINT+8, PRINT+9
>> AQAOAR(1	LOOP+5*
>> AQAOAR(2	LOOP+6*
>> AQAOAR(3	LOOP+7*
>> AQAOAR(4	LOOP+8*
>> AQAOIOMX	INIT+1
>> AQAOLINE	INIT+4, PRINT+7
>> AQAOS	LOOP+3*, LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+8
>> AQAOSTOP	PRINT+2, PRINT+4, PRINT+6, PRINT+7
>> AQAOTY	INIT+3*
>> AQAOX	LOOP+1, LOOP+2, LOOP+3, PRINT+1, PRINT+2, PRINT+4, PRINT+6, PRINT+8, PRINT+9
>> AQAOY	PRINT+3, PRINT+4, PRINT+6, PRINT+8, PRINT+9
>> AQAOZ	PRINT+5, PRINT+6, PRINT+8, PRINT+9
IO	DEV+2
IO("Q"	DEV+2, DEV+3!
IOSL	PRINT+7
IOST	EXIT+1
>> IOT	INIT+1
>> POP	DEV+1
U	LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+8, PRINT+2, PRINT+4, PRINT+6, PRINT+7
>> X	LOOP+4, LOOP+5, LOOP+6, LOOP+7, LOOP+8, INIT+1
>> ZTDESC	DEV+3*
>> ZTQUEUED	EXIT+1
>> ZTRTN	DEV+3*