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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: DENTA

Package: Dental

Routine: DENTA


Information

DENTA ;ISC2/SAW,HAG-DENTAL SERVICE REPORTS OPTIONS ;10/23/90 14:37 ;

Source Information

Source file <DENTA.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZTLOAD  $$VERSION^XPDUTL  
VA FileMan 2 ^DIC  DT^DICRW  

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

Package Total Caller Graph
Dental 4 DENT SERVICE REPORTS  DENTADM RPT  DENTFEE RPT  DENTPERS RPT  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
IN
PR
RE
ADM
PERS
FEE
REL
QUE
W
DATE ;;JANUARY;FEBRUARY;MARCH;APRIL;MAY;JUNE;JULY;AUGUST;SEPTEMBER;OCTOBER;NOVEMBER;DECEMBER
CLOSE
EXIT
OPT ;;SERVICE REPORTS;OPTION;DENTA

External References

Name Field # of Occurrence
^%ZIS PR, REL+5
^%ZTLOAD REL+6
^DIC RE, REL+1, REL+3
DT^DICRW DENTA+3
$$VERSION^XPDUTL DENTA+3, PR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$P(O,S,3),":",!,$$VERSION^XPDUTL("DENT")," ",$P($T(+1),S,1),!!,$P(O,S,4),"S:",!
  • Line Location: PR+2
Function Call: WRITE
  • Prompt: !,?K,J,". ",$P(^DOPT($P(O,S,5),J,0),U,1)
  • Line Location: PR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: RE+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: REL+0
Function Call: WRITE
  • Prompt: I
  • Line Location: REL+1
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,"Stations have not been entered in the Dental Site Parameter file.",!,"You must enter a station before you can use this option"
  • Line Location: W+0
Routine Call
  • %ZIS
  • Line Location:
    • PR
    • REL+5
Routine Call
  • DIC
  • Line Location:
    • RE
    • REL+1
    • REL+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DENT(225 - [#225] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" CLOSE
^%ZTSK - [#14.4] EXIT!
^DENT(225 - [#225] REL, REL+2
^DOPT( DENTA+3, DENTA+4!, DENTA+5*, DENTA+6*, PR+3

Label References

Name Line Occurrences
@( IN, PR+1, RE, QUE
ADM ADM
CLOSE REL+6, QUE+1
DATE REL+4
EXIT RE, ADM, PERS, FEE, REL+5
FEE FEE
IN DENTA+3
OPT RE
PERS PERS
PR RE
RE RE
REL ADM, PERS, FEE
W REL, REL+1, REL+2

Naked Globals

Name Field # of Occurrence
^( REL

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT!
>> %O DENTA+2*
>> %ZIS REL+5*
DENT EXIT!
DENT1 EXIT!
DENT2 EXIT!
DENTSD1 EXIT!
DENTSTA REL+1, REL+2*, EXIT!
DENTV DENTA+3*, DENTA+6, EXIT!
DENTY0 REL+4*, EXIT!
DIC RE*!, REL+1*, REL+3*, EXIT!
DIC("A" RE*, REL+1*!
DIC("B" REL+1*!
DIC("S" REL+3*!
DIC(0 RE*, REL+1*, REL+3*
DT DENTA+3
I DENTA+5*, DENTA+6!, EXIT!
IO REL+5, QUE
IO("Q" REL+5!, REL+6
IOF PR
IOP PR*!
IOST PR
J PR+3*, RE!, EXIT!
K DENTA+6*!, PR+3*, EXIT!
O DENTA+3*, DENTA+4, DENTA+5, DENTA+6, IN, PR*, PR+1, PR+2, PR+3, RE!
, EXIT!
S DENTA+3*, DENTA+4, DENTA+5, DENTA+6, IN, PR*, PR+1, PR+2, PR+3, RE
, EXIT!
U DENTA+3*, DENTA+6, PR+3, RE, REL*, REL+2, REL+4
X DENTA+6!, RE, EXIT!
X1 ADM*, PERS*, FEE*, REL+5, EXIT!
X2 REL+5*, QUE, EXIT!
X3 ADM*, PERS*, FEE*, REL+3, EXIT!
X4 ADM*, PERS*, FEE*, REL+3, EXIT!
>> Y RE, ADM, PERS, FEE, REL+1, REL+2*, REL+3, W*, CLOSE*
>> Y(0 REL+4
Z REL+2*, REL+4*, EXIT!
Z1 REL*, REL+4*, EXIT!
Z2 REL*, REL+2, EXIT!
Z3 REL*, REL+1, REL+2, EXIT!
ZTRTN REL+6*!
ZTSAVE REL+6!
ZTSAVE("DENTSTA" REL+6*
ZTSAVE("DENTY0" REL+6*
ZTSAVE("U" REL+6*
ZTSAVE("X2" REL+6*
ZTSAVE("Z1" REL+6*
ZTSK REL+6!, EXIT!

Marked Items

Name Field # of Occurrence
$T( PR+2
$T(@(1) DENTA+3, PR
$T(@(1)+I DENTA+5
$T(DATE REL+4
$T(OPT RE
$T(OPT+Y RE
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All