©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
GECSSTTR ;WISC/RFJ-stacker file transmission utilities ;08 Dec 93
Source file <GECSSTTR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ERROR(DA,ERRORMSG) | ||
| RECUSER(SEGMENT,GROUP) | ||
| MAILMSG(SEGMENT,SEQUENCE,TOTAL) | ; create mail message with code sheets
; segment = entry in file 2101.2 ; sequence = sequence number ; total = total sequences ; returns xmz message number |
|
| MESSAGE(DA,NODE,XMZ) | ; add message (XMZ) to node in stack file for DA
|
|
| HOLDDATE(DATA) | ; return the hold date from the tt2 segment
; if hold date is not greater than today, return null |
|
| CTLDATE(CTLSEG) | ; put transmission date and time on ctl segment
|