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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ANRVPR

Package: Visual Impairment Service Team

Routine: ANRVPR


Information

ANRVPR ;AUG/JLTP - PRINT VIST PATIENT RECORD ; 8 Jan 91 / 9:20 AM

Source Information

Source file <ANRVPR.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ;------ Non-interactive Entry Point ------
EXIT ; close device
CNTR ;
HDR ;
FTR ; print footer
PRINT ;
MULT ;------ Print all fields from a single ^DIZ node ------
PAGE ;------ Go to a new page ------
FIELD ;;
ANRF ;;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?(IOM\2-($L(X)\2)),X
  • Line Location: CNTR+1
Function Call: WRITE
  • Prompt: @IOF,!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: FTR+1
Function Call: WRITE
  • Prompt: !,PNM_" "_SSN
  • Line Location: FTR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: FTR+2
Function Call: WRITE
  • Prompt: !,"Dependent(s) Name(s): "
  • Line Location: PRINT+8
Function Call: WRITE
  • Prompt: !!!,"VIST Eligibility:",?30,ANRV(17)
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,"Rated Disability:"
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !!,"Eye Diagnosis: "
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: !
  • Condition for execution: I>1
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: ?30,ANRV(17.5,I)
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+22
Function Call: WRITE
  • Prompt: !,"Field Visit Date (Last):",?30,ANRV(20)
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRINT+31
Function Call: READ
  • Formatting: !
  • Prompt: "Type ^ to exit or press RETURN..."
  • Variable: X
  • Timeout: DTIME
  • Line Location: PAGE+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ANRV(2040 - [#2040] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call