Routine: AQAOPR81

Package	Total	Call Graph
Quality Assurance	3	INDCHK^AQAOSEC (INIT,KILL,NEWPG)^AQAOUTIL PRTOPT^AQAOVAR
IHS VA Utilities	1	($$VAL,$$VALI,ENPM)^XBDIQ1
Kernel	1	^%ZISC

Package	Total	Caller Graph
Quality Assurance	1	AQAOPR8

Entry Points

Name	Comments	DBIA/ICR reference
FUNCTION	; -- SUBRTN to mark which functions indicator is linked to
DIM	;;
HIGHFNC()	; -- SUBRTN to return # of functions selected
CRITLIST	; -- SUBRTN to print review criteria for each indicator
DIMYES()	; -- SUBRTN to return whether indicator linked to any dimensions
COVER	; -- SUBRTN to print cover page for report
TEAMS	; -- SUBRTN to print teams linked to indicator
INIT	; -- initialize variables for report
EXIT	; -- eoj
CRITERIA	; -- SUBRTN to mark which dimensions indicator is linked to
NEWPG	; -- SUBRTN to call newpage code
FNCYES()	; -- SUBRTN to return whether indicator linked to selected funcs
HDG2	; -- SUBRTN to print 2nd half of heading
LOOP	; -- loop thru indicators by code number

External References

Name	Field # of Occurrence
^%ZISC	EXIT+3
INDCHK^AQAOSEC	LOOP+7
INIT^AQAOUTIL	INIT+1
KILL^AQAOUTIL	EXIT+3
NEWPG^AQAOUTIL	INIT+3, COVER+1, COVER+7, NEWPG+1
PRTOPT^AQAOVAR	EXIT+2
$$VAL^XBDIQ1	LOOP+6
$$VALI^XBDIQ1	TEAMS+5
ENPM^XBDIQ1	TEAMS+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,AQAOC,?11 Line Location: LOOP+12
Function Call: WRITE	Prompt: ?AQAOIOMX-$L(X)\2,X,!,AQAOLINE,! Line Location: COVER+2
Function Call: WRITE	Prompt: !!?3,"KEY FUNCTIONS SELECTED:",! Line Location: COVER+4
Function Call: WRITE	Prompt: !,AQAOLINE,! Line Location: COVER+7
Function Call: WRITE	Prompt: !?3,"F",$E("0"_AQAOX,$L(AQAOX),$L(AQAOX)+1) Line Location: COVER+8
Function Call: WRITE	Prompt: ?10,$P(AQAOFNC(AQAOX),U,2) Line Location: COVER+9
Function Call: WRITE	Prompt: !!?3,"DIMENSIONS OF PERFORMANCE:",! Line Location: COVER+12
Function Call: WRITE	Prompt: !?3,"DP",AQAOI,?10,$P($T(DIM+AQAOI),";;",2) Line Location: COVER+13
Function Call: WRITE	Prompt: " " Line Location: FUNCTION+3
Function Call: WRITE	Prompt: $S($D(^AQAO(2,AQAON,"AOC","B",+AQAOFNC(AQAOX))):"X",1:" ") Line Location: FUNCTION+4
Function Call: WRITE	Prompt: " " Line Location: FUNCTION+5
Function Call: WRITE	Prompt: " " Line Location: CRITERIA+3
Function Call: WRITE	Prompt: X," " Line Location: CRITERIA+5
Function Call: WRITE	Prompt: $S($D(^AQAO1(6,C,"DIM","B",AQAOI)):"X",1:" ")," " Line Location: CRITERIA+8
Function Call: WRITE	Prompt: ?AQAOCOL,$$VALI^XBDIQ1(9002169.1,AQAO(AQAOX,.01,"I"),.02),! Line Location: TEAMS+5
Function Call: WRITE	Prompt: ! Condition for execution: $X>3 Line Location: CRITLIST+4
Function Call: WRITE	Prompt: "CR",AQAOX Line Location: CRITLIST+4
Function Call: WRITE	Prompt: $S(AQAOSEL=2:$$VAL^XBDIQ1(9002169.6,AQAOX,.01),1:"CR"_AQAOX) Line Location: CRITLIST+5
Function Call: WRITE	Prompt: ?($$HIGHFNC*5+11) Line Location: CRITLIST+6
Function Call: WRITE	Prompt: " " Line Location: CRITLIST+8
Function Call: WRITE	Prompt: $S($D(^AQAO1(6,"ADIM",AQAOD,AQAOX)):"X",1:" ")," " Line Location: CRITLIST+9
Function Call: WRITE	Prompt: ! Line Location: CRITLIST+10
Function Call: WRITE	Prompt: !,AQAOLIN2,! Line Location: HDG2+2
Function Call: WRITE	Prompt: "Indicators",?11 Line Location: HDG2+3
Function Call: WRITE	Prompt: " F" Line Location: HDG2+4
Function Call: WRITE	Prompt: I," " Line Location: HDG2+4
Function Call: WRITE	Prompt: " DP",I," " Line Location: HDG2+5
Function Call: WRITE	Prompt: " QI TEAMS",!,AQAOLINE,! Line Location: HDG2+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("RM"	INIT+2, EXIT+1
^AQAO(2 - [#9002168.2]	LOOP+2, LOOP+4, LOOP+5, FUNCTION+4, CRITERIA+4, FNCYES+3, DIMYES+2
^AQAO1(6 - [#9002169.6]	CRITERIA+7, CRITERIA+8, CRITLIST+3, CRITLIST+9, DIMYES+3, DIMYES+4

Label References

Name	Line Occurrences
$$DIMYES	LOOP+9, LOOP+10
$$FNCYES	LOOP+8, LOOP+10
$$HIGHFNC	CRITLIST+6, HDG2+4
COVER	INIT+3
CRITERIA	LOOP+14
CRITLIST	LOOP+16
FUNCTION	LOOP+13
HDG2	INIT+3, LOOP+11, TEAMS+6
NEWPG	LOOP+11, TEAMS+6
TEAMS	LOOP+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AQAO	TEAMS+1~
AQAO(	TEAMS+4, TEAMS+5
>> AQAOC	LOOP+1, LOOP+2, LOOP+4, LOOP+12
>> AQAOCHK("OK"	LOOP+7
AQAOCOL	TEAMS+1~*, TEAMS+5
AQAOCRT	LOOP+16, EXIT+3!
AQAOD	CRITLIST+1~, CRITLIST+7*, CRITLIST+9
AQAOFNC	EXIT+3!
AQAOFNC(	COVER+6, COVER+9, FUNCTION+2, FUNCTION+4, FNCYES+2, FNCYES+3, HIGHFNC+1
AQAOI	COVER+13, CRITERIA+1~, CRITERIA+2, CRITERIA+4, CRITERIA+8
>> AQAOIOMX	INIT+2, COVER+2
>> AQAOLIN2	HDG2+2
>> AQAOLINE	COVER+2, COVER+7, HDG2+6
>> AQAON	LOOP+3, LOOP+4, LOOP+5, LOOP+6, LOOP+7, FUNCTION+4, CRITERIA+4, CRITERIA+7, TEAMS+2, CRITLIST+3 , FNCYES+3, DIMYES+2, DIMYES+3
AQAOSEL	LOOP+8, LOOP+9, LOOP+10, LOOP+13, LOOP+14, EXIT+3!, COVER+4, COVER+11, HDG2+4, HDG2+5
>> AQAOSTOP	LOOP+2, LOOP+4, LOOP+11, LOOP+13, LOOP+14, LOOP+15, COVER+7, TEAMS+4, TEAMS+6, CRITLIST+3
>> AQAOTY	INIT+1*
AQAOX	COVER+5, COVER+6, COVER+8, COVER+9, FUNCTION+1~, FUNCTION+2, FUNCTION+4, TEAMS+1~, TEAMS+3, TEAMS+4* , TEAMS+5, CRITLIST+1~, CRITLIST+2, CRITLIST+3, CRITLIST+4, CRITLIST+9
C	CRITERIA+1~, CRITERIA+6, CRITERIA+7, CRITERIA+8
I	HDG2+1~, HDG2+4, HDG2+5
IOSL	LOOP+11, COVER+7, TEAMS+6
IOST	EXIT+2
U	LOOP+2, LOOP+4, LOOP+11, LOOP+13, LOOP+14, LOOP+15, COVER+7, COVER+9, TEAMS+4, TEAMS+6 , CRITLIST+3
X	INIT+2, EXIT+1, COVER+2, CRITERIA+1~, CRITERIA+4, CRITERIA+5, CRITERIA+6, CRITERIA+7, CRITERIA+8, FNCYES+1~ , FNCYES+2, FNCYES+3, DIMYES+1~, DIMYES+3, DIMYES+4, HIGHFNC+1~*
Y	LOOP+7, FNCYES+1~, FNCYES+2, FNCYES+3, FNCYES+4, DIMYES+1~, DIMYES+2, DIMYES+3, DIMYES+4, DIMYES+5 , HIGHFNC+1~*, HIGHFNC+2
>> ZTQUEUED	EXIT+2

Marked Items

Name	Field # of Occurrence
$T(DIM+AQAOI	COVER+13

Customize PDF page

Package: Quality Assurance

Routine: AQAOPR81

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:

Marked Items