Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: INHSZ

Package: IHS Generic Interface System

Routine: INHSZ


Information

INHSZ ;JSH; 15 Oct 1999 15:41 ;Interface Script compiler

Source Information

Source file <INHSZ.m>

Call Graph

Call Graph Total: 6

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  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
IHS Generic Interface System 4 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

External References

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

FileMan Files Accessed Via FileMan Db Call

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!

Label References

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

Naked Globals

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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All