Routine: INHOQR

Information

INHOQR ; FRW/JMB ; 24 Aug 95 14:10; Show GIS queue status

Source file <INHOQR.m>

Package	Total	Call Graph
IHS Generic Interface System	2	(ENZTSK,EXIT)^INHOQR1 ($$RD,DES1)^INHUTS1
Kernel	2	^%ZIS ^%ZTLOAD

Package	Total	Caller Graph
IHS Generic Interface System	1	INHOQR1

Name	Comments	DBIA/ICR reference
DATINIT(INQ)	;Initialize data array
EN	;Main entry point
PAR()	;User parameters
INIARR	;Initialize data and queue arrays

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+12
Function Call: WRITE	Prompt: *7,!,"Sorry, unable to find device..." Line Location: EN+15
Function Call: WRITE	Prompt: ! Line Location: PAR+16
Routine Call	%ZIS Line Location: EN+12 EN+15

Name	Line Occurrences
$$PAR	EN+7
DATINIT	INIARR+10, INIARR+11

Name	Field # of Occurrence
%	EN+3~, PAR+16*
%ZIS	EN+3~, EN+12, EN+15
%ZIS("A"	EN+12*
%ZIS("B"	EN+12*
BP	INIARR+5~, INIARR+11*
INDAT	INIARR+6!
INDAT(	DATINIT+7*
>> INDEST(	INIARR+11
INPAR	EN+3~, PAR+5!
INPAR("DETAIL"	PAR+6, PAR+17
INPAR("FUTURE"	PAR+12, PAR+19
INPAR("ITER"	PAR+11, PAR+25
INPAR("MAXQTIME"	PAR+10, PAR+23
INPAR("MAXREPTIME"	PAR+9, PAR+10, PAR+21, PAR+22, PAR+23
INPAR("REPAINT"	PAR+7, PAR+18
INPAR("RUNTOEND"	PAR+8, PAR+20, PAR+21
INQ	INIARR+5~, INIARR+10*, DATINIT~, DATINIT+7
INTASKED	EN+3~, EN+10, EN+17
IO	EN+15, EN+16
IO(0	EN+15, EN+16
IOM	EN+13
ION	EN+13
IOP	EN+12!, EN+13*, EN+17
IOSL	EN+13
IOST	EN+13
POP	EN+3~, EN+12, EN+15
Q	EN+3~
U	PAR+16, PAR+17, PAR+18, PAR+19, PAR+20, PAR+21, PAR+25
X	EN+18, DATINIT+6~, DATINIT+7
ZTDESC	EN+4~, EN+17*
ZTIO	EN+4~, EN+17*
ZTRTN	EN+4~, EN+17*
ZTSAVE	EN+4~
ZTSAVE(	EN+18*