Routine: YTSMCMI4

Package	Total	Call Graph
Mental Health	5	LDSCORES^YTSCORE (,$$BRFIX)^YTSMCMIA (INICOD,YSQ)^YTSMCMIB INIBRS^YTSMCMIC INIPRS^YTSMCMID
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Mental Health	1	^YTT(601.71

Name	Comments	DBIA/ICR reference
DLLSTR(YSDATA,YS,YSTRNG)	; ; YSTRNG = 1 Score Instr ; YSTRNG = 2 get Rpt Ans and Text
DATA1	;Extract results&calc
INVRPT()	; ; Check for Invalid Report ; Raw V > 1 ;Invalidity Index elev ; Raw X > 114 ! Raw X < 7 ;Scale X outside range ; All Scales 1-8B Base Rate < 60 ; All scls too low ; Raw W > 19 ;Inconsistency Index elevated ; More than 13 responses skipped for X ; INVRPT of 1 = YES, INVALID ; 0 = NO, OK TO PROCEED
INVALID(INVSTR)	; ; Text for invalid rpt
INVSCL	;
EXTANS	;
EXTRSL	; ; Extract the Raw score-store by Scale Name
EX2	;T-SCORE NOT IN ^TMP($J,"YSCOR")
HIGHPT	; Highpoint Hdr
BRADJH	; BR Adjustment Hdr
INVDH	; Invalidity Hdr
INCNH	; Inconsistency Hdr
CALCW	; Calc the W Scale
WADD(PAIR)	;
ELEV	; Calc 3 highest Personality Scores from BR ; Order of Importance after BR: S,C,P,1,2A,2B,3,4A,4B,5,6A,6B,7,8A,8B ; Result is HIARR("FINAL")
NOTEW	; Noteworthy ; Use YSQANS(question number)=1/2 (True/False) ; YSQANS(question number,"PTR")=pointer to MH QUESTION
SETNOT	;
MODIND	;
CPP	;
SPP	;
CS	;
SCS	;
TOP3	;
FACET	;
RSLWRN	; Result warning
NTWRTHY	;
RESP	;
RPTBLK(ANS,SCALSTR)	;
RPTBLK1(ANS,SCALSTR)	;
MAKSTR(TXT,LEN,JUST,CHAR)	; ; TXT =Text ; LEN =Total Len ; JUST=R/L Justified, def=R ; CHAR=Char PAD, def=" "
MAKGRP(NUM,MAX)	; ; String of "*" for graph
YSARRAY(YSARRAY)	;

Name	Field # of Occurrence
$$GET1^DIQ	INVRPT+14, INVSCL+4, EXTANS+7, HIGHPT+6, ELEV+5, ELEV+12, FACET+6
LDSCORES^YTSCORE	DATA1+6
^YTSMCMIA	DATA1+5
$$BRFIX^YTSMCMIA	EXTRSL+6, EX2+6
INICOD^YTSMCMIB	DLLSTR+8
YSQ^YTSMCMIB	DLLSTR+11
INIBRS^YTSMCMIC	DLLSTR+9
INIPRS^YTSMCMID	DLLSTR+10

Name	Line Occurrences
Function Call: WRITE	Prompt: rsl Line Location: DATA1+7
Function Call: WRITE	Prompt: > Line Location: INVRPT+5
Function Call: WRITE	Prompt: Scale Line Location: CALCW+0

FileNo	Call Tags
^YTT(601.75 - [#601.75]	GET1^DIQ
^YTT(601.87 - [#601.87]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EXTRSL+3, EXTRSL+4, YSARRAY+4, YSARRAY+5, YSARRAY+6
^YTT(601.72 - [#601.72]	NTWRTHY+12, NTWRTHY+13
^YTT(601.75 - [#601.75]	YSARRAY+15
^YTT(601.85 - [#601.85]	YSARRAY+10, YSARRAY+12, YSARRAY+14, YSARRAY+15
^YTT(601.91 - [#601.91]	YSARRAY+7, YSARRAY+8
^YTT(601.92 - [#601.92]	EX2+3, EX2+4

Name	Line Occurrences
$$INVRPT	DATA1+9
$$MAKGRP	TOP3+15, RPTBLK+8, RPTBLK1+9
$$MAKSTR	TOP3+7, TOP3+11, TOP3+12, TOP3+13, TOP3+14, FACET+8, FACET+12, FACET+15, FACET+16, FACET+17 , NTWRTHY+9, RESP+7, RPTBLK+4, RPTBLK+6, RPTBLK+7, RPTBLK1+4, RPTBLK1+6, RPTBLK1+7, RPTBLK1+8, MAKGRP+5 , MAKGRP+8
BRADJH	DATA1+8
CPP	DLLSTR+16
CS	DLLSTR+18
DATA1	DLLSTR+12
ELEV	DATA1+12
EX2	EXTRSL+9
EXTANS	DATA1+4, DATA1+8
EXTRSL	DATA1+8
FACET	DLLSTR+21
HIGHPT	DATA1+8
INCNH	DATA1+8
INVALID	DATA1+10
INVDH	DATA1+8
INVSCL	DATA1+11
MODIND	DLLSTR+15
NOTEW	DATA1+13
NTWRTHY	DLLSTR+23
RESP	DLLSTR+24
RPTBLK	MODIND+4
RPTBLK1	CPP+4, SPP+4, CS+4, SCS+4
RSLWRN	DLLSTR+22
SCS	DLLSTR+19
SETNOT	NOTEW+6, NOTEW+10, NOTEW+14, NOTEW+17, NOTEW+20, NOTEW+23, NOTEW+26, NOTEW+29, NOTEW+32, NOTEW+35 , NOTEW+38, NOTEW+41, NOTEW+44
SPP	DLLSTR+17
TOP3	DLLSTR+20
WADD	CALCW+4

Name	Field # of Occurrence
A	BRADJH+1~, BRADJH+4*, BRADJH+7
ACC	BRADJH+1~
ADD	WADD+1~, WADD+4*, WADD+5
ANS	EXTANS+3~, EXTANS+7, EXTANS+9, EXTANS+11, SETNOT+4, SETNOT+6, MODIND+1~, MODIND+2, MODIND+4, CPP+1~ , CPP+2, CPP+4, SPP+1~, SPP+2, SPP+4, CS+1~, CS+2, CS+4, SCS+1~, SCS+2* , SCS+4, TOP3+1~, TOP3+2, TOP3+17, FACET+4, FACET+19, RSLWRN+10, NTWRTHY+3, NTWRTHY+16, RESP+1~ , RESP+2, RESP+4, RESP+8, RPTBLK~, RPTBLK+9, RPTBLK1~, RPTBLK1+10
BR	EXTRSL+2~, EXTRSL+6, EX2+6, EX2+7, ELEV+3~, ELEV+6, ELEV+7, ELEV+8, ELEV+10, ELEV+15 , MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+10, TOP3+14, TOP3+15, FACET+13 , FACET+14, FACET+17, RPTBLK+5, RPTBLK+7, RPTBLK+8, RPTBLK1+5, RPTBLK1+8, RPTBLK1+9
CAT	NOTEW+3~, NOTEW+5, NOTEW+9, NOTEW+13, NOTEW+16, NOTEW+19, NOTEW+22, NOTEW+25, NOTEW+28, NOTEW+31* , NOTEW+34, NOTEW+37, NOTEW+40, NOTEW+43, SETNOT+5, NTWRTHY+1~, NTWRTHY+6*, NTWRTHY+7
CATTOT	NOTEW+3~, NOTEW+5, NOTEW+7, NOTEW+9, NOTEW+11, SETNOT+6*
CC	BRADJH+1~, BRADJH+5*, BRADJH+7
CHAR	MAKSTR~, MAKSTR+8*, MAKSTR+13, MAKSTR+15
CHK	INVRPT+9~, INVRPT+12, INVRPT+17, INVRPT+18, INVRPT+22, INVRPT+24, INVRPT+25, INVRPT+27, INVRPT+37, INVRPT+38 , SETNOT+1~, SETNOT+2, SETNOT+3, SETNOT+4
CNT	DLLSTR+3~, INVSCL+2~, INVSCL+5, INVSCL+10, INVSCL+11, ELEV+3~, ELEV+10, ELEV+13, ELEV+16, NOTEW+3~ , NOTEW+4, NOTEW+7, NOTEW+8, NOTEW+11, NOTEW+12, NOTEW+15, NOTEW+18, NOTEW+21, NOTEW+24, NOTEW+27 , NOTEW+30, NOTEW+33, NOTEW+36, NOTEW+39, NOTEW+42*, SETNOT+5, SETNOT+6
DATA	EXTANS+3~, EXTANS+6*, EXTANS+7, EXTANS+8
DONE	INVALID+2~, INVALID+3, INVALID+4, INVALID+5, HIGHPT+2~, HIGHPT+11, HIGHPT+12, HIGHPT+13, HIGHPT+17
G	EXTRSL+2~, EX2+4, EX2+5, EX2+6, YSARRAY+1~, YSARRAY+8, YSARRAY+9
GCOD	FACET+1~, FACET+10*, FACET+11
GRP	MAKGRP+2~, MAKGRP+4, MAKGRP+5, MAKGRP+8, MAKGRP+9
GRPH	MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+15, RPTBLK+8, RPTBLK1+9*
GRSHIT	DLLSTR+6~, FACET+4, FACET+14, RSLWRN+4
GSCAL	FACET+1~, FACET+11*, FACET+12, FACET+13
HD	TOP3+1~, TOP3+6, TOP3+9, TOP3+10
HI	HIGHPT+2~
HI(	HIGHPT+10*, HIGHPT+12, HIGHPT+13
HIARR	DLLSTR+3~, TOP3+3
HIARR("FINAL"	ELEV+16, ELEV+19, ELEV+20, ELEV+23, TOP3+5, TOP3+6, TOP3+8, TOP3+9
HIARR("RSL"	ELEV+8*, ELEV+10, ELEV+15
HIHIT	DLLSTR+6~, TOP3+2, TOP3+6, RSLWRN+3
I	INVRPT+9~, INVRPT+13, INVRPT+14, INVRPT+23, INVRPT+24, INVALID+2~, INVALID+4, INVALID+5, INVSCL+2~, INVSCL+3 , INVSCL+4, EXTRSL+2~, EXTRSL+3, EXTRSL+4, EXTRSL+8, HIGHPT+2~, HIGHPT+5, HIGHPT+6, HIGHPT+11, HIGHPT+16 , HIGHPT+17, ELEV+3~, ELEV+4, ELEV+5, ELEV+11, ELEV+12, ELEV+18, ELEV+19, ELEV+20, ELEV+23 , MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, FACET+1~, FACET+5, FACET+6, NTWRTHY+1~ , NTWRTHY+5, NTWRTHY+6, NTWRTHY+8, NTWRTHY+10, RESP+1~, RESP+5, RESP+6, RESP+7, RPTBLK+2, RPTBLK+3 , RPTBLK1+2, RPTBLK1+3, YSARRAY+4*, YSARRAY+5, YSARRAY+6
II	INVSCL+2~, INVSCL+8, INVSCL+9, FACET+1~, FACET+9, FACET+10, NTWRTHY+1~, NTWRTHY+12, NTWRTHY+13, YSARRAY+1~ , YSARRAY+3, YSARRAY+16*
INVSTR	INVRPT+9~, INVRPT+10, INVRPT+11, INVRPT+18, INVRPT+19, INVRPT+25, INVRPT+38, INVALID~, INVALID+6
J	ELEV+3~, ELEV+21*, ELEV+22, ELEV+23, MAKGRP+2~
JUST	MAKSTR~, MAKSTR+9*, MAKSTR+10, MAKSTR+14
LEN	MAKSTR~, MAKSTR+12, MAKSTR+13, MAKSTR+15, MAKGRP+2~, MAKGRP+3*, MAKGRP+5, MAKGRP+6, MAKGRP+8
MAX	MAKGRP~, MAKGRP+6
>> N	DLLSTR+7, INVALID+6, HIGHPT+1, HIGHPT+19, BRADJH+9, INVDH+3, INCNH+3, CALCW+5, TOP3+17, FACET+19* , RSLWRN+10, NTWRTHY+16, RESP+4, RESP+8, RPTBLK+9, RPTBLK1+10
NCHAR	MAKGRP+2~, MAKGRP+6, MAKGRP+7, MAKGRP+8
NUM	RESP+1~, RESP+6*, RESP+7, MAKGRP~, MAKGRP+4, MAKGRP+6
OMITS	INVSCL+2~, INVSCL+7*, INVSCL+11
PAIR	CALCW+1~, CALCW+3*, CALCW+4, WADD~, WADD+2, WADD+3
PR	EXTRSL+2~, EXTRSL+7, EX2+6, EX2+8, TOP3+10, TOP3+13, FACET+13, FACET+16, RPTBLK1+5*, RPTBLK1+7
PTR	EXTANS+3~, EXTANS+8*, EXTANS+10, EXTANS+11
Q1	WADD+1~, WADD+2*, WADD+4
Q2	WADD+1~, WADD+3*, WADD+4
QANS	NTWRTHY+1~, NTWRTHY+10, NTWRTHY+11, NTWRTHY+14
QPTR	NTWRTHY+1~, NTWRTHY+10*, NTWRTHY+12, NTWRTHY+13
QTXT	NTWRTHY+1~, NTWRTHY+12, NTWRTHY+13, NTWRTHY+14
QUES	INVRPT+9~, INVRPT+24, INVRPT+34, INVRPT+35, INVRPT+36, INVRPT+37, INVSCL+2~, INVSCL+9, EXTANS+8, EXTANS+9 , EXTANS+10, NOTEW+3~, NOTEW+6, NOTEW+10, NOTEW+14, NOTEW+17, NOTEW+20, NOTEW+23, NOTEW+26, NOTEW+29 , NOTEW+32, NOTEW+35, NOTEW+38, NOTEW+41, NOTEW+44, SETNOT+3, SETNOT+4, SETNOT+6, NTWRTHY+1~, NTWRTHY+8* , NTWRTHY+9, NTWRTHY+10, RESP+1~
QUEST	EXTANS+3~
QUESTR	NOTEW+3~
RAW	EXTRSL+2~, EXTRSL+5, EX2+6, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+10* , TOP3+12, FACET+13, FACET+15, RPTBLK+5, RPTBLK+6, RPTBLK1+5*, RPTBLK1+6
RND	MAKGRP+2~, MAKGRP+6*, MAKGRP+7
RSL	INVSCL+2~, INVSCL+9*, INVSCL+10
SCAL	INVRPT+9~, INVRPT+14, INVRPT+15, INVRPT+16, INVRPT+27, INVSCL+2~, INVSCL+4, INVSCL+6, INVSCL+7, INVSCL+8 , INVSCL+9, INVSCL+12, INVSCL+13, INVSCL+14, EXTRSL+2~, EXTRSL+4, EXTRSL+5, EXTRSL+6, EXTRSL+7, EXTRSL+8 , EX2+5, EX2+7, EX2+8, HIGHPT+2~, HIGHPT+6, HIGHPT+7, HIGHPT+9, HIGHPT+12, HIGHPT+13, ELEV+3~ , ELEV+5, ELEV+6, ELEV+8, ELEV+12, ELEV+14, ELEV+15, ELEV+16, ELEV+17, ELEV+20, MODIND+1~ , CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+6, TOP3+7, TOP3+9, TOP3+11, FACET+1~ , FACET+3, FACET+6, FACET+7, FACET+8, RPTBLK+3, RPTBLK+4, RPTBLK+5, RPTBLK1+3, RPTBLK1+4, RPTBLK1+5
SCALC	HIGHPT+2~, HIGHPT+9, HIGHPT+10, HIGHPT+13, HIGHPT+14
SCALCOD	HIGHPT+2~, HIGHPT+4, HIGHPT+14, HIGHPT+15, HIGHPT+16, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~ , TOP3+1~, TOP3+6, TOP3+9, FACET+1~, FACET+7, FACET+10, RPTBLK+3, RPTBLK1+3
SCALF	ELEV+3~, ELEV+22*, ELEV+23
SCALOD	DLLSTR+3~
SCALR	HIGHPT+2~, HIGHPT+7*, HIGHPT+8, HIGHPT+10
SCALSTR	INVRPT+9~, INVSCL+2~, HIGHPT+2~, ELEV+3~, MODIND+1~, MODIND+3, MODIND+4, CPP+1~, CPP+3, CPP+4 , SPP+1~, SPP+3, SPP+4, CS+1~, CS+3, CS+4, SCS+1~, SCS+3*, SCS+4, TOP3+1~ , RPTBLK~, RPTBLK+2, RPTBLK+3, RPTBLK1~, RPTBLK1+2, RPTBLK1+3
SCALXRF	FACET+1~
SCALXRF(	FACET+3*, FACET+11
SCCOD	ELEV+3~
SCCOD(	ELEV+17*, ELEV+22
SCD	ELEV+3~, ELEV+14, ELEV+16, ELEV+20, ELEV+22
SCDF	ELEV+3~, ELEV+22*, ELEV+23
SCLNAM	EXTRSL+2~
SCLNAM(	EXTRSL+8*
SKIPS	INVRPT+9~
SKIPS(	INVRPT+36, INVRPT+37*
STR	EXTANS+3~, MODIND+1~, MODIND+2, CPP+1~, CPP+2, SPP+1~, SPP+2, CS+1~, CS+2, SCS+1~ , SCS+2, TOP3+1~, TOP3+2, TOP3+7, TOP3+11, TOP3+12, TOP3+13, TOP3+14, TOP3+15, TOP3+16* , TOP3+17, FACET+1~, FACET+4, FACET+8, FACET+12, FACET+15, FACET+16, FACET+17, FACET+18, FACET+19 , RSLWRN+1~, RSLWRN+5, RSLWRN+6, RSLWRN+7, RSLWRN+8, RSLWRN+9, RSLWRN+10, NTWRTHY+1~, NTWRTHY+4, NTWRTHY+7 , NTWRTHY+9, NTWRTHY+14, NTWRTHY+15, NTWRTHY+16, RESP+1~, RESP+3, RESP+4, RESP+7, RESP+8, RPTBLK+4* , RPTBLK+6, RPTBLK+7, RPTBLK+8, RPTBLK+9, RPTBLK1+4, RPTBLK1+6, RPTBLK1+7, RPTBLK1+8, RPTBLK1+9, RPTBLK1+10 , MAKSTR+5~, MAKSTR+6, MAKSTR+11, MAKSTR+13, MAKSTR+15, MAKSTR+16, MAKSTR+17, MAKSTR+18
TCNT	TOP3+1~, TOP3+4*, TOP3+5, TOP3+6, TOP3+8, TOP3+9
TCNT2	TOP3+1~, TOP3+8*, TOP3+9
TEXT1	HIGHPT+2~, HIGHPT+3, HIGHPT+16, HIGHPT+18, HIGHPT+19, BRADJH+1~, BRADJH+2, BRADJH+6, BRADJH+7, BRADJH+8* , BRADJH+9, INVDH+1~, INVDH+2, INVDH+3, INCNH+1~, INCNH+2, INCNH+3
TOPN	ELEV+3~, ELEV+9*, ELEV+10, ELEV+13, ELEV+18
TXT	MAKSTR~, MAKSTR+6, MAKSTR+7*, MAKSTR+11, MAKSTR+16
TXTL	MAKSTR+5~, MAKSTR+6*, MAKSTR+12, MAKSTR+13, MAKSTR+15
U	INVRPT+23, INVRPT+24, INVALID+5, INVSCL+8, INVSCL+9, EXTANS+7, EXTANS+8, EXTRSL+5, EXTRSL+6, EXTRSL+7 , EX2+5, EX2+6, ELEV+16, ELEV+20, ELEV+23, SETNOT+6, TOP3+6, TOP3+9, TOP3+10, NTWRTHY+10 , RPTBLK+2, RPTBLK+3, RPTBLK1+2, RPTBLK1+3, YSARRAY+5, YSARRAY+6, YSARRAY+9, YSARRAY+15
VAL	EXTRSL+2~, EXTRSL+4*, EXTRSL+5, EXTRSL+6, EXTRSL+7
X	EXTANS+3~, EXTANS+4, EXTANS+5, EXTANS+6, BRADJH+1~, BRADJH+3*, BRADJH+6
XQUES	INVRPT+9~, INVRPT+21*, INVRPT+23, INVRPT+24
XSCAL	MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~
YBRS	DLLSTR+4~
YBRS(	INVRPT+15, INVSCL+13, EXTRSL+6, EX2+7*, HIGHPT+7, ELEV+6, ELEV+23, FACET+13, RPTBLK+5, RPTBLK1+5
YBRS("A Gener	alized Anxiety" , BRADJH+4
YBRS("CC Majo	r Depression" , BRADJH+5
YPRS	DLLSTR+4~
YPRS(	INVSCL+14, EXTRSL+7, EX2+8*, ELEV+23, FACET+13, RPTBLK1+5
YS	DLLSTR~, DATA1+6
YS("AD"	EX2+1
YSAD	EXTRSL+2~, EX2+1*, EX2+3, YSARRAY+10
YSAI	YSARRAY+1~, YSARRAY+10*, YSARRAY+11, YSARRAY+12, YSARRAY+14, YSARRAY+15
YSAN	YSARRAY+1~, YSARRAY+13, YSARRAY+14, YSARRAY+15*, YSARRAY+16
YSARRAY	YSARRAY~, YSARRAY+2!
YSARRAY(	YSARRAY+16*
YSARRAY("SCALE"	YSARRAY+17*
YSCALE	EXTRSL+2~, EX2+2, EX2+3, EX2+4
YSCALEI	YSARRAY+1~, YSARRAY+5*, YSARRAY+7
YSCALEN	YSARRAY+1~, YSARRAY+6*, YSARRAY+17
YSCALRSL	DLLSTR+3~
YSCNT	DLLSTR+3~
YSCOD	DLLSTR+3~
YSCOD("NAME"	HIGHPT+9, ELEV+14, ELEV+17, FACET+3, FACET+7, RPTBLK+3, RPTBLK1+3
YSDATA	DLLSTR~, DATA1+6
YSDATA(	INVALID+4, INVALID+5, INVALID+6, EXTANS+5, EXTANS+6, HIGHPT+19, BRADJH+9, INVDH+3, INCNH+3, CALCW+5* , TOP3+17, FACET+19, RSLWRN+10, NTWRTHY+16, RESP+4, RESP+8, RPTBLK+9, RPTBLK1+10
YSIND	DLLSTR+3~
YSINVRPT	DLLSTR+3~, DATA1+9*, DATA1+10
YSKEYI	YSARRAY+1~, YSARRAY+7*, YSARRAY+8
YSNOGRPH	DLLSTR+3~, INVALID+7*, MAKGRP+4
YSNOTE	DLLSTR+5~, NTWRTHY+2
YSNOTE(	NOTEW+7!, NOTEW+11!, SETNOT+5, SETNOT+6, NTWRTHY+5, NTWRTHY+6, NTWRTHY+8, NTWRTHY+10
YSQANS	DLLSTR+3~, RESP+4
YSQANS(	INVRPT+24, INVRPT+34, INVRPT+35, INVSCL+9, EXTANS+9, EXTANS+10, WADD+2, WADD+3, SETNOT+4, SETNOT+6 , RESP+6
YSQANS2	DLLSTR+3~
YSQANS2(	EXTANS+11*
YSQN	YSARRAY+1~, YSARRAY+9*, YSARRAY+10
YSQSCAL	DLLSTR+3~
YSQSCAL(	INVSCL+8, INVSCL+9
YSQSCAL("X Di	sclosure" , INVRPT+21
YSRAWRSL	DLLSTR+3~
YSRAWRSL(	INVSCL+12, EXTRSL+5, ELEV+23, FACET+13, RPTBLK+5, RPTBLK1+5
YSRAWRSL("V I	nvalidity" , INVRPT+10, INVDH+2
YSRAWRSL("W I	nconsistency" , INVRPT+19, INCNH+2, INCNH+4, CALCW+2, CALCW+5, WADD+5*
YSRAWRSL("X D	isclosure" , INVRPT+11, BRADJH+3
YSTARG	YSARRAY+1~, YSARRAY+9*, YSARRAY+16
YSTRNG	DLLSTR~, DLLSTR+13, DATA1+3
YSVAL	YSARRAY+1~, YSARRAY+9*, YSARRAY+16, YSARRAY+17
ZTXT	MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+7, TOP3+11, TOP3+12, TOP3+13 , TOP3+14, FACET+1~, FACET+8, FACET+12, FACET+15, FACET+16, FACET+17, NTWRTHY+1~, NTWRTHY+9, RPTBLK+4 , RPTBLK+6, RPTBLK+7, RPTBLK1+4, RPTBLK1+6, RPTBLK1+7, RPTBLK1+8

Name

Field # of Occurrence

A

BRADJH+1~, BRADJH+4*, BRADJH+7

ACC

BRADJH+1~

ADD

WADD+1~, WADD+4*, WADD+5

ANS

EXTANS+3~, EXTANS+7*, EXTANS+9, EXTANS+11, SETNOT+4*, SETNOT+6, MODIND+1~, MODIND+2*, MODIND+4, CPP+1~
, CPP+2*, CPP+4, SPP+1~, SPP+2*, SPP+4, CS+1~, CS+2*, CS+4, SCS+1~, SCS+2*
, SCS+4, TOP3+1~, TOP3+2*, TOP3+17, FACET+4*, FACET+19, RSLWRN+10, NTWRTHY+3*, NTWRTHY+16, RESP+1~
, RESP+2*, RESP+4, RESP+8, RPTBLK~, RPTBLK+9, RPTBLK1~, RPTBLK1+10

BR

EXTRSL+2~, EXTRSL+6*, EX2+6*, EX2+7, ELEV+3~, ELEV+6*, ELEV+7, ELEV+8, ELEV+10*, ELEV+15
, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+10*, TOP3+14, TOP3+15, FACET+13*
, FACET+14, FACET+17, RPTBLK+5*, RPTBLK+7, RPTBLK+8, RPTBLK1+5*, RPTBLK1+8, RPTBLK1+9

CAT

NOTEW+3~, NOTEW+5*, NOTEW+9*, NOTEW+13*, NOTEW+16*, NOTEW+19*, NOTEW+22*, NOTEW+25*, NOTEW+28*, NOTEW+31*
, NOTEW+34*, NOTEW+37*, NOTEW+40*, NOTEW+43*, SETNOT+5, NTWRTHY+1~, NTWRTHY+6*, NTWRTHY+7

CATTOT

NOTEW+3~, NOTEW+5*, NOTEW+7, NOTEW+9*, NOTEW+11, SETNOT+6*

CC

BRADJH+1~, BRADJH+5*, BRADJH+7

CHAR

MAKSTR~, MAKSTR+8*, MAKSTR+13, MAKSTR+15

CHK

INVRPT+9~, INVRPT+12*, INVRPT+17*, INVRPT+18, INVRPT+22*, INVRPT+24*, INVRPT+25, INVRPT+27*, INVRPT+37*, INVRPT+38
, SETNOT+1~, SETNOT+2*, SETNOT+3*, SETNOT+4

CNT

DLLSTR+3~, INVSCL+2~, INVSCL+5*, INVSCL+10*, INVSCL+11, ELEV+3~, ELEV+10*, ELEV+13, ELEV+16*, NOTEW+3~
, NOTEW+4*, NOTEW+7, NOTEW+8*, NOTEW+11, NOTEW+12*, NOTEW+15*, NOTEW+18*, NOTEW+21*, NOTEW+24*, NOTEW+27*
, NOTEW+30*, NOTEW+33*, NOTEW+36*, NOTEW+39*, NOTEW+42*, SETNOT+5, SETNOT+6

DATA

EXTANS+3~, EXTANS+6*, EXTANS+7, EXTANS+8

DONE

INVALID+2~, INVALID+3*, INVALID+4, INVALID+5*, HIGHPT+2~, HIGHPT+11*, HIGHPT+12, HIGHPT+13, HIGHPT+17*

G

EXTRSL+2~, EX2+4*, EX2+5, EX2+6, YSARRAY+1~, YSARRAY+8*, YSARRAY+9

GCOD

FACET+1~, FACET+10*, FACET+11

GRP

MAKGRP+2~, MAKGRP+4, MAKGRP+5*, MAKGRP+8*, MAKGRP+9

GRPH

MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+15*, RPTBLK+8*, RPTBLK1+9*

GRSHIT

DLLSTR+6~, FACET+4*, FACET+14*, RSLWRN+4

GSCAL

FACET+1~, FACET+11*, FACET+12, FACET+13

HD

TOP3+1~, TOP3+6*, TOP3+9*, TOP3+10

HI

HIGHPT+2~

HI(

HIGHPT+10*, HIGHPT+12, HIGHPT+13

HIARR

DLLSTR+3~, TOP3+3

HIARR("FINAL"

ELEV+16*, ELEV+19, ELEV+20, ELEV+23*, TOP3+5, TOP3+6, TOP3+8, TOP3+9

HIARR("RSL"

ELEV+8*, ELEV+10, ELEV+15

HIHIT

DLLSTR+6~, TOP3+2*, TOP3+6*, RSLWRN+3

I

INVRPT+9~, INVRPT+13*, INVRPT+14, INVRPT+23*, INVRPT+24, INVALID+2~, INVALID+4*, INVALID+5, INVSCL+2~, INVSCL+3*
, INVSCL+4, EXTRSL+2~, EXTRSL+3*, EXTRSL+4, EXTRSL+8, HIGHPT+2~, HIGHPT+5*, HIGHPT+6, HIGHPT+11*, HIGHPT+16*
, HIGHPT+17, ELEV+3~, ELEV+4*, ELEV+5, ELEV+11*, ELEV+12, ELEV+18*, ELEV+19, ELEV+20, ELEV+23
, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, FACET+1~, FACET+5*, FACET+6, NTWRTHY+1~
, NTWRTHY+5*, NTWRTHY+6, NTWRTHY+8, NTWRTHY+10, RESP+1~, RESP+5*, RESP+6, RESP+7, RPTBLK+2*, RPTBLK+3
, RPTBLK1+2*, RPTBLK1+3, YSARRAY+4*, YSARRAY+5, YSARRAY+6

II

INVSCL+2~, INVSCL+8*, INVSCL+9, FACET+1~, FACET+9*, FACET+10, NTWRTHY+1~, NTWRTHY+12*, NTWRTHY+13, YSARRAY+1~
, YSARRAY+3*, YSARRAY+16*

INVSTR

INVRPT+9~, INVRPT+10*, INVRPT+11*, INVRPT+18*, INVRPT+19*, INVRPT+25*, INVRPT+38*, INVALID~, INVALID+6

J

ELEV+3~, ELEV+21*, ELEV+22, ELEV+23, MAKGRP+2~

JUST

MAKSTR~, MAKSTR+9*, MAKSTR+10, MAKSTR+14

LEN

MAKSTR~, MAKSTR+12, MAKSTR+13, MAKSTR+15, MAKGRP+2~, MAKGRP+3*, MAKGRP+5, MAKGRP+6, MAKGRP+8

MAX

MAKGRP~, MAKGRP+6

>> N

DLLSTR+7*, INVALID+6*, HIGHPT+1*, HIGHPT+19, BRADJH+9*, INVDH+3*, INCNH+3*, CALCW+5*, TOP3+17*, FACET+19*
, RSLWRN+10*, NTWRTHY+16*, RESP+4*, RESP+8*, RPTBLK+9*, RPTBLK1+10*

NCHAR

MAKGRP+2~, MAKGRP+6*, MAKGRP+7*, MAKGRP+8

NUM

RESP+1~, RESP+6*, RESP+7, MAKGRP~, MAKGRP+4, MAKGRP+6

OMITS

INVSCL+2~, INVSCL+7*, INVSCL+11

PAIR

CALCW+1~, CALCW+3*, CALCW+4, WADD~, WADD+2, WADD+3

PR

EXTRSL+2~, EXTRSL+7*, EX2+6*, EX2+8, TOP3+10*, TOP3+13, FACET+13*, FACET+16, RPTBLK1+5*, RPTBLK1+7

PTR

EXTANS+3~, EXTANS+8*, EXTANS+10, EXTANS+11

Q1

WADD+1~, WADD+2*, WADD+4

Q2

WADD+1~, WADD+3*, WADD+4

QANS

NTWRTHY+1~, NTWRTHY+10*, NTWRTHY+11*, NTWRTHY+14

QPTR

NTWRTHY+1~, NTWRTHY+10*, NTWRTHY+12, NTWRTHY+13

QTXT

NTWRTHY+1~, NTWRTHY+12*, NTWRTHY+13*, NTWRTHY+14

QUES

INVRPT+9~, INVRPT+24*, INVRPT+34*, INVRPT+35, INVRPT+36, INVRPT+37, INVSCL+2~, INVSCL+9*, EXTANS+8*, EXTANS+9
, EXTANS+10, NOTEW+3~, NOTEW+6*, NOTEW+10*, NOTEW+14*, NOTEW+17*, NOTEW+20*, NOTEW+23*, NOTEW+26*, NOTEW+29*
, NOTEW+32*, NOTEW+35*, NOTEW+38*, NOTEW+41*, NOTEW+44*, SETNOT+3*, SETNOT+4, SETNOT+6, NTWRTHY+1~, NTWRTHY+8*
, NTWRTHY+9, NTWRTHY+10, RESP+1~

QUEST

EXTANS+3~

QUESTR

NOTEW+3~

RAW

EXTRSL+2~, EXTRSL+5*, EX2+6*, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+10*
, TOP3+12, FACET+13*, FACET+15, RPTBLK+5*, RPTBLK+6, RPTBLK1+5*, RPTBLK1+6

RND

MAKGRP+2~, MAKGRP+6*, MAKGRP+7

RSL

INVSCL+2~, INVSCL+9*, INVSCL+10

SCAL

INVRPT+9~, INVRPT+14*, INVRPT+15*, INVRPT+16, INVRPT+27*, INVSCL+2~, INVSCL+4*, INVSCL+6, INVSCL+7, INVSCL+8
, INVSCL+9, INVSCL+12, INVSCL+13, INVSCL+14, EXTRSL+2~, EXTRSL+4*, EXTRSL+5, EXTRSL+6, EXTRSL+7, EXTRSL+8
, EX2+5*, EX2+7, EX2+8, HIGHPT+2~, HIGHPT+6*, HIGHPT+7, HIGHPT+9, HIGHPT+12*, HIGHPT+13, ELEV+3~
, ELEV+5*, ELEV+6, ELEV+8, ELEV+12*, ELEV+14, ELEV+15, ELEV+16, ELEV+17*, ELEV+20*, MODIND+1~
, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+6*, TOP3+7, TOP3+9*, TOP3+11, FACET+1~
, FACET+3*, FACET+6*, FACET+7, FACET+8, RPTBLK+3*, RPTBLK+4, RPTBLK+5, RPTBLK1+3*, RPTBLK1+4, RPTBLK1+5

SCALC

HIGHPT+2~, HIGHPT+9*, HIGHPT+10, HIGHPT+13*, HIGHPT+14

SCALCOD

HIGHPT+2~, HIGHPT+4*, HIGHPT+14*, HIGHPT+15*, HIGHPT+16, MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~
, TOP3+1~, TOP3+6*, TOP3+9*, FACET+1~, FACET+7*, FACET+10, RPTBLK+3*, RPTBLK1+3*

SCALF

ELEV+3~, ELEV+22*, ELEV+23

SCALOD

DLLSTR+3~

SCALR

HIGHPT+2~, HIGHPT+7*, HIGHPT+8, HIGHPT+10

SCALSTR

INVRPT+9~, INVSCL+2~, HIGHPT+2~, ELEV+3~, MODIND+1~, MODIND+3*, MODIND+4, CPP+1~, CPP+3*, CPP+4
, SPP+1~, SPP+3*, SPP+4, CS+1~, CS+3*, CS+4, SCS+1~, SCS+3*, SCS+4, TOP3+1~
, RPTBLK~, RPTBLK+2, RPTBLK+3, RPTBLK1~, RPTBLK1+2, RPTBLK1+3

SCALXRF

FACET+1~

SCALXRF(

FACET+3*, FACET+11

SCCOD

ELEV+3~

SCCOD(

ELEV+17*, ELEV+22

SCD

ELEV+3~, ELEV+14*, ELEV+16, ELEV+20*, ELEV+22

SCDF

ELEV+3~, ELEV+22*, ELEV+23

SCLNAM

EXTRSL+2~

SCLNAM(

EXTRSL+8*

SKIPS

INVRPT+9~

SKIPS(

INVRPT+36, INVRPT+37*

STR

EXTANS+3~, MODIND+1~, MODIND+2*, CPP+1~, CPP+2*, SPP+1~, SPP+2*, CS+1~, CS+2*, SCS+1~
, SCS+2*, TOP3+1~, TOP3+2*, TOP3+7*, TOP3+11*, TOP3+12*, TOP3+13*, TOP3+14*, TOP3+15*, TOP3+16*
, TOP3+17, FACET+1~, FACET+4*, FACET+8*, FACET+12*, FACET+15*, FACET+16*, FACET+17*, FACET+18*, FACET+19
, RSLWRN+1~, RSLWRN+5*, RSLWRN+6*, RSLWRN+7*, RSLWRN+8*, RSLWRN+9*, RSLWRN+10, NTWRTHY+1~, NTWRTHY+4*, NTWRTHY+7*
, NTWRTHY+9*, NTWRTHY+14*, NTWRTHY+15*, NTWRTHY+16, RESP+1~, RESP+3*, RESP+4*, RESP+7*, RESP+8, RPTBLK+4*
, RPTBLK+6*, RPTBLK+7*, RPTBLK+8*, RPTBLK+9, RPTBLK1+4*, RPTBLK1+6*, RPTBLK1+7*, RPTBLK1+8*, RPTBLK1+9*, RPTBLK1+10
, MAKSTR+5~, MAKSTR+6*, MAKSTR+11*, MAKSTR+13*, MAKSTR+15*, MAKSTR+16*, MAKSTR+17*, MAKSTR+18

TCNT

TOP3+1~, TOP3+4*, TOP3+5, TOP3+6, TOP3+8, TOP3+9

TCNT2

TOP3+1~, TOP3+8*, TOP3+9

TEXT1

HIGHPT+2~, HIGHPT+3*, HIGHPT+16*, HIGHPT+18*, HIGHPT+19, BRADJH+1~, BRADJH+2*, BRADJH+6*, BRADJH+7*, BRADJH+8*
, BRADJH+9, INVDH+1~, INVDH+2*, INVDH+3, INCNH+1~, INCNH+2*, INCNH+3

TOPN

ELEV+3~, ELEV+9*, ELEV+10, ELEV+13, ELEV+18

TXT

MAKSTR~, MAKSTR+6, MAKSTR+7*, MAKSTR+11, MAKSTR+16

TXTL

MAKSTR+5~, MAKSTR+6*, MAKSTR+12, MAKSTR+13, MAKSTR+15

U

INVRPT+23, INVRPT+24, INVALID+5, INVSCL+8, INVSCL+9, EXTANS+7, EXTANS+8, EXTRSL+5, EXTRSL+6, EXTRSL+7
, EX2+5, EX2+6, ELEV+16, ELEV+20, ELEV+23, SETNOT+6, TOP3+6, TOP3+9, TOP3+10, NTWRTHY+10
, RPTBLK+2, RPTBLK+3, RPTBLK1+2, RPTBLK1+3, YSARRAY+5, YSARRAY+6, YSARRAY+9, YSARRAY+15

VAL

EXTRSL+2~, EXTRSL+4*, EXTRSL+5, EXTRSL+6, EXTRSL+7

X

EXTANS+3~, EXTANS+4*, EXTANS+5*, EXTANS+6, BRADJH+1~, BRADJH+3*, BRADJH+6

XQUES

INVRPT+9~, INVRPT+21*, INVRPT+23, INVRPT+24

XSCAL

MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~

YBRS

DLLSTR+4~

YBRS(

INVRPT+15, INVSCL+13*, EXTRSL+6*, EX2+7*, HIGHPT+7, ELEV+6, ELEV+23, FACET+13, RPTBLK+5, RPTBLK1+5

YBRS("A Gener

alized Anxiety" , BRADJH+4

YBRS("CC Majo

r Depression" , BRADJH+5

YPRS

DLLSTR+4~

YPRS(

INVSCL+14*, EXTRSL+7*, EX2+8*, ELEV+23, FACET+13, RPTBLK1+5

YS

DLLSTR~, DATA1+6

YS("AD"

EX2+1

YSAD

EXTRSL+2~, EX2+1*, EX2+3, YSARRAY+10

YSAI

YSARRAY+1~, YSARRAY+10*, YSARRAY+11, YSARRAY+12, YSARRAY+14, YSARRAY+15

YSAN

YSARRAY+1~, YSARRAY+13*, YSARRAY+14*, YSARRAY+15*, YSARRAY+16

YSARRAY

YSARRAY~, YSARRAY+2!

YSARRAY(

YSARRAY+16*

YSARRAY("SCALE"

YSARRAY+17*

YSCALE

EXTRSL+2~, EX2+2*, EX2+3*, EX2+4

YSCALEI

YSARRAY+1~, YSARRAY+5*, YSARRAY+7

YSCALEN

YSARRAY+1~, YSARRAY+6*, YSARRAY+17

YSCALRSL

DLLSTR+3~

YSCNT

DLLSTR+3~

YSCOD

DLLSTR+3~

YSCOD("NAME"

HIGHPT+9, ELEV+14, ELEV+17, FACET+3, FACET+7, RPTBLK+3, RPTBLK1+3

YSDATA

DLLSTR~, DATA1+6

YSDATA(

INVALID+4, INVALID+5*, INVALID+6*, EXTANS+5, EXTANS+6, HIGHPT+19*, BRADJH+9*, INVDH+3*, INCNH+3*, CALCW+5*
, TOP3+17*, FACET+19*, RSLWRN+10*, NTWRTHY+16*, RESP+4*, RESP+8*, RPTBLK+9*, RPTBLK1+10*

YSIND

DLLSTR+3~

YSINVRPT

DLLSTR+3~, DATA1+9*, DATA1+10

YSKEYI

YSARRAY+1~, YSARRAY+7*, YSARRAY+8

YSNOGRPH

DLLSTR+3~, INVALID+7*, MAKGRP+4

YSNOTE

DLLSTR+5~, NTWRTHY+2

YSNOTE(

NOTEW+7!, NOTEW+11!, SETNOT+5*, SETNOT+6*, NTWRTHY+5, NTWRTHY+6, NTWRTHY+8, NTWRTHY+10

YSQANS

DLLSTR+3~, RESP+4

YSQANS(

INVRPT+24, INVRPT+34, INVRPT+35, INVSCL+9, EXTANS+9*, EXTANS+10*, WADD+2, WADD+3, SETNOT+4, SETNOT+6
, RESP+6

YSQANS2

DLLSTR+3~

YSQANS2(

EXTANS+11*

YSQN

YSARRAY+1~, YSARRAY+9*, YSARRAY+10

YSQSCAL

DLLSTR+3~

YSQSCAL(

INVSCL+8, INVSCL+9

YSQSCAL("X Di

sclosure" , INVRPT+21

YSRAWRSL

DLLSTR+3~

YSRAWRSL(

INVSCL+12*, EXTRSL+5*, ELEV+23, FACET+13, RPTBLK+5, RPTBLK1+5

YSRAWRSL("V I

nvalidity" , INVRPT+10, INVDH+2

YSRAWRSL("W I

nconsistency" , INVRPT+19, INCNH+2, INCNH+4*, CALCW+2*, CALCW+5, WADD+5*

YSRAWRSL("X D

isclosure" , INVRPT+11, BRADJH+3

YSTARG

YSARRAY+1~, YSARRAY+9*, YSARRAY+16

YSTRNG

DLLSTR~, DLLSTR+13, DATA1+3

YSVAL

YSARRAY+1~, YSARRAY+9*, YSARRAY+16, YSARRAY+17

ZTXT

MODIND+1~, CPP+1~, SPP+1~, CS+1~, SCS+1~, TOP3+1~, TOP3+7*, TOP3+11*, TOP3+12*, TOP3+13*
, TOP3+14*, FACET+1~, FACET+8*, FACET+12*, FACET+15*, FACET+16*, FACET+17*, NTWRTHY+1~, NTWRTHY+9*, RPTBLK+4*
, RPTBLK+6*, RPTBLK+7*, RPTBLK1+4*, RPTBLK1+6*, RPTBLK1+7*, RPTBLK1+8*

Customize PDF page

Package: Mental Health

Routine: YTSMCMI4

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed