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

Package: Dental

Routine: DENTDCN1


Information

DENTDCN1 ;WASH ISC/TJK-MODIFIED DICN1 ROUTINE ;6/29/92 14:36

Source Information

Source file <DENTDCN1.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Dental 3 (A,Q)^DENTDC  BAD^DENTDC1  (D,F1,F2,IX,LOCK)^DENTDCN  
VA FileMan 2 ^DIE  ^DIK  

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

Package Total Caller Graph
Dental 1 DENTDCN  

Entry Points

Name Comments DBIA/ICR reference
BAD
CKID
Q
RCR ;
ZAP
D
RIX ;
RR
NUM ;
N
STORLIST
O
CALL
G
DENTDJXY ;
S
N1
DOWN
Q1
INIT

External References

Name Field # of Occurrence
A^DENTDC BAD+1
Q^DENTDC BAD
BAD^DENTDC1 NUM+5
D^DENTDCN DENTDCN1+15
F1^DENTDCN NUM+4, NUM+5
F2^DENTDCN NUM+1
IX^DENTDCN RIX+2
LOCK^DENTDCN NUM+6
^DIE RCR+2
^DIK ZAP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"SORRY! A VALUE FOR '"_$P(^(0),U,1)_"' MUST BE ENTERED,"
  • Line Location: DENTDCN1+8
Function Call: WRITE
  • Prompt: !?6,"BUT YOU DON'T HAVE 'WRITE ACCESS' FOR THIS FIELD"
  • Line Location: DENTDCN1+9
Function Call: WRITE
  • Prompt: !?6,"<'",*7,$P(@(DIK_"DA,0)"),U,1),"' DELETED>"
  • Line Location: ZAP+0
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: NUM+3
Function Call: WRITE
  • Prompt: !?3,$P(DO,U,1)_" "_$P(^DD(+Y,.001,0),U,1),": "
  • Line Location: NUM+3
Function Call: WRITE
  • Prompt: X,"// "
  • Condition for execution: X
  • Line Location: NUM+3
Function Call: WRITE
  • Prompt: *7
  • Line Location: NUM+3
Function Call: WRITE
  • Prompt: *7,"??"
  • Line Location: NUM+5
Function Call: WRITE
  • Prompt: !,^(3)
  • Condition for execution: $D(^DD(+DO(2),.001,3))
  • Line Location: NUM+5
Routine Call
  • DIE
  • Line Location:
    • RCR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( DENTDCN1+6, CKID, RIX+2, NUM+2, NUM+3, NUM+4, NUM+5, N
^DD("SITE" NUM+1
^TMP("DENTDRCR" CALL+1, G, INIT*, INIT+1*

Label References

Name Line Occurrences
@( CALL
BAD DENTDCN1+6
CALL O
CKID DENTDCN1+6
DENTDJXY O+2, G+1
DOWN N1+5
G G, G+1
INIT STORLIST
N NUM+2, NUM+5
N1 N1+2, N1+4
O O+1, O+2
Q CKID
Q1 N1+2
S DOWN
STORLIST DENTDCN1+11, DENTDCN1+15, RIX+2
ZAP D

Naked Globals

Name Field # of Occurrence
^( G
^($J CALL+1*, G!, INIT+1!
^(0 DENTDCN1+8, CKID, N
^(1 NUM+1
^(3 NUM+4, NUM+5
^(4 NUM+4, NUM+5
^(9 CKID

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DENTDCN1+6*, CKID*!, RIX+1*, NUM+2*
>> %Y NUM+2*
>> D BAD
>> D0 NUM+4
>> DA BAD*, RCR+2
>> DD DENTDCN1+5*, DENTDCN1+6*, CKID+1*, RCR+1, NUM+1
DE RCR+1!
DENTDJA DENTDJXY+1*, N1, N1+2*, N1+3, N1+4, DOWN*, Q1!
DENTDJB S*, N1*, N1+1, N1+2, N1+5*, N1+6*, DOWN, Q1!
DENTDJC N1+1*, N1+5*, Q1!
DENTDJC( N1*, N1+1*, N1+2
DENTDJC(0 DENTDJXY+1*
DENTDJD O*, O+1, O+2, CALL+1*, G*!, G+1, INIT+1*
DENTDJE O+1, CALL*, CALL+1*, G!, INIT+1*
DENTDJX O+2*, CALL!, CALL+1*, G!, N1, N1+3, N1+4
DENTDJY CALL!, G!, G+1*, N1+3, INIT+1*
DENTDJZ DENTDJXY+1*, N1, N1+1, N1+2*, DOWN*, Q1!
DENTDRCR DENTDCN1+2!, DENTDCN1+10*, DENTDCN1+15*, RIX+1!, RIX+2*, CALL!
DENTDRCR( DENTDCN1+3*, RIX+1*, O
DENTDRCR("DIE(""NO^"")" RCR+1*
DG RCR+1!
DIC RCR+1!, D, NUM+1, N
DIC("DR" DENTDCN1+5
DICRS DENTDCN1+2!
>> DIE RCR+1*, ZAP, D*
>> DIE("NO^" RCR+1, RCR+2*!
>> DIE("W" RCR+1*, RCR+2!
DIK ZAP*!
>> DIY NUM+2
DO DENTDCN1+4, BAD+1!, RCR+1!, NUM+3, N
DO(1 BAD
DO(2 DENTDCN1+6, CKID, RIX+2, NUM+5
DQ RCR+1!
DR RCR+1!*
DTIME NUM+3
>> DTOUT NUM+3*
DUZ(0 CKID
>> DZ DENTDCN1+4*, RCR+1, RIX+2*, RR
U DENTDCN1+4, DENTDCN1+8, CKID, ZAP, NUM+2, NUM+3, NUM+4, NUM+5, N
X NUM+1*, NUM+2*, NUM+3, NUM+5*, N, N+1!
Y DENTDCN1+2!, DENTDCN1+3*, DENTDCN1+6*, DENTDCN1+15, BAD!*, CKID, CKID+1, RCR+3, NUM+2, NUM+3*
, NUM+4, NUM+5
Y(0 RCR+2*, ZAP*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All