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 |  Local Variables |  All
Print Page as PDF
Routine: AMHLE3

Package: Mental Health Social Services

Routine: AMHLE3


Information

AMHLE3 ; IHS/CMI/LAB - DE CONT. ;

Source Information

Source file <AMHLE3.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^DDS  ^DIC  ^DIE  ^DIR  
IHS VA Utilities 3 ^XBDBQUE  ^XBFMK  EN^XBNEW  
Mental Health Social Services 1 FORMDIR^AMHLEFP  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Mental Health Social Services 2 AMHLEA  AMHLEP2  

Entry Points

Name Comments DBIA/ICR reference
PR ;EP
SUBHEAD ;
EOJ ;EOJ CLEANUP
PHX ;EP
DATE ;
PEF ;EP - called from AMHLEA - other
EP ;EP

External References

Name Field # of Occurrence
FORMDIR^AMHLEFP PEF+6
^DDS PR+3
^DIC PR+2, EP+21
^DIE EP+18
^DIR EP+12
^XBDBQUE PEF+11
^XBFMK PR+2, EOJ+2
EN^XBNEW PHX+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"FAILED TO ADD PATIENT TO BH PATIENT DATA FILE"
  • Line Location: PR+2
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: PR+4
Function Call: WRITE
  • Prompt: !!,"********** No Personal History currently on file for ",$P(^DPT(AMHPAT,0),U),".",!
  • Line Location: EP+4
Function Call: WRITE
  • Prompt: !!,"Bye..."
  • Line Location: EP+13
Function Call: WRITE
  • Prompt: !!,$P(^AMHTPHF(AMHPHX,0),U)," already recorded for this patient.",!,$C(7),"You may change it or delete it. To delete an entry, enter an '@'.",!
  • Line Location: EP+15
Function Call: WRITE
  • Prompt: !!,"Can't lock global entry."
  • Line Location: EP+17
Function Call: WRITE
  • Prompt: !!,"Adding Personal History of ",$P(^AMHPPHX(AMHPHX,0),U)," failed.",!
  • Line Location: EP+22
Function Call: WRITE
  • Prompt: !!,AMHS,AMHHEAD,AMHS
  • Line Location: SUBHEAD+3
Routine Call
  • DIE
  • Line Location:
    • EP+18
Routine Call
  • DDS
  • Line Location:
    • PR+3
Routine Call
  • DIC
  • Line Location:
    • PR+2
    • EP+21
Routine Call
  • DIR
  • Line Location:
    • EP+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMHPPHX - [#9002011.52] Classic Fileman Calls
^AMHPATR - [#9002011.55] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHPATR - [#9002011.55] PR+2
^AMHPPHX - [#9002011.52] EP+19, EP+7, EP+9, EP+17, EP+22
^AMHPPHX("AA" EP+15, EP+16
^AMHPPHX("AC" EP+4, EP+6
^AMHTPHF - [#9002012.7] EP+9, EP+15
^DPT - [#2] EP+4, EP+5

Label References

Name Line Occurrences
DATE EP+7
EOJ EP+13, EP+15, EP+24
SUBHEAD EP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PEF+1, PEF+12!
%1 PEF+1, PEF+12!
>> AMHACTN PEF+9*
AMHD EP+7*, DATE+1*, EOJ+3!
>> AMHDATE EP+21
AMHEFT PEF+2!, PEF+8*
AMHHEAD EP+5*, EOJ+3!, SUBHEAD+2, SUBHEAD+3
>> AMHPAT PR+1, PR+2, PR+3, EP+1, EP+4, EP+5, EP+6, EP+15, EP+16, PEF+1*
AMHPHX EP+14*, EP+15, EP+16, EP+21, EP+22, EOJ+3!
>> AMHQUIT PR+4*
>> AMHR PEF+1*, PEF+6
AMHS EOJ+3!, SUBHEAD+2*, SUBHEAD+3
AMHX EP+6*, EP+7, EP+9, EOJ+3!
DA PR+3*, EP+16*, EP+17, EP+20!
DD EP+21!
>> DDSFILE PR+3*
DIADD EP+21*, EOJ+1!
>> DIC PR+2*, EP+21*
>> DIC("DR" EP+21*
>> DIC(0 PR+2*, EP+21*
DIE EP+16*, EP+20!
DIMSG PR+4!
DIR EP+12!
DIR("A" EP+12*
DIR(0 EP+12*
>> DIRUT EP+12*, EP+13, PEF+7
DLAYGO PR+2*, EP+21*, EOJ+1!
DR PR+3*, EP+16*, EP+20!
DT EP+21
>> DUOUT EP+12
L SUBHEAD+1~, SUBHEAD+2*
U EP+4, EP+5, EP+7, EP+9, EP+15, EP+22
>> X PR+2*, EP+21*
>> XBNS PEF+10*
>> XBRC PEF+10*
>> XBRP PEF+10*
>> XBRX PEF+10*
Y PR+2, EP+14, EP+22, EP+23!, PEF+8
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 |  Local Variables |  All