HLOF778A ;ALB/CJM-HL7 - Saving messages to file 778 (continued) ;03/13/2012
Source file <HLOF778A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
NEW(HLMSTATE) | ;
|
|
NEWIEN(DIR,TCP) | ;
|
|
AGAIN | ;
|
|
TCP() | ;checks the link to see if its TCP, return 1 if yes, 0 if no or not defined
|
|
GETWORK(WORK) | ; Used by the Process Manager.
|
|
DOWORK(WORK) | ;Used by the Process Manager
|
|
SET(MSG) | ;
|
|
SETPURGE(MSG,MSGSTAT,MATE,MATESTAT) | ; Set message up for purging.
|