Routine: AQAOCHK

Package	Total	Call Graph
Quality Assurance	3	($$SETREFRL,QIREF,REFSET,SET)^AQAOCHK0 ^AQAOCHK1 END^AQAOCHK2

Package	Total	Caller Graph
Quality Assurance	2	AQAOCHK1 AQAOCHK3

Entry Points

Name	Comments	DBIA/ICR reference
REVSET(X,Y,D,R)	; -- SUBRTN to set review array ; X=referred to, Y=review number, D=review date, R=reviewed by
OCC	;EP; -- loop thru open occurrences then check if on indicator list
NEXT	; -- go to print rtn
REVIEWS	; -- SUBRTN to find occ referred to user or team
USER	; -- check if user has referral after last review performed by user
TEAM	; -- check if team has referral after last review performed by team
ACTION	; -- SUBRTN to find any pending action plans user needs to review
ENTRY	;ENTRY POINT to build array counting occ needing review
LASTREV()	; -- SUBRTN to find last review date
OPEN	; -- SUBRTN to find open cases

External References

Name	Field # of Occurrence
$$SETREFRL^AQAOCHK0	USER+6, TEAM+6
QIREF^AQAOCHK0	REVIEWS+31
REFSET^AQAOCHK0	USER+7, TEAM+7
SET^AQAOCHK0	OCC+6, OPEN+5
^AQAOCHK1	NEXT+3
END^AQAOCHK2	NEXT+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,*7,"Checking for OCCURRENCES & ACTION PLANS you need to review" Line Location: ENTRY+2
Function Call: WRITE	Prompt: ". . . . ." Line Location: ENTRY+3
Function Call: WRITE	Prompt: !!,"* NONE FOUND *" Line Location: NEXT+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AQAO(2 - [#9002168.2]	ENTRY+17
^AQAO(5 - [#9002168.5]	ACTION+2, ACTION+3, ACTION+4
^AQAO(6 - [#9002168.6]	REVIEWS+3, REVIEWS+21
^AQAO(9 - [#9002168.9]	ENTRY+11, ENTRY+12, ENTRY+13
^AQAOC - [#9002167]	OCC+3, OCC+4, OCC+5, REVIEWS+3, REVIEWS+4, REVIEWS+5, REVIEWS+10, REVIEWS+11, REVIEWS+16, REVIEWS+17 , REVIEWS+26, REVIEWS+27
^AQAOC("AD"	OCC+2
^TMP("AQAOCHK"	ENTRY+6!, ACTION+9*

Label References

Name	Line Occurrences
$$LASTREV	OPEN+5
ACTION	OCC+8
OPEN	OCC+7
REVIEWS	OCC+7
REVSET	REVIEWS+6, REVIEWS+12, REVIEWS+22, REVIEWS+28
TEAM	REVIEWS+35
USER	REVIEWS+34

Naked Globals

Name	Field # of Occurrence
^(0	OCC+3, OCC+4, ACTION+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> A	REVIEWS+3, REVIEWS+18, REVIEWS+21
AQAOA	REVIEWS+1!, REVIEWS+9, REVIEWS+10, REVIEWS+11, REVIEWS+12
>> AQAOAC	OCC+5*, OCC+6
AQAOB	REVIEWS+1!, REVIEWS+25, REVIEWS+26, REVIEWS+27
>> AQAODT	OCC+4, REVIEWS+5, REVIEWS+6, REVIEWS+12, REVIEWS+19*, REVIEWS+21, REVIEWS+22, REVIEWS+28
>> AQAODUZ	ENTRY+5*, ENTRY+11, ENTRY+12, ENTRY+13, USER+2, USER+3, REVSET+4, REVSET+6
>> AQAOIFN	OCC+1, OCC+2, OCC+3, OCC+4, OCC+5, REVIEWS+3, REVIEWS+4, REVIEWS+5, REVIEWS+10, REVIEWS+11 , REVIEWS+16, REVIEWS+17, REVIEWS+26, REVIEWS+27
>> AQAOIND	ENTRY+16, ENTRY+17, ENTRY+18, OCC+4, ACTION+3, ACTION+5, ACTION+9
>> AQAOLST	USER+5, TEAM+5, OPEN+5*
>> AQAOPLN	ACTION+1, ACTION+2, ACTION+3, ACTION+4, ACTION+9
AQAOR1	REVIEWS+1!, REVIEWS+33, OPEN+4
AQAOR1(	USER+2, USER+4, USER+5, TEAM+3, TEAM+4, TEAM+5, REVSET+2, REVSET+3, REVSET+4, REVSET+5 , OPEN+2, OPEN+3!
AQAOR2	REVIEWS+1!
AQAOR2(	REVIEWS+21, USER+4, TEAM+4, REVSET+2, REVSET+3, REVSET+6, REVSET+7*, OPEN+3, LASTREV+2, LASTREV+3
AQAOREF	USER+1~, USER+6, TEAM+1~, TEAM+6
>> AQAOREV	REVIEWS+15, REVIEWS+16, REVIEWS+17, REVIEWS+21, REVIEWS+22, REVIEWS+26, REVIEWS+27, REVIEWS+28
>> AQAOSTR	ACTION+3*, ACTION+6, ACTION+7
>> AQAOUA("USER"	ENTRY+7
>> AQAOX	REVIEWS+4, REVIEWS+6, REVIEWS+11, REVIEWS+12, REVIEWS+19, REVIEWS+21, REVIEWS+22, REVIEWS+27, REVIEWS+28
AQAOXYZ	ENTRY+6!, ENTRY+7*, REVIEWS+31, REVSET+3, ACTION+5
AQAOXYZ(1	ENTRY+14*, TEAM+2, REVSET+5, REVSET+7
AQAOXYZ(2	ENTRY+18*, ACTION+5
AQAOXYZ(3	NEXT+2, ACTION+8*
>> AQAOY	REVIEWS+17*, REVIEWS+21, REVIEWS+22, REVIEWS+28
D	REVSET~, REVSET+2, REVSET+3, REVSET+4, REVSET+5, REVSET+6, REVSET+7, LASTREV+1~, LASTREV+3
DT	ACTION+6
DUZ	ENTRY+5
DUZ(2	OCC+3, ACTION+4
>> I	ACTION+1*, ACTION+2, ACTION+6, ACTION+8, ACTION+9
R	REVIEWS+5*, REVIEWS+6, REVIEWS+12, REVSET~, REVSET+2, REVSET+3, REVSET+6, REVSET+7
U	ENTRY+7, ENTRY+12, ENTRY+13, OCC+3, OCC+4, OCC+5, REVIEWS+3, REVIEWS+4, REVIEWS+5, REVIEWS+11 , REVIEWS+17, REVIEWS+18, REVIEWS+19, REVIEWS+21, REVIEWS+27, USER+4, USER+5, TEAM+4, TEAM+5, REVSET+2 , REVSET+3, REVSET+4, REVSET+5, REVSET+6, REVSET+7, OPEN+3, LASTREV+3, ACTION+3, ACTION+4, ACTION+6 , ACTION+7
X	ENTRY+11, ENTRY+12, ENTRY+13, OCC+6, REVIEWS+17, REVIEWS+18, REVIEWS+19, USER+1~, USER+2, USER+4 , USER+5, USER+6, TEAM+1~, TEAM+3, TEAM+4, TEAM+5, TEAM+6, REVSET~, REVSET+2, REVSET+3 , REVSET+4, REVSET+5, OPEN+1~, OPEN+2, OPEN+3, OPEN+5, LASTREV+1~, LASTREV+2*, LASTREV+3
Y	ENTRY+13, ENTRY+14, ENTRY+17, USER+1~, USER+3, USER+4, USER+5, USER+6, TEAM+1~, TEAM+3 , TEAM+4, TEAM+5, TEAM+6, REVSET~, REVSET+2, REVSET+3, REVSET+4, REVSET+5, REVSET+6, REVSET+7 , OPEN+1~, LASTREV+1~, LASTREV+3*, LASTREV+4
Z	TEAM+1~, TEAM+2*, TEAM+3

Customize PDF page

Package: Quality Assurance

Routine: AQAOCHK

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: