SCMCMU4 ;ALB/MJK - PCMM Mass Team/Position Unassignment Bulletin ; 10-JUL-1998
Source file <SCMCMU4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TM(SCNT) | ; -- show any team info for patient
|
|
HDR | ; -- send patient info header
|
|
TEXT | ; -- set of mm array
|
|
CLINICQ | ||
BULL | ; -- send bulletin
|
|
CLINIC | ; -- display clinic to be discharged from
|
|
POS(SCNT) | ; -- send position (for team unassignment) & clinic discharge info
|
|
SET(X) | ;
|
|
INIT | ; -- set vars for bulletin
|
|
ERRARY | ; -- process error array
|
|
PT(SCNT) | ; -- send patient info
|
|
INFO(TYPE,SCIEN) | ; -- load ok info text
|
|
FINAL | ; -- clean up
|
|
OKARY | ; -- process ok array
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SC - [#44] | INIT+13, POS+13, CLINIC+22 |
^SCTM(404.51 - [#404.51] | INIT+7 |
^SCTM(404.57 - [#404.57] | INIT+10, ERRARY+27, POS+6, CLINIC+19 |
^TMP("SCMUTEXT" | INIT+5!, FINAL+1!, SET+1* |
^VA(200 - [#200] | INIT+16 |
Name | Line Occurrences |
---|---|
CLINIC | TEXT+19 |
CLINICQ | CLINIC+3 |
ERRARY | TEXT+23 |
FINAL | BULL+5 |
HDR | ERRARY+10, OKARY+9 |
INFO | TM+3, POS+10 |
INIT | BULL+2 |
OKARY | TEXT+29 |
POS | OKARY+15 |
PT | ERRARY+15, OKARY+13 |
SET | TEXT+1, TEXT+2, TEXT+3, TEXT+6, TEXT+7, TEXT+10, TEXT+11, TEXT+13, TEXT+14, TEXT+15 , TEXT+16, TEXT+17, TEXT+20, TEXT+25, TEXT+26, ERRARY+3, ERRARY+4, ERRARY+7, ERRARY+21, ERRARY+27 , ERRARY+31, ERRARY+34, OKARY+2, OKARY+3, OKARY+6, HDR+4, HDR+9, PT+8, POS+9, POS+14 , POS+16, POS+17, CLINIC+2, CLINIC+4, CLINIC+11, CLINIC+15, CLINIC+23, INFO+5 |
TEXT | BULL+3 |
TM | OKARY+14 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DUZ | INIT+3 |
ID | PT+1~, PT+4*, PT+7 |
NAME | PT+1~, PT+3*, PT+6 |
>> SCASCNT | TEXT+16 |
>> SCBADAR | ERRARY+6, ERRARY+13, ERRARY+14 |
SCCLN | INIT+1~, INIT+12*, INIT+13 |
SCCLNM | POS+1~, POS+13*, POS+14, POS+16 |
>> SCDATE | INIT+17 |
SCER | ERRARY+1~, ERRARY+20*, ERRARY+21, ERRARY+30*, ERRARY+31 |
SCERI | ERRARY+1~, ERRARY+18*, ERRARY+19*, ERRARY+20, ERRARY+28*, ERRARY+29*, ERRARY+30 |
>> SCERRAR | ERRARY+17, ERRARY+19, ERRARY+20, ERRARY+24, ERRARY+26, ERRARY+29, ERRARY+30 |
SCI | POS+1~, INFO+1~, INFO+2*, INFO+3*, INFO+4 |
SCIEN | INFO~, INFO+3, INFO+4 |
SCINFO | BULL+1~ |
SCINFO("DATE" | INIT+17*, TEXT+11 |
SCINFO("NAME" | INIT+7*, INIT+11*, INIT+13*, INIT+16*, TEXT+3, TEXT+6, TEXT+7, TEXT+10 |
SCLCNT | BULL+1~, INIT+5*, SET+1* |
SCLNX | POS+1~, POS+5*, POS+12, POS+14, POS+15, POS+17 |
>> SCMUTYPE | INIT+4, INIT+9, TEXT+1, TEXT+5, ERRARY+27, POS+8 |
SCNT | ERRARY+1~, ERRARY+12*, ERRARY+13*, ERRARY+14, ERRARY+15, ERRARY+17, ERRARY+19, ERRARY+20, ERRARY+24, ERRARY+26 , ERRARY+29, ERRARY+30, OKARY+1~, OKARY+11*, OKARY+12*, OKARY+13, OKARY+14, OKARY+15, PT~, PT+2 , TM~, TM+2, POS~, POS+3, POS+4, POS+5, INFO+3, INFO+4 |
>> SCOKAR | OKARY+5, OKARY+12, TM+2, POS+3, POS+4, POS+5, INFO+3, INFO+4 |
SCPOS | INIT+10, ERRARY+25*, ERRARY+26*, ERRARY+27, ERRARY+29, ERRARY+30, POS+1~, POS+2*, POS+3*, POS+4 , POS+5, POS+6, POS+10, POS+12, CLINIC+1~, CLINIC+17*, CLINIC+18*, CLINIC+19 |
SCPOS0 | INIT+10*, INIT+11, INIT+12, POS+1~, POS+6*, POS+9, POS+13 |
SCPT | OKARY+1~, PT+1~, PT+2*, PT+3, PT+4 |
>> SCPTINFO | PT+2 |
>> SCSELCNT | TEXT+17 |
>> SCTEAM | INIT+7, ERRARY+19, ERRARY+20, TM+2, TM+3 |
SCTMMSG | TM+1~, TM+2* |
>> SCTPDIS( | POS+12, CLINIC+18 |
>> SCTPDIS(0 | CLINIC+3 |
SCTPMSG | POS+1~, POS+4*, POS+9 |
>> SCUNCNT | TEXT+15 |
SCX | ERRARY+1~, ERRARY+14*, OKARY+1~, PT+1~, CLINIC+1~, CLINIC+19*, CLINIC+21, CLINIC+22 |
TYPE | INFO~, INFO+3, INFO+4 |
U | INIT+7, INIT+11, INIT+12, INIT+13, INIT+16, ERRARY+27, PT+3, PT+4, POS+9, POS+13 , POS+17, CLINIC+21, CLINIC+22 |
X | SET~, SET+1, HDR+1*, HDR+2*, HDR+3*, HDR+4, HDR+6*, HDR+7*, HDR+8*, HDR+9 , PT+1~, PT+5*, PT+6*, PT+7*, PT+8, INFO+4*, INFO+5 |
XMDUZ | BULL+1~, INIT+2*, INIT+3, INIT+16 |
XMSUB | BULL+1~, INIT+4* |
XMTEXT | BULL+1~, INIT+5* |
XMY | BULL+1~ |
XMY( | INIT+3* |
Y | CLINIC+1~, CLINIC+7*, CLINIC+8*, CLINIC+9*, CLINIC+10*, CLINIC+11, CLINIC+12*, CLINIC+13*, CLINIC+14*, CLINIC+15 , CLINIC+20*, CLINIC+21*, CLINIC+22*, CLINIC+23 |