YTXCHGE ;SLC/KCM - Instrument Specification Export ; 9/15/2015
Source file <YTXCHGE.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 |
|---|---|---|
| EXPORT(TEST,DEST) | ; extract test entries into DEST array
; TEST -- name or IEN of mental health instrument ; DEST -- closed array reference for destination JSON ; caller must make sure DEST is empty |
|
| LDINFO(TEST) | ; load general information for instrument
; use entry from MH TESTS AND SURVEYS file (601.71) |
|
| LDCTNT(TEST) | ; load question/choice content for instrument
; loop through "AD" xref in MH INSTRUMENT CONTENT for each question ; loop through "AC" xref in MH CHOICETYPES for each choice |
|
| LDSCLS(TEST) | ; load scale information for instrument
; loop thru "AC" xref in MH SCALEGROUPS for each group (testId,seq,groupId) ; loop thru "AC" xref in MH SCALES for each scale (groupId,seq,scaleId) ; loop thru "AC" xref in MH SCORING KEYS for each key (scaleId,keyId) |
|
| LDRULE(TEST) | ; load rule information for instrument
|
|
| LDREPT(TEST) | ; load the report for an instrument
|
|
| LDSPEC(TEST) | ; load the web entry specification for an instrument
|
|
| LDDISP | ||
| LDVER(TEST) | ; load the verify values for an instrument
; expects DEST |
|
| REC2JSON(FILE,IENS,NUMS) | ; load record into JSON using MAP
; expects MAP,DEST ; FILE -- mh file number ; IENS -- IEN string (with trailing comma) ; NUMS -- array numbers for JSON array |
|
| FILEFLDS(FILE) | ; return a string of fields in the file
; expects MAP |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | LDVER+2!, LDVER+5, LDVER+6, LDVER+7, LDVER+10! |
| ^YTT(601.71 - [#601.71] | EXPORT+4 |
| ^YTT(601.712 - [#601.712] | LDSPEC+2 |
| ^YTT(601.72 - [#601.72] | LDCTNT+8 |
| ^YTT(601.751 - [#601.751] | LDCTNT+16, LDCTNT+17, LDCTNT+18 |
| ^YTT(601.76 - [#601.76] | LDCTNT+4, LDCTNT+5, LDCTNT+7 |
| ^YTT(601.79 - [#601.79] | LDRULE+7 |
| ^YTT(601.81 - [#601.81] | LDINFO+4 |
| ^YTT(601.83 - [#601.83] | LDRULE+2, LDRULE+5 |
| ^YTT(601.86 - [#601.86] | LDSCLS+5, LDSCLS+6 |
| ^YTT(601.87 - [#601.87] | LDSCLS+9, LDSCLS+10 |
| ^YTT(601.89 - [#601.89] | LDCTNT+14 |
| ^YTT(601.91 - [#601.91] | LDSCLS+13 |
| ^YTT(601.93 - [#601.93] | LDREPT+2 |
| Name | Line Occurrences |
|---|---|
| $$FILEFLDS | REC2JSON+6 |
| LDCTNT | EXPORT+10 |
| LDDISP | EXPORT+15 |
| LDINFO | EXPORT+9 |
| LDREPT | EXPORT+13 |
| LDRULE | EXPORT+12 |
| LDSCLS | EXPORT+11 |
| LDSPEC | EXPORT+14 |
| LDVER | EXPORT+16 |
| REC2JSON | LDINFO+2, LDINFO+6, LDCTNT+9, LDCTNT+10, LDCTNT+11, LDCTNT+12, LDCTNT+15, LDCTNT+20, LDCTNT+21, LDSCLS+8 , LDSCLS+12, LDSCLS+15, LDRULE+4, LDRULE+6, LDRULE+9, LDREPT+3, LDSPEC+3, LDDISP+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHID | LDCTNT+3~, LDCTNT+17*, LDCTNT+18, LDCTNT+21 |
| CIDF | LDCTNT+3~, LDCTNT+14*, LDCTNT+15 |
| CIEN | LDCTNT+3~, LDCTNT+18*, LDCTNT+20 |
| CNT | LDVER+3~, LDVER+8*, LDVER+9 |
| CSEQ | LDCTNT+3~, LDCTNT+16*, LDCTNT+17, LDCTNT+18 |
| CTNT | LDCTNT+3~, LDCTNT+5*, LDCTNT+7, LDCTNT+9 |
| CTYP | LDCTNT+3~, LDCTNT+8*, LDCTNT+13, LDCTNT+14, LDCTNT+16, LDCTNT+17, LDCTNT+18 |
| DEST | EXPORT~, EXPORT+7*, LDVER+4, REC2JSON+12 |
| DISPLAY | EXPORT+6~ |
| DISPLAY( | LDDISP+3, REC2JSON+21* |
| ERRS | REC2JSON+5~ |
| FILE | LDVER+3~, LDVER+6*, LDVER+7, LDVER+9, REC2JSON~, REC2JSON+6, REC2JSON+7, REC2JSON+8, REC2JSON+9, REC2JSON+11 , REC2JSON+13, REC2JSON+15, REC2JSON+16, REC2JSON+17, REC2JSON+18, REC2JSON+19, REC2JSON+20, REC2JSON+21, REC2JSON+22, REC2JSON+23 , REC2JSON+24, FILEFLDS~, FILEFLDS+4 |
| FLD | REC2JSON+5~, REC2JSON+9*, REC2JSON+11, REC2JSON+13, REC2JSON+15, REC2JSON+16, REC2JSON+17, REC2JSON+18, REC2JSON+19, REC2JSON+20 , REC2JSON+21, REC2JSON+22, REC2JSON+23, REC2JSON+24 |
| FLDS | REC2JSON+5~, REC2JSON+6*, REC2JSON+7 |
| GID | LDSCLS+4~, LDSCLS+6*, LDSCLS+8, LDSCLS+9, LDSCLS+10 |
| GSEQ | LDSCLS+4~, LDSCLS+5*, LDSCLS+6 |
| I | REC2JSON+5~, FILEFLDS+2~, FILEFLDS+4* |
| IEN | LDRULE+1~, LDRULE+2*, LDRULE+4, LDRULE+5, LDREPT+1~, LDREPT+2*, LDREPT+3, LDSPEC+1~, LDSPEC+2*, LDSPEC+3 , LDDISP+2~, LDDISP+3*, LDDISP+5, LDVER+3~, LDVER+7*, LDVER+9 |
| IENS | REC2JSON~, REC2JSON+7, REC2JSON+8, REC2JSON+13, REC2JSON+16, REC2JSON+18, REC2JSON+20, REC2JSON+21, REC2JSON+23, REC2JSON+24 |
| JSONERR | EXPORT+6~ |
| KID | LDSCLS+4~, LDSCLS+13*, LDSCLS+15 |
| MAP | EXPORT+6~, EXPORT+8 |
| MAP( | REC2JSON+8, REC2JSON+9, REC2JSON+15, REC2JSON+17, REC2JSON+19, REC2JSON+22, FILEFLDS+4 |
| NUMS | LDINFO+3~, LDINFO+6, LDCTNT+3~, LDCTNT+9, LDCTNT+10, LDCTNT+11, LDCTNT+12, LDCTNT+15, LDCTNT+20, LDCTNT+21 , LDSCLS+4~, LDSCLS+8, LDSCLS+12, LDSCLS+15, LDRULE+1~, LDRULE+4, LDRULE+6, LDRULE+9, LDDISP+2~, LDDISP+5 , REC2JSON~, REC2JSON+11 |
| NUMS(1 | LDINFO+5*, LDCTNT+6*, LDSCLS+7*, LDRULE+3*, LDDISP+4* |
| NUMS(2 | LDCTNT+19*, LDCTNT+22!, LDSCLS+11*, LDSCLS+17!, LDRULE+8* |
| NUMS(3 | LDSCLS+14*, LDSCLS+16! |
| QSTN | LDCTNT+3~, LDCTNT+7*, LDCTNT+8, LDCTNT+10 |
| RIEN | LDRULE+1~, LDRULE+5*, LDRULE+6, LDRULE+7 |
| RNUMS | LDRULE+10! |
| ROOT | LDVER+3~, LDVER+4*, LDVER+9 |
| SECIEN | LDINFO+3~, LDINFO+4*, LDINFO+6 |
| SEQ | LDCTNT+3~, LDCTNT+4*, LDCTNT+5 |
| SID | LDSCLS+4~, LDSCLS+10*, LDSCLS+12, LDSCLS+13 |
| SIEN | LDRULE+1~, LDRULE+7*, LDRULE+9 |
| SSEQ | LDSCLS+4~, LDSCLS+9*, LDSCLS+10 |
| SUBS | REC2JSON+5~, REC2JSON+11*, REC2JSON+12 |
| TARGET | REC2JSON+5~, REC2JSON+12*, REC2JSON+14, REC2JSON+16, REC2JSON+18, REC2JSON+20, REC2JSON+23, REC2JSON+24 |
| TEST | EXPORT~, EXPORT+4*, EXPORT+9, EXPORT+10, EXPORT+11, EXPORT+12, EXPORT+13, EXPORT+14, EXPORT+16, LDINFO~ , LDINFO+2, LDINFO+4, LDCTNT~, LDCTNT+4, LDCTNT+5, LDSCLS~, LDSCLS+5, LDSCLS+6, LDRULE~, LDRULE+2 , LDREPT~, LDREPT+2, LDSPEC~, LDSPEC+2, LDVER~, LDVER+5 |
| U | LDCTNT+7, LDCTNT+8, LDCTNT+11, LDCTNT+12, LDRULE+5 |
| VALS | REC2JSON+5~ |
| VALS( | REC2JSON+8*, REC2JSON+13, REC2JSON+16, REC2JSON+18, REC2JSON+20, REC2JSON+21, REC2JSON+23, REC2JSON+24 |
| X | FILEFLDS+2~, FILEFLDS+3*, FILEFLDS+4*, FILEFLDS+5 |
| X0 | LDCTNT+3~, LDCTNT+7* |
| X2 | LDCTNT+3~, LDCTNT+8*, LDCTNT+11, LDCTNT+12 |
| YTXCHGDT | EXPORT+6~ |
