Text in einer Datei durch Konstante ersetzen

Mittels dieses SORT-Steps in einem Job, kann in einer Datei an einer bestimmten Stelle, ein Text durch eine Konstante ersetzt werden.

//S01SORT EXEC PROC=SORTX
//SORTIN DD DSN=USER.TEST.SORT,
// DISP=SHR
//SORTOUT DD DSN=USER.TEST.SORT.OUT,
// DISP=(NEW,CATLG,DELETE),
// UNIT=WRK,
// SPACE=(CYL,(160,50),RLSE),
// LRECL=407,RECFM=FB
//SYSIN DD *
INCLUDE COND(1,1,CH,EQ,C'0')
INREC FIELDS=(1,95,
C'ASTERIX UND OBELIX ',
X'00',
C'GALLIEN ',
X'00',
162,245)
SORT FIELDS=COPY

Die Include Condition stellt dabei die Bedingung dar. In diesem Beispiel werden Char-Strings und HEX-Werte als Konstante in die Datei eingestellt.