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: DIFROM1

Package: VA FileMan

Routine: DIFROM1


Information

DIFROM1 ;SFISC/XAK-CREATES RTNS WITH DD'S ;29OCT2012

Source Information

Source file <DIFROM1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 4 %XY^%RCR  (,EQ)^DIFROM11  FILE^DIFROM3  DDOUT^DIFROMS  

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
VA FileMan 2 DIFROM0  DIFROM11  

Entry Points

Name Comments DBIA/ICR reference
L
EGP
KEYSNIX ; TRANSPORT INDEXES AND KEYS; VEN/SMH for FM V22.2 (fallthrough)
; FIA array has same format as F currently has. We will just reuse F.
; But we need to store it in a global as DIFROMS* uses naked refs.
SAVE
SEC
S
N
D
B
W
X
Q
V

External References

Name Field # of Occurrence
%XY^%RCR SEC
^DIFROM11 L+1
EQ^DIFROM11 KEYSNIX+36, KEYSNIX+41, SEC+1
FILE^DIFROM3 KEYSNIX+36, KEYSNIX+41, SEC+1
DDOUT^DIFROMS KEYSNIX+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: SEC+4
Function Call: WRITE
  • Prompt: !,"WARNING--DATA TOO LONG: "
  • Line Location: B+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"WARNING--CONTROL CHARACTER IN DATA: "
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $C(7),%X,%A,%B,")--",!?3,%V
  • Line Location: X+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( EGP+2, SAVE+3*, V, V+2*
^DIC - [#1] EGP+1
^UTILITY("DI" L+1!, EGP+1*, SAVE+3*
^UTILITY("FIA" KEYSNIX+3!, KEYSNIX+4*, KEYSNIX+10, KEYSNIX+13!
^UTILITY("KX" KEYSNIX+3!, KEYSNIX+10, KEYSNIX+16!, KEYSNIX+17!, KEYSNIX+21, KEYSNIX+32!
^UTILITY($J L+2*, EGP+2*, KEYSNIX+27*, KEYSNIX+29*, KEYSNIX+39*, SEC+1, N+3*, B+1*

Label References

Name Line Occurrences
%XY EGP, SAVE+2, V+1
B N+3
D N+5
L KEYSNIX+36, KEYSNIX+41
N KEYSNIX+40, N+2, N+4
Q N+2
S D
SAVE EGP+2
SEC L+1
V EGP+2
W N+3
X B

Naked Globals

Name Field # of Occurrence
^( SAVE, SAVE+1!, N+3
^("VR" V!
^(0 SAVE+1
^(8 SAVE!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % N+3*, B+1*
>> %A KEYSNIX+39*, %XY+1*, N, N+2*, N+3, N+4, D*, X
>> %B KEYSNIX+39*, S*, N*, N+1, N+2, N+3, N+5*, N+6*, D, X
>> %C N+1*, N+5*
>> %C( KEYSNIX+39*, %XY+1*, N*, N+1*, N+2
>> %V N+3*, B, B+1*, X
>> %X EGP*, EGP+2*, KEYSNIX+38*, KEYSNIX+39, SEC*, %XY+1, N, N+3, N+4, X
>> %Y KEYSNIX+39*, SEC*, %XY+1*, N+3
>> %Z KEYSNIX+39*, SAVE+1*, SAVE+3*, %XY+1*, N, N+1, N+2*, D*
>> D EGP+2*, KEYSNIX+39, SAVE+3, V, V+2
>> DH L*, L+3*, KEYSNIX+40*, SEC*, SEC+1*
>> DL L+2*, EGP+2*, KEYSNIX+24*, KEYSNIX+27, KEYSNIX+28*, KEYSNIX+29, KEYSNIX+38*, KEYSNIX+39*, N+3*, B+1*
>> DRN KEYSNIX+36, KEYSNIX+41, SEC+1
>> DSEC L+1, EGP+1*, SAVE+3*
DSV SAVE!, V!*, V+2!
DSV( SAVE+1*, SAVE+3
DSV(8 SAVE*
>> E EGP*, EGP+1*, EGP+2*, KEYSNIX+38*, N
>> F L*, L+1, L+2, L+3, EGP, EGP+1, EGP+2, KEYSNIX+4, KEYSNIX+10, KEYSNIX+36
, KEYSNIX+38, KEYSNIX+39
>> F( L, L+2, EGP+2, KEYSNIX+36, KEYSNIX+38
GREF KEYSNIX+21~*, KEYSNIX+22, KEYSNIX+23*, KEYSNIX+25, KEYSNIX+29
LREF KEYSNIX+22~*, KEYSNIX+23
REF2STORE KEYSNIX+25~*, KEYSNIX+26*, KEYSNIX+27
U KEYSNIX+36, SAVE+1, N+3
>> X EGP+2*, SAVE, SAVE+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All