SUBT => &.Hdr.Time+Date
 GBLS CurrentDate
 GBLS CurrentTime
CurrentDate SETS "21 Jul 1988"
CurrentTime SETS "00:04:00"
 END