Routine: AQAOUST

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIR
Quality Assurance	1	KILL^AQAOUTIL

Entry Points

Name	Comments	DBIA/ICR reference
EDIT	; >>> ask if user wants to edit or delete any current members
TEAM	; >>> ask user for team name
CHOOSE2
CHOOSE1
CURRENT	; >>> find all current members
ADD	; >>> ask if user wants to add new members
EXIT	; >>> eoj
TEAMEDIT	; >>> edit team attributes
DELETE	;SUBRTN called before DIE call in line CHOOSE1+4

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: TEAM+2
Function Call: WRITE	Prompt: @IOF,!!?20,"CURRENT MEMBERS IN ",$P(AQAOCOM,U,2),!! Line Location: CURRENT+1
Function Call: WRITE	Prompt: !!,"NO CURRENT MEMBERS",! Line Location: CURRENT+7
Function Call: WRITE	Prompt: !! Line Location: CURRENT+9
Function Call: WRITE	Prompt: !! Line Location: EDIT+1
Function Call: WRITE	Prompt: !!!,">>> MODIFY/DELETE MODE . . ." Line Location: EDIT+5
Function Call: WRITE	Prompt: !! Line Location: CHOOSE1+0
Function Call: WRITE	Prompt: !! Line Location: ADD+1
Function Call: WRITE	Prompt: !!!,">>> ADD MODE . . ." Line Location: ADD+5
Function Call: WRITE	Prompt: !! Line Location: CHOOSE2+0
Function Call: WRITE	Prompt: !!,"Enter ""@"" to delete user from this team",! Line Location: DELETE+1
Routine Call	DIE Line Location: TEAMEDIT+2 CHOOSE1+4
Routine Call	DIC Line Location: TEAM+6 CHOOSE1+1 CHOOSE2 CHOOSE2+4
Routine Call	DIR Line Location: EDIT+3 ADD+3

FileNo	Call Tags
^AQAO(9 - [#9002168.9]	Classic Fileman Calls
^AQAO1(1 - [#9002169.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AQAO(9 - [#9002168.9]	CURRENT+3, CURRENT+5, CURRENT+11, CURRENT+14, CHOOSE2+2
^AQAO1(1 - [#9002169.1]	TEAM+1, TEAM+4, TEAM+6, TEAM+9, EXIT+1
^VA(200 - [#200]	CURRENT+13

Name	Line Occurrences
ADD	CURRENT+7, EDIT+3, CHOOSE1+2
CHOOSE1	CHOOSE1+2, CHOOSE1+5
CHOOSE2	CHOOSE2+1, CHOOSE2+5
DELETE	CHOOSE1+4
EXIT	TEAM+4, TEAM+7, EDIT+3, CHOOSE1+2, ADD+3, CHOOSE2+1
TEAM	TEAM+7, TEAM+9, ADD+3, CHOOSE2+1

Name	Field # of Occurrence
^(0	CHOOSE2+2*

Name	Field # of Occurrence
>> AQAOCOM	TEAM+1, TEAM+8*, TEAM+9, TEAMEDIT+1, CURRENT+1, CURRENT+3, CURRENT+5, CHOOSE2+3, EXIT+1
AQAOCUR	CURRENT+2!, CURRENT+7
AQAOCUR(	CURRENT+5*, CURRENT+10, CURRENT+11, CURRENT+14, CHOOSE1+3
AQAOINAC	TEAM+6*!
>> DA	TEAMEDIT+1, CHOOSE1+3
>> DA(1	CHOOSE1+3, CHOOSE2+4
DIC	TEAM+2!, CHOOSE1!, CHOOSE2!, CHOOSE2+3!
DIC("A"	TEAM+3*
DIC("DR"	CHOOSE2+4*
DIC("S"	CHOOSE1+1*
DIC(0	TEAM+2, CHOOSE1, CHOOSE2, CHOOSE2+3
DIE	TEAMEDIT+1!, CHOOSE1+3!
DIR	EDIT+1!, CHOOSE1!, ADD+1!, CHOOSE2!
DIR("A"	EDIT+2, ADD+2
DIR("B"	EDIT+1, ADD+1
DIR(0	EDIT+1, ADD+1
>> DLAYGO	TEAM+2*
>> DR	TEAMEDIT+1, CHOOSE1+4
>> DTOUT	TEAM+7, CHOOSE1+2, CHOOSE2+1
>> DUOUT	TEAM+7
IOF	CURRENT+1
U	CURRENT+1, CURRENT+11, CURRENT+13, CURRENT+14, CHOOSE1+2, CHOOSE2+1, CHOOSE2+3
>> X	TEAM+7, CURRENT+2, CURRENT+3, CURRENT+5, CURRENT+9, CURRENT+10, CURRENT+11, CURRENT+13, CURRENT+14, CHOOSE1+2 , CHOOSE2+1, CHOOSE2+3*
>> Y	TEAM+7, TEAM+8, CURRENT+4, CURRENT+5, CURRENT+14*, CURRENT+15, EDIT+3, CHOOSE1+2, CHOOSE1+3, ADD+3 , CHOOSE2+1, CHOOSE2+2, CHOOSE2+3, CHOOSE2+4
>> Z	CURRENT+11*, CURRENT+12