c c Define the message header structure C C Inland Steel c Earl Lakia c 3210 Watling ST. ms 2-465 c East Chicago, IN c 46312 c c Date of last update: 8/13/86 c c INTEGER*2 MGH$W_MAXSEQ ! Maximum On queue sequence PARAMETER (MGH$W_MAXSEQ=9999) STRUCTURE /MGHDEF/ INTEGER*2 MGH$W_LSQ ! LINE SEQUENCE NUMBER INTEGER*4 MGH$L_IDX ! NRBID INDEX, FROM 1 TO ! NRB$L_IDCNT. CHARACTER*16 MGH$C_MID ! Message ID RECORD /HDRDEF/HDR ! message header END STRUCTURE