YTSCSSR2 ;ISP/LMT - C-SSRS_V2 Report ;Aug 06, 2025@12:06:28
Source file <YTSCSSR2.m>
| 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 |
|---|---|---|
| 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 |
|
| REPORT(YSDATA,YS) | ; Add Interpretation to report
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | REPORT+20!, REPORT+22, REPORT+23, REPORT+24, REPORT+26! |
| Name | Line Occurrences |
|---|---|
| REPORT | DLLSTR+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| YS | DLLSTR~, DLLSTR+11, REPORT~, REPORT+21 |
| YSDATA | DLLSTR~, DLLSTR+9, DLLSTR+11, REPORT~, REPORT+21 |
| YSDATA( | REPORT+36* |
| YSDATA("" | REPORT+35 |
| YSHIGH | REPORT+2~, REPORT+13*, REPORT+14*, REPORT+15*, REPORT+16*, REPORT+33 |
| YSI | REPORT+2~, REPORT+22*, REPORT+23, REPORT+24 |
| YSINTERP | REPORT+2~, REPORT+29*, REPORT+30*, REPORT+31*, REPORT+32*, REPORT+33*, REPORT+36 |
| YSLOW | REPORT+2~, REPORT+7*, REPORT+8*, REPORT+9*, REPORT+31 |
| YSMOD | REPORT+2~, REPORT+10*, REPORT+11*, REPORT+12*, REPORT+32 |
| YSN | REPORT+2~, REPORT+35*, REPORT+36 |
| YSNAME | REPORT+2~, REPORT+23*, REPORT+25 |
| YSNONE | REPORT+2~, REPORT+5*, REPORT+6*, REPORT+30 |
| YSSCORE | REPORT+2~, REPORT+19*, REPORT+25*, REPORT+30, REPORT+31, REPORT+32, REPORT+33 |
| YSTRNG | DLLSTR~, DLLSTR+9, DLLSTR+11 |
| YSVALUE | REPORT+2~, REPORT+24*, REPORT+25 |