... := SUBSTR( cLine,24, 8 ) cTxtime := TIME() CASE LEFT(cLine,3)=="SC1" cShipno := SUBSTR( cLine, 15, 17 ) CASE LEFT(cLine,3)=="ES1" cRespcode := SUBSTR( cLine, 4, 3 ) cDispcode := SUBSTR( cLine, 8, 1 ) cSeverity := SUBSTR( cLine, 9, 1 ) cResponse := SUBSTR( cLine,11,40 ...