On Mon, Mar 20, 2017 at 12:29 PM, R.S. <[email protected]> wrote:
> I have a broken PS VBS file (incomplete records), when I try to read it > with IEBGENER or IFASMFDP (it is SMF dump) I get abend S002. > I used to fix it with ICEGENER and SPANINC=RC4 option. > > However it does not work - ICEGENER job ends with RC16 and > ICE141A 2 SPANNED RECORD ON SORTIN COULD NOT BE ASSEMBLED - REASON CODE > IS 03 > > I did RTFM, but the only advice I got is to fix the dataset. > How??? > Any clue? > > -- > Radoslaw Skorupka > Lodz, Poland > > If you wish to, I have an HLASM program whose source you can download. It will "fix" broken VBS files by dropping records which cannot be properly reconstructed. You can get it here: https://gist.github.com/JohnArchieMckown/d7ddef0c7ddf95c72c5978b099768d9b The JCL would look something like: //STEP010 EXEC PGM=VBSCOPY2, // REGION=0M //STEPLIB DD DSN=your.library, // DISP=SHR //SYSUDUMP DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SMFIN DD DSN=your.broken.vbs.input.file, // DISP=OLD //SMFOUT DD DSN=your.fixed.vbs.input.file, // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA //* change blksize, if desired // DCB=(RECFM=VBS,LRECL=32760,BLKSIZE=4096) //SMFBAD DD DSN=your.broken.vbs.records, // DISP=(NEW,CATLG), // UNIT=SYSDA, // SPACE=(CYL,20,RLSE), // DCB=(RECFM=VB,LRECL=4096,BLKSIZE=0,BUFNO=1) -- "Irrigation of the land with seawater desalinated by fusion power is ancient. It's called 'rain'." -- Michael McClary, in alt.fusion Maranatha! <>< John McKown ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
