YS187CMT ;SLC/KCM - Note titles for Case Mix Tool ; 11/18/2021
Source file <YS187CMT.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 |
Package | Total | Caller Graph |
---|---|---|
Mental Health | 1 | YS187PST |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDTDATE | ; date used to update 601.71:18
|
|
POST | ; Post-init specific to Case Mix Tool
|
|
ADTITLES(NDCL,NOTE,CSLT,STDT) | ; add new titles for Case Mix if not there
|
|
UPD71(NOTE,CSLT) | ; update titles in MH TESTS AND SURVEYS (#601.71)
|
|
DROPTST(NAME) | ; Change OPERATIONAL to dropped
|
|
XCHGLST(ARRAY) | ; return array of instrument exchange entries
; ARRAY(cnt,1)=instrument exchange entry name ; ARRAY(cnt,2)=instrument exchange entry creation date |
|
ENTRIES | ; New MHA instruments ^ Exchange Entry Date
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^YTT(601.71 - [#601.71] | UPD71+2, DROPTST+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | XCHGLST~ |
ARRAY( | XCHGLST+6*, XCHGLST+7* |
CSLT | POST+4~*, POST+6, POST+8, ADTITLES~, UPD71~, UPD71+4 |
CSLTIEN | UPD71+1~, UPD71+4*, UPD71+5, UPD71+8 |
I | XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7 |
IEN | DROPTST+1~, DROPTST+2*, DROPTST+5 |
NAME | DROPTST~, DROPTST+2 |
NDCL | POST+1~*, POST+6, ADTITLES~, ADTITLES+3, ADTITLES+5, ADTITLES+7 |
NOTE | POST+2~*, POST+6, POST+8, ADTITLES~, ADTITLES+7, ADTITLES+8, UPD71~, UPD71+3 |
NOTEIEN | UPD71+1~, UPD71+3*, UPD71+5, UPD71+7 |
REC | UPD71+1~, UPD71+9, DROPTST+1~, DROPTST+5 |
REC(10 | DROPTST+3* |
REC(18 | DROPTST+4* |
REC(28 | UPD71+6* |
REC(29 | UPD71+7* |
REC(30 | UPD71+8* |
RV | ADTITLES+1~, ADTITLES+3*, ADTITLES+4, ADTITLES+5, ADTITLES+7*, ADTITLES+8 |
STDT | POST+5~*, POST+6, ADTITLES~, ADTITLES+7 |
TESTIEN | UPD71+1~, UPD71+2*, UPD71+9 |
U | ADTITLES+4, ADTITLES+8, XCHGLST+6, XCHGLST+7 |
X | XCHGLST+4~, XCHGLST+5*, XCHGLST+6, XCHGLST+7 |
Name | Field # of Occurrence |
---|---|
$T(EDTDATE+1 | DROPTST+4 |
$T(ENTRIES+I | XCHGLST+5 |