Routine: AQAOPC73

Information

AQAOPC73 ; IHS/ORDC/LJF - PRINT SINGLE CRIT RPRT-ASCII ;

Source Information

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Kernel	2	^%ZISC $$REPLACE^XLFSTR
Quality Assurance	2	(DLMHDG,INIT,KILL)^AQAOUTIL PRTOPT^AQAOVAR
VA Fileman	1	Y^DIQ

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Quality Assurance	1	AQAOPC71

Entry Points

Name	Comments	DBIA/ICR reference
INDNAME()
MONTHS	; >> SUBRTN to create array for months in report&init their counts
LIST	; >> SUBRTN to list occurrences
HDG3	; >> SUBRTN to print 2nd half of heading for stats section
HDG2	; >> SUBRTN to print 2nd half of heading for listing
EXIT	; >>> eoj
COUNTP	; >> SUBRTN to to loop thru extra sort then print line
PRINT	; >> SUBRTN to print each occurrence
VALUES	; >> SUBRTN to print criteria values by month
LOOP	; >> loop thru ^tmp to get data then print it

Name	Field # of Occurrence
^%ZISC	EXIT+4
DLMHDG^AQAOUTIL	LOOP+2
INIT^AQAOUTIL	AQAOPC73+12
KILL^AQAOUTIL	EXIT+4
PRTOPT^AQAOVAR	EXIT+2
Y^DIQ	INDNAME+2, INDNAME+4, INDNAME+6
$$REPLACE^XLFSTR	PRINT+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,">> NO OCCURRENCES FOUND FOR THIS INDICATOR <<" Line Location: LOOP+3
Function Call: WRITE	Prompt: !!,7," STOP CAPTURE NOW *" Line Location: EXIT+1
Function Call: WRITE	Prompt: AQAODLM Line Location: VALUES+21
Function Call: WRITE	Prompt: !,AQAOLIN3,!,"Monthly:" Line Location: VALUES+28
Function Call: WRITE	Prompt: AQAODLM,+AQAOCNT(AQAOSUB) Line Location: VALUES+31
Function Call: WRITE	Prompt: ! Line Location: VALUES+33
Function Call: WRITE	Prompt: ! Line Location: VALUES+37
Function Call: WRITE	Prompt: !,AQAORNG,!,AQAOM,!,AQAOLIN2 Line Location: HDG2+1
Function Call: WRITE	Prompt: !,"Case ID",AQAODLM,"Occ Date",AQAODLM,"Age",AQAODLM Line Location: HDG2+2
Function Call: WRITE	Prompt: "Sex",AQAODLM,"Value",!! Line Location: HDG2+3
Function Call: WRITE	Prompt: !,AQAORNG,!,AQAOM,!!,"Values " Line Location: HDG3+1
Function Call: WRITE	Prompt: AQAODLM,1700+$E(X,1,3),"/",$E(X,4,5) Line Location: HDG3+3
Function Call: WRITE	Prompt: AQAODLM," Totals",! Line Location: HDG3+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	AQAOPC73+10, EXIT+3
^AQAO(2 - [#9002168.2]	INDNAME+1
^DD("DD"	AQAOPC73+16, PRINT+6
^DD(9002168.2	INDNAME+2, INDNAME+4, INDNAME+6
^TMP("AQAOPC7"	EXIT+5!, COUNTP+2, VALUES+3, VALUES+4, VALUES+11, VALUES+12, VALUES+21, VALUES+22
^TMP("AQAOPC7A"	EXIT+5!, LIST+2, PRINT+2, PRINT+4, PRINT+5
^TMP("AQAOPC7B"	EXIT+6!, VALUES+23
^UTILITY("DIQ1"	EXIT+5!

Name	Line Occurrences
$$INDNAME	LOOP+1
COUNTP	LOOP+5
HDG2	LOOP+2
HDG3	LOOP+5
LIST	LOOP+4
MONTHS	AQAOPC73+7, VALUES+1
PRINT	LIST+1, LIST+3
VALUES	COUNTP+1, COUNTP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AQAOARM(	VALUES+9, VALUES+14, VALUES+20, VALUES+29, VALUES+30, MONTHS+3, HDG3+3
>> AQAOBD	AQAOPC73+16, MONTHS+1
>> AQAOCNT	LOOP+3
>> AQAOCNT(	VALUES+25, VALUES+31
>> AQAODLM	PRINT+8, PRINT+9, VALUES+10, VALUES+15, VALUES+19, VALUES+21, VALUES+24, VALUES+30, VALUES+31, HDG2+2 , HDG2+3, HDG3+3, HDG3+4
>> AQAODT	PRINT+1, PRINT+2, PRINT+4, PRINT+5, PRINT+6
>> AQAOED	AQAOPC73+16, MONTHS+1
>> AQAOHCON	AQAOPC73+12*
>> AQAOID	PRINT+3, PRINT+4, PRINT+5, PRINT+8
>> AQAOIND	INDNAME+1
>> AQAOIOM	AQAOPC73+10*, EXIT+3
>> AQAOIOMX	AQAOPC73+9, AQAOPC73+10, AQAOPC73+11, LIST+3
>> AQAOLIN2	HDG2+1
>> AQAOLIN3	AQAOPC73+11*, VALUES+28
>> AQAOM	LOOP+1, HDG2+1, HDG3+1, INDNAME+1, INDNAME+7*, INDNAME+8
>> AQAOMON	VALUES+8, VALUES+9, VALUES+11, VALUES+12, VALUES+14, VALUES+19, VALUES+20, VALUES+21, VALUES+22, VALUES+23 , VALUES+28, VALUES+29, VALUES+30
>> AQAORNG	AQAOPC73+16, AQAOPC73+17, HDG2+1, HDG3+1
>> AQAOSUB	LIST+1, LIST+2, LIST+3, PRINT+2, PRINT+4, PRINT+5, COUNTP+1, COUNTP+2, COUNTP+3, VALUES+3 , VALUES+4, VALUES+11, VALUES+12, VALUES+21, VALUES+22, VALUES+23, VALUES+25, VALUES+31
>> AQAOSUBT	VALUES+4*, VALUES+15, VALUES+25
>> AQAOT	INDNAME+1*, INDNAME+2, INDNAME+4, INDNAME+6
>> AQAOTY	AQAOPC73+15*
>> AQAOTYPE	LOOP+4
>> AQAOVAL	VALUES+2, VALUES+3, VALUES+4, VALUES+5, VALUES+11, VALUES+12, VALUES+21, VALUES+22
>> AQAOXSN	LIST+1, COUNTP+1
>> AQAOZ	INDNAME+3, INDNAME+5, INDNAME+7*
>> C	INDNAME+2, INDNAME+4, INDNAME+6*
IOM	AQAOPC73+10
IOST	EXIT+2
>> IOT	AQAOPC73+10, EXIT+3
U	PRINT+8, PRINT+9, INDNAME+1, INDNAME+2, INDNAME+4, INDNAME+6
>> X	AQAOPC73+10, EXIT+3, PRINT+5, PRINT+7, PRINT+8, PRINT+9, VALUES+12, VALUES+13, VALUES+14, VALUES+22* , VALUES+23, MONTHS+1, MONTHS+2, MONTHS+3, MONTHS+4, HDG3+2, HDG3+3*
>> X(","	PRINT+7*
>> Y	AQAOPC73+10, AQAOPC73+16, AQAOPC73+17, PRINT+6, PRINT+7, PRINT+8, MONTHS+1, MONTHS+4, INDNAME+2, INDNAME+3 , INDNAME+4, INDNAME+5, INDNAME+6, INDNAME+7

Customize PDF page

Package: Quality Assurance

Routine: AQAOPC73

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: