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

Package: VA FileMan

Routine: DIA3


Information

DIA3 ;SFISC/GFT-UPDATE POINTERS, CHECK CODE IN INPUT STRING, CHECK FILE ACCESS ;19SEP2004

Source Information

Source file <DIA3.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
VA FileMan 10 (2,D,DB,DIC,DICS,FILETOP,P,X)^DIA  L^DIA2  BLD^DIALOG  YN^DICN  EN^DICOMP  ^DICOMPW  ^DIM  DIA3^DIQQQ  
PTS^DIT  (ASK,P)^DITP  

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 DIA  DIA2  

Entry Points

Name Comments DBIA/ICR reference
C
D
W
F
DITP
FIXPT(DIFLG,DIFILE,DIDELIEN,DIPTIEN) ;DELETE OR REPOINT POINTERS ---never done??
QFIXPT
X ;
E
L
DEF
BAD
ACC
XEC

External References

Name Field # of Occurrence
2^DIA X+1
D^DIA X+1, XEC+2
DB^DIA L+1
DIC^DIA X+4, DEF+1
DICS^DIA DEF+1
FILETOP^DIA L+1
P^DIA X+2
X^DIA BAD
L^DIA2 W
BLD^DIALOG FIXPT+3
YN^DICN DXEC+2
EN^DICOMP DEF+1
^DICOMPW E
^DIM X+2
DIA3^DIQQQ X+3
PTS^DIT DIA3+7, FIXPT+10
ASK^DITP DIA3+8
P^DITP FIXPT+12

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: %
  • Timeout: DTIME
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"DELETE ALL POINTERS"
  • Line Location: D+0
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"THEN PLEASE INDICATE WHICH ENTRY SHOULD BE POINTED TO"
  • Line Location: W+0
Function Call: WRITE
  • Prompt: $C(7),!,"OK... FORGET IT... LET'S GO ON TO EDIT ANOTHER ENTRY"
  • Line Location: F+0
Function Call: WRITE
  • Prompt: !?4,"("_$P("DELETION^RE-POINTING",U,''Y+1)_" WILL OCCUR WHEN YOU LEAVE 'ENTER/EDIT' OPTION)"
  • Line Location: DITP+1
Function Call: WRITE
  • Prompt: !?9,"YOU HAVE NO WRITE ACCESS TO FILE "_+DP
  • Line Location: ACC+0
Function Call: WRITE
  • Prompt: !?63-$L(Y),Y
  • Line Location: XEC+2
Function Call: WRITE
  • Prompt: !,$C(7)," WARNING: THIS MEANS AUTOMATIC DELETION!!"
  • Line Location: XEC+4
Routine Call
  • DIALOG
  • Line Location:
    • FIXPT+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( FIXPT+5
^DIC - [#1] FIXPT+4, FIXPT+9
^TMP("DIFIXPT" FIXPT+8!
^UTILITY("DIT" DIA3+7*, DITP*, FIXPT+8!, FIXPT+10*, FIXPT+11*, QFIXPT!

Label References

Name Line Occurrences
ACC E
BAD X+2, X+3, X+6, EACC
C CD
D DIA3+9
DEF X+5
DITP DW
F CD
QFIXPT FIXPT+10
W C
XEC DEF+1

Naked Globals

Name Field # of Occurrence
^( DITP*, FIXPT+11*
^(0 DIA3+7, C, FIXPT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DIA3+8, C*, D, FIXPT+8~, X+3*, L*, L+1*, XEC+2*
%X FIXPT+3~
%Y FIXPT+3~
BY FIXPT+8~
D FIXPT+8~, X+3*
>> DA E*, LDEF+1*, XEC+1, XEC+3*
>> DB X+1*
>> DH DIA3+7*
DHD FIXPT+8~
DHIT FIXPT+8~, DEF+1*, XEC+2
>> DI L+1*, XEC+2
DIA DIA3+7, DITP, FIXPT+8~, FIXPT+9*, FIXPT+11, DEF+1
DIA("P" DIA3+7, FIXPT+9*
DIA(1 DITP, FIXPT+9*, FIXPT+11
DIAB X+4*, E*!, ACC!, XEC+2*
>> DIAP XEC+2
DIC DIA3+9, FIXPT+8~
DIC("S" XEC*
>> DICMX E*, DEF+1*
>> DICOMP E*, DEF+1*
DIDELIEN FIXPT~, FIXPT+4, FIXPT+9, QFIXPT!
DIFILE FIXPT~, FIXPT+4, FIXPT+5, FIXPT+9*, QFIXPT!
DIFIXPT FIXPT+3~, FIXPT+7*
DIFIXPTC FIXPT+3~, FIXPT+7*
DIFIXPTH FIXPT+3~
DIFLG FIXPT~, FIXPT+4, QFIXPT!
DIIOP QFIXPT!
DIPTIEN FIXPT~, FIXPT+3~, FIXPT+5, FIXPT+7*, FIXPT+11, QFIXPT!
DISTOP FIXPT+8~
>> DK X+5*, DEF+1, XEC+3
DL FIXPT+8~
>> DP X+5*, EL+1, DEF+1, ACCXEC+2*, XEC+3
>> DQI E*, DEF+1*
DR FIXPT+8~
DR( XEC+2
>> DRS L+1*, XEC+2*
>> DSC X+1
DTIME C
DTO DIA3+7*, FIXPT+8~, FIXPT+9*
>> DTOUT BAD
DUZ(0 X+2, X+5
>> DV X+3*, DEF+1*
>> DXS E, L*, DEF+1, XEC+2*
>> F XEC+2
FLDS FIXPT+8~
FR FIXPT+8~
>> I( DEF
IOP FIXPT+8~
>> J DEF*
L FIXPT+8~, EL+1*, DEFDEF+1
TO FIXPT+8~
U CDITP+1, L+1, DEFXEC+2, XEC+3
X FIXPT+3~, FIXPT+4*, FIXPT+5*, FIXPT+6!, FIXPT+8~, X+2*, X+4*, E!*, LL+1!
, DEF*, DEF+1*!, XECXEC+2
X( LXEC+1
Y DIA3+7*, DIA3+9*, WDITPDITP+1, FIXPT+3~, FIXPT+5*, FIXPT+8~, FIXPT+9*, X+1*
X+2*, X+3, X+4, X+5, X+6, EL+1*, DEF+1, XECXEC+1*
XEC+2*
Y( X+1
Z FIXPT+8~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All