Routine: INHSZ

Package	Total	Call Graph
IHS Generic Interface System	2	SUMERR^INHSYS11 $$^INHSZ1
Uncategorized	2	($$DATEFMT,$$DT)^UTDT $$REPLACE^UTIL
VA Fileman	2	DD^%DT ^DIC

Package

Total

Call Graph

IHS Generic Interface System

SUMERR^INHSYS11 $$^INHSZ1

Uncategorized

($$DATEFMT,$$DT)^UTDT $$REPLACE^UTIL

VA Fileman

DD^%DT ^DIC

Package	Total	Caller Graph
IHS Generic Interface System	4	INHPOST INHSC INHSGZ INHSYS06

Package

Total

Caller Graph

IHS Generic Interface System

INHPOST INHSC INHSGZ INHSYS06

Entry Points

Name	Comments	DBIA/ICR reference
F1	;Do the filing
EN	;Enter here with SCR = script # to compile
ASBL(SCR)	;Assemble script lines SCR = script #
NM0
STRIP(%L,%N)	;Strip %N dots from front of %L
UP	;Move up to top level
DOWN	;Move down 1 level
FILE	;File the routine(s) created
NUMDOTS(%L)	;Returns number of dots at start of %L
RECOMP	;Recompile all scripts
TAG(X)	;Return tag for #X

Name	Field # of Occurrence
DD^%DT	FILE+4
^DIC	INHSZ+8
SUMERR^INHSYS11	EN+14
$$^INHSZ1	EN+12
$$DATEFMT^UTDT	FILE+14
$$DT^UTDT	EN+7
$$REPLACE^UTIL	F1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,"Your operating system does not allow saving a routine.",!! Line Location: INHSZ+6
Function Call: WRITE	Prompt: !,*7,"Another user is working with this script." Line Location: EN+2
Function Call: WRITE	Prompt: !!,"Compiling Script: ",$P(^INRHS(SCR,0),U),! Line Location: EN+10
Function Call: WRITE	Prompt: !,"Linking... " Line Location: FILE+1
Function Call: WRITE	Prompt: " Filing generated routines...",! Line Location: F1+1
Function Call: WRITE	Prompt: !,"Routine ",X,?19,"...Filed" Line Location: F1+10
Routine Call	DIC Line Location: INHSZ+8

FileNo	Call Tags
^INRHS - [#4006]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("OS" - [#.7]	INHSZ+6, F1+2
^DD("ROU"	EN+6
^INRHS - [#4006]	EN+1, EN+2, EN+9, EN+10, EN+14, EN+15, ASBL+2, FILE+3, FILE+11, FILE+12 , F1+11*, RECOMP+1
^UTILITY("IN"	EN+11!, FILE+5, FILE+7!, FILE+11, FILE+12, FILE+13, FILE+14, FILE+15, FILE+17, FILE+20 , FILE+22, FILE+24, FILE+25, F1+2, F1+7, F1+11!
^UTILITY("INHSYS_FILERR"	EN+14
^UTILITY($J	F1+11!

Name	Line Occurrences
$$NUMDOTS	FILE+14, FILE+20
$$STRIP	FILE+17
$$TAG	FILE+19
DOWN	ASBL+7, ASBL+12
EN	RECOMP+1
FILE	EN+13
NM0	NM0
UP	ASBL+11, ASBL+12

Name	Field # of Occurrence
^(	ASBL+2, FILE+13, FILE+14*, FILE+20, RECOMP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%L	NUMDOTS~, NUMDOTS+1*, NM0, STRIP~, STRIP+1, STRIP+2
%N	STRIP~, STRIP+1, STRIP+2
%REF	FILE+2~, F1+3*, F1+9
>> A	FILE+7, FILE+15, FILE+16, FILE+19*
C	ASBL+1, ASBL+7, ASBL+11, ASBL+12, DOWN+1, UP+1, FILE+2~, FILE+4, FILE+5, FILE+14 , FILE+15, FILE+17, FILE+18, FILE+19, FILE+20, FILE+21*, FILE+22
>> C0	ASBL+1, DOWN+1, UP+1
>> C1	ASBL+1*
CS	FILE+2~, FILE+7, FILE+11, FILE+12, FILE+13, FILE+14, FILE+15, FILE+17
DATE	FILE+2~, FILE+4*, FILE+11, FILE+12
DIC	INHSZ+7~, INHSZ+8*
DIC("A"	INHSZ+8*
DIC("S"	INHSZ+8*
DIC(0	INHSZ+8*
DOT	EN+4~, FILE+2~, FILE+4!
DOT(	FILE+19*, F1+6, F1+9
DT	EN+7*, FILE+4, FILE+14
DUZ	EN+3~
DUZ("AG"	EN+3*
DUZ(0	EN+3*
>> I	ASBL+2, F1+2, F1+3, F1+5, F1+6, F1+7, F1+9
INDE	EN+4~
INDE(	FILE+19*, FILE+22
INDL	EN+4~
INDL(	FILE+18*, FILE+19
INDS	EN+4~
INDUZ	EN+3~*
INDUZ("AG"	EN+3
INSTD	EN+4~, EN+9*
INZS	FILE+2~, F1+2*, F1+10
>> J	F1+9*
>> L	ASBL+1, ASBL+4, ASBL+6, ASBL+7, ASBL+11, ASBL+12, FILE+7, FILE+11, FILE+12, FILE+13 , FILE+14, FILE+17, FILE+24, FILE+25, F1+7, F1+9*
>> L1	ASBL+10, ASBL+11, ASBL+12
LC	FILE+2~, FILE+4, FILE+19
LVL	ASBL+1, ASBL+7, ASBL+11, ASBL+12, DOWN+1, UP+1, FILE+2~, FILE+4, FILE+18, FILE+19 , FILE+24, F1+9*
>> LVL0	FILE+19*
MAX	EN+4~, EN+6*, FILE+15
MODE	FILE+2~, FILE+3*, FILE+9
RMAX	FILE+2~, F1+2*, F1+11
RN	FILE+2~, FILE+4, FILE+7, FILE+8, FILE+11, FILE+12, FILE+13, FILE+14, FILE+17, FILE+18 , FILE+19, FILE+24, FILE+25
ROU	EN+4~, EN+11*, FILE+7, FILE+24, F1+5, F1+9
SCR	INHSZ+7~, INHSZ+8, EN+1, EN+2, EN+9, EN+10, EN+11, EN+12, EN+14, EN+15 , ASBL~, ASBL+2, FILE+3, FILE+11, FILE+12, F1+11, RECOMP+1
>> SR	FILE+19*
STR	INHSZ+7~, EN+4~
STRIP	FILE+2~, FILE+4, FILE+14, FILE+17, FILE+18, FILE+20*, FILE+24
>> TAG	FILE+19*, FILE+20
U	EN+9, EN+10, EN+14, FILE+3, FILE+11, FILE+12, FILE+18, FILE+19, F1+9, F1+11 , RECOMP+1
>> V	ASBL+1, ASBL+7, ASBL+11, ASBL+12, DOWN+1, UP+1*
X	ASBL+2, ASBL+3, ASBL+4, ASBL+5, ASBL+6, ASBL+9, ASBL+10, FILE+7, FILE+9, FILE+10 , FILE+11, FILE+12, F1+5, F1+10, TAG~, TAG+1, TAG+2, NUMDOTS+1~, NM0
Y	INHSZ+7~, INHSZ+8, FILE+4*
>> Z	ASBL+6, ASBL+12

Customize PDF page

Package: IHS Generic Interface System

Routine: INHSZ

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: