Routine: DENTDNJ1

Information

DENTDNJ1 ;WASH ISC/TJK,JA,NCA-INSERT AND LOOK UP ;10/29/92 07:56 ;12/16/91 3:30 PM

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Dental	7	^DENTD1 ^DENTDC (LH,LST,NXT,Q,T4,TK)^DENTDNJ N^DENTDNJ2 (,DCS,P)^DENTDNQ FUNC^DENTDNQ2 N^DENTDPL
VA FileMan	3	^DIE ^DIWP ^DIWW

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

Package	Total	Caller Graph
Dental	1	DENTDNJ

Entry Points

Name	Comments	DBIA/ICR reference
P
Q1
T1
K1
C
ER
WP	;PRINT WORD PROCESSOR FIELD
CONT
R
EN	;COMPUTE AND DISPLAY
LOCK	;LOCK GLOBAL THAN IS BEING ACCESSED BY ANOTHER USER
KILL
EN2
O	;EX OUTPUT TRANSFROM
EN3	;ERROR ON DIE
E

External References

Name	Field # of Occurrence
^DENTD1	C
^DENTDC	K1+3
LH^DENTDNJ	T1+6
LST^DENTDNJ	K1
NXT^DENTDNJ	DENTDNJ1+6, P, T1+3, T1+4, T1+5, K1, C
Q^DENTDNJ	P+2
T4^DENTDNJ	P+2
TK^DENTDNJ	P, Q1, K1+5, LOCK+1
N^DENTDNJ2	K1+3
^DENTDNQ	Q1
DCS^DENTDNQ	K1+1
P^DENTDNQ	P
FUNC^DENTDNQ2	K1+4
N^DENTDPL	K1+4
^DIE	DENTDNJ1+2
^DIWP	WP+2
^DIWW	WP+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DENTDNJ1+2
Function Call: WRITE	Prompt: DJHIN Line Location: DENTDNJ1+6
Function Call: WRITE	Prompt: V(V),DJLIN Line Location: DENTDNJ1+6
Function Call: WRITE	Prompt: DJHIN Line Location: T1+4
Function Call: WRITE	Prompt: V(V),DJLIN Line Location: T1+4
Function Call: WRITE	Prompt: DJLIN Line Location: T1+5
Function Call: WRITE	Prompt: DJDB Line Location: T1+5
Function Call: WRITE	Prompt: X Line Location: K1+3
Function Call: READ	Formatting: ! Prompt: "Press <RETURN> to Continue" Variable: X Timeout: DTIME Line Location: K1+4
Function Call: WRITE	Prompt: *7 Line Location: ER+0
Function Call: WRITE	Prompt: !,^(DJZ1,0) Line Location: WP+4
Function Call: READ	Variable: DJX Timeout: DTIME Line Location: CONT+0
Function Call: WRITE	Prompt: !,"Press <RETURN> to Continue, '^' to Quit: " Line Location: CONT+0
Function Call: WRITE	Prompt: ! Line Location: CONT+0
Function Call: READ	Variable: DJX Timeout: DTIME Line Location: R+0
Function Call: WRITE	Prompt: "Press <RETURN> to Continue" Line Location: R+0
Function Call: WRITE	Prompt: DJDB Line Location: EN+1
Function Call: WRITE	Prompt: DJHIN Line Location: EN+1
Function Call: WRITE	Prompt: V(DJVV) Line Location: EN+2
Function Call: WRITE	Prompt: DJLIN Line Location: EN+3
Function Call: WRITE	Prompt: "THIS ENTRY IS BEING EDITED BY ANOTHER USER. TRY LATER.",*7 Line Location: LOCK+1
Function Call: READ	Formatting: ! Prompt: "Press <RETURN> to Continue" Variable: X Timeout: DTIME Line Location: EN2+0
Function Call: WRITE	Prompt: !!,"THIS IS NOT THE FIRST SCREEN",*7 Line Location: EN2+0
Function Call: WRITE	Prompt: !,"You have a bad default variable, please check with your",!,"Data Base administrator",*7 Line Location: EN3+1
Function Call: WRITE	Prompt: DJHIN Line Location: EN3+2
Function Call: WRITE	Prompt: DJDB,DJLIN Line Location: EN3+2
Function Call: WRITE	Prompt: DJHIN Line Location: E+0
Function Call: WRITE	Prompt: V(V),DJDB,DJLIN Line Location: E+0
Routine Call	DIE Line Location: DENTDNJ1+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	O+1
^DD("DD"	DENTDNJ1+3
^DENT(220.6 - [#220.6]	DENTDNJ1+6, P+1, T1
^TMP($J	K1!
^UTILITY($J	WP+1!, WP+4, WP+5!

Label References

Name	Line Occurrences
C	LOCK+1
CONT	WP+4, WP+5
E	EN3+1
ER	DENTDNJ1+2
K1	T1+1, T1+2
KILL	DENTDNJ1+2
LOCK	K1+6
O	DENTDNJ1+6, P+1
P	DENTDNJ1+2
Q1	DENTDNJ1+2, ER
T1	DENTDNJ1+2

Naked Globals

Name	Field # of Occurrence
^(	WP+2, WP+4
^(1	DENTDNJ1+6, P+1, T1
^(2	O+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D	DENTDNJ1+2*
>> D0	K1+6*
>> DA	DENTDNJ1+2, K1+6, WP+1
DB	KILL!
DC	KILL!
DE	KILL!
>> DENTFLG	DENTDNJ1+2*
DG	KILL!
DH	KILL!
DI	KILL!
>> DIC	DENTDNJ1+2*, K1+2, K1+3, WP+1, LOCK+1
>> DIC("S"	DENTDNJ1+4!, K1+3*!
>> DIC("V"	K1+3!
>> DIC(0	K1+2, K1+3
>> DIE	DENTDNJ1+2*
DIWF	WP+1*, WP+5!
DIWL	WP+1*, WP+4, WP+5!
DIWR	WP+1*, WP+5!
>> DJ0	DENTDNJ1+4, WP+1
>> DJ3	DENTDNJ1+2
>> DJ4	DENTDNJ1+2, DENTDNJ1+3, DENTDNJ1+4, DENTDNJ1+6, P, P+1
>> DJAT	P+2, T1+1, T1+2, O+1
>> DJCL	R, LOCK+1
>> DJCP	DENTDNJ1+2, DENTDNJ1+6, P+1, T1, K1+3, WP+2, CONT, EN2, EN3+1
DJDB	T1+5!, EN+1, EN+3!, EN3+2!, E!
DJDB(1	EN+1*
DJDB(2	EN+1*
>> DJDD	O+1
>> DJDIC	DENTDNJ1+2, WP+1, WP+2
>> DJDICS	K1+3
>> DJDN	DENTDNJ1+2, T1+1, K1, C*
>> DJDNM	K1+6*
>> DJFF	K1+4*
>> DJHIN	DENTDNJ1+6, T1+4, EN+1, EN3+2, E
>> DJJ(	DENTDNJ1+5, DENTDNJ1+6, P, P+1, T1, T1+4, T1+5, K1+5, EN+1, EN3+2 , E
DJK	DENTDNJ1+4, WP+2, WP+4*, WP+5!
>> DJLIN	DENTDNJ1+6, T1+4, T1+5, EN+3, EN3+2, E
DJLK	C!, LOCK+1*!
>> DJN	DENTDNJ1+6, P+1, T1
>> DJP	T1+2, C
DJST	K1!, K1+6*
>> DJSV	K1+4*
>> DJVV	EN+1, EN+2
>> DJX	DENTDNJ1+4, WP+1, WP+4, WP+5, CONT, R
>> DJXX	DENTDNJ1+2, DENTDNJ1+3, DENTDNJ1+4, DENTDNJ1+6, P+1, Q1, WP+1, WP+5
>> DJY	DENTDNJ1+2*, DENTDNJ1+5
DJZ1	WP+1, WP+2, WP+4*, WP+5!
DK	KILL!
DL	KILL!
>> DLAYGO	K1+2, K1+3
DM	KILL!
DP	KILL!
DR	DENTDNJ1+2*, KILL!
DTIME	K1+4, CONT, R, EN2
DW	KILL!
>> DX	T1+5, EN3+2
U	DENTDNJ1+4, DENTDNJ1+6, P, P+1, T1, T1+4, T1+5, K1+5, K1+6, WP+4 , WP+5, EN+1, EN3+2
>> V	DENTDNJ1+5, DENTDNJ1+6, P, P+1, P+2, T1, T1+3, T1+4, T1+5, K1+4* , K1+5, K1+6, O+1, EN3+2, E
>> V(	DENTDNJ1+5, DENTDNJ1+6, P+1, P+2, T1+3, T1+4, T1+5, K1+6, EN+2, O+1 , EN3+2*, E
>> W(	K1+6*
X	DENTDNJ1+2, DENTDNJ1+3, DENTDNJ1+4, DENTDNJ1+5, DENTDNJ1+6, P+1, Q1, T1+3, K1, K1+2 , K1+3, K1+4, K1+5, K1+6, ER!, WP+1, WP+2, WP+5, EN2, O+1
>> XY	DENTDNJ1+6, P, P+1, T1, T1+4, T1+5, K1+5, C, EN+1, LOCK+1 , EN3+2, E
Y	DENTDNJ1+2, DENTDNJ1+3, P, K1+5, K1+6, C!, LOCK+1, O+1, EN3+1
Y(0	K1+6
>> YMLH	DENTDNJ1+6, P+1, T1*

Customize PDF page

Package: Dental