Routine: YTSWHOQO

Information

YTSWHOQO ;SLC/DJE- ANSWERS SPECIAL HANDLING - WHOQOL-BREF ; 10/16/18 9:35am

Call Graph

Call Graph Total: 2

Package	Total	Call Graph
Mental Health	1	LDTSCOR^YTSCORE
VA FileMan	1	$$GET1^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Mental Health	1	^YTT(601.71

Entry Points

Name	Comments	DBIA/ICR reference
DATA1(SCORE)	;expects YSDATA, returns SCORE, multiple scales so we use nodes i.e. SCORE(SCALEIEN)=###
SCOREDAT	; SCALE IEN\|RAW RETRIEVAL METHOD\|QUES#^QUES#...
SCORESV(SCORE)	;Expects SCORE to be in format SCORE(SCALE_IEN)=###. Also expects ^TMP($J,"YSG")
DLLSTR(YSDATA,YS,YSTRNG)	; ; YSTRNG = 1 Score Instrument ; YSTRNG = 2 get Report Answers and Text
BUILDANS(TSARR,YSDATA)	;
GETTRANS(RAW,SCOREIDX)	; get the transformed score given a score's raw #
TABLE	; Transform scores data Score^low score\|range ; Domain 1 Physical Health^7\|28 ; Domain 2 Psychological^6\|24 ; Domain 3 Social Relationships^3\|12 ; Domain 4 Environment^8\|32

External References

Name	Field # of Occurrence
$$GET1^DIQ	DATA1+12, SCORESV+14
LDTSCOR^YTSCORE	DLLSTR+7

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	SCORESV+2, SCORESV+3!, SCORESV+4, SCORESV+5, SCORESV+7!, SCORESV+8, SCORESV+10, SCORESV+12, SCORESV+13, SCORESV+14

Label References

Name	Line Occurrences
$$GETTRANS	DATA1+39
BUILDANS	DLLSTR+7
DATA1	DLLSTR+5
SCORESV	DLLSTR+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DATA	DATA1+7~, DATA1+9*, DATA1+12
I	DATA1+2~, DATA1+4~, DATA1+6, DATA1+8, DATA1+36, DATA1+37, DATA1+39, DATA1+40, BUILDANS+1~, BUILDANS+7* , BUILDANS+15*
LINE	DATA1+2~, DATA1+3*
LOW	GETTRANS+1~, GETTRANS+4*, GETTRANS+5
>> N	BUILDANS+2, BUILDANS+4, BUILDANS+5, BUILDANS+15
NEWVAL	DATA1+2~, DATA1+22, DATA1+32
NODE	DATA1+7~, DATA1+8*, DATA1+9
QUESTIONS	DATA1+4~, DATA1+5*, DATA1+6, DATA1+8
RANGE	GETTRANS+1~, GETTRANS+4*, GETTRANS+5
RAW	DATA1+2~, DATA1+12, DATA1+13, DATA1+14, DATA1+21, DATA1+22, DATA1+23, DATA1+31, DATA1+32, DATA1+33 , DATA1+37, DATA1+38, DATA1+39, DATA1+40, BUILDANS+9~, BUILDANS+11*, BUILDANS+12, BUILDANS+14, GETTRANS~, GETTRANS+5
RAWTYPE	DATA1+4~, DATA1+5*, DATA1+12
RETURN	GETTRANS+1~, GETTRANS+5, GETTRANS+6, GETTRANS+7
SCALE	DATA1+2~, DATA1+5, DATA1+13, DATA1+14, DATA1+17, DATA1+18*, DATA1+19, DATA1+25, DATA1+27, DATA1+29
SCALEIEN	SCORESV+11~, SCORESV+13*, SCORESV+14
SCORE	DATA1~, SCORESV~, DLLSTR+3~, DLLSTR+5, BUILDANS+1~, BUILDANS+8*, BUILDANS+11, BUILDANS+13
SCORE(	DATA1+14*, SCORESV+14
SCORE(883	DATA1+37, DATA1+40*
SCORE(884	DATA1+20, DATA1+21, DATA1+23
SCORE(885	DATA1+25*
SCORE(886	DATA1+27*
SCORE(887	DATA1+30, DATA1+31, DATA1+33
SCOREIDX	GETTRANS~
SKIP	DATA1+2~
SKIP(	DATA1+13*, DATA1+18
SKIP(884	DATA1+20
SKIP(887	DATA1+30
TEXT	DATA1+2~, DATA1+3, DATA1+5, BUILDANS+9~, BUILDANS+12, BUILDANS+14, BUILDANS+15, GETTRANS+1~, GETTRANS+2, GETTRANS+3 , GETTRANS+4
TRANSFORM	DATA1+2~, DATA1+39, DATA1+40, BUILDANS+9~, BUILDANS+13, BUILDANS+14
TSARR	DLLSTR+3~, DLLSTR+7, BUILDANS~
TSARR(	BUILDANS+11, BUILDANS+13
TSARR("GenHealth"	BUILDANS+5
TSARR("QoL"	BUILDANS+4
U	DATA1+6, DATA1+8, DATA1+12, DATA1+40, BUILDANS+4, BUILDANS+5, BUILDANS+11, BUILDANS+13, GETTRANS+2
YS	DLLSTR~
YS("AD"	DLLSTR+7
YSCORNODE	SCORESV+1~, SCORESV+9, SCORESV+14, SCORESV+15
YSDATA	DLLSTR~, DLLSTR+7, BUILDANS~
YSDATA(	DATA1+9, BUILDANS+4, BUILDANS+5, BUILDANS+15*
YSGNODE	SCORESV+1~, SCORESV+10*, SCORESV+12, SCORESV+13
YSTRNG	DLLSTR~, DLLSTR+5, DLLSTR+7

Marked Items

Name	Field # of Occurrence
$T(SCOREDAT+LINE	DATA1+3
$T(TABLE+SCOREIDX	GETTRANS+2

Customize PDF page

Package: Mental Health