HLCSMM ;ISC/MTC-Create Mail Message and Entry in the HL7 Transmission File ;11/03/2000 08:53 [ 04/02/2003 8:37 AM ]
Source file <HLCSMM.m>
Package | Total | Call Graph |
---|---|---|
Health Level Seven | 3 | $$PARAM^HLCS2 STATUS^HLCSMM1 $$SITE^HLZFUNC |
Kernel | 1 | DUZ^XUP |
MailMan | 1 | SENDMSG^XMXAPI |
VA Fileman | 1 | NOW^%DTC |
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
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD("DD" | EN+32 |
^HLCS(870 - [#870] | EN+20, EN+22, NEWMM+9* |
^TMP("XMERR" | ERROR+2, ERROR+9, ERROR+12, ERROR+13, ERROR+14, ERROR+20! |
^TMP($J | ERROR+5!, ERROR+10*, ERROR+13*, ERROR+14*, ERROR+15*, ERROR+16*, ERROR+20! |
^XMB(3.8 - [#3.8] | NEWMM+4 |
Name | Line Occurrences |
---|---|
ERROR | NEWMM+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | EN+32 |
DUZ | NEWMM+2~, NEWMM+7, ERROR+4~, ERROR+19 |
HLD0 | EN~, EN+20, EN+22, NEWMM+9 |
HLD1 | EN~, NEWMM+9 |
>> HLDAN | EN+34*, ERROR+16 |
>> HLDT | EN+32*, NEWMM+3 |
HLERR | EN+18~ |
HLFAC | EN+18~, EN+28*, EN+30*, NEWMM+3 |
HLI | EN+18~ |
HLI0 | EN+18~ |
HLMSTXT | EN+18~ |
>> HLNXST | ERROR+6* |
HLOGLINK | EN+18~, EN+20*, EN+34 |
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+34, 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+32* |