YTSRAID ;SLC/DJE- ANSWERS SPECIAL HANDLING - WHOQOL-BREF ; 10/16/18 9:35am
Source file <YTSRAID.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 |
| 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 |
| I | DATA1+4~, DATA1+6*, DATA1+8, BUILDANS+1~ |
| LINE | DATA1+2~, DATA1+3* |
| 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, DATA1+16 |
| RAWTYPE | DATA1+4~, DATA1+5*, DATA1+12, DATA1+14 |
| SCALE | DATA1+4~, DATA1+5*, DATA1+15, DATA1+16 |
| SCALEIEN | SCORESV+11~, SCORESV+13*, SCORESV+14 |
| SCORE | DATA1~, SCORESV~, DLLSTR+3~, DLLSTR+5, BUILDANS+1~ |
| SCORE( | DATA1+16*, SCORESV+14 |
| SKIP | DATA1+2~ |
| SKIP( | DATA1+15* |
| TEXT | DATA1+2~, DATA1+3*, DATA1+5 |
| TSARR | DLLSTR+3~, DLLSTR+7, BUILDANS~ |
| TSARR("RAID T | otal Score" , BUILDANS+4 |
| U | DATA1+6, DATA1+8, DATA1+12, DATA1+14, BUILDANS+4 |
| 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* |
| YSDATA("" | BUILDANS+4 |
| YSDATA(4 | BUILDANS+3* |
| YSGNODE | SCORESV+1~, SCORESV+10*, SCORESV+12, SCORESV+13 |
| YSTRNG | DLLSTR~, DLLSTR+5, DLLSTR+7 |
| Name | Field # of Occurrence |
|---|---|
| $T(SCOREDAT+LINE | DATA1+3 |