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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ADEPDFR

Package: IHS Dental System

Routine: ADEPDFR


Information

ADEPDFR ; IHS/HQT/MJL - DEFERRED SVCS PART 1 ;07:05 PM [ 03/24/1999 9:04 AM ]

Source Information

Source file <ADEPDFR.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS Dental System 2 ^ADEPDFR1  ($$DATE,$$HAT)^ADEPQA3  
Kernel 2 ^%ZIS  ^%ZTLOAD  
VA Fileman 1 ^%DTC  

Entry Points

Name Comments DBIA/ICR reference
ZTM ;EP
P3
END
P4
P5
INIT ;
QUE
PROC
ASKDEV

External References

Name Field # of Occurrence
^%DTC P3+13
^%ZIS ASKDEV
^%ZTLOAD QUE+2
^ADEPDFR1 ZTM+4
$$DATE^ADEPQA3 INIT+4
$$HAT^ADEPQA3 INIT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "DIVISION NOT PROPERLY SET -- CONTACT SITE MANAGER"
  • Line Location: ADEPDFR+4
Function Call: WRITE
  • Prompt: !,"You may limit the report to include only patients who were added",!,"to the Deferred Services Register during a particular time."
  • Line Location: INIT+3
Function Call: WRITE
  • Prompt: !,"Please wait while I scan the records..."
  • Line Location: PROC+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: PROC+3
Routine Call
  • %ZIS
  • Line Location:
    • ASKDEV

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ADEDNT - [#9002003.3] P4+5
^ADEDSR - [#9002003.4] P3, P3+1, P3+2, P3+3, P3+6, P3+18, P4, P4+3, P4+4
^ADEDSR("B" PROC+3
^ADEUTIL("ADEPDFR" ZTM+6!, PROC+1!, P3+27*
^AUPNPAT - [#9000001] P3+9
^DPT - [#2] P3+10, P3+11

Label References

Name Line Occurrences
END ADEPDFR+4, INIT+5, INIT+6, ASKDEV
P3 PROC+3
P4 P3+23
P5 P4+6
PROC ZTM+2
QUE ASKDEV

Naked Globals

Name Field # of Occurrence
^(0 P3+9
^(2 P3+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ASKDEV*
ADEADD END!, P3+18*, P3+19, P3+20*, P3+24
ADEAGE END!, P3+11*, P3+12, P3+13, P3+16*, P3+24
ADEBEG INIT+4*, INIT+6, INIT+7*, END!, P3+4
ADEDFN END!, PROC+3*, P3, P3+1, P3+2, P3+3, P3+6, P3+18, P3+27, P4
, P4+3, P4+4
ADEEND INIT+7*, END!, P3+5
ADEGBL END!, P3+24*, P3+25*, P3+26*, P3+27
ADEHRN END!, P3+8*, P3+9*, P3+24
ADEJ END!, PROC+3*
ADEK END!
ADEL END!
ADELIN END!
ADEM END!, P3+25*
ADEN END!, P4+1*
ADENAM END!, P3+11*, P3+24, P3+27
ADENOD END!, P3+3*, P3+4, P3+5, P3+6*, P3+7, P3+9, P3+10, P3+11*, P4+4*
, P4+5*, P4+6, P5
ADEPAG END!
ADEPAT END!, PROC*, PROC+3*
ADESUB END!, P4+2*, P4+3*, P4+4
ADESVC END!
ADESVC( P3+25, P4+1*, P5*
ADETOT END!, P3+7*, P3+26
ADEYR P3+19*, P3+20, P3+21!
DIROUT END!
DT P3+13
DTOUT END!
DUOUT END!
DUZ(2 ADEPDFR+3, P3+9
IO("Q" ASKDEV!
IO("S" PROC+2, PROC+3
IOST PROC+2, PROC+3
J END!
>> POP ASKDEV
U INIT+7, P3+3, P3+7, P3+9, P3+11, P3+24, P3+25, P3+26, P4+5, P5
>> X P3+13, P3+16
>> X1 P3+13*
>> X2 P3+13*
>> ZTDESC QUE*
>> ZTQUEUED ASKDEV, ZTM+5
>> ZTREQ ZTM+5*
>> ZTRTN QUE*
>> ZTSAVE("ADEBEG" QUE+1*
>> ZTSAVE("ADEEND" QUE+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All