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

Package: Mental Health

Routine: YTMBMD2


Information

YTMBMD2 ;ALB/ASF-MBMD ; 2/14/12 1:26pm

Source Information

Source file <YTMBMD2.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Mental Health 1 (DTA,SCR)^YTREPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Mental Health 1 YTMBMD  

Entry Points

Name Comments DBIA/ICR reference
PERCENT ; bariatric untransformed prevalence scores
PAINREP ; pain pt report
LIKELY ;
CHART ;

External References

Name Field # of Occurrence
DTA^YTREPT PAINREP+3
SCR^YTREPT PAINREP+7, PAINREP+11, PAINREP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?(72-$L(X)\2),X,!
  • Line Location: PAINREP+4
Function Call: WRITE
  • Prompt: !?50,$S(YSVFLAG:"*** Invalid Profile ***",1:"Valid Profile")
  • Line Location: PAINREP+5
Function Call: WRITE
  • Prompt: !,"*** Pain Patient Percentiles ***"
  • Line Location: PAINREP+6
Function Call: WRITE
  • Prompt: !,?4,$P(^YTT(601,YSTEST,"S",I,0),U,2),?25
  • Line Location: PAINREP+10
Function Call: WRITE
  • Prompt: !,$P(YSSID," ")
  • Line Location: PAINREP+19
Function Call: WRITE
  • Prompt: ?52,$P(YSSID," ",2,99)
  • Line Location: PAINREP+22
Function Call: WRITE
  • Prompt: $S(X="L":"unlikely problem",X="M":"possible problem",X="H":"likely problem",1:"????")
  • Line Location: LIKELY+3
Function Call: WRITE
  • Prompt: $E("XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",1,$J(X/3,0,0))
  • Line Location: CHART+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTT(601 - [#601] PERCENT+1, PAINREP+2, PAINREP+10, PAINREP+18

Label References

Name Line Occurrences
CHART PAINREP+21
LIKELY PAINREP+10

Naked Globals

Name Field # of Occurrence
^("P" PAINREP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A PAINREP+2*
>> B PAINREP+2*
>> I PERCENT+1*, PAINREP+7*, PAINREP+8, PAINREP+9, PAINREP+10, PAINREP+12*, PAINREP+13, PAINREP+14, PAINREP+15, PAINREP+16
, PAINREP+17, PAINREP+18, PAINREP+20, LIKELY+2, CHART+2
IOST PAINREP+7, PAINREP+11, PAINREP+12
>> L1 PAINREP+2*
>> L2 PAINREP+2*
>> R PERCENT+1, PAINREP+20
>> S PERCENT+1*, PAINREP+20, LIKELY+2, CHART+2
U PERCENT+1, PAINREP+2, PAINREP+10, PAINREP+18, PAINREP+20, LIKELY+2, CHART+2
X PAINREP+2*, PAINREP+4, LIKELY+1~, LIKELY+2*, LIKELY+3, CHART+1~, CHART+2*, CHART+4
>> YSSEX PERCENT+1
>> YSSID PAINREP+18*, PAINREP+19, PAINREP+22
>> YSTEST PERCENT+1, PAINREP+2, PAINREP+10, PAINREP+18
>> YSTOUT PAINREP+1*, PAINREP+7, PAINREP+11, PAINREP+12
>> YSUOUT PAINREP+1*, PAINREP+7, PAINREP+11, PAINREP+12
>> YSVFLAG PAINREP+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All