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

Invalid Lrecl error


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Saurabh Arora

New User


Joined: 18 Sep 2008
Posts: 5
Location: Noida

PostPosted: Wed Apr 15, 2009 11:09 am
Reply with quote

Hi
I am getting the following error while trying to display the number of records in 2 input files into one output file.
Code:
WER428I  CALLER-PROVIDED IDENTIFIER IS "0001"
WER276B  SYSDIAG= 489663, 3411871, 3411871, 3323864
WER164B  6,896K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
WER164B     0 BYTES RESERVE REQUESTED, 1,004K BYTES USED
WER146B  20K BYTES OF EMERGENCY SPACE ALLOCATED
WER108I  IN1      : RECFM=FB   ; LRECL=    54; BLKSIZE= 27972
WER110I  OUT      : RECFM=FB   ; LRECL=   124; BLKSIZE= 27900
WER247A  OUT      HAS INCOMPATIBLE LRECL
WER211B  SYNCSMF  CALLED BY SYNCSORT; RC=0000


I am using the following JCL
Code:
//STEP0   EXEC PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG   DD SYSOUT=*
//IN1      DD DSN=IN-file1,DISP=(SHR,KEEP,KEEP)
//IN2      DD DSN=IN-file2,DISP=(SHR,KEEP,KEEP)
//OUT      DD DSN=Output-file,DISP=MOD
//TOOLIN   DD *
COPY FROM(IN1) USING(CTL1)
COPY FROM(IN2) USING(CTL2)
/*
//CTL1CNTL DD *
  OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
    TRAILER1=('FILE2',5X,COUNT=(M10,LENGTH=10))
/*
//CTL2CNTL DD *
  OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
    TRAILER1=('FILE1',5X,COUNT=(M10,LENGTH=10))
/*

The input files have different lrecl's.
Pls suggest..!
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
Saurabh Arora

New User


Joined: 18 Sep 2008
Posts: 5
Location: Noida

PostPosted: Wed Apr 15, 2009 11:41 am
Reply with quote

Hi

The issue has been resolved by using FTOV paramater in the OUTFIL
I have modified the JCL as

Code:
//CTL1CNTL DD *
  OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,FTOV,
    TRAILER1=('ANXXF',5X,COUNT=(M10,LENGTH=10))
/*


Earlier:
Code:
//CTL1CNTL DD *
  OUTFIL FNAMES=OUT,REMOVECC,NODETAIL,
    TRAILER1=('ANXXF',5X,COUNT=(M10,LENGTH=10))
/*

Thanks!
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


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

PostPosted: Wed Apr 15, 2009 11:53 am
Reply with quote

Saurabh Arora wrote:
The issue has been resolved by using FTOV paramater in the OUTFIL
Thanks for sharing the solution, appreciated.

Please notice that your first post is been edited to add BBcode. Please learn to use BBcode when You post some code/error, that's rather readable.
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 WER247A SORTOUT HAS INCOMPATIBLE LRECL SYNCSORT 7
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts VB to FB - Finding LRECL SYNCSORT 4
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
Search our Forums:

Back to Top