Routine: AQAOUSA

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
Quality Assurance	3	ASK^AQAOLKP ^AQAOUSA1 KILL^AQAOUTIL
VA Fileman	1	Y^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
CALC	; >> find all users with access
END	; >> eoj
OCC	; >> ask user for occ
DEV	; >>> get print device
MEMBERS	; >> SUBRTN to find team members for ind tied to occ
PRINT	; >> print user list by category then by name
REFSET(X,AQAOY)	; -- SUBRTN to set ^tmp for users found;PATCH 4
QISTAFF	; >> SUBRTN to find all qi staff members
REFERRAL	; -- SUBRTN to find all users to whom occ was referred;PATCH 4

External References

Name	Field # of Occurrence
^%ZIS	DEV+1
HOME^%ZIS	DEV+5
^%ZISC	DEV+5, END+2
^%ZTLOAD	DEV+5
ASK^AQAOLKP	OCC+2
^AQAOUSA1	PRINT+1
KILL^AQAOUTIL	DEV+5, END+2
Y^DIQ	MEMBERS+17, REFSET+9, REFSET+15, REFSET+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: DEV+1
Routine Call	%ZIS Line Location: DEV+5
Routine Call	%ZIS Line Location: DEV+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AQAO(2 - [#9002168.2]	MEMBERS+5, MEMBERS+6, REFSET+13
^AQAO(9 - [#9002168.9]	QISTAFF+2, QISTAFF+4, QISTAFF+5, MEMBERS+12, MEMBERS+14, MEMBERS+15, MEMBERS+16, REFSET+19, REFSET+21, REFSET+22
^AQAO1(1 - [#9002169.1]	MEMBERS+7, MEMBERS+9, REFSET+14
^AQAOC - [#9002167]	MEMBERS+1, MEMBERS+2, REFERRAL+4, REFERRAL+9, REFERRAL+10, REFERRAL+14, REFERRAL+15, REFERRAL+16, REFERRAL+20, REFERRAL+21
^DD(9002167	REFSET+9, REFSET+15
^DD(9002168.91	MEMBERS+17, REFSET+23
^TMP("AQAOUSA"	CALC+1!, END+1!, QISTAFF+8, MEMBERS+19, MEMBERS+20, REFSET+7, REFSET+8, REFSET+10, REFSET+25, REFSET+26 , REFSET+27, REFSET+28
^VA(200 - [#200]	QISTAFF+6, MEMBERS+18, REFSET+6, REFSET+24

Label References

Name	Line Occurrences
CALC	DEV+2
END	OCC+2, DEV+1
MEMBERS	CALC+3
OCC	OCC+2
QISTAFF	CALC+2
REFERRAL	CALC+4
REFSET	REFERRAL+5, REFERRAL+10, REFERRAL+17, REFERRAL+21

Naked Globals

Name	Field # of Occurrence
^(0	MEMBERS+6
^(1	REFERRAL+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DEV+1*
>> AQAOIFN	OCC+2, MEMBERS+1, MEMBERS+2, REFERRAL+4, REFERRAL+9, REFERRAL+10, REFERRAL+14, REFERRAL+15, REFERRAL+16, REFERRAL+20 , REFERRAL+21
AQAOINAC	OCC+1*, OCC+3!
>> AQAOIND	MEMBERS+1*, MEMBERS+5, MEMBERS+6, REFSET+13
>> AQAOS	MEMBERS+6*, MEMBERS+7, MEMBERS+8
>> AQAOSRV	MEMBERS+2*, MEMBERS+9
AQAOT	MEMBERS+4, MEMBERS+5, MEMBERS+6, REFSET+3~, REFSET+14*, REFSET+19, REFSET+21
AQAOTN	MEMBERS+7, MEMBERS+20, REFSET+3~, REFSET+14, REFSET+28
>> AQAOTX	MEMBERS+8*, MEMBERS+9, MEMBERS+12, MEMBERS+14
AQAOUSR	QISTAFF+3, QISTAFF+4, QISTAFF+5, QISTAFF+6, QISTAFF+8, MEMBERS+11, MEMBERS+12, MEMBERS+14, MEMBERS+15, MEMBERS+16 , MEMBERS+18, MEMBERS+19, MEMBERS+20, REFSET+3~, REFSET+6, REFSET+7, REFSET+8, REFSET+10, REFSET+18, REFSET+19* , REFSET+21, REFSET+22, REFSET+24, REFSET+25, REFSET+26, REFSET+27, REFSET+28
AQAOX	QISTAFF+1, QISTAFF+2, QISTAFF+4, QISTAFF+7, MEMBERS+13, MEMBERS+14, MEMBERS+16, REFERRAL+2~, REFERRAL+8, REFERRAL+9 , REFERRAL+10, REFERRAL+13, REFERRAL+14, REFERRAL+15, REFERRAL+16, REFERRAL+20, REFERRAL+21, REFSET+3~, REFSET+20, REFSET+21 , REFSET+22
AQAOY	REFERRAL+19, REFERRAL+20, REFERRAL+21, REFSET~, REFSET+9, REFSET+15*, REFSET+28
>> C	MEMBERS+17, REFSET+9, REFSET+15, REFSET+23
>> DTOUT	OCC+2
>> DUOUT	OCC+2
IO	DEV+2
IO("Q"	DEV+2, DEV+3!
>> N	QISTAFF+6, QISTAFF+8, MEMBERS+18, MEMBERS+19, MEMBERS+20, REFSET+6, REFSET+7, REFSET+8, REFSET+10, REFSET+24 , REFSET+25, REFSET+26, REFSET+27, REFSET+28
>> POP	DEV+1
>> S	QISTAFF+7*, QISTAFF+8
U	QISTAFF+5, QISTAFF+6, MEMBERS+1, MEMBERS+2, MEMBERS+7, MEMBERS+8, MEMBERS+15, MEMBERS+16, MEMBERS+17, MEMBERS+18 , MEMBERS+20, REFERRAL+4, REFERRAL+15, REFERRAL+16, REFSET+6, REFSET+9, REFSET+10, REFSET+14, REFSET+15, REFSET+22 , REFSET+23, REFSET+24, REFSET+28
X	REFERRAL+2~, REFERRAL+4, REFERRAL+5, REFERRAL+10, REFERRAL+15, REFERRAL+17, REFERRAL+21, REFSET~, REFSET+5, REFSET+6 , REFSET+13, REFSET+14
Y	MEMBERS+16, MEMBERS+17, MEMBERS+20, REFERRAL+2~, REFERRAL+4, REFERRAL+5, REFERRAL+10, REFERRAL+16, REFERRAL+17, REFERRAL+21 , REFSET+3~, REFSET+9, REFSET+10, REFSET+15, REFSET+22, REFSET+23, REFSET+28
>> ZTDESC	DEV+3*
>> ZTRTN	DEV+3*
>> ZTSAVE("AQAOIFN"	DEV+4*
ZTSK	DEV+5!

Customize PDF page

Package: Quality Assurance

Routine: AQAOUSA

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: