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

Package: Dental

Routine: DENTDUP


Information

DENTDUP ;ISC2/HAG-CHECK FOR DUPLICATE RECORD ; 10/12/88 3:04 PM ;

Source Information

Source file <DENTDUP.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 ^%ZIS  ^%ZTLOAD  
Dental 1 DATE^DENTA1  

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 DENTDUP  

Entry Points

Name Comments DBIA/ICR reference
V ;;VERSION 1.2
DATE
QUE
BUILDAR
COMP1
SETA
SETB
REPORT
REPORT1
HOLD1
HOLD
HDR
EXIT

External References

Name Field # of Occurrence
^%ZIS DATE
^%ZTLOAD DATE+1
DATE^DENTA1 DATE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,?5,"One moment please it may take awhile.",!
  • Line Location: DATE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: REPORT+0
Function Call: WRITE
  • Prompt: !,?6,Y,?28,Y2,?49,$E(Y3,1,3)_"-"_$E(Y3,4,5)_"-"_$E(Y3,6,9)
  • Line Location: REPORT1+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: HOLD+0
Function Call: WRITE
  • Prompt: @IOF,!,?(80-$L(HD)/2),HD,!,?(80-$L(HD1)/2),HD1,!,?(80-$L(H3)/2),H3
  • Line Location: HDR+0
Routine Call
  • %ZIS
  • Line Location:
    • DATE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" EXIT
^%ZTSK - [#14.4] EXIT!
^DD("DD" REPORT1
^DENT(221 - [#221] QUE+1, BUILDAR
^UTILITY($J QUE!, BUILDAR+1*, COMP1*, REPORT, REPORT1, HDR+1, EXIT!

Label References

Name Line Occurrences
BUILDAR QUE+1
COMP1 BUILDAR+1
EXIT DATE, DATE+1, QUE+2
HDR REPORT, HOLD1
HOLD REPORT+1, HOLD1
HOLD1 REPORT1
REPORT QUE+2
REPORT1 REPORT
SETA BUILDAR+1
SETB COMP1

Naked Globals

Name Field # of Occurrence
^( REPORT1
^(0 BUILDAR

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DATE*
A QUE+1*, BUILDAR+1, COMP1, REPORT*, REPORT1, EXIT!
A1 COMP1, SETA*, EXIT!
A2 COMP1, SETB*, EXIT!
>> AR( BUILDAR*, BUILDAR+1!, COMP1!, SETA, SETB
B QUE+1*, REPORT*, REPORT1, EXIT!
C BUILDAR*, REPORT*, REPORT1*, EXIT!
D BUILDAR+1*, COMP1, SETA, EXIT!
D1 BUILDAR+1*, COMP1*, SETB, EXIT!
>> DENT("DENTSD1" DATE+1*
DENTED QUE+1, EXIT!
DENTP QUE+1*, BUILDAR, EXIT!
DENTSD QUE*, QUE+1*, BUILDAR, EXIT!
DENTSD1 EXIT!
DENTSTA QUE+1, BUILDAR, HDR, EXIT!
DIC EXIT!
DTIME HOLD
E COMP1*, EXIT!
F1 BUILDAR+1*, COMP1*, EXIT!
H1 HDR, EXIT!
H2 HDR, EXIT!
H3 HDR*, EXIT!
HD HDR*, EXIT!
>> HD1 HDR*
>> I REPORT*
IO DATE, QUE, HOLD
IO("Q" DATE!, DATE+1
IO(0 HOLD
IOF DATE+2, HDR
IOSL REPORT1
>> J REPORT1*
N QUE+1*, BUILDAR*, EXIT!
U QUE*, BUILDAR+1, COMP1, SETA, SETB, REPORT+1, REPORT1, HOLD1
W COMP1*, EXIT!
X BUILDAR+1*, EXIT!
Y DATE, REPORT*, REPORT1*, EXIT!
Y2 REPORT1*, EXIT!
Y3 REPORT1*, EXIT!
Z1 EXIT!
Z2 EXIT!
Z5 REPORT*, REPORT+1, REPORT1, HOLD1, HOLD*, EXIT!
ZTRTN DATE+1*!, EXIT!
ZTSAVE DATE+1!, EXIT!
ZTSAVE("DENTED" DATE+1*
ZTSAVE("DENTSD" DATE+1*
ZTSAVE("DENTSTA" DATE+1*
ZTSAVE("H1" DATE+1*
ZTSAVE("H2" DATE+1*
ZTSK DATE+1!, HOLD, EXIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All