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
 

 

While Spliting the input file the output file record length

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

New User


Joined: 13 Jun 2007
Posts: 55
Location: banaglore

PostPosted: Thu Jun 28, 2007 12:26 pm    Post subject: While Spliting the input file the output file record length
Reply with quote

Hi All

While Spliting the input file using following condition
SORT FIELDS=COPY
OUTFIL FILES=01,
INCLUDE=(05,1,CH,EQ,C'B',AND,6,1,CH,EQ,C'N')

the output file record length should remain same or what ? if i changed it to more or less than the actual length what will happen .

If i increse the length , i m getting abend ABENDU0425

please give appropriate answer


please let me knowfor more detail?
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Jun 28, 2007 12:50 pm    Post subject:
Reply with quote

Hello,

Please post all of the info from your job - the jcl, control statements, and the output (other than any dumps - we won't want a dump here).
Back to top
View user's profile Send private message
sanjayis01
Warnings : 1

New User


Joined: 13 Jun 2007
Posts: 55
Location: banaglore

PostPosted: Thu Jun 28, 2007 1:01 pm    Post subject:
Reply with quote

//A028968A JOB (TDEV,TST),'A028968',MSGCLASS=9,
// CLASS=C,NOTIFY=A028968,TIME=(1,20)
//* $ACFJ219 ACF2 ACTIVE TGTMPLS
//*
//JOBLIB DD DISP=SHR,DSN=SYS1.SCEERUN
// DD DSN=NDVRPRD.MUNIT.TGT.LE.LOADLIBB,
// DISP=SHR
// DD DSN=NDVRPRD.CPROD.TGT.LE.LOADLIBB,
// DISP=SHR
//STEP010 EXEC PGM=SORT
//SORTIN DD DSN=SEDT.NT.SEDD001.LOC.MEAS.REC,DISP=SHR
//SORTOF01 DD DSN=SEDT.NT.SEDD001.LOC.MEAS.HDR.DATA,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(15,15),RLSE),
// DCB=(DSCB1,BLKSIZE=0,LRECL=130,RECFM=FB)


This is job card used to split the file the input file lenght is 125 if increase the o/p file legth to 130 its giving abend mentioned above, and if decrese the lenght to 100 , its working fine.

My question is In sort utility while spliting the file the o/p file record length should be same or less?

can any one aswer this please
Back to top
View user's profile Send private message
Devzee

Active Member


Joined: 20 Jan 2007
Posts: 684
Location: Hollywood

PostPosted: Thu Jun 28, 2007 1:11 pm    Post subject:
Reply with quote

If you increase file length from 125 to 130, then code
OUTREC=(1,125,130:X)
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: Thu Jun 28, 2007 7:55 pm    Post subject:
Reply with quote

Sanjay,

If you run the job you showed with DFSORT, you'll get this error message:

ICE222A 0 125 BYTE FIXED RECORD LENGTH IS NOT EQUAL TO 130 BYTE LRECL FOR SORTOF01

I don't know where the U0425 you mention is coming from.

With OUTFIL, the output LRECL must match the output record length. In your case, the output record length is 125, but the output LRECL is 130 (LRECL=130) so you'll get that error message. If you want the output record length to be 130, you can use:

Code:

  SORT FIELDS=COPY
  OUTFIL FILES=01,
     INCLUDE=(05,1,CH,EQ,C'B',AND,6,1,CH,EQ,C'N') ,
     OVERLAY=(130:X)
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 SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts Incorrect output when trying to add n... monica1 PL/I & Assembler 10 Fri Jan 13, 2017 5:02 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
No new posts Performing arithmetic on input field zh_lad DFSORT/ICETOOL 31 Tue Dec 06, 2016 8:04 pm
No new posts High CPU consumption Job using IAM fi... aswinir JCL & VSAM 15 Thu Dec 01, 2016 8:28 pm


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