YTSCOPD ;SLC/DJE- ANSWERS SPECIAL HANDLING - WHOQOL-BREF ; 10/16/18 9:35am
Source file <YTSCOPD.m>
Package | Total | Call Graph |
---|---|---|
Mental Health | 1 | LDTSCOR^YTSCORE |
VA FileMan | 1 | $$GET1^DIQ |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Mental Health | 1 | ^YTT(601.71 |
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) | ;
|
FileNo | Call Tags |
---|---|
^YTT(601.75 - [#601.75] | GET1^DIQ |
^YTT(601.87 - [#601.87] | GET1^DIQ |
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* |
Name | Line Occurrences |
---|---|
BUILDANS | DLLSTR+7 |
DATA1 | DLLSTR+5 |
SCORESV | DLLSTR+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATA | DATA1+7~, DATA1+9*, DATA1+12, DATA1+14, BUILDANS+4~*, BUILDANS+5 |
I | DATA1+4~, DATA1+6*, DATA1+8, BUILDANS+1~, BUILDANS+3*, BUILDANS+4, BUILDANS+5 |
LINE | DATA1+2~, DATA1+3* |
>> N | BUILDANS+5*, BUILDANS+8* |
NODE | DATA1+7~, DATA1+8*, DATA1+9 |
QUESTIONS | DATA1+4~, DATA1+5*, DATA1+6, DATA1+8 |
RAW | DATA1+7~, DATA1+12*, DATA1+14*, DATA1+15 |
RAWTYPE | DATA1+4~, DATA1+5*, DATA1+12, DATA1+14 |
SCALE | DATA1+4~, DATA1+5*, DATA1+15, BUILDANS+1~, BUILDANS+6*, BUILDANS+7 |
SCALEIEN | SCORESV+11~, SCORESV+13*, SCORESV+14 |
SCORE | DATA1~, SCORESV~, DLLSTR+3~, DLLSTR+5 |
SCORE( | DATA1+15*, SCORESV+14 |
STRING1 | BUILDANS+1~, BUILDANS+7*, BUILDANS+8 |
TEXT | DATA1+2~, DATA1+3*, DATA1+5 |
TSARR | DLLSTR+3~, DLLSTR+7, BUILDANS~ |
TSARR( | BUILDANS+7 |
TSARR("" | BUILDANS+6 |
U | DATA1+6, DATA1+8, DATA1+12, DATA1+14, BUILDANS+5, BUILDANS+7 |
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+8* |
YSGNODE | SCORESV+1~, SCORESV+10*, SCORESV+12, SCORESV+13 |
YSTRNG | DLLSTR~, DLLSTR+5, DLLSTR+7 |
Name | Field # of Occurrence |
---|---|
$T(SCOREDAT+LINE | DATA1+3 |