Routine: AQAQMCQ

Name	Comments	DBIA/ICR reference
ALL	;***> choose one or all classes or categories
END
DEV
ONE	;***> choose which class or category to print
QUE
TYPE
SELECT

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!!!?20,"PRINT MISSING CREDENTIALS REPORT",!! Line Location: AQAQMCQ+3
Function Call: WRITE	Prompt: ?40," INACTIVE WARD " Line Location: ONE+4
Routine Call	%ZIS Line Location: END
Routine Call	DIR Line Location: SELECT ALL+3 ONE+2 ONE+7
Routine Call	%ZIS Line Location: DEV

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	ONE+4

Name	Field # of Occurrence
^("I"	ONE+4

Name	Field # of Occurrence
>> %ZIS	DEV*
AQAQI	QUE+1*, END!
AQAQSRT	SELECT+2, ALL+3, ONE+1, ONE+2!, ONE+5, ONE+6, ONE+7!, ONE+9, END!
AQAQTYP	SELECT+1*, SELECT+2, ALL+2, ONE+1, END!
DIR	TYPE!, ALL+1!, ONE+2!, ONE+7!, END!
DIR("A"	TYPE, TYPE+1, TYPE+2, TYPE+3, SELECT, ALL+2
DIR("B"	ALL+3*
DIR(0	SELECT, ALL+1, ONE+2, ONE+7
>> DIRUT	ALL+4
>> DTOUT	SELECT+1, ONE+3, ONE+8
>> DUOUT	SELECT+1, ONE+3, ONE+8
IO	DEV
IO("Q"	DEV, QUE!
IOF	AQAQMCQ+3
>> POP	DEV
U	ONE+4
>> X	SELECT+1, ONE+3, ONE+8
Y	SELECT+1, ALL+3, ONE+3, ONE+4, ONE+5, ONE+8, ONE+9, END!
>> ZTDESC	QUE*
>> ZTRTN	QUE*
>> ZTSAVE(	QUE+1*
ZTSK	QUE+2!

Information