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 Record Not found in AlX but record re... mukun264 COBOL Programming 0 Fri Mar 24, 2017 9:28 am
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
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