YTSYMRS ;BAL/KTL - Score YMRS ; 10/14/18 2:02pm
Source file <YTSYMRS.m>
Package | Total | Call Graph |
---|---|---|
Mental Health | 1 | LDSCORES^YTSCORE |
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 |
---|---|---|
DLLSTR(YSDATA,YS,YSTRNG) | ; compute scores or report text based on YSTRNG
; input ; YSDATA(2)=adminId^patientDFN^instrumentName^dateGiven^isComplete ; YSDATA(2+n)=questionId^sequence^choiceId ; YS("AD")=adminId ; YSTRNG=1 for score, 2 for report ; output if YSTRNG=1: ^TMP($J,"YSCOR",n)=scaleId=score ; output if YSTRNG=2: append special "answers" to YSDATA |
|
SCORESV | ; calculate the score
; expects YSDATA from DLLSTR |
|
REPORT(YSDATA) | ; build the numerical answer array for the report
; expects ^TMP($J,"YSCOR",...) and ^TMP($J,"YSG") from DLLSTR ; YSDATA from DLLSTR ; Question IEN = 9396-9406 ; Answer array = 7771-7781 |
Name | Line Occurrences |
---|---|
REPORT | DLLSTR+13 |
SCORESV | DLLSTR+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
LEVEL | DLLSTR+11~ |
N | DLLSTR+11~, REPORT+5~, REPORT+6*, REPORT+13*, REPORT+14* |
SCORE | SCORESV+2~, SCORESV+9*, SCORESV+10*, SCORESV+18 |
SCOREVAL | DLLSTR+11~ |
TMPYS | REPORT+5~, REPORT+15 |
TMPYS( | REPORT+13*, REPORT+14* |
U | SCORESV+5, SCORESV+8, SCORESV+18, REPORT+9, REPORT+10, REPORT+14 |
YS | DLLSTR~, DLLSTR+12 |
YSDATA | DLLSTR~, DLLSTR+12, DLLSTR+13, REPORT~, REPORT+15* |
YSDATA( | SCORESV+4, SCORESV+5, REPORT+8, REPORT+9, REPORT+10 |
YSDATA("" | REPORT+6 |
YSTRNG | DLLSTR~, DLLSTR+9, DLLSTR+10 |
YTANS | REPORT+5~, REPORT+11*, REPORT+13, REPORT+14 |
YTCHC | SCORESV+2~, SCORESV+5*, SCORESV+6, SCORESV+8, REPORT+5~, REPORT+10*, REPORT+12, REPORT+13, REPORT+14 |
YTCNT | SCORESV+2~, SCORESV+3*, SCORESV+7*, SCORESV+9, REPORT+5~, REPORT+7* |
YTI | SCORESV+2~, SCORESV+4*, SCORESV+5, REPORT+5~, REPORT+8*, REPORT+9, REPORT+10 |
YTQUE | REPORT+5~, REPORT+9*, REPORT+11 |
YTRAW | SCORESV+2~, SCORESV+3*, SCORESV+8*, SCORESV+10, REPORT+5~, REPORT+7* |