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 |  Local Variables  | All
Print Page as PDF
Routine: ANRVML4

Package: Visual Impairment Service Team

Routine: ANRVML4


Information

ANRVML4 ;BIRM/LDT - VIST MAILING LABELS BY PATIENT ; 27 Apr 98 / 9:20 AM

Source Information

Source file <ANRVML4.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 2 ^DIC  ^DIR  
Registration 1 (2,KVA,KVAR)^VADPT  
Visual Impairment Service Team 1 ^ANRVML  

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 MAIL LABELS  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;Entry point for Mailing Labels by Patient.
DEQ ;Entry point when queued.
QUIT
MAILBL ;
SEL
ASKPT
QUIT2
HELPSEL ;
ANRVLP ;Set ANRVLP for all patients who are not inactive for AMIS

External References

Name Field # of Occurrence
^%ZIS EN1+3
^%ZISC QUIT+1
^%ZTLOAD EN1+5
^ANRVML MAILBL+1
^DIC ASKPT
^DIR SEL+1
2^VADPT DEQ+1
KVA^VADPT QUIT
KVAR^VADPT QUIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"MAILING LABLES BY PATIENT",!!
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!!"
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !!,"Do you want to print the mailing lables for:",!?3,"(A)ll patients, or",!?3,"(S)elect patients",!!
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !!,"Enter ""A"" to print mailing labels for all patients.",!?6,"""S"" to select only specific patients.",!?6,"""^"" or <return> to halt."
  • Line Location: HELPSEL+1
Routine Call
  • %ZIS
  • Line Location:
    • EN1+3
Routine Call
  • DIC
  • Line Location:
    • ASKPT
Routine Call
  • DIR
  • Line Location:
    • SEL+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ANRV(2040 - [#2040] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ANRV(2040 - [#2040] DEQ+1, ASKPT+1, ANRVLP+1

Label References

Name Line Occurrences
ANRVLP SEL+2
ASKPT ASKPT+2
MAILBL DEQ+1
QUIT EN1+2, EN1+3, EN1+5
QUIT2 SEL+3
SEL EN1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QUIT!, QUIT2!
%H QUIT!
%I QUIT!
%T QUIT!
%Y QUIT!
%ZIS EN1+3!*
%ZIS("B" EN1+3*
ANRV QUIT!
ANRVLP EN1+1!, EN1+2, EN1+4, QUIT!
ANRVLP( DEQ+1, ASKPT+2*, ANRVLP+1*
ANRVP DEQ+1*, QUIT!, ASKPT+1*, ASKPT+2
DFN DEQ+1*, QUIT!, ASKPT+1*
DIC ASKPT*!, QUIT2!
DIC("S" ASKPT*
DIC(0 ASKPT*
DIR SEL+1!
DIR("?" SEL+1*
DIR("A" SEL+1*
DIR(0 SEL+1*
IO EN1+6
IO("Q" EN1+4!
IOF EN1+1, QUIT+1
IOP EN1+3!
IOST QUIT+1
>> JJ ANRVLP+1*
>> POP EN1+3
SEL EN1+2, EN1+4, QUIT!, SEL+2*, SEL+3*, QUIT2
U DEQ+1, ASKPT+1, ANRVLP+1
X QUIT2!
Y SEL+2, ASKPT, ASKPT+1, QUIT2!
>> ZTDESC EN1+4*
>> ZTQUEUED QUIT+1
>> ZTREQ QUIT+1*
>> ZTRTN EN1+4*
>> ZTSAVE("ANRVLP(" EN1+4*
>> ZTSAVE("SEL" EN1+4*
ZTSK EN1+5!
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 |  Local Variables  | All