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

Package: Dental

Routine: DENTDCN


Information

DENTDCN ;WASH ISC/TJK-MODIFIED DICN ROUTINE ;10:24 AM Jul 28, 1987;12/02/91 11:24 AM

Source Information

Source file <DENTDCN.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Dental 4 (A,Q,R)^DENTDC  (BAD,DO)^DENTDC1  Y^DENTDCM2  (,N,NUM,RIX)^DENTDCN1  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 7

Package Total Caller Graph
Dental 7 DENTDC1  DENTDCM  DENTDCM1  DENTDCM2  DENTDCM3  DENTDCN1  DENTDCQ  

Entry Points

Name Comments DBIA/ICR reference
F1
F2
B
D ;
VAL
YN ;
I
LOCK
RX
INCR
1
IX
R
FILE
DS

External References

Name Field # of Occurrence
A^DENTDC FILE
Q^DENTDC FILE
R^DENTDC D+1
BAD^DENTDC1 B
DO^DENTDC1 FILE
Y^DENTDCM2 I
^DENTDCN1 IX+1
N^DENTDCN1 DENTDCN+4, DENTDCN+5
NUM^DENTDCN1 F2+3
RIX^DENTDCN1 IX

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "? ",$P("YES// ^NO// ",U,%)
  • Line Location: YN+1
Function Call: READ
  • Timeout: DTIME
  • Variable: %Y
  • Line Location: RX+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: RX+0
Function Call: WRITE
  • Prompt: *7,"??",!?4,"ANSWER 'YES' OR 'NO': "
  • Line Location: RX+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $X>73
  • Line Location: RX+3
Function Call: WRITE
  • Prompt: $P(" (YES)^ (NO)",U,%)
  • Line Location: RX+3
Function Call: WRITE
  • Prompt: !?7
  • Line Location: I+0
Function Call: WRITE
  • Prompt: "A NEW "_%
  • Line Location: I+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: R+0
Function Call: WRITE
  • Prompt: *7,"??"
  • Line Location: R+1
Function Call: WRITE
  • Prompt: !,^(3)
  • Condition for execution: $D(^DD(+DO(2),.01,3))
  • Line Location: R+1
Function Call: WRITE
  • Prompt: *7
  • Line Location: LOCK+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( DENTDCN+5, 1, DS, R+1, FILE, F2+3, IX, IX+1
^DIC - [#1] DENTDCN+3

Label References

Name Line Occurrences
1 I
B DENTDCN+3, DENTDCN+4, I, R+1, F2
DS DENTDCN+5, R
F1 LOCK
F2 F2
FILE I+1
I DENTDCN+4, DENTDCN+5, DENTDCN+6
INCR F1, F1+1
IX IX
LOCK F2+2
R R+1
RX RX+2
VAL DENTDCN+6, R+1

Naked Globals

Name Field # of Occurrence
^( FILE, LOCK+3*, IX
^("LAYGO" DENTDCN+3
^("UP" 1
^(0 FILE, LOCK+4*, IX
^(1 IX
^(3 R+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % DENTDCN+3*, YN+1, RX+1*, RX+2, RX+3, VAL+2*, I*, INCR*
>> %Y RX*, RX+1, RX+2
D LOCK+3!*, D+1
>> DA LOCK+3*, LOCK+4, D+1*
>> DD DENTDCN+4, DENTDCN+5*, I, I+1, F2+1, LOCK+3*, IX*
>> DIC F2, LOCK, LOCK+4
>> DIC("DR" IX+1
>> DIC("S" 1
>> DIC(0 DENTDCN+5, I, F2+3, IX+1
>> DICR DENTDCN+5
>> DINUM VAL+1*, F1+1, F2
>> DIX DENTDCN+5*, DENTDCN+6, DENTDCN+7, FILE*, FILE+1*, LOCK+3
>> DIY F1, F2, INCR*
DJC I*!
>> DJCP I
>> DLAYGO DENTDCN+3
>> DO I, FILE, F1, F2+1, INCR
>> DO(1 DENTDCN+2*, FILE
>> DO(2 DENTDCN+3, DENTDCN+5, 1, DS, I, R+1, FILE, IX, IX+1
>> DS DENTDCN+5, DS*, VAL+1, VAL+2*, R, IX*
DTIME RX, R
>> DTOUT RX*
DUZ(0 DENTDCN+3, F2+2
U DENTDCN+5, YN+1, RX, RX+3, VAL+1, VAL+2, I, R, R+1, F1
, INCR
X DENTDCN+4*, DENTDCN+5, DENTDCN+6*, DENTDCN+7*, VAL!, VAL+1, I, R*, R+1, FILE+1
, F1*, F1+1*, F2*, F2+1*, LOCK+3*, IX*, D+1, INCR
>> Y 1, I*, FILE*, F2+1*, F2+2, F2+3, D+1*
>> Y(0 B!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All