LRSRVR9B ;BPFO/DTG - UPDATE DATA FOR 61, 61.2, AND 62 FOR SNOMED AND INACTIVE ;07/7/2017
Source file <LRSRVR9B.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 |
|---|---|---|
| SERVER | ; entry for message processing
|
|
| SLI | ; start
|
|
| SL5 | ; loop through message
|
|
| SL5S3(II,BB) | ; set finish file
; II where in for loop ; NN number of CR pieces ; KK update counter ; BB data ; saved data |
|
| SL5Q | ;finish pulling message
|
|
| CLOSE | ;
|
|
| CLOSE1 | ; send message back to sender
|
|
| CLEAN | ;
|
|
| SETDATA | ; Set error data into report structure
|
|
| UUEN(STR) | ; Uuencode string passed in.
|
|
| UUBEGFN(LRFILENM) | ; Construct uuencode "begin" coding
; Call with LRFILENM = name of uuencoded file attachment ; ; Returns LRX = string with "begin..."_file name |
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | CLEAN+6 |
| CLEAN^LRSRVR | CLEAN+5 |
| PURGE^LRSRVR5 | SL5Q+22 |
| IMPORT^LRSRVR8 | SL5Q+29 |
| $$FMADD^XLFDT | SL5Q+21 |
| $$FMTE^XLFDT | CLOSE+4, CLOSE+12, CLOSE+19 |
| $$FMTHL7^XLFDT | CLOSE+21 |
| $$HTE^XLFDT | CLOSE+1 |
| $$NOW^XLFDT | SLI+1, SL5Q+1, CLOSE+12, CLOSE+21 |
| $$REPEAT^XLFSTR | CLOSE+39 |
| $$UP^XLFSTR | SERVER+5 |
| $$DEC^XLFUTL | UUEN+9 |
| ^XMD | SL5Q+41 |
| GET^XML | SLI+3 |
| SENDMSG^XMXAPI | CLOSE1+5 |
| $$B64DECD^XUSHSH | SLI+7, SL5+5 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | SERVER+6!, SL5Q+26!*, CLOSE+3*, CLOSE+5*, CLOSE+6*, CLOSE+8*, CLOSE+10*, CLOSE+11*, CLOSE+13*, CLOSE+14* , CLOSE+16*, CLOSE+18*, CLOSE+20*, CLOSE+22*, CLOSE+23*, CLOSE+24*, CLOSE+31*, CLOSE+32*, CLOSE+33*, CLOSE+36* , CLOSE+38*, CLOSE+39*, CLOSE+42*, CLOSE+43*, CLOSE+44*, SETDATA+1, SETDATA+6* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | SERVER+3~, SLI+7*, SL5Q+4*, SL5Q+5*, SL5Q+6, SL5Q+15*, CLOSE+4*, CLOSE+5, CLOSE+7*, CLOSE+8 , CLOSE+9*, CLOSE+10, CLOSE+12*, CLOSE+13, CLOSE+15*, CLOSE+16, CLOSE+17*, CLOSE+18, CLOSE+19*, CLOSE+20 , CLOSE+29*, CLOSE+37*, CLOSE+38, CLOSE+39, CLOSE+40*, CLOSE+41*, CLEAN+4! |
| B | SERVER+3~, SLI+7*, SLI+8, SLI+11, SLI+12, SLI+13, SL5+5*, SL5Q+4*, SL5Q+6*, SL5Q+7 , SL5Q+8, SL5Q+10, SL5Q+12, CLOSE+41*, CLEAN+4! |
| BB | SL5S3~, SL5S3+7 |
| C | SERVER+3~, SL5Q+4*, SL5Q+10*, CLEAN+4! |
| CR | SERVER+1~, SERVER+2~, SERVER+5*, SLI+12, SL5+5, SL5S3+7, CLEAN+2!, CLEAN+3! |
| D | SERVER+1~, SERVER+5*, SERVER+10*, SL5Q+4*, SL5Q+12*, CLEAN+2! |
| DIE | SERVER+2~, CLEAN+3! |
| DN | SERVER+3~, SL5Q+1*, SL5Q+2, CLEAN+4! |
| DR | SERVER+2~, CLEAN+3! |
| DROUT | SERVER+2~, CLEAN+3! |
| DT | SL5Q+21, SL5Q+34 |
| DTOUT | SERVER+2~, CLEAN+3! |
| DUZ | SL5Q+35 |
| E | SERVER+3~, SL5Q+4*, CLEAN+4! |
| FIL | SERVER+1~, SERVER+2~, SERVER+5*, CLEAN+2!, CLEAN+3! |
| G | SERVER+3~, SL5Q+4*, CLEAN+4! |
| I | SERVER+1~, SLI+12*, SLI+13, SL5+5*, CLOSE+23*, CLEAN+2! |
| II | SERVER+2~, SL5S3~, SL5S3+7, SL5S3+9, SL5S3+10, CLEAN+3! |
| J | UUEN+1~, UUEN+9*, UUEN+10 |
| K | SLI+1*, SL5S3+10*, SL5Q+2, CLOSE+2, UUEN+1~, UUEN+7*, UUEN+8*, UUEN+9 |
| L | SERVER+3~, SLI+1*, CLEAN+4! |
| LEN | UUEN+1~, UUEN+2*, UUEN+3, UUEN+11 |
| LRCNT | SERVER+1~, CLEAN+2! |
| LRCRLF | SERVER+1~, SERVER+5*, CLOSE+30, CLOSE+41, CLEAN+3! |
| LRDATE | SL5Q+18~, SL5Q+21*, SL5Q+22, SL5Q+23! |
| LRDAYS | SL5Q+18~, SL5Q+20*, SL5Q+21, SL5Q+23! |
| LREND | SERVER+1~, CLEAN+2! |
| LRFILENM | CLOSE+21*, CLOSE+22, CLOSE+24, UUBEGFN~, UUBEGFN+6 |
| LRGOOD | SERVER+3~, SL5Q+4*, SL5Q+12*, CLOSE+9, CLEAN+4! |
| LRI | UUEN+1~, UUEN+3*, UUEN+4 |
| LRINSTR | SERVER+3~, CLOSE1+5, CLEAN+4! |
| LRINSTR("ADDR | FLAGS" , CLOSE1+2* |
| LRINSTR("FROM" | CLOSE1+3* |
| LRL | SERVER+1~, CLEAN+2! |
| >> LRLEN | SETDATA+2*, SETDATA+7 |
| >> LRMAILGROUP | SL5Q+33* |
| >> LRMAILGROUPXQA | SL5Q+33* |
| LRMSUBJ | SERVER+1~, CLOSE+1*, CLOSE1+4*, CLOSE1+5, CLEAN+2! |
| >> LRNODE | CLOSE+31*, CLOSE+32, CLOSE+33, CLOSE+42*, CLOSE+43, CLOSE+44, SETDATA+1*, SETDATA+6* |
| >> LRQUIT | SETDATA+2*, SETDATA+3, SETDATA+4* |
| >> LRRECORD | CLOSE+2*, CLOSE+3, CLOSE+17 |
| >> LRST | SL5Q+8, SL5Q+34, CLOSE+1, CLOSE+21 |
| LRSTAT | SL5Q+18~, SL5Q+22*, SL5Q+23! |
| >> LRSTN | SL5Q+34, CLOSE+1, CLOSE+12, CLOSE+21 |
| LRSTR | SERVER+2~, CLOSE+25*, CLOSE+30*, CLOSE+31, CLOSE+41*, CLOSE+42, CLEAN+3!, SETDATA+2, SETDATA+4, SETDATA+5 , SETDATA+7* |
| >> LRSUB | SERVER+5, CLOSE+14, CLOSE+21 |
| >> LRTASK | CLOSE1+5 |
| LRTEXT | SERVER+2~, SL5Q+36!, SL5Q+42!, CLEAN+3! |
| LRTEXT(1 | SL5Q+36* |
| LRTEXT(2 | SL5Q+37* |
| LRTEXT(3 | SL5Q+38* |
| LRTEXT(4 | SL5Q+39*, SL5Q+40* |
| >> LRTO | CLOSE1+5 |
| >> LRTO( | CLOSE1+1* |
| LRTXT | SERVER+1~, CLEAN+2! |
| >> LRTYPE | SL5Q+27*, SL5Q+29 |
| >> LRTYPE(0 | SL5Q+27* |
| LRVRD4 | SERVER+2~, SERVER+11*, SL5Q+10, CLOSE+7, CLOSE+29, CLOSE+41, CLEAN+1, CLEAN+3! |
| LRVRD5 | SERVER+2~, SERVER+12*, SL5Q+12, SL5Q+15, SL5Q+26, CLEAN+1, CLEAN+3! |
| LRVRD6 | SERVER+2~, SERVER+13*, SL5S3+10, SL5Q+2, SL5Q+5, SL5Q+6, CLOSE+4, CLOSE+15, CLOSE+17, CLOSE+19 , CLEAN+1, CLEAN+3! |
| LRX | SERVER+1~, CLEAN+2!, SETDATA+5*, SETDATA+6, UUEN+1~, UUEN+4*, UUEN+5*, UUEN+6, UUBEGFN+5~, UUBEGFN+6* , UUBEGFN+7 |
| LRY | SERVER+1~, CLEAN+2! |
| >> M | SLI+1* |
| >> N | SLI+1*, SLI+12*, SL5+5* |
| >> O | SLI+1*, SL5S3+9*, SL5S3+10* |
| >> OK | SLI+6*, SLI+8*, SLI+10 |
| P | SL5S3+6~, SL5S3+7*, SL5S3+8*, SL5S3+9, SL5S3+10 |
| S | UUEN+1~, UUEN+6*, UUEN+7 |
| STR | UUEN~, UUEN+2, UUEN+4 |
| >> STRT | SLI+1*, SL5Q+2 |
| TMP | UUEN+1~, UUEN+2*, UUEN+10*, UUEN+11*, UUEN+12 |
| U | SERVER+5*, SL5Q+2, CLOSE+4, CLOSE+19 |
| X | UUEN+1~ |
| XMCHAN | SERVER+1~, SERVER+10*, CLEAN+2! |
| XMER | SERVER+1~, SERVER+10!, SLI+4, SLI+5, SLI+6, SLI+9, SL5+2, CLEAN+2! |
| XMPOS | SERVER+1~, CLEAN+2! |
| >> XMREC | SLI+4, SLI+6, SL5+1 |
| XMRG | SERVER+1~, SLI+4, SLI+7, SL5+3, SL5+4, SL5+5, CLEAN+2! |
| >> XMSUB | SL5Q+34* |
| XMTEXT | SL5Q+41*, SL5Q+42! |
| >> XMY( | SL5Q+35* |
| >> XMY("G.LMI" | SL5Q+35* |
| XMZ | SERVER+1~, SERVER+10*, CLEAN+2! |
| >> XQMSG | SERVER+10, CLOSE+6 |
| >> XQSND | CLOSE1+1 |
| Y | UUEN+1~, UUEN+6*, UUEN+7*, UUEN+9 |
| ZTQUEUED | SERVER+2~, SL5Q+27*, SL5Q+30!, CLEAN+3! |