STRUCTURE /BIN_REC/ INTEGER*4 VMS_DATETIME(2) ! quadword system timestamp BYTE DESTADDR(0:5) ! beginning of XEDRIVER P5 buffer: dest addr BYTE SRCADDR(0:5) ! source Ethernet address UNION MAP BYTE PROTOCOL(0:1) ! Ethernet protocol type END MAP MAP BYTE DSAP ! IEEE 802 destination SAP BYTE SSAP ! IEEE 802 source SAP UNION MAP BYTE CTL(0:1) ! IEEE 802 CTL byte(s) END MAP MAP BYTE ECTL ! IEEE extended 802 CTL byte BYTE PID(0:4) ! IEEE extended 802 Protocol IDentification END MAP END UNION END MAP END UNION ! end of XEDRIVER P5 buffer (20 bytes) INTEGER*2 LENGTH ! length of message body BYTE BODY(1500) ! not all of this array may be sent; only ! part actually used is written to file END STRUCTURE ! /BIN_REC/