HLCSMM ;ISC/MTC-Create Mail Message and Entry in the HL7 Transmission File ;11/03/2000 08:53
Source file <HLCSMM.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 |
---|---|---|
Health Level Seven | 1 | HLCSMM1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(HLD0,HLD1) | ; This routine will send a Message from the Out Queue to the
; MailGroup Specified in the Logical Link file (#870). It is called ; from HLCSMM1 routine that monitors the queue for a link. The MM LLP ; uses <CR> stuffing to indicate the end of segments. The message ; will use the following format within the XMB global. ; ^XMB(3.9,..1)=Segment 1 ; ^XMB(3.9,..2)="" - End of segment 1 ; ^XMB(3.9,..3)=Segment 2 ; ^XMB(3.9,..4)=Continuation of segment 2 ; ^XMB(3.9,..5)="" - End of segment 2 ; " " ; This processing will enable segment greater than 245. |
|
NEWMM | ;Patch 66-introduce new Mailman API's
|
|
ERROR | ;-- send Mail Message indicating error
|
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | EN+27 |
DUZ | NEWMM+2~, NEWMM+7, ERROR+4~, ERROR+19 |
HLD0 | EN~, EN+20, EN+22, NEWMM+9 |
HLD1 | EN~, NEWMM+9 |
>> HLDAN | EN+29*, ERROR+16 |
>> HLDT | EN+27*, NEWMM+3 |
HLERR | EN+18~ |
HLFAC | EN+18~, EN+24*, EN+25*, NEWMM+3 |
HLI | EN+18~ |
HLI0 | EN+18~ |
HLMSTXT | EN+18~ |
>> HLNXST | ERROR+6* |
HLOGLINK | EN+18~, EN+20*, EN+29 |
HLPARAM | ERROR+3~, ERROR+7* |
HLPARENT | EN+18~ |
HLPARM | EN+18~, EN+22*, NEWMM+4 |
HLPTXT | EN+18~ |
HLSERV | EN+18~ |
HLX | ERROR+3~, ERROR+8*, ERROR+9*, ERROR+12, ERROR+13, ERROR+14 |
HLY | ERROR+3~, ERROR+11*, ERROR+12*, ERROR+13 |
HLZ | ERROR+3~, ERROR+8*, ERROR+10*, ERROR+13*, ERROR+14*, ERROR+15*, ERROR+16* |
U | EN+29, NEWMM+4, ERROR+7 |
XMERR | NEWMM+10, ERROR+1, ERROR+20! |
XMINSTR | NEWMM+1~, NEWMM+7, ERROR+3~, ERROR+19 |
XMINSTR("ADDR | FLAGS" , NEWMM+6* |
XMINSTR("FROM" | NEWMM+5*, ERROR+18* |
XMSUB | NEWMM+1~, NEWMM+3*, NEWMM+7, ERROR+3~, ERROR+17*, ERROR+19 |
XMTO | NEWMM+1~, NEWMM+4*, NEWMM+7, ERROR+3~, ERROR+19 |
XMTO( | ERROR+7* |
XMTO("G." | ERROR+7* |
>> Y | EN+27* |