Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ANRVRP3

Package: Visual Impairment Service Team

Routine: ANRVRP3


Information

ANRVRP3 ;BIRM/LDT - VIST CITY LIST ; 05 Aug 98 / 2:16 PM

Source Information

Source file <ANRVRP3.m>

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"SORT BY CITY",!!
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED!!"
  • Line Location: DEV+0
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,"CITY",!,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: NAME=""
  • 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 cities or",!?3,"(S)elect city/cities",!!
  • Line Location: SEL+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+4
Function Call: WRITE
  • Prompt: !!,"Enter:",!?3,"""A"" to list patients for ALL cities from the VIST ROSTER file.",!?3,"""S"" to select only a specific city or cities.",!?3,"""^"" or <return> to halt."
  • Line Location: HELPSEL+1
Info |  Source |  Entry Points |  Interaction Calls