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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DICOMPU

Package: VA FileMan

Routine: DICOMPU


Information

DICOMPU ;GFT/GFT - META-DATA-DICTIONARY LOOKUP;24JAN2013

Source Information

Source file <DICOMPU.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA FileMan 3 (BLD,MSG)^DIALOG  YN^DICN  DRW^DICOMPX  

Entry Points

Name Comments DBIA/ICR reference
EN(Y,J,DICOMP,DICMX) ; Main Entry Point
X
QX
LOOK()
FIELD(F,DD) ;Can we TRANSlate File F, Field DD to the context of FILE?
MULTIPL ;First, can we get to the context by going up from a MULTIPLE
FORWARD ;Next, can we go FROM our context TO the found File F?
PTQ
F
BACK ;Finally, is there a Pointer FROM the found file TO our context?
OUT
RECURSE()
TOP(B) ;
UP
ACCESS(A,B)
TOOLONG(A,B)
SAVE
ASK
GOT

External References

Name Field # of Occurrence
BLD^DIALOG ASK+5
MSG^DIALOG ASK+5
YN^DICN ASK+6
DRW^DICOMPX EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?7
  • Line Location: ASK+4
Routine Call
  • DIALOG
  • Line Location:
    • ASK+5
Routine Call
  • DIALOG
  • Line Location:
    • ASK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( X+5, FIELD+1, MULTIPL+3, PTQPTQ+1, FF+1, BACK+2, BACK+5, BACK+6
BACK+7, UP, ACCESS+3
^DD("STRING_LIMIT" TOOLONG
^DDD - [#.9] X
^DDD("C" XX+2
^DIC - [#1] BACK+2, ACCESS+1
^DIC("B" X+5
^TMP("DICOMPU" QX!, LOOK!, PTQ+1, F+4*, BACK+5, BACK+11*, GOT!

Label References

Name Line Occurrences
$$ACCESS FIELD+4
$$FIELD LOOK+4, MULTIPL+6, F+4
$$LOOK XX+5
$$RECURSE BACK+9
$$TOOLONG MULTIPL+2, F+5, BACK+10
$$TOP BACK+6, ACCESS+1
ASK SAVE
F F+1, F+2, F+5
GOT XX+5
MULTIPL RECURSE
OUT MULTIPL+2, FORWARD+1, BACK+2
PTQ PTQ+1, FF+4
QX X
SAVE MULTIPL+2, FORWARD+1, BACK+2, BACK+6
UP UP+1
X X+2

Naked Globals

Name Field # of Occurrence
^( BACK+6
^("UP" UP+1
^(0 FIELD+2, F+3, BACK+2, BACK+6, UP+1
^(8 ACCESS+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+2~, F+1*, F+2, OUT+1*, OUT+2, OUT+3, ASK+4*, ASK+6*, ASK+7
A ACCESS~, ACCESS+1, ACCESS+3, TOOLONG~, TOOLONG+1
ASKED EN+2~
ASKED( ASK+2, ASK+7*
B MULTIPL+1~, BACK+4~, BACK+6*, BACK+7, BACK+8, BACK+9, TOP~, UPUP+1*, UP+2
, ACCESS~, ACCESS+3, TOOLONG~, TOOLONG+1
D EN+2~, EN+3*, EN+8*, MULTIPL+1~, MULTIPL+2!, MULTIPL+3*, MULTIPL+4!, MULTIPL+5*, MULTIPL+6*!, BACK+4~
BACK+5*, BACK+6, BACK+9, BACK+11
DATE EN+2~
DD EN+2~, FIELD~, FIELD+1, FIELD+4, ASK+1
DIASK ASK+3~, ASK+5
DIASK(1 ASK+4*
DIASK(2 ASK+4*
DIASK(3 ASK+4*
DIC EN+2~, X*, ASK+4
DIC("S" ACCESS+2
DICMX EN~, FIELD+2, MULTIPL+2, PTQ+1, BACK+3
DICN EN+2~, X*
DICOMP EN~, EN+6*, ASK+1
DIS EN+2~, EN+10*, XX+2*
DISTART EN+2~, EN+5*, EN+10, X+2, X+4, ASK+4
DSPI EN+2~, X+5*, ASK+1
DUOUT EN+4!, XX+5, OUT+1, SAVE+3, ASKASK+6*
DUZ(0 ACCESS, ACCESS+4
F EN+2~, X*, X+5*, FIELD~, FIELD+1, FIELD+3, FIELD+4, FIELD+5, MULTIPL+2, PTQ
PTQ+1, FF+4, BACK+2, BACK+5, BACK+8, BACK+9, BACK+11, GOT
FI FORWARD+2~, FORWARD+3*, PTQ*, PTQ+1, FF+1, F+2, F+3, F+4
FIELD EN+2~, X*, X+5*, LOOK+3, LOOK+4, TOOLONG, ASK+2, ASK+7, GOT
FIL EN+2~, X*, X+5*, LOOK+3, LOOK+4, ASK+2, ASK+7
FILE EN+2~, BACK+9~*, BACK+10
FILE( EN+8*, MULTIPL+5, F+3, BACK+2, BACK+3, BACK+9*
FLD EN+2~, FORWARD+2~, PTQ+2*, F*, F+1, F+4
I MULTIPL+1~, BACK+4~, BACK+6*
J EN~, EN+3!, EN+5
J( EN+8
J(0 EN+3*
KEEP FORWARD+2~, FORWARD+3*, PTQF+5*
L MULTIPL+1~, BACK+4~, BACK+6*, OUT+1*, OUT+2, OUT+3
OUT MULTIPL+1~, MULTIPL+2, MULTIPL+5*, FORWARD+1, F+3*, BACK+3, BACK+5, BACK+6, BACK+8*, OUT*
OUT+2, OUT+3*, OUT+4, SAVE+3*
OUT( OUT+1, OUT+2, OUT+3, SAVE+2*
OUT("" SAVE+2
R BACK+4~
T FIELD+5~*!, MULTIPL+1~, MULTIPL+2*, MULTIPL+3*, MULTIPL+4, MULTIPL+5, MULTIPL+6, F+4*, F+5, BACK+2*
BACK+3*, BACK+5, BACK+6, BACK+11, OUT*, OUT+2, OUT+3*
TRANS MULTIPL+1~, MULTIPL+2*, MULTIPL+3*, MULTIPL+4, PTQ*, F+3*, F+5, BACK+2*, BACK+7*, BACK+10*
BACK+11*, SAVESAVE+2, ASK*, ASK+2*, ASK+7*
TRY LOOK~, FIELD+5~*
TRY( FIELD+3, FIELD+5*, MULTIPL+4, PTQ+1, BACK+5, BACK+9!*
U X, FIELD+2, F+1, F+3, BACK+2, BACK+6, ASK+4
UP FORWARD+2~
X EN+2~, X*, X+4*, X+5
Y EN~, EN+5!, FORWARD+2~, ACCESS+1~*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All