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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: AMHRPTP

Package: Mental Health Social Services

Routine: AMHRPTP


Information

AMHRPTP ; IHS/CMI/LAB - PRINT VISIT REPORT ;

Source Information

Source file <AMHRPTP.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Mental Health Social Services 4 ^AMHEKL  DONE^AMHLEIN  DEL^AMHRPT  COVPAGE^AMHRPTCP  
VA Fileman 2 EN^DIQ1  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
HEAD ;ENTRY POINT
HEAD1 ;
START ;EP
SINGLE ;process single valued item
DONE ;
V ;GETS RECORDS
PRINT ;
PROC ;process printing of report
DIQ ;
MULT ;

External References

Name Field # of Occurrence
^AMHEKL DONE+1
DONE^AMHLEIN DONE+1
DEL^AMHRPT DONE+3
COVPAGE^AMHRPTCP START+6
EN^DIQ1 DIQ+3
^DIR HEAD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,AMHLINE(X)
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !?13,"********** CONFIDENTIAL PATIENT INFORMATION **********"
  • Line Location: HEAD1+2
Function Call: WRITE
  • Prompt: !?((AMHTCW-AMHLENG)/2),AMHTEXT,?(AMHTCW-8)," Page ",AMHPG
  • Line Location: HEAD1+3
Function Call: WRITE
  • Prompt: !?((AMHTCW-AMHLENG)/2),"Visit Dates: ",AMHBDD," and ",AMHEDD,!
  • Line Location: HEAD1+4
Function Call: WRITE
  • Prompt: !?((AMHTCW-AMHLENG)/2),AMHSORV,": ",AMHSORT,!
  • Line Location: HEAD1+5
Function Call: WRITE
  • Prompt: !,AMHHEAD,!
  • Line Location: HEAD1+6
Function Call: WRITE
  • Prompt: AMHDASH,!
  • Line Location: HEAD1+7
Routine Call
  • DIR
  • Line Location:
    • HEAD+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] V+4
^AMHSORT - [#9002013.3] START+2, PRINT+6, SINGLE+2, MULT+2, DIQ+2
^AMHTRPT - [#9002013.8] START+2, START+3, PRINT+5, SINGLE+3, SINGLE+4, MULT+4, MULT+5, MULT+8, MULT+9, MULT+10
, MULT+11, MULT+12
^XTMP("AMHRPT" PROC+1, PROC+3, DONE+2!, V+4

Label References

Name Line Occurrences
DONE PROC+1, PROC+4, PROC+5
HEAD PROC+5, V+2, V+6, PRINT+3, PRINT+9
HEAD1 HEAD+1
MULT PRINT+7
PRINT V+4
SINGLE PRINT+6
V PROC+3

Naked Globals

Name Field # of Occurrence
^(0 DIQ+2
^(3 SINGLE+2, MULT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMHBD DONE+4!
AMHBDD DONE+4!, HEAD1+4
>> AMHBT DONE+2
AMHBTH PROC+1, PROC+3, DONE+4!, V+4
AMHCRIT DONE+4!, PRINT+5*, PRINT+6, SINGLE+2, MULT+2, DIQ+2
AMHDASH START+5*, DONE+4!, HEAD1+7
AMHED DONE+4!
AMHEDD DONE+4!, HEAD1+4
AMHFIEL DONE+5!, DIQ+1!, DIQ+2*, DIQ+3, DIQ+4, DIQ+5
AMHFILE DONE+5!, DIQ+1!, DIQ+2*, DIQ+3, DIQ+4, DIQ+5
AMHFOUN DONE+5!
AMHFRST PROC+2*, DONE+5!, V+2, V+3!
AMHHDR START+2*, START+3, DONE+4!
AMHHEAD START+2*, START+3*, DONE+4!, HEAD1+6
AMHI DONE+4!, PRINT+5*, SINGLE+3, SINGLE+4, MULT+4, MULT+5, MULT+8, MULT+9, MULT+10, MULT+11
, MULT+12
AMHJOB PROC+1, PROC+3, DONE+2, DONE+4!, V+4
AMHL DONE+4!, PRINT+2*, PRINT+9, MULT+1*
AMHLENG START+2*, DONE+4!, SINGLE+3*, MULT+4*, MULT+8*, MULT+10*, HEAD1+3*, HEAD1+4*, HEAD1+5*
AMHLHDR DONE+5!
AMHLINE DONE+4!, PRINT+2!
AMHLINE( PRINT+10, SINGLE+5*, MULT+11*, MULT+12*, MULT+13*
AMHLINE(1 PRINT+2*, SINGLE+4*, SINGLE+5, MULT+5*, MULT+9*, MULT+11, MULT+13
AMHODAT DONE+4!
AMHPCNT DONE+4!, MULT+1*
AMHPG PROC+1*, DONE+4!, HEAD+1, HEAD1+1*, HEAD1+3
AMHPRNM DONE+5!, MULT+1!, MULT+3
AMHPRNM( MULT+6, MULT+10
AMHPRNM(1 MULT+8
AMHPRNT DONE+5!, SINGLE+1*, SINGLE+3*, SINGLE+4, MULT+1!, MULT+3*, MULT+4*, MULT+5, MULT+8*, MULT+9
, MULT+10*, MULT+12, DIQ+1!, DIQ+5*
AMHPRNT( DIQ+4*, DIQ+5
AMHQUIT PROC+2!, PROC+3, PROC+4, PROC+5, DONE+4!, V+2, V+4, V+5, V+6, PRINT+3
, PRINT+5, PRINT+9, HEAD+2*
AMHR DONE+4!, V+4*
AMHR0 DONE+4!, V+4*
AMHRCNT PROC+3*, PROC+6, DONE+4!, PRINT+4*
AMHRPT START+2, START+3, DONE+4!, PRINT+5, SINGLE+3, SINGLE+4, MULT+4, MULT+5, MULT+8, MULT+9
, MULT+10, MULT+11, MULT+12
>> AMHSCNT V+1*, V+7, PRINT+1*
AMHSD DONE+4!
AMHSEAT DONE+5!
AMHSORT PROC+2*, PROC+3*, DONE+5!, V+4, V+7, HEAD1+5
>> AMHSORV V+7, HEAD1+5
AMHSORX DONE+5!
>> AMHSPAG V+2, V+7, PRINT+1, HEAD1+5
AMHSRT DONE+5!
AMHTCW START+5, DONE+4!, HEAD1+3, HEAD1+4, HEAD1+5
AMHTEST DONE+5!
>> AMHTEXT HEAD1+3*
AMHTYPE DONE+5!
AMHX DONE+5!, MULT+1*
AUPNDAYS DONE+4!
AUPNDOB DONE+4!
AUPNDOD DONE+4!
AUPNPAT DONE+4!
AUPNSEX DONE+4!
D0 DONE+5!
>> DA DIQ+4, DIQ+5
DIC DIQ+3*!
DIQ DIQ+3*!
DIQ(0 DIQ+3*
DIR HEAD+2!
DIR(0 HEAD+2*
DR DIQ+3*!
>> DTOUT HEAD+2
>> I START+3*, SINGLE+4*, SINGLE+5*, MULT+5*, MULT+9*, MULT+12*, MULT+13*
IO HEAD+2
IO(0 HEAD+2
IOF HEAD1+1
IOSL PROC+5, V+6, PRINT+3, PRINT+9
IOST HEAD+2
J START+3*, DONE+5!, SINGLE+4*, SINGLE+5*, MULT+5*, MULT+9*, MULT+12*, MULT+13*
K START+3*, DONE+5!, SINGLE+4*, SINGLE+5*, MULT+5*, MULT+9*, MULT+11*, MULT+12*, MULT+13*
L DONE+5!
U START+2, START+3, PRINT+5, PRINT+6, SINGLE+3, SINGLE+4, MULT+4, MULT+5, MULT+8, MULT+9
, MULT+10, MULT+11, MULT+12, DIQ+2
>> X START+2*, START+3, PRINT+10*, SINGLE+5*, MULT+6*, MULT+7, MULT+10, MULT+11, MULT+12, MULT+13*
>> Y HEAD+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All