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

Package: Visual Impairment Service Team

Routine: ANRVAM1


Information

ANRVAM1 ;MUSK/GLD,MFW,HCIOFO/NDH - VIST AMIS CALC ; 11 Apr 89 / 9:20 AM

Source Information

Source file <ANRVAM1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  
MailMan 2 GET^XMA2  ^XMD  
VA FileMan 2 ^%DT  YN^DICN  
Visual Impairment Service Team 2 (,FV)^ANRVAM2  ^ANRVAP  
Registration 1 ELIG^VADPT  

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
Visual Impairment Service Team 1 ANRV AMIS REPORT  

Entry Points

Name Comments DBIA/ICR reference
INTRO
BDATE
EDATE
ASKMAIL ; Check to see if user wants to email this report
DEVICE
DQ
LOOP2
CALC ;
CALC2
CALC3
CALC4
CALC5
CALC6
CALC16
CLOSE ; Check if user wanted to send mail to DC
; and complete report.
CLEAN ; Clean
BADDAT ;
SEND(ANQMAIL,ANQSUBJ) ; Send mail from ^TMP("ANRV","EMAIL",$J)
; Send mail to defined recipient(s) in ANQMAIL
SENDCONF(ANQMAIL,ANQSUBJ,ANRVIMN) ; Send Confirmation to User
BUILD ; Build AMIS Report to ^TMP("ANRV","EMAIL",$J) to send as email
; Build the Excel portion of the email
GETADDR() ; Get addresses for AMIS report from VIST Site Parameters

External References

Name Field # of Occurrence
^%DT BDATE, EDATE
^%ZIS DEVICE
^%ZISC CLOSE+13
^%ZTLOAD DEVICE+4
^ANRVAM2 DQ+4
FV^ANRVAM2 DQ+1
^ANRVAP CLOSE+3
YN^DICN ASKMAIL+2
ELIG^VADPT CALC4+1
$$FMTE^XLFDT BUILD+7
GET^XMA2 SEND+3, SENDCONF+3
^XMD SEND+9, SENDCONF+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"I WILL PRINT THE AMIS REPORT FOR PERIOD SPECIFIED.",!!
  • Line Location: INTRO+0
Function Call: WRITE
  • Prompt: !!!,"Do you want to email the AMIS report to the program office?(Y/N)"
  • Line Location: ASKMAIL+1
Function Call: WRITE
  • Prompt: !,"Answer Y or N"
  • Line Location: ASKMAIL+4
Function Call: WRITE
  • Prompt: @IOF,!,?(IOM\2-($L(X)\2)),X
  • Line Location: BADDAT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: BADDAT+2
Function Call: WRITE
  • Prompt: "="
  • Line Location: BADDAT+2
Function Call: WRITE
  • Prompt: $P(^DPT(X,0),U),?35,$P(^(0),U,9),!
  • Line Location: BADDAT+3
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ANRV(2040 - [#2040] DQ+3, LOOP2, CALC+2, CALC+3, CALC2+1, CALC3+1, CALC5+1, BADDAT+3
^ANRV(2041 - [#2041] BUILD+5, BUILD+6, GETADDR+3, GETADDR+4
^DD("SITE" CLOSE+5, BUILD+4
^DPT - [#2] CALC6, BADDAT+3
^TMP("ANRV" DQ*, CALC+4*, CALC+5*, CALC+6*, CALC2+2*, CALC2+3*, CALC2+4*, CALC2+5*, CALC2+6*, CALC3+2*
, CALC3+3*, CALC3+4*, CALC3+5*, CALC3+6*, CALC3+7*, CALC3+8*, CALC4+2*, CALC4+3*, CALC4+4*, CALC4+5*
, CALC4+6*, CALC4+7*, CALC4+8*, CALC4+9*, CALC4+10*, CALC4+11*, CALC4+12*, CALC5+2*, CALC5+3*, CALC5+4*
, CALC5+5*, CALC6+2*, CALC6+3*, CALC6+4*, CALC6+5*, CALC6+6*, CALC6+7*, CALC6+8*, CALC6+9*, CALC16*
, CLEAN+6!, SENDCONF+10*, BUILD+3*, BUILD+4*, BUILD+6*, BUILD+12*, BUILD+14, BUILD+15, BUILD+16, BUILD+18*
, BUILD+19*, BUILD+20*, BUILD+21*, BUILD+22*, BUILD+23*, BUILD+24*, BUILD+25*, BUILD+26*, BUILD+27*

Label References

Name Line Occurrences
$$GETADDR ASKMAIL+19, SENDCONF+7
$$SEND CLOSE+6
$$SENDCONF CLOSE+9
ASKMAIL ASKMAIL+4
BADDAT CLOSE+3
BUILD SEND+6
CALC LOOP2
CALC16 CALC6
CALC2 CALC+4
CALC3 CALC2+2, CALC2+3, CALC2+4, CALC2+5, CALC2+6
CALC4 CALC3+2, CALC3+3, CALC3+4, CALC3+5, CALC3+6, CALC3+7, CALC3+8
CALC5 CALC4+2, CALC4+3, CALC4+4, CALC4+5, CALC4+6, CALC4+7, CALC4+8, CALC4+9, CALC4+10, CALC4+11
, CALC4+12
CALC6 CALC5+2, CALC5+3, CALC5+4, CALC5+5
CLEAN DEVICE, DEVICE+1
CLOSE DQ+4
DEVICE ASKMAIL+6
DQ ASKMAIL+26
INTRO EDATE+1
LOOP2 DQ+3

Naked Globals

Name Field # of Occurrence
^(0 BADDAT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ASKMAIL+3, ASKMAIL+4, ASKMAIL+5
>> %DT BDATE*
>> %DT("A" BDATE*, EDATE*
>> %ZIS DEVICE*
>> %ZIS("B" DEVICE*
ANQBD BDATE*, EDATE+1, DQ+4, CLEAN+2!, BUILD+7
ANQED EDATE*, EDATE+1, CLEAN+2!, BUILD+7
ANQJ DQ*, CLEAN+3!
ANQMAIL ASKMAIL+19*, ASKMAIL+20, CLOSE+4, CLOSE+6, CLOSE+9, CLEAN+4!, SEND~, SEND+7, SENDCONF~
ANQSEL ASKMAIL+5*, ASKMAIL+6, CLOSE+3, CLEAN+4!
ANQSUBJ CLOSE+5*, CLOSE+6, CLOSE+9, CLEAN+4!, SEND~, SEND+2, SENDCONF~, SENDCONF+2, SENDCONF+5
ANRAS CLEAN+2!
ANRBD DQ+4*, CLEAN+2!
ANRD CLEAN+2!
ANRDOD CLEAN+2!
ANRFVD CLEAN+2!
ANRND CLEAN+2!
ANRP CLEAN+3!
ANRRD CLEAN+2!
ANRRFD CLEAN+2!
ANRRN CLEAN+3!
ANRVBAD DQ!, CLEAN+3!
ANRVBAD( CALC+2*, BADDAT+3
ANRVBAD(0 CLOSE+3
ANRVDIR CLEAN+4!
ANRVFILE CLEAN+4!
ANRVGLB CLEAN+4!
ANRVIMN CLOSE+6*, CLOSE+7, CLOSE+9, CLEAN+5!, SENDCONF~, SENDCONF+5
ANRVIN DQ+3*, LOOP2*, CALC+2, CALC+3, CALC2+1, CALC3+1, CALC5+1, CLEAN+3!
>> ANRVMHE ASKMAIL+7, ASKMAIL+10*, ASKMAIL+11*, ASKMAIL+12, ASKMAIL+13*, ASKMAIL+14, ASKMAIL+25*, ASKMAIL+26, BUILD+27
ANRVP DQ+2*, DQ+3*, LOOP2, CALC4, CALC6, CLEAN+3!
ANRVSTR CLEAN+5!, BUILD+14*, BUILD+17*, BUILD+18, BUILD+19, BUILD+20, BUILD+21, BUILD+22, BUILD+23, BUILD+24
, BUILD+25, BUILD+26, BUILD+27
ARRAY CLEAN+4!
DFN CALC4*, CLEAN+3!
DIRUT CLEAN+7!
DT CALC6+1
DTOUT CLEAN+7!
DUOUT CLEAN+7!
DUZ SEND+7, SENDCONF+2
I CLEAN+3!, BADDAT+3*, BUILD+13*, BUILD+14*, BUILD+15*, BUILD+16
IO("Q" DEVICE+1, DEVICE+2!
IOF INTRO, BADDAT+1
IOM BADDAT+1, BADDAT+2
IOP DEVICE!
J CLEAN+3!
>> L BUILD+2*, BUILD+3*, BUILD+4*, BUILD+6*, BUILD+12*, BUILD+18*, BUILD+19*, BUILD+20*, BUILD+21*, BUILD+22*
, BUILD+23*, BUILD+24*, BUILD+25*, BUILD+26*, BUILD+27*
POP DEVICE, CLEAN+3!
QFLG CLEAN+3!
U BADDAT+3, BUILD+6, GETADDR+4
VAEL CLEAN+7!
VAEL(2 CALC4+1
VAERR CLEAN+7!
VAL CALC+1*, CALC+2*, CALC+3*, CALC+4*, CALC+5, CALC+6, CALC2*, CALC2+1*, CALC2+2, CALC2+3
, CALC2+4, CALC2+5, CALC2+6, CALC3*, CALC3+1*, CALC3+2, CALC3+3, CALC3+4, CALC3+5, CALC3+6
, CALC3+7, CALC3+8, CALC4*, CALC4+1*, CALC4+2, CALC4+3, CALC4+4, CALC4+5, CALC4+6, CALC4+7
, CALC4+8, CALC4+9, CALC4+10, CALC4+11, CALC5*, CALC5+1*, CALC5+2, CALC5+3, CALC5+4, CALC5+5
, CALC6*, CALC6+1*, CALC6+2, CALC6+3, CALC6+4, CALC6+5, CALC6+6, CALC6+7, CALC6+8, CALC6+9
, CLEAN+3!
X EDATE+3*, CLOSE+9*, CLOSE+10, BADDAT+1*, BADDAT+2*, BADDAT+3*, SEND+7*, BUILD+5*, BUILD+6, BUILD+7*
, BUILD+8*, BUILD+9*, BUILD+12, BUILD+13*, BUILD+16*, BUILD+17, GETADDR+2~, GETADDR+3*, GETADDR+4
X( SENDCONF+9, SENDCONF+10
X(1 SENDCONF+4*
X(2 SENDCONF+5*
X(3 SENDCONF+6*
X(4 SENDCONF+7*
>> X1 BUILD+8*, BUILD+9
>> X2 BUILD+8*, BUILD+9
>> XMCHAN SEND+2*, SENDCONF+2*
>> XMDUZ SEND+2*, SENDCONF+2*
>> XMSUB SEND+2*, SENDCONF+2*
>> XMTEXT SEND+8*, SENDCONF+11*
>> XMY( SEND+7*, SENDCONF+2*
>> XMZ SEND+4, SEND+10, SENDCONF+13
>> Y BDATE, EDATE, SENDCONF+8*, SENDCONF+9*, SENDCONF+10, BUILD+7*, BUILD+10*, BUILD+11*, BUILD+12, GETADDR+4*
, GETADDR+5
>> Y1 BUILD+10*, BUILD+11
>> Y2 BUILD+10*, BUILD+11
>> ZTDESC DEVICE+3*
>> ZTQUEUED CLEAN+1
>> ZTREQ CLEAN+1*
>> ZTRTN DEVICE+3*
>> ZTSAVE("ANQ*" DEVICE+3*
ZTSK DEVICE+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All