TS$(*#$ P+1 R/YES/NO/ T+1 P+1 I$%CHARCODE=EBCDIC %DIAGLINEMAP=NO %DIAGNAMETABLE=NO $ TELE