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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: XPDIL

Package: Kernel

Routine: XPDIL


Information

XPDIL ;SFISC/RSD - load Distribution Global ; Oct 25, 2022@09:00:45

Source Information

Source file <XPDIL.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 6 (,HOME)^%ZIS  ^%ZISC  ($$DT,$$FMADD)^XLFDT  ABRTALL^XPDI  (,DISP)^XPDIGP  ($$INST,PKG)^XPDIL1  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Kernel 2 XPD LOAD DISTRIBUTION  XPDIPM  

Entry Points

Name Comments DBIA/ICR reference
EN1
ST ;global input
OPEN ;use open command
GI
NONE

External References

Name Field # of Occurrence
^%ZIS ST+8
HOME^%ZIS ST+4
^%ZISC ST+10, OPEN+11
^DIR EN1+21, ST+6, OPEN+4, OPEN+7, GI+19
$$DT^XLFDT EN1+1
$$FMADD^XLFDT GI+22
ABRTALL^XPDI EN1+3, EN1+14
^XPDIGP EN1+25
DISP^XPDIGP GI+17
$$INST^XPDIL1 GI+14
PKG^XPDIL1 EN1+23

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Use INSTALL NAME: ",$P(^(0),U)," to install this Distribution.",!
  • Line Location: EN1+26
Function Call: WRITE
  • Prompt: !!,"You must have a device called 'HFS' in order to load a distribution!",*7
  • Line Location: ST+3
Function Call: WRITE
  • Prompt: !,"Couldn't open file or HFS device!!",*7
  • Line Location: ST+8
Function Call: WRITE
  • Prompt: !,"Couldn't open ",IO
  • Line Location: OPEN+9
Function Call: READ
  • Variable: X
  • Timeout: 10,Y:10
  • Line Location: GI+1
Function Call: WRITE
  • Prompt: !!,X,!,"Comment: ",Y
  • Line Location: GI+2
Function Call: READ
  • Variable: Z
  • Timeout: 1
  • Line Location: GI+5
Function Call: WRITE
  • Prompt: !!,"This is not a Distribution HFS File!"
  • Line Location: GI+6
Function Call: WRITE
  • Prompt: !!,"This Distribution contains Transport Globals for the following Package(s):"
  • Line Location: GI+10
Function Call: WRITE
  • Prompt: !,"Distribution OK!",!
  • Line Location: GI+16
Function Call: WRITE
  • Prompt: !,"Loading Distribution...",!
  • Line Location: GI+20
Function Call: READ
  • Variable: X
  • Timeout: 10,Y:10
  • Line Location: GI+24
Function Call: WRITE
  • Prompt: !!,"ERROR in HFS file format!"
  • Line Location: GI+26
Function Call: READ
  • Variable: X
  • Timeout: 10,Y:10
  • Line Location: GI+31
Function Call: WRITE
  • Prompt: !!,"**NOTHING LOADED**",!
  • Line Location: NONE+0
Routine Call
  • %ZIS
  • Line Location:
    • ST+8
Routine Call
  • %ZIS
  • Line Location:
    • ST+4
Routine Call
  • DIR
  • Line Location:
    • EN1+21
    • ST+6
    • OPEN+4
    • OPEN+7
    • GI+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] ST+3
^DD(3.5 ST+2
^XPD(9.7 - [#9.7] EN1+26
^XTMP("XPDI" EN1+14, GI+22*

Label References

Name Line Occurrences
GI ST+10, OPEN+11
NONE EN1+3
OPEN ST+2
ST EN1+3

Naked Globals

Name Field # of Occurrence
^(0 EN1+26

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GI+28*, GI+33*, GI+34
%ZIS ST+1~, ST+7*
%ZIS("HFSMODE" ST+7*
%ZIS("HFSNAME" ST+7*
DIR EN1+18~, ST+1~, OPEN+1~
DIR("?" ST+5*, OPEN+3*, OPEN+6*
DIR("A" EN1+19*, EN1+20*, ST+5*, OPEN+2*, OPEN+5*, GI+18*
DIR("B" EN1+19*, GI+18*
DIR(0 EN1+19*, ST+5*, OPEN+2*, OPEN+5*, GI+18*
DIRUT EN1+18~, EN1+21, ST+1~, ST+6, OPEN+1~, OPEN+4, GI+19, GI+31, GI+33*
DT EN1+1*, GI+22
DTOUT OPEN+1~, OPEN+7
DUOUT OPEN+1~, OPEN+7
GR ST+1~, GI+28*, GI+34*, GI+35
IO OPEN+1~, OPEN+5*, OPEN+9, GI+1, GI+5, GI+24
IO(0 OPEN+10*, GI+2, GI+6, GI+26, GI+36
IOP ST+1~, ST+7*
IOPAR OPEN+1~, OPEN+8*, OPEN+9
POP EN1~, ST+8, OPEN+4*, OPEN+7*, OPEN+9*
U EN1+1*, EN1+16, EN1+17, EN1+20, EN1+26, GI+8, GI+11, GI+22
X ST+1~, GI~, GI+1*, GI+2, GI+3, GI+5*, GI+11*, GI+24*, GI+26, GI+31*
, GI+32, GI+35
X( GI+5*, GI+11
X(1 GI+6, GI+8*, GI+9*
XPDA EN1~, EN1+12*, EN1+14, EN1+23
XPDGP EN1~, EN1+25, ST+10, GI+8*, GI+17
XPDIT EN1~, EN1+11*, EN1+12*, EN1+20, GI+9*, GI+14*
XPDQUIT EN1~, EN1+3, EN1+14, EN1+21*, ST+3*, ST+6*, ST+8*, ST+10, GI+6*, GI+11
, GI+14*, GI+15, GI+19*, GI+26*, GI+31*
XPDREQAB EN1~
XPDSEQ GI~, GI+28*
XPDSKPE EN1~, EN1+11*, EN1+16, EN1+17*, EN1+22*
XPDST EN1~, EN1+2*, EN1+26
XPDST("H" GI+3*
XPDST("H1" GI+3*
XPDT EN1~, EN1+12, EN1+26
XPDT( EN1+12, EN1+20, GI+28, GI+34
XPDT("NM" GI+26, GI+28, GI+33
Y EN1+22, ST+1~, ST+7, OPEN+5, OPEN+8, GI~, GI+1*, GI+2, GI+3, GI+11*
, GI+14, GI+19, GI+24*, GI+26, GI+28, GI+31*, GI+33, GI+35
Z ST+1~, GI~, GI+5*, GI+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All