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 |  Marked Items  | All
Print Page as PDF
Routine: DENTA13

Package: Dental

Routine: DENTA13


Information

DENTA13 ;ISC2/SAW,HAG-TREATMENT DATA SUMMARY REPORT FOR CLINIC ; 4/3/89 4:11 PM ;

Source Information

Source file <DENTA13.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Dental 3 EXIT1^DENTA1  (A,CHK)^DENTA15  (Q5,Q6)^DENTQ  
Kernel 2 ^%ZIS  ^%ZTLOAD  
VA FileMan 1 YN^DICN  

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 DENTA1  

Entry Points

Name Comments DBIA/ICR reference
A
A1
A2
QUE
RPT
P1
P1A
P11
SPOT
NONE
S ;;;;;;;;08;;09;15;16;33;10;20;21;22;;23;;11;12;13;14;17;;24;25;26;27;28;29;30;31;18;19;32;;;;34;06
CLOSE
EXIT

External References

Name Field # of Occurrence
^%ZIS A2
^%ZTLOAD A2+1
EXIT1^DENTA1 EXIT
A^DENTA15 QUE
CHK^DENTA15 P1A, SPOT+1
Q5^DENTQ A
Q6^DENTQ A1
YN^DICN A, A1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Do you wish to print the optional 3rd page of the summary"
  • Line Location: A+0
Function Call: WRITE
  • Prompt: !!,"Do you wish to see the $VALUE on this 3rd page"
  • Line Location: A1+0
Function Call: WRITE
  • Prompt: !,"There is no treatment data for review/release for the time frame you specified",*7
  • Line Location: NONE+0
Routine Call
  • %ZIS
  • Line Location:
    • A2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" CLOSE
^DENT(221 - [#221] RPT, P1, P1+1
^UTILITY($J P1A+1*, P1A+2*, P1A+3*, P1A+4*, P11*, P11+1*, SPOT+2*, SPOT+3*

Label References

Name Line Occurrences
A A
A1 A1
A2 A
CLOSE QUE
EXIT A, A1, A2, A2+1, NONE
NONE QUE
P1 RPT
P11 P1A+5
RPT QUE
S P11
SPOT P1+2

Naked Globals

Name Field # of Occurrence
^( P1, P1A+1, P1A+2, P1A+3, P1A+4, P11, P11+1, SPOT+2, SPOT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % A*, A1*
>> %ZIS A2*
DENT RPT*, P1, P1+1, EXIT!
DENT3 A*, A1*, EXIT!
DENT4 A*, A1*, EXIT!
>> DENTC A2*, QUE, P1+1*
DENTCAT P1A*, P1A+1, P1A+2, P1A+3, P1A+4, P11, P11+1, SPOT+1*, SPOT+2, SPOT+3
, EXIT!
DENTCAT1 EXIT!
DENTDAT EXIT!
DENTED RPT, P1, EXIT!
>> DENTF P1A, SPOT+1
>> DENTF1 NONE*
>> DENTREL P1
DENTSD A2*, RPT*, EXIT!
>> DENTSD1 P1
>> DENTSTA RPT
H EXIT!
I RPT*, EXIT!
IO A2, QUE
IO("Q" A2!, A2+1
K RPT*, EXIT!
M P1A+5*, P11, P11+1, EXIT!
U P1+2, P1A, P1A+1, P1A+2, P1A+3, P1A+4, P1A+5, P11, SPOT, SPOT+1
, SPOT+3
V EXIT!
V1 EXIT!
X P1+1*, P1+2, P1A, P1A+1, P1A+2, P1A+3, P1A+4, P1A+5, P11, SPOT
, SPOT+1, SPOT+3, EXIT!
X(1 SPOT*
X(2 P1A+2*, P1A+4*, P11*, P11+1, SPOT*, SPOT+2
X(3 P11*
>> Y(1 P1*
ZTRTN A2+1*!
ZTSAVE A2+1!
ZTSAVE("DENT*" A2+1*
ZTSAVE("H1" A2+1*
ZTSAVE("H2" A2+1*
ZTSAVE("U" A2+1*
ZTSAVE("Z5" A2+1*
ZTSK A2+1!, EXIT

Marked Items

Name Field # of Occurrence
$T(S P11
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All