Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Label References |  Local Variables  | All
Print Page as PDF
Routine: YTSMPIR

Package: Mental Health

Routine: YTSMPIR


Information

YTSMPIR ;SLC/KCM - Score MMPI-2-RF ; 10/24/2015

Source Information

Source file <YTSMPIR.m>

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 YTSMPI2  

Entry Points

Name Comments DBIA/ICR reference
SCORE(RSLT,ADMIN) ; Score instrument
; build tables if necessary
; build responses
; scan for overall results
; compute raw score for each scale
; compute adjusted scores, if necessary
; get T-scores for each scale
SCAN(CNT,RSP) ; scan for overall statistics
SCORE1(RSLT,SCALE,RSP) ; set .RSLT subscripts for SCALE
; expects T (scoring tables)
; .RSLT: subscripts - raw,adjusted,count,percent,tscore
; SCALE: scale to calculate
; .RSP: set of responses -- RSP(q#)=answer
VRIN(RSLT,RSP) ; VRIN-r raw,count,percent,t-score
TRIN(RSLT,RSP) ; TRIN-r raw,count,percent,t-score
TSCORE(RSLT,SCALE) ; add T-Score to .RSLT
VRINADJ(RSLT,RSP) ; VRIN-r adjusted raw score
TRINADJ(RSLT,RSP) ; TRIN-r adjusted raw score
RAWADJ(RSLT,SCALE,RSP) ; general case adjusted raw score
PERCENT(RSLT,SCALE) ; compute percent and put back in .RSLT
; expects T (scoring tables)
INC(SCALE,SUB,VAL) ; increment (or decrement) subscript SUB by value VAL
SETSCORE(SCR,RSLT,SCALE) ;

Label References

Name Line Occurrences
INC SCORE1+12, SCORE1+13, VRIN+5, VRIN+8, TRIN+6, TRIN+7, TRIN+8, VRINADJ+8, VRINADJ+11, VRINADJ+16
, VRINADJ+19, TRINADJ+10, RAWADJ+5
PERCENT SCORE1+14, VRIN+9, TRIN+9
RAWADJ SCORE1+16
SETSCORE SCORE1+19, VRIN+14, TRIN+14
TRIN SCORE1+8
TRINADJ TRIN+11
TSCORE SCORE1+17, VRIN+12, TRIN+12
VRIN SCORE1+7
VRINADJ VRIN+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMIN SCORE~
CNT SCAN~
CNT("cannotSay" SCAN+3*, SCAN+9*, SCAN+12
CNT("responses" SCAN+5*
CNT("skipped" SCAN+4*, SCAN+10*
CNT("trueCount" SCAN+2*, SCAN+7*, SCAN+12*
DFLT TRINADJ+2~*, TRINADJ+9
DIFF TRIN+1~, TRIN+5*, TRIN+6, TRINADJ+1~, TRINADJ+7*, TRINADJ+10
I SCAN+1~, SCAN+6*, SCAN+7, SCAN+8, SCAN+10
K1 VRIN+1~, VRIN+4*, VRIN+5, TRIN+1~, TRIN+4*, TRIN+6, VRINADJ+1~, VRINADJ+5*, VRINADJ+8, VRINADJ+18
, VRINADJ+19, TRINADJ+1~, TRINADJ+6*, TRINADJ+10
K2 VRIN+1~, VRIN+4*, VRIN+5, TRIN+4*, TRIN+6, VRINADJ+1~, VRINADJ+5*, VRINADJ+8, VRINADJ+18, VRINADJ+19
, TRINADJ+1~, TRINADJ+6*, TRINADJ+10
KB VRINADJ+13~, VRINADJ+14*, VRINADJ+16
KC VRINADJ+13~, VRINADJ+14*, VRINADJ+16
Q1 VRIN+1~, VRIN+4*, VRIN+5, VRIN+7, TRIN+1~, TRIN+4*, TRIN+6, TRIN+7, VRINADJ+1~, VRINADJ+5*
, VRINADJ+6, TRINADJ+1~, TRINADJ+6*, TRINADJ+8
Q2 VRIN+1~, VRIN+4*, VRIN+5, VRIN+7, TRIN+1~, TRIN+4*, TRIN+6, TRIN+7, VRINADJ+1~, VRINADJ+5*
, VRINADJ+6, TRINADJ+1~, TRINADJ+6*, TRINADJ+8
QA VRINADJ+13~, VRINADJ+14*, VRINADJ+15
QB VRINADJ+13~, VRINADJ+14*, VRINADJ+15
QC VRINADJ+13~, VRINADJ+14*, VRINADJ+15
QID SCORE1+10~, SCORE1+11*, SCORE1+12, SCORE1+13, VRIN+1~, VRIN+2*, VRIN+3, VRIN+6, TRIN+1~, TRIN+2*
, TRIN+3, VRINADJ+1~, VRINADJ+3*, VRINADJ+4, TRINADJ+1~, TRINADJ+4*, TRINADJ+5, RAWADJ+3*, RAWADJ+4, RAWADJ+5
R RAWADJ+1~, RAWADJ+4*, RAWADJ+5
R1 VRINADJ+1~, VRINADJ+6*, VRINADJ+7, VRINADJ+8, VRINADJ+11, VRINADJ+18*, VRINADJ+19, TRINADJ+1~, TRINADJ+8*, TRINADJ+9*
, TRINADJ+10
R2 VRINADJ+1~, VRINADJ+6*, VRINADJ+7, VRINADJ+8, VRINADJ+11, VRINADJ+18*, VRINADJ+19, TRINADJ+1~, TRINADJ+8*, TRINADJ+9*
, TRINADJ+10
RA VRINADJ+13~, VRINADJ+15*, VRINADJ+16
RAW TSCORE+1~, TSCORE+2*, TSCORE+3
RB VRINADJ+13~, VRINADJ+15*, VRINADJ+16
RC VRINADJ+13~, VRINADJ+15*, VRINADJ+16
RSLT SCORE~, SCORE1~, SCORE1+5!, SCORE1+7, SCORE1+8, SCORE1+14, SCORE1+16, SCORE1+17, SCORE1+19, VRIN~
, VRIN+9, VRIN+11, VRIN+12, VRIN+14, TRIN~, TRIN+9, TRIN+11, TRIN+12, TRIN+14, TSCORE~
, VRINADJ~, TRINADJ~, RAWADJ~, PERCENT~, SETSCORE~
RSLT( INC+2*
RSLT("adjraw" TSCORE+2, VRINADJ+2*, TRINADJ+3*, RAWADJ+2*
RSLT("count" SCORE1+6*, PERCENT+2, SETSCORE+1
RSLT("percent" SCORE1+16, VRIN+11, TRIN+11, PERCENT+2*, SETSCORE+1
RSLT("raw" SCORE1+6*, TRIN+11, TSCORE+2, TRINADJ+2, SETSCORE+1
RSLT("tscore" TSCORE+3*, TSCORE+4*, SETSCORE+1
RSP SCAN~, SCORE1~, SCORE1+7, SCORE1+8, SCORE1+16, VRIN~, VRIN+11, TRIN~, TRIN+11, VRINADJ~
, TRINADJ~, RAWADJ~
RSP( SCAN+6, SCAN+7, SCAN+8, SCORE1+12, SCORE1+13, VRIN+5, VRIN+7, TRIN+6, TRIN+7, VRINADJ+6
, VRINADJ+15, TRINADJ+8, RAWADJ+4
SCALE SCORE1~, SCORE1+7, SCORE1+8, SCORE1+11, SCORE1+12, SCORE1+13, SCORE1+14, SCORE1+16, SCORE1+17, SCORE1+19
, VRIN+5, VRIN+8, VRIN+14, TRIN+6, TRIN+7, TRIN+8, TRIN+14, TSCORE~, TSCORE+3, TSCORE+4
, VRINADJ+8, VRINADJ+11, VRINADJ+16, VRINADJ+19, TRINADJ+10, RAWADJ~, RAWADJ+3, RAWADJ+4, RAWADJ+5, PERCENT~
, PERCENT+2, INC~, SETSCORE~, SETSCORE+1
SCR SCORE1+19, VRIN+14, TRIN+14, SETSCORE~
SCR( SETSCORE+1*
SUB INC~, INC+2
>> T("info" SCORE1+16, PERCENT+2
>> T("raw" SCORE1+11, SCORE1+12, VRIN+2, VRIN+3, VRIN+6, TRIN+2, TRIN+3, VRINADJ+3, VRINADJ+4, TRINADJ+4
, TRINADJ+5, RAWADJ+3, RAWADJ+4, RAWADJ+5
>> T("tscore" TSCORE+3, TSCORE+4
U SCORE1+12, VRIN+4, VRIN+6, TRIN+4, TRIN+5, VRINADJ+5, VRINADJ+9, VRINADJ+10, VRINADJ+12, VRINADJ+14
, VRINADJ+17, TRINADJ+6, TRINADJ+7, RAWADJ+4, RAWADJ+5, SETSCORE+1
VAL INC~, INC+1*, INC+2
X VRIN+1~, VRIN+3*, VRIN+4, TRIN+1~, TRIN+3*, TRIN+4, TRIN+5, VRINADJ+1~, VRINADJ+4*, VRINADJ+5
, VRINADJ+9, VRINADJ+10, VRINADJ+12, VRINADJ+14, VRINADJ+17, TRINADJ+1~, TRINADJ+5*, TRINADJ+6, TRINADJ+7
Info |  Source |  Caller Graph |  Entry Points |  Label References |  Local Variables  | All