YTSALSQL ;ISP/LMT - Score ALSSQOL-SF ;Jul 03, 2024@16:08:53
Source file <YTSALSQL.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 |
|
| SCORESV(YSDATA) | ; calculate the score
; expects YSDATA from DLLSTR (YSDATA from LOADANSW^YTSCORE,SCALEG^YTQAPI3) |
|
| MAPPING | ;Map question IDs to scales; Constant^Scale Name^Scale ID^Questions IDs
|
|
| REPORT(YSRETURN) | ; build the scoring display for the report
; expects ^TMP($J,"YSCOR",...) and ^TMP($J,"YSG") from DLLSTR ; YSDATA from DLLSTR |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | SCORESV+47!, SCORESV+48, SCORESV+49*, SCORESV+50*, SCORESV+52*, SCORESV+55, SCORESV+56, SCORESV+61*, REPORT+16, REPORT+17 , REPORT+18 |
| Name | Line Occurrences |
|---|---|
| $$REPORT | DLLSTR+13 |
| SCORESV | DLLSTR+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| U | SCORESV+8, SCORESV+9, SCORESV+12, SCORESV+21, SCORESV+22, SCORESV+59, REPORT+9, REPORT+10, REPORT+11 |
| YS | DLLSTR~, DLLSTR+12 |
| YSBULBAR | SCORESV+3~, SCORESV+34, SCORESV+36, SCORESV+41, REPORT+4~, REPORT+35 |
| YSBULBARAVG | SCORESV+3~, SCORESV+41, REPORT+4~, REPORT+43 |
| YSCOUNT | SCORESV+3~, SCORESV+18*, SCORESV+27*, SCORESV+29 |
| YSDATA | DLLSTR~, DLLSTR+9, DLLSTR+12, SCORESV~ |
| YSDATA( | DLLSTR+15*, SCORESV+20, SCORESV+21, SCORESV+22 |
| YSDATA("" | DLLSTR+14 |
| YSEMOTION | SCORESV+3~, SCORESV+32, SCORESV+36, SCORESV+39, REPORT+4~, REPORT+33 |
| YSEMOTIONAVG | SCORESV+3~, SCORESV+39, REPORT+4~, REPORT+41 |
| YSI | SCORESV+3~, SCORESV+7*, SCORESV+19*, SCORESV+20*, SCORESV+21, SCORESV+22, SCORESV+53*, SCORESV+55*, SCORESV+56, REPORT+4~ , REPORT+8*, REPORT+16*, REPORT+17, REPORT+18 |
| YSINTERACTION | SCORESV+3~, SCORESV+36, SCORESV+42, REPORT+4~, REPORT+36 |
| YSINTERACTIONAVG | SCORESV+3~, SCORESV+42, REPORT+4~, REPORT+44 |
| YSINTIMACY | SCORESV+3~, SCORESV+36, SCORESV+44, REPORT+4~, REPORT+38 |
| YSINTIMACYAVG | SCORESV+4~, SCORESV+44, REPORT+4~, REPORT+46 |
| YSJ | SCORESV+4~, SCORESV+14*, SCORESV+54*, SCORESV+60*, SCORESV+61 |
| YSMAPPINGS | SCORESV+4~ |
| YSMAPPINGS( | SCORESV+15*, SCORESV+24 |
| YSN | DLLSTR+11~, DLLSTR+14*, DLLSTR+15 |
| YSNAME | REPORT+5~, REPORT+17*, REPORT+19, REPORT+20 |
| YSNODE | SCORESV+4~, SCORESV+56*, SCORESV+57, SCORESV+58, SCORESV+59 |
| YSPHYSICAL | SCORESV+4~, SCORESV+33, SCORESV+36, SCORESV+40, REPORT+5~, REPORT+34 |
| YSPHYSICALAVG | SCORESV+4~, SCORESV+40, REPORT+5~, REPORT+42 |
| YSQID | SCORESV+4~, SCORESV+14*, SCORESV+15, SCORESV+21*, SCORESV+23, SCORESV+24 |
| YSQUESTIONS | SCORESV+4~, SCORESV+12*, SCORESV+13, SCORESV+14 |
| YSRELIGION | SCORESV+4~, SCORESV+36, SCORESV+43, REPORT+5~, REPORT+37 |
| YSRELIGIONAVG | SCORESV+5~, SCORESV+43, REPORT+5~, REPORT+45 |
| YSRETURN | REPORT~, REPORT+29, REPORT+30*, REPORT+50*, REPORT+52 |
| YSSCALE | SCORESV+5~, SCORESV+9*, SCORESV+10, SCORESV+11, SCORESV+15, SCORESV+24*, SCORESV+25, SCORESV+28, REPORT+5~, REPORT+11* , REPORT+12, REPORT+13, REPORT+14, REPORT+20*, REPORT+21, REPORT+22, REPORT+25*, REPORT+26*, REPORT+27 |
| YSSCALECONST | SCORESV+5~, SCORESV+8*, SCORESV+10, REPORT+5~, REPORT+9*, REPORT+12 |
| YSSCALEMAP | REPORT+5~ |
| YSSCALEMAP( | REPORT+13*, REPORT+20 |
| YSSCALENAME | REPORT+5~, REPORT+10*, REPORT+13 |
| YSSCLID | SCORESV+5~, SCORESV+58*, SCORESV+61 |
| YSSCLNM | SCORESV+5~, SCORESV+59*, SCORESV+61 |
| YSSCORES | DLLSTR+11~, DLLSTR+13*, DLLSTR+15, SCORESV+5~, REPORT+6~ |
| YSSCORES( | SCORESV+11*, SCORESV+28*, SCORESV+32*, SCORESV+33*, SCORESV+34*, SCORESV+36*, SCORESV+38*, SCORESV+39*, SCORESV+40*, SCORESV+41* , SCORESV+42*, SCORESV+43*, SCORESV+44*, SCORESV+61, REPORT+14*, REPORT+22*, REPORT+26, REPORT+27, REPORT+33, REPORT+34 , REPORT+35, REPORT+36, REPORT+37, REPORT+38, REPORT+39, REPORT+41, REPORT+42, REPORT+43, REPORT+44, REPORT+45 , REPORT+46, REPORT+47 |
| YSSKIPPED | SCORESV+5~, SCORESV+17*, SCORESV+20, SCORESV+26*, SCORESV+29*, SCORESV+61, REPORT+6~, REPORT+24*, REPORT+27*, REPORT+29 |
| YSTOTAL | SCORESV+5~, SCORESV+36, SCORESV+38, REPORT+6~, REPORT+39 |
| YSTOTALAVG | SCORESV+5~, SCORESV+38, REPORT+6~, REPORT+47 |
| YSTRNG | DLLSTR~, DLLSTR+9, DLLSTR+10 |
| YSVAL | SCORESV+5~, SCORESV+22*, SCORESV+26, SCORESV+28 |
| YSVALUE | REPORT+6~, REPORT+18*, REPORT+22 |
| YSX | SCORESV+5~, SCORESV+7*, SCORESV+8, SCORESV+9, SCORESV+12, REPORT+6~, REPORT+8*, REPORT+9, REPORT+10, REPORT+11 , REPORT+32*, REPORT+33*, REPORT+34*, REPORT+35*, REPORT+36*, REPORT+37*, REPORT+38*, REPORT+39*, REPORT+40*, REPORT+41* , REPORT+42*, REPORT+43*, REPORT+44*, REPORT+45*, REPORT+46*, REPORT+47*, REPORT+48*, REPORT+49*, REPORT+50 |
| Name | Field # of Occurrence |
|---|---|
| $T(MAPPING+YSI | SCORESV+7, REPORT+8 |
