Sri,
Here is my job:

// SET WEJ=SRSK.INPUT.BROKEN
//**
//K10      EXEC PGM=ICEMAN
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=&WEJ
//SORTOUT  DD DSN=SRSK.VBSFIX.TMP,DISP=(,CATLG),
//  LIKE=&WEJ
//SYSIN    DD *
 OPTION COPY,SPANINC=RC4

SRSK.INPUT.BROKEN dataset is DSORG=PS,RECFM=VBS,LRECL=32760,BLKSIZE=27998


BTW: Using STOPAFT=nnnn I found the first 27019 records are OK, the next one causes RC16 and ICE141A
Tools like IEBGENER or IDCAMS simply abend with S002.

Answering to offline question, I don't have SAS.
However it seems File Manager (which I have) is able to read all the dataset.

--
Radoslaw Skorupka
Lodz, Poland








W dniu 2017-03-20 o 19:15, Sri h Kolusu pisze:
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

R.S,

SPANINC=RC4 specifies that DFSORT should issue message ICE197I (once), set
a return code of 4 and eliminate all incomplete spanned records it
detects. Valid records will be recovered.  Did you get an ICE141A when
using SPANINC=RC4?

The reason code 3 specifies that "The total length of segments was greater
than the LRECL."

Do you have an hardcoded LRECL in the JCL?

DFSORT can automatically calculate the DCB properties, so you don't have
to specify them.

Can you share the JCL that you used?

Thanks,
Kolusu
DFSORT Development
IBM Corporation

IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on
03/20/2017 10:29:50 AM:

From: "R.S." <r.skoru...@bremultibank.com.pl>
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 03/20/2017 10:30 AM
Subject: Broken VBS and ICE141A
Sent by: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU>

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




---
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.pl
Sąd Rejonowy dla m. st. Warszawy XII Wydział Gospodarczy Krajowego Rejestru 
Sądowego, nr rejestru przedsiębiorców KRS 0000025237, NIP: 526-021-50-88. 
Według stanu na dzień 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości 
wpłacony) wynosi 168.955.696 złotych.


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to