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

Package: Dental

Routine: DENTDCQ


Information

DENTDCQ ;WASH ISC/TJK-MODIFIED DICQ ROUTINE ;9/8/92 08:16

Source Information

Source file <DENTDCQ.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Dental 5 A^DENTDC  DO^DENTDC1  YN^DENTDCN  (,0,CONT)^DENTDCQ1  DCS^DENTDNQ  
VA FileMan 1 ^%DT  

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

Package Total Caller Graph
Dental 4 DENTDC  DENTDCM2  DENTDCM3  DENTDCQ1  

Entry Points

Name Comments DBIA/ICR reference
DQ
IX
20
C
A
D
M
0
DIY
SOUNDEX
DS

External References

Name Field # of Occurrence
^%DT 20+2
A^DENTDC DENTDCQ+2
DO^DENTDC1 DQ
YN^DENTDCN 20
^DENTDCQ1 DD+3, M
0^DENTDCQ1 0
CONT^DENTDCQ1 C
DCS^DENTDNQ 20C+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Pointed-to File does not exist!"
  • Line Location: DQ+0
Function Call: WRITE
  • Prompt: " ANSWER WITH ",$P(DO,U,1)
  • Line Location: IX+5
Function Call: READ
  • Formatting: !
  • Prompt: "Press <RETURN> to Continue: "
  • Variable: %Y
  • Timeout: DTIME
  • Line Location: IX+6
Function Call: WRITE
  • Prompt: $P(", OR",U,X>1)
  • Line Location: IX+6
Function Call: WRITE
  • Prompt: !?4
  • Condition for execution: $X+$L(DS(DS))>70
  • Line Location: IX+6
Function Call: WRITE
  • Prompt: " ",DS(DS)
  • Line Location: IX+6
Function Call: WRITE
  • Prompt: !," DO YOU WANT THE ENTIRE "
  • Line Location: 20+0
Function Call: WRITE
  • Prompt: S
  • Condition for execution: DO(2)'["s"&'$D(DIC("S"))&'$D(DF) Y,"-ENTRY " W $P(DO,U,1)," LIST" S %=0 D YN^DENTDCN S:%=1 %Y=1 I %Y'="??"
  • Line Location: 20+0
Function Call: WRITE
  • Prompt: *7
  • Line Location: 20+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( DQ+2, DQ+3, IX+1, DIY

Label References

Name Line Occurrences
0 20+1
20 20+2
@( DQ+3
A C+2
C IX+4, 2020+1
D D+1
DIY DQ+1, D+1
DQ DENTDCQ+2
DS DQ+3, IX+1
IX IX+3, SOUNDEX

Naked Globals

Name Field # of Occurrence
^( IX+1, IX+2
^("AZ" IX+3
^("QUES" DQ+3
^(0 DQ+2, IX+1, D+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % IX+1*, IX+2, 20*, 20+1
%DT 20+2*!
%Y DQ!, IX+6*, 20*, 20+1, 20+2*, C
>> D DQ+1
>> DD DQ+1*, IX+2*, IX+3, 20+2, C+3
>> DEBDIC IX
>> DEDF IX
>> DF 20
>> DIC IXIX+2, IX+3, C+2, C+3
>> DIC("S" 20C+1
>> DIC("W" C+3
>> DIC(0 DENTDCQ+2, DQ+2, IX+3, 0
DIW DQ+2*, DQ+3*, IX+2*, 20+2, DD+1*, D+2, 0!
>> DIX DQ+1*, IX*, IX+1, IX+2, IX+3*, C+2*, C+3*
>> DIY DQ+1*, D*, D+1*, DIY*
DIZ DQ+2*, DQ+3, IX+2*, IX+3*, 20+2*, C+2, 0!
>> DJCP IX+6, C
DO DQ!, DQ+1, IX+5, 20DS
DO("SCR" C+1
DO(2 DQ+2, DQ+3, IX+1, 20C+2
DS DQ!, DQ+3*, IX+1*, IX+5*, IX+6*, IX+7!, 20+2*, C+2*, C+3*, 0!
DS
DS( IX+6, DS*
DS(95 D+2*
DTIME IX+6
DZ DENTDCQ+2*!, IX+4, C+1
U DQ+1, DQ+2, DQ+3, IX+1, IX+5, IX+6, 2020+2, CC+1
DD+1, D+2, DIY
>> X DENTDCQ+2*, DQ+2*, IX+1*, IX+6*, 20+2*, C+1*, C+2, C+3, A*, D*
D+1*, D+2*, D+3*, D+4*, DS
XQH DENTDCQ+2!
>> Y DQ+1*, IX+2*, IX+3*, IX+4*, IX+7, 2020+2*, C+1, D*, D+1
D+2, D+3, SOUNDEX*
>> YMLH IX+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All