Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: YTMBMD1

Package: Mental Health

Routine: YTMBMD1


Information

YTMBMD1 ;ALB/ASF-MBMD ; 2/14/12 12:50pm

Source Information

Source file <YTMBMD1.m>

Entry Points

Name Comments DBIA/ICR reference
PSB ; bariatric untransformed prevalence scores
RPAB ;bariatric Response Pattern Adjustment
HPAB ;High Point Adjustment COPING
HPA1B ;high point AA-EE, a-m
REPTB ;bariatric reports
LIKELY ;
CHART ;
PERCENT ;Paint score percentiles

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,?(72-$L(X)\2),X,!
  • Line Location: REPTB+4
Function Call: WRITE
  • Prompt: !?50,$S(YSVFLAG:"*** Invalid Profile ***",1:"Valid Profile")
  • Line Location: REPTB+5
Function Call: WRITE
  • Prompt: !,"*** Bariatric Norms ***"
  • Line Location: REPTB+6
Function Call: WRITE
  • Prompt: !,?4,$P(^YTT(601,YSTEST,"S",I,0),U,2),?25
  • Line Location: REPTB+10
Function Call: WRITE
  • Prompt: !,$P(YSSID," ")
  • Line Location: REPTB+19
Function Call: WRITE
  • Prompt: ?52,$P(YSSID," ",2,99)
  • Line Location: REPTB+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
Info |  Source |  Entry Points |  Interaction Calls