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  | All
Print Page as PDF
Routine: ANRVRP6

Package: Visual Impairment Service Team

Routine: ANRVRP6


Information

ANRVRP6 ;BIRM/LDT - VIST PERIOD OF SERVICE LIST ; 05 Aug 98 / 2:19 PM

Source Information

Source file <ANRVRP6.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 3 NOW^%DTC  ^DIC  ^DIR  
Registration 1 (2,KVA,KVAR)^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 POS LIST  

Entry Points

Name Comments DBIA/ICR reference
EN1 ;Entry point for Period of Service List
DEQ ;Entry point when queued.
QUIT
SETTMP ;Set ^TMP for report
HDR ;Report header
REPORT ;Print Report
SEL
ASKPOS
QUIT2
SETLP ;
HELPSEL ;

External References

Name Field # of Occurrence
NOW^%DTC DEQ+4
^%ZIS EN1+3
^%ZISC QUIT+1
^%ZTLOAD EN1+5
^DIC ASKPOS
^DIR HDR+1, SEL+1
2^VADPT DEQ+2
KVA^VADPT QUIT
KVAR^VADPT QUIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"SORT BY PERIOD OF SERVICE",!!
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!!"
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !,"NO DATA TO PRINT!"
  • Line Location: DEQ+5
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y!($E(IOST)="C")
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,HDR,?45,"Printed ",HDT,?72,"Page ",PG,!!,"NAME",?27,"SSN",?47,"PERIOD OF SERVICE",!,LN
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?47,LN2,!,"Subcount",?50,$J(SUBCNT,4),!
  • Line Location: REPORT+2
Function Call: WRITE
  • Prompt: !,ANRV(1),?27,ANRV(2),?47,$S(ANRV(3)]"":ANRV(3),1:"NONE")
  • Line Location: REPORT+4
Function Call: WRITE
  • Prompt: !?47,LN2,!,"Subcount",?50,$J(SUBCNT,4)
  • Condition for execution: POS=""
  • Line Location: REPORT+6
Function Call: WRITE
  • Prompt: !?47,LN2,!,"Count",?50,$J(TOTAL,4)
  • Line Location: REPORT+6
Function Call: WRITE
  • Prompt: !!,"Do you want the report to list:",!?3,"(A)ll periods of service or",!?3,"(S)elect periods of service",!!
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !!,"Enter:",!?3,"""A"" to list patients for ALL periods of service from the VIST ROSTER file.",!?3,"""S"" to select only specific periods of service.",!?3,"""^"" or <return> to halt."
  • Line Location: HELPSEL+1
Routine Call
  • DIC
  • Line Location:
    • ASKPOS
Routine Call
  • DIR
  • Line Location:
    • HDR+1
    • SEL+1
Routine Call
  • %ZIS
  • Line Location:
    • EN1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(21 - [#21] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ANRV(2040 - [#2040] DEQ+2, |sort, |sort, |sort
^ANRV(2041 - [#2041] |inpt
^ANRV(2041.5 - [#2041.5] |sort
^ANRV(2042.5 - [#2042.5] |sort
^DD("DD" DEQ+4
^DD(161.01 |sort
^DD(2 |sort
^DD(2040 |sort
^DIC(4 - [#4] |inpt
^DIC(5 - [#5] |func
^DPT - [#2] |func, |sort, |sort
^FBAAA - [#161] |sort
^TMP("ANRV" DEQ+1!, DEQ+5, QUIT!, SETTMP+1*, SETTMP+2*, REPORT+1, REPORT+3

Label References

Name Line Occurrences
ASKPOS ASKPOS+2
HDR DEQ+4, REPORT+2, REPORT+4
QUIT EN1+2, EN1+3, EN1+5, DEQ+5
QUIT2 SEL+3, ASKPOS+1
REPORT DEQ+6
SEL EN1+2
SETLP ASKPOS+2
SETTMP DEQ+2

Naked Globals

Name Field # of Occurrence
^( |func, |sort
^(0 |func, |inpt, |sort, |sort
^(13 |sort
^(7 |sort

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DEQ+4, QUIT!, QUIT2!
%H QUIT!
%I QUIT!
%T QUIT!
%Y QUIT!
%ZIS EN1+3!*
%ZIS("B" EN1+3*
ANRV QUIT!
ANRV( REPORT+3*
ANRV(1 REPORT+4
ANRV(2 REPORT+4
ANRV(3 REPORT+4
ANRVLP EN1+1!, EN1+2, EN1+4, QUIT!, SETTMP+1
ANRVLP( SETTMP+1, SETLP+1*
ANRVP DEQ+2*, QUIT!
>> ANRVZI |opt*
>> BY |opt*
>> D(0 |sort*
>> D0 |func, |sort*, |sort*, |sort*
>> D1 |sort
DFN DEQ+2*, QUIT!
DIC ASKPOS*!, |opt*
DIC(0 ASKPOS*, |opt*
DIR HDR+1!, SEL+1!
DIR("?" SEL+1*
DIR("A" SEL+1*
DIR(0 HDR+1*, SEL+1*
DIRUT QUIT!
>> DISX(1 |sort*, |sort*
>> DISX(2 |sort*, |sort*
>> DISX(3 |sort*
>> DISX(4 |sort*
>> DPP(1 |sort
>> DPP(2 |sort
>> DPP(3 |sort
DTOUT QUIT!, ASKPOS+1, QUIT2!
DUOUT QUIT!, ASKPOS+1, QUIT2!
>> FLDS |opt*
>> FR |opt*
HDR DEQ+3*, QUIT!, HDR+2
HDT DEQ+4*, QUIT!, HDR+2
>> I(0 |sort*
>> I(100 |sort*
IO EN1+6
IO("Q" EN1+4!
IOF EN1+1, QUIT+1, HDR+2
IOP EN1+3!
IOSL REPORT+2, REPORT+4
IOST QUIT+1, HDR+1, HDR+2
LN DEQ+4*, QUIT!, HDR+2
LN2 DEQ+4*, QUIT!, REPORT+2, REPORT+6
NAME QUIT!, REPORT+1*, REPORT+3
PG DEQ+4*, QUIT!, HDR+1, HDR+2*
POP EN1+3, QUIT!
POS QUIT!, REPORT+1*, REPORT+2, REPORT+3, REPORT+5, REPORT+6
POS2 QUIT!, REPORT+1*, REPORT+2, REPORT+5*
QFLG DEQ+4*, QUIT!, HDR+1*, REPORT+2, REPORT+4, REPORT+6
SEL EN1+2, EN1+4, QUIT!, SETTMP+2, SEL+2*, SEL+3*
>> SHEMP |inpt*
SUB QUIT!, SETTMP+2*
SUBCNT QUIT!, REPORT+1*, REPORT+2*, REPORT+4*, REPORT+6
>> TO |opt*
TOTAL QUIT!, REPORT+1*, REPORT+4*, REPORT+6
U DEQ+2, SETTMP+1, SETTMP+2, REPORT+3, SETLP+1, |sort, |sort, |sort
>> VADM(1 SETTMP+1, SETTMP+2
>> VADM(2 SETTMP+1, SETTMP+2
>> VAEL(2 SETTMP+1, SETTMP+2
X QUIT!, ASKPOS!, QUIT2!, |func*, |inpt*, |sort*, |sort*, |sort*
>> X1 |func*
XX QUIT!, REPORT+3*
Y DEQ+4*, QUIT!, HDR+1, SEL+2, ASKPOS!, ASKPOS+1, ASKPOS+2, QUIT2!, SETLP+1, |opt
, |sort*
>> Y(1 |sort*, |sort*, |sort*
>> Y(101 |sort*
>> Y(102 |sort*
>> Y(103 |sort*
>> Y(104 |sort*
>> Y(105 |sort*
>> Y(2 |sort*
>> Y(201 |sort*
>> Y(202 |sort*
>> Y(203 |sort*
>> Y(3 |sort*
>> Y(4 |sort*
>> Y(5 |sort*
>> Y(6 |sort*
>> Y(7 |sort*
>> 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 |  Naked Globals |  Local Variables  | All