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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AMHNAVR

Package: Mental Health Social Services

Routine: AMHNAVR


Information

AMHNAVR ; IHS/CMI/LAB - REF FORM ;

Source Information

Source file <AMHNAVR.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
Mental Health Social Services 6 EN2^AMHEKL  (GETDATE,GETTYPE)^AMHLE  SUIC^AMHLEA  ^AMHLEIN  (ADD,OTHER,PAUSE,PCCLINK)^AMHLEP2  $$CTR^AMHNAVRP  
VA Fileman 4 ^DDS  ^DIC  FILE^DICN  ^DIR  
IHS VA Utilities 3 ^XBDBQUE  ^XBFMK  EN^XBVK  
IHS Patient 1 KILL^AUPNPAT  

Entry Points

Name Comments DBIA/ICR reference
A ;
E ;EP
ADDFORM ;
GETPAT ;
1 ; -- add visit
P ;PRINT form
XIT ;

External References

Name Field # of Occurrence
EN2^AMHEKL 1+18
GETDATE^AMHLE 1+7
GETTYPE^AMHLE 1+5
SUIC^AMHLEA 1+14
^AMHLEIN 1+1
ADD^AMHLEP2 1+10
OTHER^AMHLEP2 1+15
PAUSE^AMHLEP2 ADDFORM+5
PCCLINK^AMHLEP2 1+16
$$CTR^AMHNAVRP AMHNAVR+6
KILL^AUPNPAT XIT+2
^DDS ADDFORM+7, E+11
^DIC GETPAT+1
FILE^DICN ADDFORM+4
^DIR AMHNAVR+7, ADDFORM+9, P+5, P+11, E+5, E+12
^XBDBQUE ADDFORM+13, P+14, E+16
^XBFMK XIT+3
EN^XBVK AMHNAVR+4, A+3, XIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CTR^AMHNAVRP("***** NAVAJO PSYCHIATRIC HOSPITALIZATION REFERRAL *****",80),!
  • Line Location: AMHNAVR+6
Function Call: WRITE
  • Prompt: !!,"This option should be used to add a visit to the BH system and then to",!,"complete a Psychiatric Referral Form.",!!
  • Line Location: A+2
Function Call: WRITE
  • Prompt: !!,"Record IEN missing!"
  • Line Location: 1+11
Function Call: WRITE
  • Prompt: !!,"Now creating referral form...."
  • Line Location: ADDFORM+1
Function Call: WRITE
  • Prompt: !,"Creating new record..."
  • Line Location: ADDFORM+2
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Behavioral Health Referral form is NOT complete!! Deleting Record.",!
  • Line Location: ADDFORM+5
Function Call: WRITE
  • Prompt: !!,"Print a Psychiatric Hospitalization Referral Form",!!
  • Line Location: P+1
Function Call: WRITE
  • Prompt: !!,"No referral form on file for that date."
  • Line Location: P+10
Function Call: WRITE
  • Prompt: !!,"Edit a Psychiatric Hospitalization Referral Form",!!
  • Line Location: E+1
Function Call: WRITE
  • Prompt: !!,"No referral form on file for that date."
  • Line Location: E+10
Routine Call
  • DDS
  • Line Location:
    • ADDFORM+7
    • E+11
Routine Call
  • DIC
  • Line Location:
    • GETPAT+1
Routine Call
  • DIR
  • Line Location:
    • AMHNAVR+7
    • ADDFORM+9
    • P+5
    • P+11
    • E+5
    • E+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMHRNRF - [#9002011.11] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] 1+12
^AMHRNRF - [#9002011.11] P+9, E+9
^AMHRNRF("AC" P+9, E+9

Label References

Name Line Occurrences
@( AMHNAVR+10
ADDFORM 1+13
E E+10
GETPAT A+4, P+2, E+2
P P+10
XIT AMHNAVR+8, AMHNAVR+11, A+5, 1+6, 1+8, 1+11, 1+17, P+3, P+6, P+15
, E+3, E+6, E+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> AMHACT AMHNAVR+9*, AMHNAVR+10
>> AMHCC 1+12*
>> AMHDATE 1+8, ADDFORM+3
>> AMHNAVR 1+3*
>> AMHPAT A+5, GETPAT+1*, P+3, P+9, E+3, E+9
>> AMHPATCE 1+2*
>> AMHPTYPE 1+6
>> AMHR 1+11, 1+12, ADDFORM+3
>> AMHRDATE P+4*, P+7*, P+9, E+4*, E+7*, E+9
>> AMHREF ADDFORM+6*, ADDFORM+7, P+9*, P+10, E+9*, E+10, E+11
>> AMHVTYPE 1+9*, ADDFORM+7
D0 ADDFORM+2!, ADDFORM+4!
DA AMHNAVR+7!, ADDFORM+2!, ADDFORM+7*, ADDFORM+9!, P+5!, P+11!, E+5!, E+11*, E+12!
DD ADDFORM+2!
>> DDSFILE ADDFORM+7*, E+11*
DFN GETPAT+1!*
DIADD ADDFORM+3*, ADDFORM+4!
DIC GETPAT+1!*, ADDFORM+2!, ADDFORM+3*, ADDFORM+4!
DIC("DR" ADDFORM+3*
DIC(0 GETPAT+1*, ADDFORM+3*
DIE ADDFORM+4!
DINUM ADDFORM+2!
DIR AMHNAVR+7!, ADDFORM+9!, P+5!, P+11!, E+5!, E+12!
DIR("A" AMHNAVR+7*, ADDFORM+9*, P+5*, P+11*, E+5*, E+12*
DIR("B" AMHNAVR+7*, ADDFORM+9*, P+11*, E+12*
DIR(0 AMHNAVR+7*, ADDFORM+9*, P+5*, P+11*, E+5*, E+12*
>> DIRUT AMHNAVR+8, ADDFORM+10, P+6, P+12, E+6, E+13
DLAYGO ADDFORM+3*, ADDFORM+4!
DO ADDFORM+2!
DR ADDFORM+2!, ADDFORM+4!, ADDFORM+7*, E+11*
IOF AMHNAVR+5, A+1
U 1+12, P+9, E+9
X ADDFORM+3*, ADDFORM+4!, P+9*, E+9*
>> XBNS ADDFORM+12*, P+13*, E+15*
>> XBRC ADDFORM+12*, P+13*, E+15*
>> XBRP ADDFORM+12*, P+13*, E+15*
>> XBRX ADDFORM+12*, P+13*, E+15*
>> Y AMHNAVR+9, GETPAT+1, ADDFORM+5, ADDFORM+6, ADDFORM+11, P+7, E+7, E+14
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All