Hi

We got the SYSMDUMPs from customers often via SPOOL, so we had a job to cut out the first character.
The job has worked for several year, now I got a dataset full with x'00'

//STEP1    EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=A
//SYSUT1   DD DISP=SHR,DSN=ESA.HP.SYSMDUMP
//SYSUT2   DD DSNAME=ESA.QFSS.SYSMDUMP,DISP=SHR
//SYSIN    DD *
    GENERATE MAXFLDS=1
    RECORD FIELD=(4160,2,,1)

The input has LRECL=4161 output 4160,

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to