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 |  Marked Items  | All
Print Page as PDF
Routine: DICATT2

Package: VA FileMan

Routine: DICATT2


Information

DICATT2 ;SFISC/GFT,XAK - DEFINING MULTIPLES ;12NOV2015

Source Information

Source file <DICATT2.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 11 Q^DIB  ^DIC  (0,6,CHECK,E,N,X)^DICATT  E^DICATT1  (,1)^DICATT22  IT^DICATTA  YN^DICN  RE^DIED  
$$FL^DIQGDDU  DICATT^DIQQQ  ^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: 7

Package Total Caller Graph
VA FileMan 7 DICATT  DICATT1  DICATT22  DICATT5  DICATT6  DII  DIU31  

Entry Points

Name Comments DBIA/ICR reference
1
S
G
Q ;
W
WINDOW
X ;
LENGTH(DI,DIFIELD) ;
NO ;
TYPE
NEW
DQ ;;

External References

Name Field # of Occurrence
Q^DIB TYPE
^DIC NEW+2
0^DICATT TYPE+6, NEW+3
6^DICATT TYPE+6
CHECK^DICATT DICATT2+7, S+4, W+1, WINDOW+1
E^DICATT NEW+1, NEW+4
N^DICATT S+4, X+2, X+4, NO+1, TYPE+6
X^DICATT TYPE+1
E^DICATT1 NEW
^DICATT22 G
1^DICATT22 1+2
IT^DICATTA LENGTH+9
YN^DICN W, WINDOW
RE^DIED S+4
$$FL^DIQGDDU LENGTH+4
DICATT^DIQQQ NEW+4
^DIR LENGTH+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: S
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"SHALL THIS TEXT NORMALLY APPEAR IN WORD-WRAP MODE"
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !,"ANSWER 'YES' IF THE INTERNALLY-STORED '"_F_"' TEXT"
  • Line Location: W+2
Function Call: WRITE
  • Prompt: !?5,"SHOULD NORMALLY BE PRINTED OUT IN FULL LINES, BREAKING AT WORD BOUNDARIES."
  • Line Location: W+3
Function Call: WRITE
  • Prompt: !?2,"ANSWER 'NO' IF THE INTERNAL TEXT SHOULD NORMALLY BE PRINTED OUT"
  • Line Location: W+4
Function Call: WRITE
  • Prompt: !?5,"LINE-FOR-LINE AS IT STANDS.",!
  • Line Location: W+5
Function Call: WRITE
  • Prompt: !,"SHALL ""|"" CHARACTERS IN THIS TEXT BE TREATED LIKE ANY OTHER CHARACTERS"
  • Line Location: WINDOW+0
Function Call: WRITE
  • Prompt: !,"ANSWER 'YES' IF THE INTERNALLY-STORED '"_F_"' TEXT MAY HAVE ""|"" CHARACTERS"
  • Line Location: WINDOW+2
Function Call: WRITE
  • Prompt: !?3,"IN IT (SUCH AS HL7 MESSAGES) THAT NEED TO DISPLAY EXACTLY AS THEY ARE STORED."
  • Line Location: WINDOW+3
Function Call: WRITE
  • Prompt: !,"ANSWER 'NO' IF THE INTERNAL TEXT SHOULD NORMALLY BE PRINTED OUT WITH ANYTHING"
  • Line Location: WINDOW+4
Function Call: WRITE
  • Prompt: !?3,"THAT IS DELIMITED BY ""|"" CHARACTERS INTERPRETED AS VARIABLE TEXT.",!
  • Line Location: WINDOW+5
Function Call: WRITE
  • Prompt: " (FIELD DEFINITION IS NOT EDITABLE)"
  • Line Location: X+1
Function Call: WRITE
  • Prompt: !!,"DATA TYPE OF ",F,": "
  • Line Location: TYPE+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: $P(^DI(.81,N,0),U)
  • Line Location: TYPE+4
Function Call: READ
  • Prompt: "// "
  • Variable: X
  • Timeout: DTIME
  • Line Location: TYPE+6
Function Call: WRITE
  • Prompt: " DUPLICATED>"
  • Line Location: NEW+1
Function Call: WRITE
  • Prompt: ", JUST HIT THE SPACE KEY"
  • Line Location: NEW+4
Routine Call
  • DIC
  • Line Location:
    • NEW+2
Routine Call
  • DIR
  • Line Location:
    • LENGTH+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( S+3, X+3, LENGTH+2, LENGTH+8*, TYPE, TYPE+7, NEW, NEW+4
^DI( TYPE+4
^DOPT("DICATT" X+3

Label References

Name Line Occurrences
1 X+4
G WINDOW+1
LENGTH X+2
NEW TYPE+1
TYPE NEW+5
W 1+3, W+5
WINDOW W+1, WINDOW+5
X TYPE+5, TYPE+6

Naked Globals

Name Field # of Occurrence
^(0 NEW, NEW+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % W*, W+1, WINDOW*, WINDOW+1
A S+3, Q+1!, X+2, X+3, TYPE, TYPE+7, NEW, NEW+4
A0 LENGTH+1~, LENGTH+3*, LENGTH+4, LENGTH+9*
A1 LENGTH+1~, LENGTH+3*, LENGTH+9*
A2 LENGTH+1~, LENGTH+3*, LENGTH+9*
B Q+1!, TYPE+7
B0 LENGTH+1~
C Q+1!, X+3*
DA 1+2, S, S+3, Q+1!, X+2, X+3, TYPE, TYPE+1, TYPE+7
DDA Q+1!, LENGTH+9*
DE Q+1!, TYPE!, NEW+1*
DE(4 S+1*, S+3*
DE(5 S+2*, S+3*
DE(6 S+3*
DE(7 1+1*, 1+4*
DG TYPE!
DG(4 S+5
DG(5 S+1*, S+5
DG(6 S+6
DG(7 1+1*, 1+4*
DI LENGTH~, LENGTH+2, LENGTH+4, LENGTH+8
DIC Q+1!, NEW+2*!
DIC("S" TYPE+1*, TYPE+7*
DIC(0 NEW+2*
DICL 1+1, Q+1!, TYPE
DICS Q+1!
DICY LENGTH+1~, LENGTH+2*, LENGTH+3, LENGTH+4, LENGTH+7
DIE TYPE!
DIFIELD LENGTH~, LENGTH+2, LENGTH+4, LENGTH+8
DIFLD S+4*!
DIK Q+1!
DIR LENGTH+1~
DIR("?" LENGTH+3*, LENGTH+5*
DIR("A" LENGTH+4*
DIR("B" LENGTH+4*, LENGTH+9
DIR(0 LENGTH+4*
DIRUT X+2!
>> DIZ G*, NEW+1*
>> DIZZ NEW+1
>> DL S+1*
>> DP 1+1*, S+1*
DQ 1+1*, S+4!, TYPE!
DQ( S*
DQI 1+1*, Q+1!, TYPE*
DR Q+1!
>> DREF 1+1*, 1+4
DS 1!
DTIME 1+3*, TYPE+1, TYPE+6
DTOUT DICATT2+7, S+4!, TYPE, TYPE+1*, TYPE+6*
DUZ(0 NO+1, TYPE+1, TYPE+5
E Q+1!, NEW, NEW+4
F S, Q+1!, W+2, WINDOW+2, LENGTH+7~*, TYPE*
I Q+1!
J Q+1!
J( S+3
L Q+1!
M TYPE!, NEW+3*
N 1+1*, S, S+3, Q+1!, X+2, X+3, X+4, TYPE*, TYPE+2*, TYPE+3*
, TYPE+4, TYPE+6, TYPE+7, NEW+3*
O DICATT2+8, 1+1, 1+4, S+3, Q+1!, WINDOW, TYPE+1, NEW, NEW+3*, NEW+4
P DICATT2+8*, 1+1*, S+3*, Q+1!
Q Q+1!
S Q+1!
T DICATT2+7*, 1+2*, 1+3, 1+4, S+2, S+5*, Q+1!, X+3*
U DICATT2+8, 1, 1+2, S+3, S+4, S+5, S+6, W+1, WINDOW+1, X+3
, LENGTH+2, LENGTH+3, LENGTH+4, LENGTH+7, LENGTH+8, NO+1, TYPE, TYPE+1, TYPE+2, TYPE+3
, TYPE+4, TYPE+5, TYPE+6, TYPE+7, NEW, NEW+1, NEW+3, NEW+4
V 1*, S, Q+1!, X+3*
W 1, Q+1!, X+3*
X LENGTH+1~, LENGTH+7*, LENGTH+8*, TYPE+1*, TYPE+6*, NEW, NEW+4
Y S*, S+3*, S+4!, Q+1!, X+3*, LENGTH+1~, LENGTH+6, LENGTH+7, LENGTH+8, LENGTH+9
, TYPE!*, TYPE+2, TYPE+3, TYPE+5, TYPE+6, NEW+3
Z DICATT2+7, DICATT2+8*, 1, 1+2, S+4, S+5*, S+6*, G, Q+1!, W
, W+1*, WINDOW, WINDOW+1*, X+3*, NO+1, TYPE*

Marked Items

Name Field # of Occurrence
$T(DQ+Y S
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All