Routine: INHUT9

Package	Total	Call Graph
Kernel	1	$$ROUTEST^%ZTF

Package	Total	Caller Graph
IHS Generic Interface System	3	INHU1 INTSUT INTSUT1

Entry Points

Name	Comments	DBIA/ICR reference
ROULNCNT(ROU)	;Count lines in routine
ARRAY(INIG1,INIG2,IOM,INDL,INDENT)	;Parse array of data ; Input: ; INIG1 - array of Data ; IOM - Width ; INDL - Delimeter(s) ; INDENT - Chars to indent for overflow of line ; Output: ; INIG2 - Array of data broken down by delimeters and IOM length
LINE(INIG1,INIG2,IOM,INDL,INDENT,INFST,IND,INDCT)	; ; Input: ; INIG1 - Single line of data ; INIG2 - Array with old and new data ; IOM - Width ; INDL - Delimeter(s) ; INDENT - Chars to indent for overflow of line ; Output: ; INIG1 - Orig data with front part removed up to delimeter or IOM ; INIG2 - Array of data broken down by delimeters and IOM length
PARSE(INIG1,IOM,INIG2,INDENT,INDL,INK)	;Set INIG array
ONE(IND,INOUT,INIOM,INDNT,INSEP,INDL,INK)	;Get 1 set of nodes and ; separate by INSEP ; Input : ; IND - Global or local node. ie ^INTHU(ien,3,0) or TEMP(1) ; INIOM - Margin Width ; INDNT - Indent by this number after 1st line ; INSEP - Separate on this value. ie \|CR\| ; INDL - delimit using these values ; INK - 1 Kill Output node upon entry 0 don't kill output node ; Output : ; INOUT - Global or local
PARSEDCT(INIG1,INIG2,IOM,INDENT,INDL,INK)	;Parse Global Array ; This will return a value in the indirection value of what is ; passed in in INIG2 from the indirection of whatever value is ; passed in from INIG1 in a delimted format of IOM long lines
SETTMP(INTMP,INX,IND,INDCT)	;set array ; Input - INTMP - next set of words< or = to IOM ; IND - Spaces to indent ; INDCT - 1 store in indirection of output ; 0 - store in array ; Output INX - temporary to go in INIG1

External References

Name	Field # of Occurrence
$$ROUTEST^%ZTF	ROULNCNT+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Not an entry point",*7 Line Location: INHUT9+3
Function Call: WRITE	Prompt: *7,"ROUTINE NOT FOUND" Line Location: ROULNCNT+4
Function Call: WRITE	Prompt: I," Lines of code in routine "_ROU Line Location: ROULNCNT+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^INRHSITE(1	ONE+15

Label References

Name	Line Occurrences
ARRAY	PARSE+14
LINE	PARSE+15, PARSEDCT+19, PARSEDCT+22, ARRAY+13, ARRAY+16
PARSEDCT	ONE+19, ONE+25
SETTMP	PARSE+16, PARSEDCT+24, ARRAY+17, LINE+24, LINE+28

Naked Globals

Name	Field # of Occurrence
^(0	ONE+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
COUNT	ONE+12~, ONE+14, ONE+21, ONE+24, ONE+27*
I	ONE+12~, ONE+16, ROULNCNT+3~, ROULNCNT+5, ROULNCNT+6, ROULNCNT+7
INCNT	SETTMP+6~, SETTMP+10*, SETTMP+11, SETTMP+12
IND	ONE~, ONE+13, ONE+14, ONE+16, ONE+17, ONE+18, ONE+19, ONE+20, PARSE+16, PARSEDCT+14~ , PARSEDCT+16, PARSEDCT+19, PARSEDCT+22, PARSEDCT+24, ARRAY+9~, ARRAY+10, ARRAY+13, ARRAY+16, ARRAY+17, LINE~ , LINE+11, LINE+24, LINE+28, LINE+30, SETTMP~, SETTMP+7*, SETTMP+8, SETTMP+11
INDCT	LINE~, LINE+11, LINE+24, LINE+28, SETTMP~, SETTMP+7, SETTMP+8
INDENT	PARSE~, PARSE+11, PARSE+14, PARSE+15, PARSEDCT~, PARSEDCT+15, PARSEDCT+19, PARSEDCT+22, ARRAY~, ARRAY+13 , ARRAY+16, LINE~, LINE+30
INDL	ONE~, ONE+14, ONE+19, ONE+25, PARSE~, PARSE+11, PARSE+14, PARSE+15, PARSEDCT~, PARSEDCT+15* , PARSEDCT+19, PARSEDCT+22, ARRAY~, ARRAY+13, ARRAY+16, LINE~, LINE+17, LINE+20, LINE+21
INDNT	ONE~, ONE+13*, ONE+19, ONE+25
INFST	PARSEDCT+14~, PARSEDCT+16, PARSEDCT+19, PARSEDCT+22, ARRAY+9~, ARRAY+10, ARRAY+13, ARRAY+16, LINE~, LINE+11* , LINE+30*
INIG1	PARSE~, PARSE+14, PARSE+15, PARSE+16, PARSEDCT~, PARSEDCT+18, PARSEDCT+20, PARSEDCT+21, ARRAY~, ARRAY+11 , ARRAY+12, LINE~, LINE+13, LINE+15, LINE+25, LINE+29
INIG1(	ARRAY+14, ARRAY+15
INIG2	PARSE~, PARSE+11, PARSE+13!, PARSE+14, PARSE+15, PARSE+16, PARSEDCT~, PARSEDCT+15, PARSEDCT+17, PARSEDCT+19 , PARSEDCT+22, PARSEDCT+24, ARRAY~, ARRAY+13, ARRAY+16, ARRAY+17, LINE~, LINE+24, LINE+28
INIOM	ONE~, ONE+13*, ONE+19, ONE+25
INK	ONE~, ONE+14, ONE+19, ONE+25, PARSE~, PARSE+12, PARSE+13, PARSEDCT~, PARSEDCT+16*, PARSEDCT+17
INOUT	ONE~, ONE+19, ONE+25, ONE+26*
INP	ONE+12~, ONE+14*, ONE+16
INP1	ONE+12~, ONE+16, ONE+17, ONE+18
INSEP	ONE~, ONE+13*, ONE+19, ONE+22, ONE+23
INSMIN	ONE+12~, ONE+15*, ONE+26
INTEMPY	ONE+26~*!
INTMP	LINE+10~, LINE+15*, LINE+21, LINE+24, LINE+25, LINE+28, SETTMP~, SETTMP+8, SETTMP+11
INX	PARSEDCT+14~, PARSEDCT+16, PARSEDCT+18, PARSEDCT+19, PARSEDCT+21, PARSEDCT+22, PARSEDCT+24, ARRAY+9~, ARRAY+10, ARRAY+12* , ARRAY+13, ARRAY+15, ARRAY+16, ARRAY+17, SETTMP~, SETTMP+8, SETTMP+10, SETTMP+11, SETTMP+12
INX(	SETTMP+8*
IOM	PARSE~, PARSE+11, PARSE+14, PARSE+15, PARSEDCT~, PARSEDCT+15, PARSEDCT+19, PARSEDCT+22, ARRAY~, ARRAY+13 , ARRAY+16, LINE~, LINE+13, LINE+15, LINE+30*
J	PARSEDCT+14~, PARSEDCT+20, PARSEDCT+21, ARRAY+9~, ARRAY+14, ARRAY+15, LINE+10~, LINE+20*, LINE+21
OPOS	LINE+10~, LINE+15, LINE+21, LINE+23, LINE+26, LINE+28, LINE+29
POS	LINE+10~, LINE+18, LINE+21
ROU	ROULNCNT~, ROULNCNT+4, ROULNCNT+5, ROULNCNT+6
TEMP	ONE+12~, ONE+20, ONE+21, ONE+22, ONE+23, ONE+24
U	ONE+15
X	ROULNCNT+3~, ROULNCNT+5
Y	ONE+12~, ONE+27!
Y(	ONE+21, ONE+24

Customize PDF page

Package: IHS Generic Interface System

Routine: INHUT9

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: