; Entry from pre-open execute of P-MESSAGE entry in DEVICE file.
; If the user chooses to queue the print, we don't want this code
; (the pre-open execute of the DEVICE file entry) to execute when
; the task starts up.
EOF
;
SETUP(XMAPHOST,XMABORT)
; Entry during close-execute (called from READ^XMAPHOST)
PUT(XMZZ,XMREC,XMI)
; Put data into message.
READ
; Entry from close-execute of P-MESSAGE entry in TERMINAL TYPE file.
; Read the host file into a message, send it, erase it.
; Read record from file.
; Each time <CR> is found in record it ends a message line.