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  | All
Print Page as PDF
Routine: DENTDNJ

Package: Dental

Routine: DENTDNJ


Information

DENTDNJ ;WASH ISC/TJK,JA,NCA-INPUT TO SCREEN ;10/28/96 11:54

Source Information

Source file <DENTDNJ.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Dental 9 ^DENTD1  ^DENTDML  EN^DENTDNJ  (,EN2,EN3,K1,T1,WP)^DENTDNJ1  (,COMPUTE,N,Z)^DENTDNJ2  ^DENTDNK  ^DENTDNQ  FUNC^DENTDNQ2  
(,N)^DENTDPL  
VA FileMan 2 %XY^%RCR  ^DIE  

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

Package Total Caller Graph
Dental 5 DENTD  DENTDML  DENTDNJ  DENTDNJ1  DENTDNJ2  

Entry Points

Name Comments DBIA/ICR reference
EN ;
EN2
NXT
TK
R ; get input from user
EN3
T3
Q1
HL
H1
H2
LH
T4
U
T5
NX
P
Q
OUT
LST
LS
LS1
KILL
SAVE
REST
W(X) ;WRITE OUT A FIELD

External References

Name Field # of Occurrence
%XY^%RCR SAVE, REST
^DENTD1 R+4, LS1
^DENTDML R+7
EN^DENTDNJ R+4
^DENTDNJ1 EN3+4
EN2^DENTDNJ1 DENTDNJ+3
EN3^DENTDNJ1 TK+3, TK+8
K1^DENTDNJ1 EN3+1
T1^DENTDNJ1 EN3
WP^DENTDNJ1 TK+4
^DENTDNJ2 LST
COMPUTE^DENTDNJ2 NXT
N^DENTDNJ2 TK+3
Z^DENTDNJ2 R+1
^DENTDNK EN3+3
^DENTDNQ Q1
FUNC^DENTDNQ2 EN2, NXT+1, R+3
^DENTDPL EN+2, R+4, Q+1
N^DENTDPL P, LS1
^DIE TK+3, TK+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7
  • Line Location: EN3+2
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: H1+0
Function Call: WRITE
  • Prompt: DJDB
  • Line Location: H1+1
Function Call: WRITE
  • Prompt: $E(DJDB,1,80-DX),!,$E(DJDB,80-DX+1,$L(DJDB))
  • Line Location: H1+2
Function Call: WRITE
  • Prompt: DJLIN
  • Line Location: H1+3
Function Call: WRITE
  • Prompt: X
  • Line Location: H2+0
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: H2+0
Function Call: WRITE
  • Prompt: V(V)
  • Line Location: H2+1
Function Call: WRITE
  • Prompt: $E(V(V),1,80-DX),!,$E(V(V),80-DX+1,$L(V(V)))
  • Line Location: H2+2
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: LH+0
Function Call: WRITE
  • Prompt: "DATA REQUIRED",DJLIN,*7
  • Line Location: LH+0
Function Call: WRITE
  • Prompt: DJLIN
  • Line Location: T4+1
Function Call: WRITE
  • Prompt: K
  • Line Location: T4+1
Function Call: WRITE
  • Prompt: DJLIN
  • Line Location: T4+2
Function Call: WRITE
  • Prompt: K
  • Line Location: T4+2
Function Call: WRITE
  • Prompt: DJHIN
  • Line Location: U+0
Function Call: WRITE
  • Prompt: K
  • Line Location: U+0
Function Call: WRITE
  • Prompt: *7,"Number is out of range or field is read only or computed."
  • Line Location: T5+2
Function Call: WRITE
  • Prompt: *7
  • Line Location: LS1+4
Function Call: WRITE
  • Prompt: X
  • Line Location: W+1
Function Call: WRITE
  • Prompt: $E(X,1,80-DX),!,$E(X,80-DX+1,$L(X))
  • Line Location: W+2
Routine Call
  • DIE
  • Line Location:
    • TK+3
    • TK+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( TK
^DENT(220.6 - [#220.6] TK+6, TK+7, TK+8, P, Q, LS1
^TMP($J EN3+3*

Label References

Name Line Occurrences
EN2 TK+2, NX, P, Q+1, LS1
H1 HL
H2 HL
HL R+1
LH TK+2
LS R+3, LS1+4
LS1 R+3, T5
LST NXT, TK+5
NX T5, NX
NXT NXT, TK+2, TK+3, TK+4, TK+7, T5+1, T5+2, NX, NX+1
OUT R+5, EN3, LS1
P LS1+2
Q T3+1, LS, LS1+1
Q1 R+2, EN3+1, NX+1
R Q1
REST P
SAVE LS1
T3 EN3+3
T4 R+5, EN3, EN3+1, T3+1
T5 T4+1, T4+2
TK EN+2, NXT, R+3, R+5, EN3+2, EN3+3, LH, T4, P, LS1+3
U EN3+1
W EN3, H2, T4+1, T4+2, U

Naked Globals

Name Field # of Occurrence
^(2 TK+7
^(3 TK+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %X SAVE*, REST*
>> %Y SAVE*, REST*
>> D0 R+4
>> DA TK+3*, TK+8*, R+4*, LS1*
DB KILL!
DENTFLG NXT+1!
DIC TK+3, TK+8, OUT!
DIC("S" T5+1!
>> DIE TK+3*, TK+8*
DJ0 TK*, NX*, Q+1!, OUT!
DJ3 TK*, TK+3, Q+1!, OUT!
DJ4 TK*, TK+1, TK+3, TK+4, R+2, LH, NX, Q+1!
DJAT TK*, TK+2, TK+8, R+2, R+5, EN3, EN3+1, EN3+3, T3+1, Q+1!
, OUT!
>> DJCL LH, T5+2, LS
>> DJCP TK+3
DJDB EN3*!, H1*, H1+1, H1+2, H1+3!, H2*, H2+3!, T4+1*!, T4+2*!, U*!
DJDD TK, OUT!
DJDIC OUT!
>> DJDIS TK+3, TK+4, TK+5, R+6*, LST
DJDN DENTDNJ+2!, DENTDNJ+3, EN+1, NXT, TK+3, TK+5, TK+8, R+3, R+5, EN3
, EN3+1, T4, T5, Q+1!, OUT!, LS1
>> DJDPL DENTDNJ+4*, EN+2, R+4, Q*
>> DJF EN2
>> DJFF P*, OUT*, LS1*, LS1+1*
>> DJHIN H1, H2, LH, U
DJJ DENTDNJ+3, R+3, T5, P, OUT!, LS1, LS1+1
DJJ( NXT, TK, TK+2, TK+3, TK+4, TK+7, EN3, Q1, H1, H2
, LH, T4, T4+1, T4+2, U, T5+1, NX
DJK Q*, OUT!
DJKEY EN+1, OUT!
>> DJLIN H1+3, LH, T4+1, T4+2
>> DJMU EN+2*, TK*, TK+1*, R+7
>> DJN TK+6, TK+7, TK+8, P*, Q*, LS1*
>> DJNM EN+2, R+4*, Q*
DJNX EN+1*, NXT, TK!, TK+7, R+1
>> DJP EN+2*, LS
DJQ EN+2*, Q+1!, OUT!
DJSM R+5, EN3, OUT!
>> DJST EN3+3
DJSV OUT!
DJSW1 R+6!
>> DJW1 Q+1
>> DJXX R+3*, R+5, EN3+1*
>> DJY T5+1*, LS1
DO OUT!
>> DR TK+3*, TK+8*
DX H1+2, H2+2, T4+1, T4+2, OUT!, W+2
DY OUT!
U DENTDNJ+3, NXT, TK, TK+3, TK+4, TK+7, R+3, R+5, Q1, LH
, T4, U, T5, T5+1, P, Q, LS1, LS1+1
V EN2*, NXT*, TK, TK+2, TK+3, TK+4, TK+6, TK+7, TK+8, R+2
, EN3, T3, T3+1, Q1, HL, H1, H2, H2+1, H2+2, LH
, T4, T4+1, T4+2, U, T5+1*, T5+2*, NX*, Q+1!, OUT!, LS1
, SAVE!, REST!
V( TK+8*, R+2, T3*, T3+1, HL, H2*, H2+1, H2+2, T4+1, T4+2
, U
>> W( LS1*
X R+2, R+3, R+4, R+5, EN3, EN3+1, EN3+2, EN3+3, T3, T5
, T5+1, NX, NX+1, LST*, LS, LS1, LS1+1, LS1+2, W~, W+1
, W+2
>> XY TK+2, TK+7, EN3, Q1, H1, H1+3, H2, H2+3, LH, T4
, U
>> Y TK+3
>> Y(0 H2, H2+3!
>> YMLH TK+6*, TK+7, TK+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All