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

Package: Dental

Routine: DENTAR16


Information

DENTAR16 ;ISC2/SAW,HAG-PRINT/DISPLAY TREATMENT DATA REPORTS FOR REVIEW/RELEASE ; 10/27/88 9:48 AM ;

Source Information

Source file <DENTAR16.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Dental 1 (P1A,SPOT)^DENTAR13  

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 DENTAR1  DENTAR12  DENTAR14  DENTARA  

Entry Points

Name Comments DBIA/ICR reference
B1
HD
HD1
NOREV ;CHECK DATA WITHOUT USER REVIEW
P
HDR
HOLD
HOLD3
NONE
COMP
ERR
EXIT
EXIT1

External References

Name Field # of Occurrence
P1A^DENTAR13 P+3
SPOT^DENTAR13 P+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,?(80-$L(H3)\2),H3,!,?(80-$L(H5)\2),H5
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !!,?19,"PATIENT",?29,"PAT",?34,"BED",!,"TREATMENT DATE",?19,"SSN",?29,"CAT",?34,"SECT",?40,"TREATMENT (PROCEDURE)",?77,"NO.",!
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: !,Y,?19,$P(X,U,2),?30,$J($P(X,U,19),2),?35
  • Line Location: HD1+0
Function Call: WRITE
  • Prompt: $J($P(X,U,6),2)
  • Condition for execution: $P(X,U,19)<9
  • Line Location: HD1+0
Function Call: WRITE
  • Prompt: !!,"Let me check the data for completeness. One moment please."
  • Line Location: NOREV+1
Function Call: WRITE
  • Prompt: @IOF,?(80-$L(H3)\2),H3,!,?(80-$L(H5)\2),H5
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!,?19,"PROV",?25,"PATIENT",?35,"PAT",?40,"BED",!,"TREATMENT DATE",?19,"NO.",?27,"SSN",?35,"CAT",?40,"SECT",?46,"TREATMENT (PROCEDURE)",?77,"NO.",!
  • Line Location: HDR+2
Function Call: READ
  • Timeout: DTIME
  • Line Location: HOLD+0
Function Call: WRITE
  • Prompt: !,"There "_$S(DENTC(1)+DENTC=1:"is ",1:"are ")_(DENTC(1)+DENTC)_$S(DENTC(1)+DENTC=1:" sitting",1:" sittings")_" in the time frame you specified. All data is complete."
  • Line Location: COMP+0
Function Call: WRITE
  • Prompt: !!,"The treatment data for this report is incomplete/incorrect.",!,"There are ",(DENTC(1)+DENTC)," sittings in the time frame you specified.",!,"The following errors were found:",*7,!
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: @IOF,*7
  • Line Location: EXIT+0
Function Call: WRITE
  • Prompt: !,^(J)
  • Condition for execution: $D(^UTILITY($J,"DENTERR",H,J))
  • Line Location: EXIT+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" HD1COMP+1
^DENT(221 - [#221] B1NOREV+2, PP+1
^DIC(220.3 - [#220.3] B1+1
^UTILITY($J DENTAR16+3, P+1*, EXIT

Label References

Name Line Occurrences
B1 DENTAR16+3
COMP EXIT+1
ERR EXIT
EXIT DENTAR16+4, NOREV+3
EXIT1 NONEEXIT
HD DENTAR16+3, HOLD3
HD1 B1HOLD3
HOLD DENTAR16+3, DENTAR16+4, HOLD3EXITEXIT+1
HOLD3 B1B1+1
NONE DENTAR16+2, NOREV+3
P NOREV+2

Naked Globals

Name Field # of Occurrence
^( DENTAR16+3, PEXIT

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A B1+1!*, HOLD3!
DENT DENTAR16+3*, B1NOREV+2*, PP+1, EXIT1!
>> DENTC DENTAR16+2, NOREV+1*, NOREV+3, P+1*, COMPERR
>> DENTC(1 NOREV+1*, P+1*, COMPERR
DENTED NOREV+2, COMP+1, EXIT1!
>> DENTF1 P+1, NONE*, EXITEXIT+1, EXIT1*
DENTPRV DENTAR16+2*, DENTAR16+3*, EXIT1!
DENTSD NOREV+1*, NOREV+2*, P+1, EXIT1!
DT NOREV+1, NOREV+2, COMP+1
DT1 NOREV+1*, NOREV+2, EXIT1!
DTIME HOLD
H EXIT*, EXIT1!
H1 HDNOREV+1, HDR, EXIT1!
H2 HDNOREV+1, HDR, EXIT1!
H3 HD*, HD+1, HDR*, HDR+1, EXIT1!
H4 EXIT1!
>> H5 HD*, HD+1, NOREV+1*, HDR*, HDR+1
H6 DENTAR16+3*, HD, EXIT1!
H7 EXIT1!
I B1+1*, NOREV+2*, EXIT*, EXIT1!
IO P+1, HOLDNONE
>> IO(0 P+1, HOLDNONE
IOF HD+1, HDR+1, EXIT
IOSL B1B1+1, EXIT
J NOREV+2*, EXIT*, EXIT1!
K EXIT1!
M DENTAR16+3*, EXIT1!
N DENTAR16+3*, EXIT1!
>> Q NOREV+1*, P+1*
U DENTAR16+3, DENTAR16+4, B1B1+1, HDHD1PP+2, HDRHOLD
HOLD3EXITEXIT+1, EXIT1
X B1*, HD1P+1*, P+2, EXIT1!
X0 DENTAR16+3*, B1+1, EXIT1!
X1 B1+1*, EXIT1!
X2 B1+1*, EXIT1!
>> Y HD1*, COMP+1*
>> Z3 HDNOREV+2, HDR
>> Z5 DENTAR16+3, DENTAR16+4, B1B1+1, HDHDR, HOLD*, HOLD3EXITEXIT+1
EXIT1
>> ZTSK HOLDNONE
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All