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

Package: Mental Health

Routine: YTSCL9R


Information

YTSCL9R ;ALB/ASF-SCL90 R SCORING ; 8/17/10 10:51am

Source Information

Source file <YTSCL9R.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Mental Health 3 ENPT^YSUTL  (DTA,SCR)^YTREPT  (,BOTTOM,NOTE)^YTSCL9R1  

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

Package Total Caller Graph
Mental Health 2 YTSCL9R1  ^YTT(601.6  

Entry Points

Name Comments DBIA/ICR reference
MAIN ;
RD
SS ;symptom scales
SS1 ;
GSI ;global severity index
PST ;positive symptom total
PSDI ;positive symptom distress index
VALIDITY ;
TSCORE ; 1=outpatient, 2=nonpatients, 3= inpatients
TS1
LKUP ;
LKUP1 ;
TRANS ;
TPST ; tscores for pst
EXTREME ;
EX1 ;
REPT ;
REPT1 ;
END
MULT ;multiple scoring returns Outpt norms

External References

Name Field # of Occurrence
ENPT^YSUTL MULT+1
DTA^YTREPT REPT+2
SCR^YTREPT MAIN+9, REPT1+2
^YTSCL9R1 MAIN+6
BOTTOM^YTSCL9R1 MAIN+7
NOTE^YTSCL9R1 MAIN+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Administration invalid: More than 18 items were omitted",!!
  • Line Location: VALIDITY+2
Function Call: WRITE
  • Prompt: !!,"Norms for this age group not available",!!
  • Line Location: VALIDITY+3
Function Call: WRITE
  • Prompt: !!,"Administration invalid: all questions were answered the same",!!
  • Line Location: VALIDITY+4
Function Call: WRITE
  • Prompt: !!?(72-$L(X)\2),X,!!!?3,"S C A L E",?37,"RAW Outpatients Nonpatients Inpatients"
  • Line Location: REPT+2
Function Call: WRITE
  • Prompt: !?3,$P($P(^YTT(601,YSTEST,"S",YSI,0),U,2),";",2),?37,$S(YSI=13:$J(YSRS,4,0),1:$J(YSRS,4,2)),$J(S1,8,0),$J(S2,13,0),$J(S3,13,0)
  • Line Location: REPT1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^YTD(601.2 - [#601.2] RD
^YTT(601 - [#601] SS1+1, LKUP+2, TRANS+2, TPST+2, EX1+3, REPT+1, REPT1+3

Label References

Name Line Occurrences
END MAIN+11
EX1 EXTREME+1
EXTREME TSCORE+1
GSI MAIN+4, MULT+4
LKUP TS1
LKUP1 LKUP+2
PSDI MAIN+4, MULT+4
PST MAIN+4, MULT+4
RD MAIN+1, MULT+2
REPT MAIN+8
REPT1 REPT+3
SS MAIN+3, MULT+3
SS1 SS+2
TPST TSCORE+1
TRANS LKUP1+6
TS1 TSCORE+1
TSCORE MAIN+5, MULT+5
VALIDITY MAIN+2

Naked Globals

Name Field # of Occurrence
^( LKUP+2
^("P" REPT+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A REPT+1*
>> B REPT+1*
IOST MAIN+9, REPT1+2
>> J SS1+3*
L1 REPT+1*, END!
L2 REPT+1*, END!
N LKUP+2*, LKUP1+6, TRANS+1, TRANS+2, END!
R SS+1*, SS1+3*, SS1+5*, GSI+1*, GSI+2*, PST+1*, PSDI+1*, PSDI+2*, LKUP+1, LKUP1+5
TPST+1, TPST+2, EX1+2, REPT1+1, END!
S SS+1*, END!, MULT+6*
S( LKUP1+1, LKUP1+5*, TRANS+6*, TPST+3*, EX1+1, EX1+3*
S(1 SS+1*, SS1+7*, REPT1+1, MULT+6
S(2 SS+1*, SS1+7*, REPT1+1
S(3 SS+1*, SS1+7*, REPT1+1
S1 REPT1+1*, REPT1+3, END!
S2 REPT1+1*, REPT1+3, END!
S3 REPT1+1*, REPT1+3, END!
U SS1+3, SS1+5, SS1+7, GSI+1, GSI+2, PST+1, PSDI+1, PSDI+2, LKUP+1, LKUP1+1
LKUP1+3, LKUP1+5, TRANS+3, TRANS+6, TPST+1, TPST+2, TPST+3, EX1+1, EX1+2, EX1+3
REPT+1, REPT1+1, REPT1+3
X RD*, SS1+3, GSI+2, PST+1, VALIDITY+2, VALIDITY+4, EX1+2*, EX1+3, REPT+1*, REPT+2
, END!
>> YSAGE VALIDITY+3, MULT+1
>> YSDFN RD
YSDIV SS1+2*, SS1+3*, SS1+5, SS1+7, END!
>> YSED RD
YSI SS+2*, SS1+1, SS1+3, SS1+5, SS1+7, TS1*, LKUP+1, LKUP1+1, LKUP1+2, LKUP1+5
TRANS+6, EXTREME+1*, EX1+1, EX1+2, EX1+3, REPT+3*, REPT1+1, REPT1+3, REPT1+4, END!
YSITEM SS1+3*, END!
YSK SS1+1*, SS1+3, END!
YSLKP LKUP1+2*, LKUP1+3, TRANS+3, END!
YSLV END!
YSMIS SS1+2*, SS1+3*, SS1+7, END!
YSNORM TSCORE+1*, LKUP+2, LKUP1+1, LKUP1+5, TRANS+2, TRANS+6, TPST+3, EX1+1, EX1+3, END!
YSNS END!
YSRAW LKUP+1*, LKUP+2, LKUP1+6, TRANS+5, EX1+2*, END!
YSROW LKUP+2*, LKUP1+3, TPST+2*, TPST+3, END!
YSROWP TRANS+2*, TRANS+3, END!
YSRS REPT1+1*, REPT1+3, END!
>> YSSEX LKUP+2, TRANS+2, TPST+2, EX1+3
YST TRANS+5*, TRANS+6, END!
>> YSTEST RDSS1+1, LKUP+2, TRANS+2, TPST+2, EX1+3, REPT+1, REPT1+3
YSTNOW LKUP1+3*, LKUP1+4, LKUP1+5, TRANS+5, END!
YSTOLD TRANS+3*, TRANS+4, TRANS+5, END!
YSTOTAL SS+1*, SS1+3*, GSI+1, GSI+2, PSDI+1, PSDI+2, END!
>> YSTOUT MAIN+9, REPT1+2
>> YSUOUT MAIN+9, REPT1+2
YSVALUE LKUP+2*, LKUP1+5, LKUP1+6, TRANS+5, END!
YSVFLAG MAIN+2, VALIDITY+1*, VALIDITY+2*, VALIDITY+3*, VALIDITY+4*, END!
YSVOLD TRANS+3*, TRANS+5, END!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All