Routine: INHSYS04

Information

INHSYS04 ;slt,JPD; 31 Jan 96 15:58;System Configuration data utility

Source Information

Source file <INHSYS04.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
IHS Generic Interface System	2	($$DATIM,$$INITIALS)^INHUT5 $$QS^INHUTIL
VA Fileman	1	^DIC

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
IHS Generic Interface System	5	INHSYS INHSYS10 INHSYSE INHUT3 INZTTC

Entry Points

Name	Comments	DBIA/ICR reference
RTNINB(X)	;WOM 8/8/95
LN(%X,%CC,%LC)	;insert a line into routine buffer ^UTILITY($J,0,n)
HEXUP(%H)	;hexidecimal increment
NTRNL(INROU,X)	;procedure to compile internal installation driver
ID(X)	;fetch unique identifier for transaction type in X ; Input: X - Transaction Type ; Returns: UNIQUE IDENTIFIER ; If the UNIQUE IDENTIFIER is NULL, this should ; denote an error condition
NEWR	; Current routine will be too big so finish ; current routine and start new one
POW(X,N)	;power function where X is raised to the Nth power
RTNBFR(%TT,INROU)	;routine buffer/builder machine

External References

Name	Field # of Occurrence
^DIC	RTNINB+8
$$DATIM^INHUT5	NEWR+8, NEWR+9, NTRNL+12, NTRNL+13
$$INITIALS^INHUT5	NEWR+8, NTRNL+12
$$QS^INHUTIL	RTNBFR+22

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The UNIQUE IDENTIFIER for this INTERFACE TRANSACTION TYPE does not exist!","Aborting!" Line Location: RTNBFR+20
Function Call: WRITE	Prompt: !,X_" filed." Line Location: RTNBFR+28
Function Call: WRITE	Prompt: X_" filed.",! Line Location: NEWR+5
Function Call: WRITE	Prompt: !,X," internal driver filed.",! Line Location: NTRNL+21
Routine Call	DIC Line Location: RTNINB+8

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^INRHT - [#4000]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("OS" - [#.7]	NTRNL+11
^DD("ROU"	RTNBFR+18
^DIC(3 - [#3]	NEWR+8, NEWR+12, NTRNL+12, NTRNL+16
^INRHT - [#4000]	NEWR+11, ID+5, NTRNL+15
^INRHT("ID"	NTRNL+15
^UTILITY($J	RTNBFR+17!, RTNBFR+20!, RTNBFR+27, RTNBFR+29!, RTNBFR+30!, NEWR+2, NEWR+6!, NTRNL+22!, LN+7*

Label References

Name	Line Occurrences
$$HEXUP	NEWR+7
$$ID	RTNBFR+19, RTNINB+9
$$POW	HEXUP+16, POW+9
LN	RTNBFR+25, RTNBFR+26, RTNBFR+28, NEWR+4, NEWR+9, NEWR+10, NEWR+11, NEWR+12, NEWR+13, NEWR+14 , NTRNL+12, NTRNL+13, NTRNL+14, NTRNL+15, NTRNL+16, NTRNL+17, NTRNL+18, NTRNL+20, NTRNL+21
NEWR	RTNBFR+24

Naked Globals

Name	Field # of Occurrence
^("OS"	RTNBFR+18, NTRNL+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%CC	RTNBFR+16~, RTNBFR+19, RTNBFR+24, RTNBFR+25, RTNBFR+26, RTNBFR+28, NEWR+4, NEWR+7, NEWR+9, NEWR+10 , NEWR+11, NEWR+12, NEWR+13, NEWR+14, NTRNL+10~, NTRNL+12, NTRNL+13, NTRNL+14, NTRNL+15, NTRNL+16 , NTRNL+17, NTRNL+18, NTRNL+20, NTRNL+21, LN~, LN+6*
%DATA	RTNBFR+16~, RTNBFR+23*, RTNBFR+24, RTNBFR+26
%EVEN	RTNBFR+16~
%H	HEXUP~, HEXUP+12, HEXUP+13*
%HEX	HEXUP+11~, HEXUP+12*, HEXUP+13, HEXUP+23
%HEX(	HEXUP+13*, HEXUP+16
%LC	RTNBFR+16~, RTNBFR+19, RTNBFR+25, RTNBFR+26, RTNBFR+28, NEWR+4, NEWR+7, NEWR+9, NEWR+10, NEWR+11 , NEWR+12, NEWR+13, NEWR+14, NTRNL+10~, NTRNL+12, NTRNL+13, NTRNL+14, NTRNL+15, NTRNL+16, NTRNL+17 , NTRNL+18, NTRNL+20, NTRNL+21, LN~, LN+6*, LN+7
%LEN	HEXUP+11~, HEXUP+12*, HEXUP+13
%NODE	RTNBFR+16~, RTNBFR+19, RTNBFR+22, RTNBFR+23, RTNBFR+24, RTNBFR+25
%ODD	RTNBFR+16~
%RC	RTNBFR+16~, RTNBFR+19, RTNBFR+28, NEWR+3, NEWR+7, NEWR+8
%RTN	RTNBFR+16~, RTNBFR+19*, RTNBFR+20, RTNBFR+28, NEWR+3, NEWR+8
%RTNBFR	RTNBFR+16~, RTNBFR+21*, NEWR+14
%T	RTNBFR+16~, NEWR+8*, NEWR+9
%TT	RTNBFR~, RTNBFR+19, NEWR+11
%X	LN~, LN+6, LN+7
%Y	HEXUP+11~, HEXUP+26, HEXUP+27, HEXUP+28
DIC	RTNINB+8~*
DIC(0	RTNINB+8*
DIVIDEND	HEXUP+11~, HEXUP+20, HEXUP+22, HEXUP+23, HEXUP+24
DIVISOR	HEXUP+11~, HEXUP+20*, HEXUP+22, HEXUP+23
DT	NEWR+10, NTRNL+14
DUZ	NEWR+8, NEWR+12, NTRNL+12, NTRNL+16
I	HEXUP+11~, HEXUP+13, HEXUP+21, HEXUP+23
INMAX	RTNBFR+16~, RTNBFR+18*, RTNBFR+19, RTNBFR+24
INOS	RTNBFR+16~, RTNBFR+18, NTRNL+10~, NTRNL+11
>> INPOP	RTNBFR+20*
INROU	RTNBFR~, NTRNL~
INROU(	RTNBFR+28, NEWR+5, NTRNL+20
INRTN	NTRNL+10~, NTRNL+19, NTRNL+20
INZI	RTNBFR+16~, RTNBFR+18, RTNBFR+28, NEWR+5, NTRNL+10~, NTRNL+11, NTRNL+21
J	HEXUP+11~, HEXUP+15, HEXUP+16, HEXUP+26, HEXUP+27
N	POW~, POW+8, POW+9
POW	POW+7~, POW+8, POW+9, POW+10
QUOTIENT	HEXUP+11~, HEXUP+21, HEXUP+22*, HEXUP+24
REMAIN	HEXUP+11~, HEXUP+20*
REMAIN(	HEXUP+23*, HEXUP+27
SUM	HEXUP+11~, HEXUP+15, HEXUP+16, HEXUP+18*, HEXUP+20
U	NEWR+8, NEWR+11, NEWR+12, ID+5, NTRNL+12, NTRNL+15, NTRNL+16
X	RTNBFR+28, NEWR+3, NEWR+5, POW~, POW+9, ID~, ID+5, NTRNL~, NTRNL+12, NTRNL+15 , NTRNL+21, RTNINB~
Y	RTNINB+8~, RTNINB+9

Customize PDF page

Package: IHS Generic Interface System

Routine: INHSYS04

Call Graph Total: 3

Caller Graph Total: 5