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
 

 

Using Outrec to generate a VB file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
vin12pr
Warnings : 1

New User


Joined: 14 Jun 2006
Posts: 56

PostPosted: Fri May 15, 2009 12:04 pm    Post subject: Using Outrec to generate a VB file
Reply with quote

Hi,
I have a VB file if LreCL 656 and i want to generate one more VB file by copying in the data from 56th position onwards from the input file.My o/p VB file is if Lrecl 604.When i try to do the same using OUTREC i am getting some problem or the other like RDW error or record length out of range.etc.

Kindly advise me on how to acheive this as I am stucked up in this.

Thanks in advance

Regards,
Vin12pr
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Fri May 15, 2009 12:29 pm    Post subject:
Reply with quote

Kindly post the SYSOUT output for us to see what is truly happening.
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Fri May 15, 2009 12:32 pm    Post subject:
Reply with quote

And post JCL also along with SYSOUT output...
Back to top
View user's profile Send private message
vin12pr
Warnings : 1

New User


Joined: 14 Jun 2006
Posts: 56

PostPosted: Fri May 15, 2009 1:23 pm    Post subject: Reply to: Using Outrec to generate a VB file
Reply with quote

jcl :
Code:
// job
//SORT2    EXEC  PGM=SORT,PARM='SIZE(MAX)'                       
//SORTLIST DD  SYSOUT=Y                                         
//SYSOUT   DD  SYSOUT=Y                                         
//SORTIN   DD DISP=SHR,DSN=IVPS.TEST.DATA                 
//SORTOUT  DD DSN=COM.NM.IVPS.HIST.BKUP1,           
//         DISP=(NEW,CATLG,DELETE),                             
//         DCB=(LRECL=604,RECFM=VB,BLKSIZE=27998)               
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)               
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(10,10),RLSE)               
//SYSIN    DD  *                                                 
  SORT FIELDS=COPY                                               
  OUTREC FIELDS=(1:1,4,C'RDW=',                                 
                 56:5,550)                                       
/*

Error:
Code:
SYSIN :                                                                       
  SORT FIELDS=COPY                                                      0027000
  OUTREC FIELDS=(1:1,4,C'RDW=',                                         0027100
                 56:5,549)                                                     
WER276B  SYSDIAG= 1139318, 5931281, 5931281, 7665703                           
WER164B  7,408K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,             
WER164B     0 BYTES RESERVE REQUESTED, 2,310,800 BYTES USED                   
WER146B  20K BYTES OF EMERGENCY SPACE ALLOCATED                               
WER108I  SORTIN   : RECFM=VB   ; LRECL=   656; BLKSIZE= 27998                 
WER237I  OUTREC RECORD LENGTH =   604                                         
WER110I  SORTOUT  : RECFM=VB   ; LRECL=   604; BLKSIZE= 27998                 
WER410B  5,868K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,       
WER410B     0 BYTES RESERVE REQUESTED, 2,163,344 BYTES USED                   
WER244A  OUTREC - SHORT RECORD                                                 
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000                 



Thanks.


Edited: Please use BBcode when You post some code/error, that's rather readable, Thanks... Anuj
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Fri May 15, 2009 3:22 pm    Post subject:
Reply with quote

Code:
WER244A  OUTREC - SHORT RECORD                                                 
This means, a variable length record was too short to contain all the fields specified on the control statement -- you need to check on OUTREC statements if you really want "those" records in output. Otherwise show us sample input and expected output from that.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Changing of LRECL of a file abdulrafi DFSORT/ICETOOL 2 Fri Mar 24, 2017 3:25 pm
No new posts splitting a file abdulrafi DFSORT/ICETOOL 4 Fri Mar 24, 2017 11:51 am
No new posts Receive a file using PCOMM macro Harald.v.K IBM Tools 0 Thu Mar 23, 2017 6:50 pm
No new posts Export flat file data into excel sheet murali.andaluri DFSORT/ICETOOL 2 Mon Mar 20, 2017 5:39 pm
No new posts Formatting VB File Learncoholic DFSORT/ICETOOL 3 Mon Mar 20, 2017 12:29 pm


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