Routine: INHRTZ

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC $$CDATASC^%ZTFDT ^%ZTLOAD
VA Fileman	2	^%DT ^DIC
Uncategorized	1	(,$$CR,$$YN)^UTSRD

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;Exit point
EN	;Main entry point
HDR	;Print header
CC	;Dsplay details for creation rate
ENQUE	;Taskman entry point
TT	;Display details for transmission rate
DES	;Get multiple destinations
DET	;Detail yes/no
DEV	;Calculate the devisor
ST	;Display status list
STU	;Build status string
ST1	;get the status string to be printed as part of the header.
COMP	;Compile statistics
IEN(IEN,ASK)	;read date
OUTPUT	;Output data
DT	;Print date time
GETRNG(START,STOP)	;get start & stop dates
PARM()	;Get parameters
MULT	; Look for activity on the multiple level

External References

Name	Field # of Occurrence
^%DT	IEN+2
^%ZIS	EN+5, EN+7
^%ZISC	QUIT+1
$$CDATASC^%ZTFDT	DT+2, DEV+5, DEV+7, DEV+8, DET+6, DET+7
^%ZTLOAD	EN+11
^DIC	DES+2
^UTSRD	ST+1
$$CR^UTSRD	ST+12
$$YN^UTSRD	DET+1, DET+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,"Sorry, unable to find device..." Line Location: EN+7
Function Call: WRITE	Prompt: ! Line Location: ENQUE+11
Function Call: WRITE	Prompt: ?IOM-$L(X)\2,X Line Location: ENQUE+12
Function Call: WRITE	Prompt: ! Line Location: OUTPUT+5
Function Call: WRITE	Prompt: ?15,$E($P(^INRHD(DES,0),U),1,30) Line Location: OUTPUT+10
Function Call: WRITE	Prompt: ?(P-$L(X)),X Line Location: CC+3
Function Call: WRITE	Prompt: ?(P+2),X Line Location: CC+6
Function Call: WRITE	Prompt: ?(IOM-1)-$L(X),X Line Location: TT+4
Function Call: WRITE	Prompt: !,$P(DT2,"@") Line Location: DT+3
Function Call: WRITE	Prompt: ?9,$P(DT2,"@",2) Line Location: DT+4
Function Call: WRITE	Prompt: @IOF,!,X(6) Line Location: HDR+1
Function Call: WRITE	Prompt: ?IOM-$L(X)-2,X,!! Line Location: HDR+3
Function Call: WRITE	Prompt: !?IOM-$L(X(I))\2,X(I) Line Location: HDR+4
Function Call: WRITE	Prompt: !,"Destination:" Line Location: HDR+5
Function Call: WRITE	Prompt: " All",! Line Location: HDR+6
Function Call: WRITE	Prompt: !?14,DES(II) Line Location: HDR+7
Function Call: WRITE	Prompt: !!,X(5),!!,LN Line Location: HDR+8
Function Call: WRITE	Prompt: !," Date Time" Line Location: HDR+9
Function Call: WRITE	Prompt: ?15,"Destination" Condition for execution: DET Line Location: HDR+9
Function Call: WRITE	Prompt: !?P,"Creation Rates " Line Location: HDR+11
Function Call: WRITE	Prompt: ?IOM-$L(X)-2,X Line Location: HDR+12
Function Call: WRITE	Prompt: !,LN Line Location: HDR+13
Function Call: WRITE	Prompt: "ALL" Line Location: PARM+7
Function Call: WRITE	Prompt: ! Line Location: DET+1
Function Call: WRITE	Prompt: @IOF,!,"Destination: " Line Location: DET+3
Function Call: WRITE	Prompt: "All " Line Location: DET+3
Function Call: WRITE	Prompt: ?13,$P(^INRHD($P(X2,",",I),0),U),! Line Location: DET+4
Function Call: WRITE	Prompt: !,"Status(s): " Line Location: DET+5
Function Call: WRITE	Prompt: ?13,$P($P(X3,";",I),":",2),! Line Location: DET+5
Function Call: WRITE	Prompt: !,"From: ",$$CDATASC^%ZTFDT($E(INBEG,1,10),3,1) Line Location: DET+6
Function Call: WRITE	Prompt: !," To: ",$$CDATASC^%ZTFDT($E(INEND,1,10),3,1),! Line Location: DET+7
Function Call: WRITE	Prompt: !,"Detail: ",$S(X=1:"Yes",1:"No"),!! Line Location: DET+8
Function Call: WRITE	Prompt: ! Line Location: DET+19
Function Call: WRITE	Prompt: ! Line Location: STU+4
Function Call: WRITE	Prompt: ! Line Location: ST+1
Function Call: WRITE	Prompt: " ",$P($P(X3,";",($F(X1,C)-1)),":",2) Line Location: ST+8
Function Call: WRITE	Prompt: !,"Please select from:" Line Location: ST+9
Function Call: WRITE	Prompt: !," ",$P($P(X3,";",I),":")," ",$P($P(X3,";",I),":",2) Line Location: ST+10
Function Call: WRITE	Prompt: !," ALL" Line Location: ST+11
Routine Call	DIC Line Location: DES+2
Routine Call	%ZIS Line Location: EN+5 EN+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("SITE"	DEV+12
^DD(4001	STU+2, ST1+2
^DIC(4 - [#4]	DEV+12
^INRHD - [#4005]	ENQUE+8, OUTPUT+10, DES+3, DET+4
^INTHU - [#4001]	COMP+8, COMP+10, MULT+2, MULT+4
^INTHU("B"	COMP+5, COMP+7, GETRNG+5, GETRNG+8, IEN+3
^UTILITY($J	ENQUE+1!, ENQUE+13!, COMP+26, COMP+28, MULT+11, MULT+14, OUTPUT+2, OUTPUT+7, OUTPUT+12, OUTPUT+16 , CC+2, TT+1

Label References

Name	Line Occurrences
$$GETRNG	PARM+5
$$IEN	GETRNG+3, GETRNG+6
$$PARM	EN+2
@(	OUTPUT+3, OUTPUT+16
COMP	ENQUE+10
DES	PARM+3
DET	PARM+8
DEV	ENQUE+10
DT	OUTPUT+3, OUTPUT+9, OUTPUT+14, OUTPUT+17, CC+1
HDR	OUTPUT+9, OUTPUT+14, OUTPUT+17, CC+1, DT+1
MULT	COMP+21, COMP+29
OUTPUT	ENQUE+10
QUIT	EN+5, EN+7, EN+8
ST	STU+4
ST1	DEV+9
STU	PARM+6

Naked Globals

Name	Field # of Occurrence
^(	COMP+26, COMP+28, MULT+11, MULT+14
^(0	DEV+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	IEN+2*
>> %DT("A"	IEN+2*
>> %ZIS	EN+4, EN+7
>> %ZIS("A"	EN+4*
>> %ZIS("B"	EN+4*
>> ACT	MULT+1, MULT+2, MULT+4
>> ACTLOOP	MULT+2*
>> ACTZE	MULT+3, MULT+4, MULT+6, MULT+8
ASK	IEN~, IEN+2
>> ASTRX	OUTPUT+1*, CC+5, TT+2
C	COMP+5, COMP+26, COMP+28, OUTPUT+3, OUTPUT+16, STU+1~, STU+4, ST+2, ST+3, ST+4* , ST+6*, ST+7, ST+8
>> CNT	COMP+8*, COMP+9
DES	EN+1~, ENQUE+2, ENQUE+7, ENQUE+8, COMP+16, COMP+18, COMP+28, MULT+14, OUTPUT+6, OUTPUT+7 , OUTPUT+9, OUTPUT+10, OUTPUT+12, OUTPUT+16
DES(	ENQUE+8*, COMP+18, HDR+7
DET	EN+1~, ENQUE+2*, COMP+28, MULT+13, OUTPUT+5, CC+3, DT+4, DEV+1, DEV+6, HDR+9 , HDR+10, HDR+11
>> DIC	PARM+2*
>> DIC(0	PARM+2*
>> DT1	OUTPUT+1, OUTPUT+14, CC+1, DT+1, DT+3, HDR+2
>> DT2	DT+2*, DT+3, DT+4
>> DTTM	MULT+8, MULT+9, MULT+10, MULT+11, MULT+14, OUTPUT+1, OUTPUT+2, OUTPUT+7, OUTPUT+12, OUTPUT+16 , CC+2, TT+1, DT+2, DT+3
>> DV	ENQUE+9, COMP+26, COMP+28, MULT+11, MULT+14, CC+5, TT+2, DEV+1, DEV+2*, DEV+10
>> FLG	OUTPUT+3, OUTPUT+6, CC+2, TT+1
I	EN+1~, ENQUE+8, ENQUE+11, OUTPUT+3, OUTPUT+16, CC+2, TT+1, HDR+4, DES+1, DET+4* , DET+5, STU+1~, STU+3, STU+4, ST+9~, ST+10, ST1+1~, ST1+3, ST1+5
IEN	IEN~, IEN+3, IEN+4, IEN+5*
>> IEN2	GETRNG+8, IEN+5*
>> II	HDR+7*
INBEG	EN+1~, ENQUE+3, COMP+5, COMP+21, DEV+7, PARM+4, PARM+5, GETRNG+5*, GETRNG+9, DET+6 , DET+18
>> INDES	ENQUE+7*, COMP+18, HDR+6
INEND	EN+1~, ENQUE+3, COMP+7, COMP+12, MULT+9, DEV+8, PARM+4, PARM+5, GETRNG+8, GETRNG+9 , DET+7, DET+18
INENDX	EN+1~, COMP+7*, COMP+8
INLOAD	EN+1~, EN+10, ENQUE+2, ENQUE+3, DET+18*
IO	EN+7, EN+8, COMP+9
IO(0	EN+7, EN+8
IOF	EN+2, HDR+1, DET+3
IOM	EN+6, ENQUE+12, TT+4, DEV+14, HDR+3, HDR+4, HDR+12, ST1+4, ST1+5
ION	EN+6
IOP	EN+4!, EN+6*, EN+9
IOSL	EN+6, ENQUE+11, OUTPUT+9, OUTPUT+14, OUTPUT+17, CC+1, DT+1
IOST	EN+6
>> LN	DEV+14*, HDR+8, HDR+13
>> LOOP	COMP+5, COMP+8, COMP+10, MULT+2, MULT+4
>> MSGDTTM	COMP+14*, COMP+26, COMP+28
N	EN+1~
>> P	CC+3, CC+6, HDR+11
>> PAG	ENQUE+9, HDR+2
>> POP	EN+5, EN+7, PARM+6, PARM+8, DET+2, DET+10, STU+4, ST+1, ST+3, ST+12*
>> SE	CC+6, TT+3, DEV+1*
>> ST	ENQUE+2, COMP+24, MULT+6, OUTPUT+12, OUTPUT+13, OUTPUT+15, OUTPUT+16, PARM+7, DET+5, DET+18 , STU+1, ST+4, ST+6, ST+7, ST+8*, ST1+3
START	GETRNG~, GETRNG+2*, GETRNG+3
>> STAT	COMP+25, COMP+28, MULT+6, MULT+14
STOP	GETRNG~, GETRNG+2*, GETRNG+6
>> T	COMP+5*, MULT+11, MULT+14, OUTPUT+3, OUTPUT+16
U	ENQUE+2, ENQUE+3, ENQUE+8, COMP+14, COMP+16, COMP+21, COMP+24, COMP+25, MULT+6, MULT+8 , OUTPUT+10, DEV+13, DES+3, DET+2, DET+4, DET+10, DET+18, STU+2, ST+3, ST1+2
X	EN+1~, ENQUE+8, ENQUE+12, OUTPUT+16, CC+2, CC+3, CC+5, CC+6, TT+1, TT+2 , TT+3, TT+4, DEV+5, DEV+7, DEV+8, HDR+2, HDR+3, HDR+12, DES+1!, DET+1* , DET+2, DET+8, DET+18, ST+2, ST1+2*, ST1+3
X(	HDR+4, DES+3*, DES+4
X(0	DEV+5*, HDR+2
X(1	DEV+6*
X(2	DEV+8*
X(3	DEV+9, ST1+6
X(4	ST1+6*
X(5	DEV+10*, HDR+8
X(6	DEV+12, DEV+13, HDR+1
X0	TT+1~, TT+2*, TT+4
X1	ENQUE+9, PARM+7, DES+1!, STU+1, STU+3*, ST+4, ST+8, ST+10
X1(	DES+4*
X2	DES+1!, DES+4, DET+3, DET+4, DET+18
>> X3	DEV+9, DET+5, STU+2, STU+3, ST+8, ST+10, ST1+2, ST1+3, ST1+4, ST1+5 , ST1+6
>> X4	ST1+2, ST1+4, ST1+5*, ST1+6
>> Y	PARM+3, DES+1, DES+2, DES+3, DES+4, GETRNG+5, IEN+2, IEN+3
>> Z	DET+9*, DET+10
>> ZE	COMP+10*, COMP+12, COMP+14, COMP+16, COMP+21, COMP+24, COMP+25
>> ZTDESC	EN+9*
>> ZTIO	EN+9*
>> ZTRTN	EN+9*
>> ZTSAVE("INLOAD"	EN+10*

Customize PDF page

Package: IHS Generic Interface System

Routine: INHRTZ

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: