Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: HLCSMM

Package: Health Level Seven

Routine: HLCSMM


Information

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 Information

Source file <HLCSMM.m>

Call Graph

Call Graph Total: 6

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  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Level Seven 1 HLCSMM1  

Entry Points

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

External References

Name Field # of Occurrence
NOW^%DTC EN+32
$$PARAM^HLCS2 ERROR+7
STATUS^HLCSMM1 ERROR+6
$$SITE^HLZFUNC EN+28
SENDMSG^XMXAPI NEWMM+7, ERROR+19
DUZ^XUP NEWMM+2, ERROR+4

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
ERROR NEWMM+10

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All