Routine: DIBT

Package	Total	Call Graph
VA FileMan	10	(KILL,SET)^DDGLIB0 ^DDS S1^DIBT1 (,IX)^DIC FILE^DICN (,FILE,UPDATE)^DIE IXALL^DIK Q^DIP N^DIP1 ^DIR

Package

Total

Call Graph

VA FileMan

(KILL,SET)^DDGLIB0 ^DDS S1^DIBT1 (,IX)^DIC FILE^DICN (,FILE,UPDATE)^DIE IXALL^DIK Q^DIP
N^DIP1 ^DIR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 5

Package	Total	Caller Graph
VA FileMan	5	DIBTED DICATT DIP1 DIU DIU0

Name

Comments

DBIA/ICR reference

;

; select and edit templates, until user quits

;=.4,.401,.402

;

;COME HERE FROM DIP1

Name	Field # of Occurrence
KILL^DDGLIB0	SCREEN+10
SET^DDGLIB0	SCREEN+4
^DDS	T+6
S1^DIBT1	S+1
^DIC	0+7
IX^DIC	T+3
FILE^DICN	SNEW+12, DICM+3
^DIE	SCROLL+1
FILE^DIE	SNEW+3
UPDATE^DIE	SNEW+9
IXALL^DIK	0+4
Q^DIP	S+1, S0+2
N^DIP1	N
^DIR	SCREEN+8, S0+2

Name

Field # of Occurrence

KILL^DDGLIB0

SCREEN+10

SET^DDGLIB0

SCREEN+4

^DDS

T+6

S1^DIBT1

S+1

^DIC

0+7

IX^DIC

T+3

FILE^DICN

SNEW+12, DICM+3

^DIE

SCROLL+1

SNEW+3

SNEW+9

0+4

S+1, S0+2

^DIR

SCREEN+8, S0+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: T+2
Function Call: WRITE	Prompt: ! Line Location: S0+2
Routine Call	DDS Line Location: T+6
Routine Call	DIC Line Location: 0+7
Routine Call	DIC Line Location: T+3
Routine Call	DIE Line Location: SCROLL+1
Routine Call	DIE Line Location: SNEW+3
Routine Call	DIE Line Location: SNEW+9
Routine Call	DIR Line Location: SCREEN+8 S0+2

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SNEW+12, DICM
^DIBT - [#.401]	SNEW+1!, SNEW+13, EGP+3, EGP+4, EGP+7, EGP+9, S1, US, US+2!*
^DIC - [#1]	0+3
^DOPT("DIBT"	0+2, 0+3*

Name

Line Occurrences (* Changed, ! Killed)

^DD(

SNEW+12, DICM

^DIBT - [#.401]

SNEW+1!*, SNEW+13*, EGP+3*, EGP+4*, EGP+7*, EGP+9*, S1*, US*, US+2!*

^DIC - [#1]

0+3

^DOPT("DIBT"

0+2, 0+3*

Name	Line Occurrences
$$SCREEN	T+4
$$T	0+8
DICM	EGP+6, EGP+7, EGP+9
K	EGP+11, S0+2, N
N	S+2, S0
S	S+2
S0	S0, S0+3, S1+1
SCROLL	T+4

Name

Line Occurrences

$$SCREEN

T+4

$$T

0+8

DICM

EGP+6, EGP+7, EGP+9

EGP+11, S0+2, N

S+2, S0

S+2

S0, S0+3, S1+1

SCROLL

T+4

Name	Field # of Occurrence
^("B"	0+2!
^("BY0"	SNEW+1!
^("BY0D"	SNEW+1!
^("OVF0"	EGP+9*
^(0	0+2, EGP

Name

Field # of Occurrence

^("B"

0+2!

^("BY0"

SNEW+1!

^("BY0D"

SNEW+1!

^("OVF0"

EGP+9*

^(0

0+2*, EGP*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SNEW+3~, SNEW+6, SNEW+7, SNEW+8, EGP+2, EGP+3, EGP+6, EGP+7, EGP+9, DICM , US+1~, US+2*
%(1	EGP+6, EGP+7, EGP+9*, DICM, DICM+2
A	SNEW+13~, EGP+1, EGP+2, EGP+3, EGP+4, EGP+5, EGP+6, EGP+7, EGP+9*, DICM+2 , DICM+3~
B	SNEW+13~, EGP+7, EGP+9, DICM+2, DICM+3~
>> BY(0	SNEW+2, SNEW+3
C	SNEW+13~, EGP+5, EGP+6, EGP+9, DICM+1~, DICM+2
D	T+2, SNEW+3~, SNEW+13~, EGP+5, EGP+7, EGP+9, DICM+1~, DICM+2*
DA	T+1~, T+4*, SNEW+12~!, DICM+3!
DA(1	SNEW+12, DICM
DA(2	DICM*
DD	DICM+3~
DDSFILE	T~, T+2, T+5, SCROLL+1
DDSPARM	T+1~, T+6*
>> DI	0+1
>> DIBT1	S+3*, SNEW+1, SNEW+3, SNEW+6, SNEW+12, SNEW+13, EGP+3, EGP+4, EGP+7, EGP+9 , S1, DICM, US, US+2
DIBT2	SNEW+11, SNEW+12, SNEW+13, EGP+3, EGP+4, EGP+7, EGP+9, EGP+12, S0*, S0+2 , S1, DICM, K!
DIBT3	SNEW+11*, SNEW+12, SNEW+13, EGP, EGP+1, EGP+2, EGP+4, EGP+5, EGP+6, EGP+7 , EGP+9, DICM+2, K!
DIBTOLD	EGP+11!
DIBY	SNEW+3~
DIBY(	SNEW+3, SNEW+6!, SNEW+7, SNEW+8*
DIC	0+1, 0+4, 0+7!, T+1~, T+2, SNEW+12~!, DICM, DICM+3!
DIC("A"	0+5*
DIC("DR"	EGP+6, DICM+2
DIC("P"	SNEW+12, DICM
DIC("S"	0+6, T+2
DIC(0	0+5, T+3, SNEW+12, DICM
DICF	0+1*, 0+8, T~, T+2
DIE	SCROLL~, SCROLL+1*, SNEW+12~
DIEDT	K!
DIERR	T+1~, T+6, SCREEN+1~, SCREEN+4
DIK	0+4~*
DIN	T+1~, T+4, T+5, T+6
DINUM	SNEW+12~!, EGP+6, EGP+7, EGP+9, DICM+3!
DIOVRD	SCROLL~, SCROLL+1, SNEW+12~!, DICM*, DICM+3!
DIR	SCREEN+1~, S0+2!
DIR("?"	SCREEN+7, S0+1
DIR("A"	SCREEN+6, S0+2
DIR("B"	SCREEN+6, S0+2
DIR(0	SCREEN+6, S0+2
DIREC	SNEW+3~
DIREC(	SNEW+8*
DIROUT	S+1!
DIRUT	SCREEN+1~, S+1!, S0+2
DO	SNEW+12~, DICM+3~
>> DPP	S0
>> DPP(	SNEW+5, SNEW+11, SNEW+12, SNEW+13, EGP, EGP+1, EGP+2, EGP+4, EGP+5, EGP+6 , EGP+7, EGP+9, S0, S0+2, DICM+2, US+1, US+2
>> DPP(0	SNEW+2, SNEW+3, SNEW+4, SNEW+11, EGP+12, US+1
DR	T+1~, T+6, SCROLL~, SCROLL+1, SNEW+12~
DT	SNEW+1, US
DTOUT	0+8!, S+1
DUOUT	SCREEN+1~, S+1
DUZ("LANG"	EGP+2
DUZ("SCREEN"	SCREEN+2!, SCREEN+3, SCREEN+5, SCREEN+8, SCREEN+9, SCREEN+12
F	SNEW+3~, SNEW+5*, SNEW+7
HELP	SCREEN~, SCREEN+7
I	SNEW+3~, SNEW+4*, SNEW+5, SNEW+6, SNEW+8
O	SNEW+3~, SNEW+5*, SNEW+7
Q1	SNEW+3~, SNEW+5*, SNEW+7
Q2	SNEW+3~, SNEW+5*, SNEW+7
T	SNEW+3~, SNEW+5*, SNEW+7
U	0+3, SCREEN+5, SNEW+1, SNEW+3, SNEW+5, SNEW+12, SNEW+13, EGP, EGP+7, EGP+9 , S0, S0+2, DICM, DICM+2, US
X	0+3, SCREEN+1~, S+2, SNEW+12, EGP+6, EGP+7, EGP+9, US+1, US+2
Y	0+7, 0+8, T+1~, T+3, T+4, SCREEN+1~, SCREEN+8, S+2, S+3, EGP+7 , EGP+9, S0+3

Customize PDF page

Package: VA FileMan

Routine: DIBT

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
MENU	;
0	; select and edit templates, until user quits
T(DDSFILE,DICF)	;=.4,.401,.402
SCROLL
SCREEN(HELP)	;
S	;
SNEW	;COME HERE FROM DIP1
EGP
S0
S1
DICM
US
K
N