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: AMHLEA2

Package: Mental Health Social Services

Routine: AMHLEA2


Information

AMHLEA2 ; IHS/CMI/LAB - ADD NEW CHR ACTIVITY RECORDS ;

Source Information

Source file <AMHLEA2.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA Fileman 5 ^DDS  ^DIC  (FILE,YN)^DICN  ^DIE  ^DIR  
IHS VA Utilities 3 ^XBFMK  EN^XBNEW  EN^XBVK  
Mental Health Social Services 3 RECCHECK^AMHLE2  ($$IINTAKE,EN)^AMHLEDEL  ^AMHPEDIT  

Entry Points

Name Comments DBIA/ICR reference
GETPOV ;
BEGIN ;add adm record
PAUSE ;EP
GETPROV ;get providers
CREATE ;EP
GETTYPE ;EP
GETPAT ;EP
EXIT ;
GETPAT1 ;
DEL ;EP
GETDATE ;EP - GET DATE OF ENCOUNTER

External References

Name Field # of Occurrence
RECCHECK^AMHLE2 CREATE+12
$$IINTAKE^AMHLEDEL DEL+1
EN^AMHLEDEL DEL+4
^AMHPEDIT GETPAT1+5
^DDS CREATE+9
^DIC GETPAT1+2
FILE^DICN CREATE+5, GETPROV+4
YN^DICN GETPAT1+6
^DIE CREATE+7
^DIR GETTYPE+2, GETDATE+2, PAUSE+1, GETPROV+1
^XBFMK GETPAT+1, EXIT+1
EN^XBNEW GETPOV+1
EN^XBVK EXIT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Update Case Tracking Visit Record",!
  • Line Location: BEGIN+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: GETDATE+1
Function Call: WRITE
  • Prompt: !!,"No Patient Selected."
  • Line Location: CREATE+4
Function Call: WRITE
  • Prompt: !!,$C(7),$C(7),"Behavioral Health Record is NOT complete!! Deleting Record.",!
  • Line Location: CREATE+6
Function Call: WRITE
  • Prompt: !!,"ERROR IN SCREENMAN FORM!! ***NOTIFY PROGRAMMER***"
  • Line Location: CREATE+10
Function Call: WRITE
  • Prompt: !!,"Incomplete record!! Deleting record!!"
  • Line Location: CREATE+11
Function Call: WRITE
  • Prompt: !,"Incomplete record!! Deleting record!!"
  • Line Location: CREATE+12
Function Call: WRITE
  • Prompt: !!,"This visit has an Initial Intake with Updates, it can not be deleted",!,"until the update documents have been deleted."
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !,"Record deleted."
  • Line Location: DEL+5
Function Call: WRITE
  • Prompt: !!,"Creating Primary Provider entry failed!!!",$C(7),$C(7)
  • Line Location: GETPROV+5
Routine Call
  • DIE
  • Line Location:
    • CREATE+7
Routine Call
  • DDS
  • Line Location:
    • CREATE+9
Routine Call
  • DIC
  • Line Location:
    • GETPAT1+2
Routine Call
  • DIR
  • Line Location:
    • GETTYPE+2
    • GETDATE+2
    • PAUSE+1
    • GETPROV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^AMHREC - [#9002011] Classic Fileman Calls
^AMHRPROV - [#9002011.02] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHREC - [#9002011] DEL+2
^AMHRPRO("AD" CREATE+11
^AMHRPROV("AD" CREATE+11
^VA(200 - [#200] GETPROV+1

Label References

Name Line Occurrences
CREATE BEGIN+7
DEL CREATE+11, CREATE+12
EXIT BEGIN+4, BEGIN+6, BEGIN+8, CREATE+4, CREATE+11, CREATE+12, CREATE+13
GETDATE BEGIN+5
GETPAT CREATE+3
GETPAT1 GETPAT1+5
GETPROV CREATE+8
GETTYPE BEGIN+3
PAUSE CREATE+6, DEL+1, DEL+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GETPAT1+6*
>> AMHACTN CREATE+1*
AMHC GETPAT+2*, GETPAT1+3!, GETPAT1+5*, GETPAT1+6!, GETPAT1+7!
>> AMHDATE BEGIN+6, GETDATE+2*, GETDATE+4*, CREATE+5
>> AMHOKAY CREATE+12*
>> AMHPAT CREATE+4, CREATE+5, GETPAT1+1*, GETPAT1+4*, GETPAT1+5, GETPAT1+6*, GETPROV+4
>> AMHPTYPE BEGIN+4, GETTYPE+1*, GETTYPE+4*
>> AMHQUIT CREATE+10*
>> AMHR CREATE+7*, CREATE+9, CREATE+11, DEL+1, DEL+2, DEL+3, GETPROV+4
>> AMHRDEL DEL+3*
>> AMHVDLT DEL+2*
>> APCDOVRR CREATE+2*
D0 CREATE+5!, GETPROV+4!
DA GETTYPE+2!, CREATE+5!, CREATE+7*!, CREATE+9*, GETPAT1+2!, GETPROV+1!, GETPROV+4!
DD CREATE+5!, GETPROV+4!
>> DDSFILE CREATE+9*
DG GETPROV+4!
DH GETPROV+4!
DI GETPROV+4!
DIADD CREATE+5*!, GETPAT1+2!, GETPROV+4*!
DIC CREATE+5!*, GETPAT1+2*!, GETPROV+1!, GETPROV+4*!
DIC("DR" CREATE+5*, GETPROV+4*
DIC(0 CREATE+5*, GETPAT1+2*, GETPROV+4*
DIE CREATE+5!, CREATE+7*!, GETPROV+4!
DIMSG CREATE+10!
DINUM CREATE+5!
DIR GETTYPE+2!, GETDATE+2!, PAUSE+1!, GETPROV+1!
DIR("A" GETTYPE+2*, GETDATE+2*, PAUSE+1*, GETPROV+1*
DIR("B" GETPROV+1*
DIR(0 GETTYPE+2*, GETDATE+2*, PAUSE+1*, GETPROV+1*
DIRUT GETTYPE+3, GETDATE+2*, GETDATE+3, PAUSE+1*, GETPROV+1!*, GETPROV+2
DIU GETPROV+4!
DIW GETPROV+4!
DLAYGO CREATE+5*!, GETPAT1+2!, GETPROV+4*!
DO CREATE+5!, GETPROV+4!
DQ GETPROV+4!
DR CREATE+5!, CREATE+7*!, CREATE+9*, GETPAT1+2!
DR(2 CREATE+7*
DT GETDATE+2, CREATE+5
DTOUT GETPROV+1!
DUOUT GETDATE+2, PAUSE+1, GETPROV+1!
DUZ CREATE+5, GETPROV+1
IOF BEGIN+1
U DEL+2, GETPROV+1
X CREATE+5*!, GETPAT1+5*, GETPROV+1!, GETPROV+4*
Y GETTYPE+4, GETDATE+4, CREATE+6, CREATE+7, GETPAT1+3, GETPAT1+4, GETPROV+1!, GETPROV+3, GETPROV+4, GETPROV+5
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