Routine: DENTCRD1

Package	Total	Call Graph
Dental	2	^DENTCRD2 ($$CHECK,$$LEAP)^DENTE1
VA FileMan	2	(C,NOW)^%DTC YN^DICN
Registration	1	DEM^VADPT

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

Package	Total	Caller Graph
Dental	3	DENTCRD DENTCRD2 ^DENT(221

Entry Points

Name	Comments	DBIA/ICR reference
C
A
E
F
CC	;;.01;1;.5;3;4;5;6;7;8;.4;10;11;12;38;14;15;16;17;4.5;19;39;21;22;23;24;25;6.7;27;28;29;30;31;32;33;34;35;36;37;2;.3;7.1;6.2;6.4;6.6;6.8
DATE	;;31;28;31;30;31;30;31;31;30;31;30;31
YN
EN
1	;
DAY
ERR
OK
YR(DENTX1)	; Get last Year
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45

External References

Name	Field # of Occurrence
C^%DTC	YR+1
NOW^%DTC	DAY+5
^DENTCRD2	EN+1
$$CHECK^DENTE1	DAY+5
$$LEAP^DENTE1	DAY+1
YN^DICN	YN
DEM^VADPT	2+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"ERROR--",$P(^DD(221,F,0),"^",1)," entry is incorrect." Line Location: E+0
Function Call: WRITE	Prompt: !,D Line Location: EN+0
Function Call: WRITE	Prompt: !,"ERROR-- More than one patient category has been marked." Line Location: 19+1
Function Call: WRITE	Prompt: !,"ERROR-- Patient category is missing." Line Location: 19+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(221	C, C+1, E
^DENT(220.5 - [#220.5]	3, 3+1
^DPT("SSN"	2+2

Label References

Name	Line Occurrences
$$YR	DAY+4
@(	EN
A	C, OK, 2+1, 2+3, 3+1, 4, 5, 6, 6+2, 7 , 8, 10, 12, 13, 14, 19+3, 21, 26, 27, 39 , 40, 42, 43, 44
C	9, 11, 15, 16, 17, 18, 20, 22, 23, 24 , 25, 28, 29, 30, 31, 32, 33, 34, 35, 36 , 37, 38, 41, 45
CC	EN
DATE	DAY
DAY	1+2
E	C+1, ERR, 2, 2+3, 3+2, 6+1, 19+3
ERR	1+2, 1+3, DAY, DAY+3
F	11, 28, 29, 30, 36
OK	DAY+5
YN	YN

Naked Globals

Name	Field # of Occurrence
^(0	3+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	YN*, DAY+5
>> D	EN, 1+1, 2, 3, 6, 7, 8, 9, 11, 12 , 13, 14, 15, 16, 17, 18, 19, 20, 22, 23 , 24, 25, 26, 27, 28, 29, 30, 31, 32, 33 , 34, 35, 36, 37, 38, 41, 42, 43, 44, 45
>> D1	DAY+4, DAY+5, OK
>> D1(10	3+1*, 10
>> D1(39	2+1, 2+3, 39
D2	A, EN, EN+1!
D2("A"	40*
D2("A1"	40*
D2("AC"	3+1*
D2("AC1"	3+1*
D2("B"	ERR, OK, 3+1, 40
D2("B1"	OK*
D2("C"	3+1*
D2("D"	2+1, 2+3
D2("E"	2+3*
>> D39	2+3*, 4
DENTI	2+3*!
>> DENTSTA	3+1, 40
DENTX	2+3*!
DENTX1	YR~, YR+1
>> DENTY	DAY+4
>> DFN	2+3*
>> DINUM	DAY+5*
DT	DAY+1, DAY+4, DAY+5
>> E	A, E, EN, EN+1, 2+3, 19+1, 19+2, 19+3, 40
>> E1	C+1*, YN
>> F	C, C+1, E, EN*
>> I	EN, 2+3
>> I(1	19*
>> L1	1+1*, 1+2
>> L2	1+1*, 1+2, 1+3
>> L3	1+1, DAY+3
>> L4	1+1, DAY+3, DAY+4
>> L5	1+1, DAY+4
>> L6	DAY+4*
>> VADM(1	2+3
X	C, C+1, A, F, YN!, OK, YR+1, 2, 2+1, 2+2* , 2+3, 3, 3+1, 4, 5, 6, 6+1, 7, 8, 9* , 10, 11, 12, 13, 14, 15, 16, 17, 18, 19 , 19+3, 20, 21, 22, 23, 24, 25, 26, 27, 28 , 29, 30, 31, 32, 33, 34, 35, 36, 37, 38 , 39, 40, 41, 42, 43, 44, 45*
>> X1	F, YR+1, 11, 19, 19+1, 19+2, 20, 22, 28, 29* , 30, 31, 35, 36, 38*
>> X2	YR+1*
>> XX1	DAY+4*
>> Z	1+2, 1+3, DAY, DAY+1, DAY+2, DAY+4, DAY+5, 2+2, 2+3, 3* , 3+1, 19*, 19+3
>> Z1	6*, 6+1
>> Z2	6*, 6+1
>> ZZ	DAY, DAY+1, DAY+3, YR+1*, YR+2

Customize PDF page

Package: Dental

Routine: DENTCRD1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items