Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Variable file to variable file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
prav_06
Warnings : 1

Active User


Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands

PostPosted: Sat Oct 11, 2008 12:18 am    Post subject: Variable file to variable file
Reply with quote

Dear All,

My requirement it to convert a VB file of lrecl=1004 to lrecl=197, i tried the sort card

Code:
SORT FIELDS=COPY             
RECORD TYPE=V,LENGTH=(1,197)


but its throwing a U016 Abend, could you please let me know the way out

Regards,

Thanmilzan.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6967
Location: porcelain throne

PostPosted: Sat Oct 11, 2008 12:46 am    Post subject:
Reply with quote

I have no idea, but maybe OUTREC and BUILD?
Back to top
View user's profile Send private message
prav_06
Warnings : 1

Active User


Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands

PostPosted: Sat Oct 11, 2008 12:48 am    Post subject:
Reply with quote

Hi dbzTHEdinosauer,

Could you pelase share the syntax with OUTREC and BUILD.

Regards,

Thamilzan.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Sat Oct 11, 2008 12:54 am    Post subject:
Reply with quote

Thanmilzan,

LENGTH=(1,197) says your input records have a length of 1 and your records after E15 have a length of 197. You can't just use random syntax and expect it to work.

You can use a DFSORT job like the following to do what you asked for:

Code:

//S1 EXEC PGM=ICEMAN                               
//SYSOUT DD SYSOUT=*                                             
//SORTIN DD DSN=...   input file (VB/1004)                             
//SORTOUT DD LRECL=197,DSN=...  output file (VB/197) 
//SYSIN DD *                                                     
  OPTION COPY,VLLONG                                                     
  INREC BUILD=(1,4,5)                                             
/*     


BTW, saying:

Quote:
its throwing a U016 Abend


does not give us any information to help you with. A U016 Abend indicates DFSORT detected an error. DFSORT issues error messages for the problems it detects. You need to look at the messages and/or post them.
Back to top
View user's profile Send private message
prav_06
Warnings : 1

Active User


Joined: 13 Dec 2005
Posts: 154
Location: The Netherlands

PostPosted: Sat Oct 11, 2008 2:18 am    Post subject:
Reply with quote

Hi Frank,

Thanks a lot for your reply

Quote:
does not give us any information to help you with. A U016 Abend indicates DFSORT detected an error. DFSORT issues error messages for the problems it detects. You need to look at the messages and/or post them
.

Sorry for not posting the SYSOUT, Well its friday evening 10 my time, people at my office were driving me out and I was in a hurry to type a reply to the forum.

Am not in front of my Mainframe now but if I am not wrong my SYSOUT said some thing reg the mismatch of the lrecl in the sortin and sortout for this control card

Code:
SORT FIELDS=COPY             
RECORD TYPE=V,LENGTH=(1,197)


Does this gives some clarity?

Regards,

Thamilzan.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Sat Oct 11, 2008 2:44 am    Post subject:
Reply with quote

I would have to see your JCL and all of the messages. However, as I said, that RECORD statement does NOT make sense so it's probably not worth pursuing.

Try the DFSORT job I provided. It should do what you asked for.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Converting Variable block file to Fix... bhavana yalavarthi DFSORT/ICETOOL 10 Tue May 16, 2017 2:20 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am
No new posts File processing vishwakotin Mainframe Interview Questions 9 Fri Apr 28, 2017 11:38 am
No new posts Occurrence of various strings within ... TS70363 JCL & VSAM 1 Thu Apr 27, 2017 8:18 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us