IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Using Outrec to generate a VB file


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
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
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: 8797
Location: Welsh Wales

PostPosted: Fri May 15, 2009 12:29 pm
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
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
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

Superior Member


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

PostPosted: Fri May 15, 2009 3:22 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 2
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 8
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
Search our Forums:

Back to Top