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

Package: Mental Health Social Services

Routine: AMHDMHPL


Information

AMHDMHPL ; IHS/CMI/LAB - Display Problems and Notes ;

Source Information

Source file <AMHDMHPL.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 $$GET1^DIQ  ^DIR  
Mental Health Social Services 1 PAUSE^AMHLEA  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health Social Services 1 AMHLEPOV  

Entry Points

Name Comments DBIA/ICR reference
EN ;EP
FF ;
NOTEDSP ; DISPLAY NOTES UNDER PROBLEM
PRTTXT ; GENERALIZED TEXT PRINTER
DSPN ; DISPLAY SINGLE NOTE
PROBDSP ;
COMMON ;
PROBX
PRTICD ;
GETSITE ;
GETFRAG
PRTTXT2

External References

Name Field # of Occurrence
PAUSE^AMHLEA EN+6
$$GET1^DIQ PROBDSP+3
^DIR FF+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"BEHAVIORAL HEALTH Diagnosis List for ",$P(^DPT(AMHPAT,0),U),"."
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"***** No BH Problems on file for this Patient",!
  • Line Location: COMMON+1
Function Call: WRITE
  • Prompt: !!?10,"***** ",$S(AMHTTAT="A":" ACTIVE ",1:" INACTIVE "),"PROBLEMS AND TREATMENT NOTES/NOTES ***** ",!!
  • Line Location: COMMON+5
Function Call: WRITE
  • Prompt: !,AMHTPNM,?4,AMHTDTM
  • Line Location: PROBDSP+17
Function Call: WRITE
  • Prompt: ?1,AMHTPNM_"-"_$P(AMHTN,U),?7,AMHTTPT,?11,AMHTDOI,?20,AMHDMHPL("AUTH")
  • Line Location: DSPN+8
Function Call: WRITE
  • Prompt: ?AMHTICL
  • Line Location: PRTTXT2+2
Function Call: WRITE
  • Prompt: AMHTF,!
  • Line Location: PRTTXT2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: FF+1
Routine Call
  • DIR
  • Line Location:
    • FF+1

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+3, PROBDSP+1
^AMHPPROB("AA" COMMON+3
^AMHPPROB("AC" COMMON+1
^AMHPROB - [#9002012.2] PROBDSP+13, PROBDSP+15
^AMHPTP - [#9002011.53] DSPN+2
^AMHPTP("AE" NOTEDSP+1, NOTEDSP+2, DSPN+1
^AUTTLOC - [#9999999.06] GETSITE+2
^DIC(4 - [#4] GETSITE+3
^DPT - [#2] EN+3
^VA(200 - [#200] DSPN+6

Label References

Name Line Occurrences
COMMON EN+5
DSPN NOTEDSP+2
FF PROBDSP+16, DSPN+7, PRTTXT2+1
GETFRAG PRTTXT2
GETSITE PROBDSP+6
NOTEDSP PROBDSP+19
PROBDSP COMMON+6
PROBX EN+8
PRTICD PROBDSP+17, PROBDSP+18
PRTTXT DSPN+9, PRTICD+2
PRTTXT2 PRTTXT+2

Naked Globals

Name Field # of Occurrence
^( COMMON+3
^(0 GETSITE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+7!, GETSITE+2*, GETSITE+3, GETSITE+4, GETSITE+5
AMHDMHPL PROBX+1!
AMHDMHPL("AUTH" DSPN+6*, DSPN+8, DSPN+10!
>> AMHPAT EN+1, EN+3, COMMON+1, COMMON+3
>> AMHPLC EN+6
AMHTC PRTTXT+3!, GETFRAG+1*, GETFRAG+2
AMHTCVD EN+4*, EN+7!, PROBDSP+4, PROBDSP+8, PROBDSP+9, DSPN+4
AMHTDFN COMMON+3*, COMMON+6*, PROBX!, PROBDSP+1, PROBDSP+3, NOTEDSP+1, NOTEDSP+2, DSPN+1
AMHTDFT COMMON+2!, PROBX!
AMHTDFT( COMMON+3*, COMMON+6
AMHTDLT PRTTXT+1*, PRTTXT+3!, PRTTXT2+2*
AMHTDOI DSPN+4*, DSPN+8, DSPN+10!
AMHTDOO PROBDSP+4*, PROBDSP+11, PRTTXT+3!
AMHTDTM PROBX!, PROBDSP+8*, PROBDSP+17
AMHTDTN PROBX!, PROBDSP+9*
AMHTF PRTTXT+3!, PRTTXT2+2, GETFRAG*, GETFRAG+2*
AMHTFAC PROBX!
AMHTFCN PROBX!
AMHTFPP COMMON+6*, PROBX!
AMHTICD PROBX!
AMHTICL PROBX!, PROBDSP+17*, PROBDSP+18*, DSPN+9*, PRTTXT+1, PRTTXT2+2*
AMHTILN PROBX!, PROBDSP+17*, PRTTXT+1*, PRTTXT+3!, PRTTXT2+2*, GETFRAG, GETFRAG+1
AMHTITE PROBX+1!, PROBDSP+5*, GETSITE+1*, GETSITE+2, GETSITE+3, GETSITE+4, GETSITE+5
AMHTL PROBX+1!
AMHTN PROBX!, PROBDSP+1*, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+7, PROBDSP+8, PROBDSP+9, PROBDSP+13, PROBDSP+15
, DSPN+2*, DSPN+4, DSPN+5, DSPN+6, DSPN+8, DSPN+9
AMHTNAB PROBX+1!, GETSITE+5*
AMHTNDF COMMON+2*, COMMON+3*, COMMON+4, PROBX!, NOTEDSP+2*, DSPN+1
AMHTNFL PROBX+1!, GETSITE+3*
AMHTNFP PROBX!
AMHTNRQ PROBX!, PROBDSP+2*, PROBDSP+3*, PROBDSP+11*, PROBDSP+12, PROBDSP+13*, PROBDSP+14*, PROBDSP+15*, PROBDSP+18*, DSPN+9*
, PRTICD+1*, PRTTXT+2*
AMHTNRQ1 PROBX!, PROBDSP+12*, PROBDSP+18
AMHTNSH PROBX+1!, GETSITE+4*
AMHTPBN PROBX!
AMHTPLN PROBX!
AMHTPNM PROBX!, PROBDSP+7*, PROBDSP+17, DSPN+8
AMHTPRB COMMON+3*, PROBX!
AMHTQ EN+7!, COMMON+3*, COMMON+6*, NOTEDSP+2*, PRTTXT+2*
AMHTTAT EN+5*, COMMON+3, COMMON+5, PROBX!
AMHTTPT PROBX+1!, DSPN+5*, DSPN+8, DSPN+10!
AMHTTXT PROBDSP+15*, PROBDSP+18*, DSPN+9*, PRTTXT+2*, PRTTXT+3!, GETFRAG*, GETFRAG+1, GETFRAG+2*
AMHTVSC PROBX+1!
DIR FF+1!
DIR("A" FF+1*
DIR(0 FF+1*
IO FF+1
IO(0 FF+1
IOF EN+2, FF+2
IOSL PROBDSP+16, DSPN+7, PRTTXT2+1
IOST FF+1
U EN+3, COMMON+3, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+7, PROBDSP+8, PROBDSP+9, PROBDSP+13, PROBDSP+15
, DSPN+4, DSPN+5, DSPN+6, DSPN+8, DSPN+9, GETSITE+3, GETSITE+4, GETSITE+5
>> X PROBDSP+14*, DSPN+1*, DSPN+2
Y EN+7!, PROBX+2!, PROBDSP+4*, PROBDSP+8*, PROBDSP+9*, PROBDSP+14*, DSPN+4*
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