Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Invalid Lrecl error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
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    Post subject: Invalid Lrecl error
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    Post subject: Reply to: Invalid Lrecl error
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

Senior Member


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

PostPosted: Wed Apr 15, 2009 11:53 am    Post subject: Re: Reply to: Invalid Lrecl error
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    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 IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts FTP Skip or ignore error and process ... AJAYREDDY All Other Mainframe Topics 3 Wed Sep 27, 2017 8:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us