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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AMHLESM

Package: Mental Health Social Services

Routine: AMHLESM


Information

AMHLESM ; IHS/CMI/LAB - calls from within screenman ;

Source Information

Source file <AMHLESM.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
IHS VA Utilities 2 $$VAL^XBDIQ1  ARRAY^XBLM  
Mental Health Social Services 2 GETMEDS^AMHLEMD  ($$ALLOWVI,$$PPINI)^AMHUTIL  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
VA Fileman 1 (HLP,REFRESH)^DDSUTL  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Mental Health Social Services 3 AMHEGRPV  AMHGUA  AMHLEPOV  

Entry Points

Name Comments DBIA/ICR reference
GETMHMD ;set array ^TMP("AMHSMEDS",$J,"M" OF MEDS IN MH FILE
NOSHOW(V) ;EP - return 0 if no noshows, 1 if noshow
HMED1 ;EP
HPOV ;EP display last visit's povs
HPOV1 ;EP called from input template
REFRESH ;
HLP
HMED ;EP - display last
SETARRAY ;
EN1(AMHPAT) ;EP - called from protocol
S(Y,F,C,T) ;
S1 ;

External References

Name Field # of Occurrence
GETMEDS^AMHLEMD HMED1+3
$$ALLOWVI^AMHUTIL GETMHMD+6, HPOV+9
$$PPINI^AMHUTIL HPOV1+15
HLP^DDSUTL HMED+3, HLP
REFRESH^DDSUTL REFRESH+3
$$VAL^XBDIQ1 HPOV+4, HPOV+12, HPOV1+11, NOSHOW+3
ARRAY^XBLM EN1+4, HMED+6
$$FMADD^XLFDT HMED1+2
$$FMTE^XLFDT GETMHMD+7, HPOV+12, HPOV1+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $P(DDGLVID,DDGLDEL,8)
  • Line Location: REFRESH+2
Function Call: WRITE
  • Prompt: !!,"No prior diagnoses on file for this patient."
  • Line Location: HPOV1+6
Function Call: WRITE
  • Prompt: !!,"Patient's Diagnoses from last visit:"
  • Line Location: HPOV1+7
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT($P($P(^AMHREC($P(^AMHRPRO(B,0),U,3),0),U),"."),"2E")_" "_$$VAL^XBDIQ1(9002011.01,B,.01)_" "_$E($$VAL^XBDIQ1(9002011.01,B,.04),1,52)
  • Line Location: HPOV1+11
Function Call: WRITE
  • Prompt: !
  • Line Location: HPOV1+17

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" REFRESH+1
^AMHREC - [#9002011] GETMHMD+5, GETMHMD+8, HPOV+12, HPOV1+11, HPOV1+12, HPOV1+14
^AMHREC("AE" GETMHMD+3, GETMHMD+4, HPOV+6, HPOV+7, HPOV1+4, HPOV1+5
^AMHRPRO - [#9002011.01] HPOV+11, HPOV+12, HPOV1+10, HPOV1+11
^AMHRPRO("AD" HPOV+7, HPOV+10, HPOV1+5, HPOV1+8, NOSHOW+3
^AMHSITE - [#9002013] HPOV+8
^AMHTAXIV - [#9002012.9] HPOV1+12
^DPT - [#2] EN1+3, HMED+5
^TMP("AMHDSPMEDS" EN1+5!, HMED+7!, SETARRAY+1!*, S1+1*, S1+2*
^TMP("AMHSMEDS" EN1+5!, SETARRAY+7, SETARRAY+9, GETMHMD+1!, GETMHMD+7*, GETMHMD+8*

Label References

Name Line Occurrences
$$NOSHOW HPOV+8
GETMHMD HMED1+4
HLP HPOV+22
HMED1 EN1+2, HMED+4
S SETARRAY+5, SETARRAY+6, SETARRAY+7, SETARRAY+8, SETARRAY+9
S1 S+6
SETARRAY HMED1+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% HMED1+2*, HMED1+3, S+5*, S1+1*, S1+2, HPOV+1~, HPOV1+1~, HPOV1+4*, HPOV1+5*, HPOV1+6
, HPOV1+8, HPOV1+12, HPOV1+14, HPOV1+15, NOSHOW+2~, NOSHOW+3*, NOSHOW+4
>> %1 HMED1+2*, HMED1+3
A HPOV1+1~, HPOV1+4*, HPOV1+5
AMHA HPOV+1~, HPOV+6*, HPOV+7
AMHB HPOV+1~, HPOV+10*, HPOV+11, HPOV+12
AMHC GETMHMD+2~*, GETMHMD+7*, GETMHMD+8*, HPOV+1~, HPOV+4*, HPOV+5, HPOV+21
AMHC1 HPOV+1~, HPOV+5*, HPOV+12*
AMHCC HPOV+1~, HPOV+6*, HPOV+21*, HPOV+22, HLP+1!
AMHLAST GETMHMD+2~*, GETMHMD+3
AMHMSG HMED+3!, HPOV+1~, HLP, HPOV1+1~
AMHMSG( HPOV+5*, HPOV+12*
AMHMSG(1 HMED+3*, HPOV+22*
AMHPAT EN1~, EN1+1, EN1+3, HMED+3, HMED+5, HMED1+3, GETMHMD+3, GETMHMD+4, HPOV+3, HPOV+6
, HPOV+7, HPOV1+3, HPOV1+4, HPOV1+5
>> AMHR HPOV+2, HPOV+7, HPOV1+2, HPOV1+5
AMHT HPOV+1~, HPOV+7*, HPOV+8, HPOV+9, HPOV+10, HPOV+21
AMHV HPOV+1~, HPOV+6*, HPOV+7, HPOV+21*
B HPOV1+1~, HPOV1+8*, HPOV1+10, HPOV1+11
C EN1+3~*, EN1+4, HMED+5~*, HMED+6, GETMHMD+8*, S~, HPOV1+1~, HPOV1+7*, HPOV1+11*
>> DDGLDEL REFRESH+2
>> DDGLVID REFRESH+2
DT HMED1+2, GETMHMD+2
DUZ GETMHMD+6, HPOV+9
DUZ(2 HPOV+4, HPOV+8
F S~, S+1*, S+4*
I SETARRAY+7*, SETARRAY+9*, GETMHMD+3~*, GETMHMD+4, GETMHMD+7
P NOSHOW+2~, NOSHOW+3*
R HPOV1+1~, HPOV1+5*
S HPOV+1~, HPOV1+12*, HPOV1+13
T S~, S+2*, S+4, S+5
U EN1+3, HMED+5, S1+1, HPOV+8, HPOV+11, HPOV+12, HPOV1+10, HPOV1+11, HPOV1+12, HPOV1+14
V NOSHOW~, NOSHOW+1, NOSHOW+3
X REFRESH+1*, SETARRAY+5*, SETARRAY+6*, SETARRAY+7*, SETARRAY+8*, SETARRAY+9*, GETMHMD+4*, GETMHMD+5, GETMHMD+6, GETMHMD+8
, S+4*, S+5*, S1+2, HPOV+1~, HPOV1+12*, NOSHOW+2~, NOSHOW+3*
Y S~, S+5, HPOV+1~, HPOV1+12*
Z HPOV+1~, HPOV1+13*, HPOV1+14*, HPOV1+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All