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

Package: Mental Health Social Services

Routine: AMHHS1


Information

AMHHS1 ; IHS/CMI/LAB - BH HEALTH SUMMARY COMPONENT PART 2 ;

Source Information

Source file <AMHHS1.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
IHS VA Utilities 1 $$PROVINI^XBFUNC1  
Kernel 1 $$FMTE^XLFDT  
Mental Health Social Services 1 ($$LASTNAP,$$LASTPLR,$$LASTPLU)^AMHAPI6  
Patient Care Component 1 PRTTXT^APCHSUTL  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health Social Services 1 AMHHS  

Entry Points

Name Comments DBIA/ICR reference
NOTEDSP ; DISPLAY NOTES UNDER PROBLEM
PROBDSP ;
PROBSCH ;
DSPN ; DISPLAY SINGLE NOTE
COMMON ;
PROBX
PRTICD ;
PROB ;EP

External References

Name Field # of Occurrence
$$LASTNAP^AMHAPI6 PROB+13
$$LASTPLR^AMHAPI6 PROB+7
$$LASTPLU^AMHAPI6 PROB+10
PRTTXT^APCHSUTL DSPN+7, PRTICD+7, PRTICD+8
$$GET1^DIQ PROBDSP+3
$$PROVINI^XBFUNC1 DSPN+5
$$FMTE^XLFDT PROB+9, PROB+12, PROB+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,AMHS,X,AMHS,!
  • Line Location: PROB+2
Function Call: WRITE
  • Prompt: !,AMHS,X,AMHS,!
  • Line Location: PROB+5
Function Call: WRITE
  • Prompt: !,"BH Problem List Reviewed: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1))
  • Line Location: PROB+9
Function Call: WRITE
  • Prompt: ?51,"By: ",?54,$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),!
  • Line Location: PROB+9
Function Call: WRITE
  • Prompt: "BH Problem List Updated: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1))
  • Line Location: PROB+12
Function Call: WRITE
  • Prompt: ?51,"By: ",?54,$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),!
  • Line Location: PROB+12
Function Call: WRITE
  • Prompt: !,"No Active Problems: ",?24,$$FMTE^XLFDT($P(AMHSX,U,1))
  • Line Location: PROB+15
Function Call: WRITE
  • Prompt: ?39,"Documented By: ",?54,$E($P($G(^VA(200,$P(AMHSX,U,3),0)),U),1,25),!
  • Line Location: PROB+15
Function Call: WRITE
  • Prompt: "No Active BH Problems Documented: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1))
  • Line Location: PROB+16
Function Call: WRITE
  • Prompt: ?51,"By: ",$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),!
  • Line Location: PROB+16
Function Call: WRITE
  • Prompt: AMHS,X,AMHS,!
  • Line Location: COMMON+3
Function Call: WRITE
  • Prompt: !!,"***** ",$S(AMHTTAT="A":" ACTIVE ",1:" INACTIVE "),"PROBLEMS AND TREATMENT NOTES/NOTES ***** ",!!
  • Line Location: COMMON+4
Function Call: WRITE
  • Prompt: !,AMHTPNM,?4,AMHTDTM
  • Line Location: PROBDSP+9
Function Call: WRITE
  • Prompt: ?1,AMHTPNM_"-"_$P(AMHTN,U),?7,AMHTTPT,?11,AMHTDOI,?20,AMHHS("AUTHOR")
  • Line Location: DSPN+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AMHPPROB - [#9002011.51] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMHPPROB - [#9002011.51] COMMON+2, PROBDSP+1
^AMHPPROB("AA" COMMON+2
^AMHPROB - [#9002012.2] PRTICD+4, PRTICD+6
^AMHPTP - [#9002011.53] DSPN+2
^AMHPTP("AE" NOTEDSP+1, NOTEDSP+2, DSPN+1
^VA(200 - [#200] PROB+9, PROB+12, PROB+16

Label References

Name Line Occurrences
COMMON PROB+4, PROB+6
DSPN NOTEDSP+2
NOTEDSP PROBDSP+10
PROBDSP COMMON+5
PROBX PROB+18
PRTICD PROBDSP+9

Naked Globals

Name Field # of Occurrence
^( COMMON+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AMHHS PROB+17!
AMHHS("AUTHOR" DSPN+5*, DSPN+6
AMHPTP PROB+17!
>> AMHS PROB+2*, PROB+5*, COMMON+3*
AMHSNRQ1 PROBX!, PRTICD+3*, PRTICD+8
>> AMHSX PROB+7*, PROB+9, PROB+10*, PROB+12, PROB+13*, PROB+16
AMHTCVD PROB+3*, PROB+17!, PROBDSP+4, PROBDSP+6, PROBDSP+7, DSPN+3
AMHTDFN COMMON+2*, COMMON+5*, PROBX!, PROBDSP+1, PROBDSP+3, NOTEDSP+1, NOTEDSP+2, DSPN+1
AMHTDFT COMMON+1!, PROBX!
AMHTDFT( COMMON+2*, COMMON+5
AMHTDOI DSPN+3*, DSPN+6, DSPN+8!
AMHTDOO PROBX!, PROBDSP+4*, PRTICD+2
AMHTDTM PROBX!, PROBDSP+6*, PROBDSP+9
AMHTDTN PROBX!, PROBDSP+7*
AMHTFCN PROBX!
AMHTFPP COMMON+5*, PROBX!
AMHTICD PROBX!, PRTICD+1*
AMHTILN PROBX!, PROBDSP+9*
AMHTITE PROBX+1!
AMHTN PROBX!, PROBDSP+1*, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+6, PROBDSP+7, DSPN+2*, DSPN+3, DSPN+4
, DSPN+5, DSPN+6, DSPN+7, PRTICD+4, PRTICD+6
AMHTNAB PROBX+1!
AMHTNDF COMMON+1*, COMMON+2*, COMMON+3, PROBX!, NOTEDSP+2*, DSPN+1
AMHTNFL PROBX+1!
AMHTNFP PROBX!
AMHTNSH PROBX+1!
AMHTPBN PROBX!
AMHTPLN PROBX!
AMHTPNM PROBX!, PROBDSP+5*, PROBDSP+9, DSPN+6
AMHTPRB COMMON+2*, PROBX!
AMHTQ PROB+17!, COMMON+2*, COMMON+5*, NOTEDSP+2*
AMHTTAT PROB+4*, PROB+6*, COMMON+2, PROBX!
AMHTTPT PROB+17!, DSPN+4*, DSPN+6
AMHTVSC PROBX+1!
>> APCHSCKP PROB+2, PROB+5, PROB+8, PROB+11, PROB+14, COMMON+3, PROBDSP+9, DSPN+6
APCHSICL PROBX!, PROBDSP+9*, DSPN+7*, PRTICD+8*
APCHSNRQ PROBX!, PROBDSP+2*, PROBDSP+3*, DSPN+7*, PRTICD+1*, PRTICD+2*, PRTICD+3, PRTICD+4*, PRTICD+5*, PRTICD+6*
, PRTICD+8*
>> APCHSPAT PROB+7, PROB+10, PROB+13, COMMON+2
>> APCHSQIT PROB+2, PROB+5, PROB+8, PROB+11, PROB+14, COMMON+3, PROBDSP+9, DSPN+6
>> APCHSTXT DSPN+7*, PRTICD+6*, PRTICD+8*
DT PROB+7, PROB+10, PROB+13
U PROB+9, PROB+12, PROB+16, COMMON+2, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+6, PROBDSP+7, DSPN+3
, DSPN+4, DSPN+5, DSPN+6, DSPN+7, PRTICD+4, PRTICD+6
>> X PROB+2*, PROB+5*, COMMON+3*, DSPN+1*, DSPN+2, PRTICD+5*
Y PROB+17!, PROBDSP+4*, PROBDSP+6*, PROBDSP+7*, DSPN+3*, PRTICD+5*
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 |  Naked Globals |  Local Variables |  All