Routine: DICATT2

Package	Total	Call Graph
VA Fileman	8	Q^DIB ^DIC (0,6,CHECK,E,N,X)^DICATT E^DICATT1 (,1)^DICATT22 YN^DICN RE^DIED DICATT^DIQQQ

Package

Total

Call Graph

VA Fileman

Q^DIB ^DIC (0,6,CHECK,E,N,X)^DICATT E^DICATT1 (,1)^DICATT22 YN^DICN RE^DIED DICATT^DIQQQ

Package	Total	Caller Graph
VA Fileman	6	DICATT DICATT1 DICATT22 DICATT5 DICATT6 DII

Package

Total

Caller Graph

VA Fileman

DICATT DICATT1 DICATT22 DICATT5 DICATT6 DII

External References

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

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: READ	Timeout: DTIME Variable: X Line Location: TYPE+0
Function Call: WRITE	Prompt: !!,"DATA TYPE OF ",F,": " Line Location: TYPE+0
Function Call: READ	Prompt: "// " Timeout: DTIME Variable: X Line Location: TYPE+3
Function Call: WRITE	Prompt: " <",$C(7) Line Location: NEW+0
Function Call: WRITE	Prompt: " DUPLICATED>" Line Location: NEW+0
Function Call: WRITE	Prompt: ", JUST HIT THE SPACE KEY" Line Location: NEW+2
Routine Call	DIC Line Location: NEW+1

Name	Line Occurrences (* Changed, ! Killed)
^DD(	S+3, TYPE, TYPE+3, NEW, NEW+2
^DOPT("DICATT"	TYPE+2

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

Name	Field # of Occurrence
^(0	X+1, NEW, NEW+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	W, W+1, WINDOW, WINDOW+1
A	S+3, Q+1!, TYPE, TYPE+3, NEW, NEW+2
B	Q+1!, TYPE+3
C	Q+1!, X+1*
DA	1+2, S, S+3, Q+1!, TYPE, TYPE+3
DDA	Q+1!
DE	Q+1!, TYPE!
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
DIC	Q+1!, NEW+1*
DIC("S"	TYPE, TYPE+3
DIC(0	NEW+1*
DICL	1+1, Q+1!, TYPE
DICS	Q+1!
DIE	TYPE!
DIFLD	S+4*!
DIK	Q+1!
>> DIZ	G, NEW
>> DIZZ	NEW
>> 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, TYPE+3
DTOUT	DICATT2+3, S+4!, TYPE, TYPE+3
DUZ(0	NO+1, TYPE, TYPE+2
E	Q+1!, NEW, NEW+2
F	S, Q+1!, W+2, WINDOW+2, TYPE*
I	Q+1!
J	Q+1!
J(	S+3
L	Q+1!
M	TYPE!, NEW+1*
N	1+1, S, S+3, Q+1!, X+1, TYPE, TYPE+1, TYPE+2, TYPE+3, NEW+1
O	DICATT2+4, 1+1, 1+4, S+3, Q+1!, WINDOW, TYPE, NEW, NEW+1*, NEW+2
P	DICATT2+4, 1+1, S+3*, Q+1!
Q	Q+1!
S	Q+1!
T	DICATT2+3, 1+2, 1+3, 1+4, S+2, S+5, Q+1!, X+1
U	DICATT2+4, 1, 1+2, S+3, S+4, S+5, S+6, W+1, WINDOW+1, X+1 , NO+1, TYPE, TYPE+1, TYPE+2, TYPE+3, NEW, NEW+1, NEW+2
V	1, S, Q+1!, X+1
W	1, Q+1!, X+1*
>> X	TYPE, TYPE+3, NEW, NEW+2
Y	S, S+3, S+4!, Q+1!, X+1, TYPE!*, TYPE+1, TYPE+2, TYPE+3, NEW+1
Z	DICATT2+3, DICATT2+4, 1, 1+2, S+4, S+5, S+6, G, Q+1!, W , W+1, WINDOW, WINDOW+1, X+1, NO+1, TYPE*

Customize PDF page

Package: VA Fileman

Routine: DICATT2

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items