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
 
reblock or change the logical record length of a dataset

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

New User


Joined: 31 Aug 2006
Posts: 57
Location: chennai

PostPosted: Fri Jan 12, 2007 12:33 pm    Post subject: reblock or change the logical record length of a dataset
Reply with quote

Hi
How to rreblock or change the logical record length of a dataset in Mainframe


anybody give example?
Back to top
View user's profile Send private message

UmeySan

Active Member


Joined: 22 Aug 2006
Posts: 757
Location: Germany

PostPosted: Fri Jan 12, 2007 1:33 pm    Post subject: Re: reblock or change the logical record length of a dataset
Reply with quote

Hi !

Easiest way is to use a IEBGENER and copy the Dataset to a new desired
dataset. You could also use ICEMAN, Fileaid, TSO 3.3 or whatever you have.

Regards, UmeySan

Copy FB/LRECL=40 to VB/max Lrecl=44

STEP90 EXEC PGM=IEBGENER
SYSPRINT DD SYSOUT=*
SYSIN DD DUMMY
*
SYSUT1 DD DISP=SHR,DSN=IER1337.MDL00890.OUTPUT.SOND07
*
SYSUT2 DD DSN=IER1337.MDL00890.FZ022.I421,
DISP=(,CATLG,),UNIT=WORK,SPACE=(CYL,(10,10)),
RECFM=VB,LRECL=044
*
Back to top
View user's profile Send private message
mkssampathkumar
Warnings : 1

New User


Joined: 31 Aug 2006
Posts: 57
Location: chennai

PostPosted: Fri Jan 12, 2007 2:55 pm    Post subject:
Reply with quote

Hi

Thanks for ur reply.
i cant understand ur code.
I am not asking to copying
I want to reblock or change the logical record length of a dataset>the code which u gave is for copying the dataset.I also saw in TSO 3.3 option , it has only to copy the dataset.
am not finding anything to change or reblock the dataset.
Even though u specifying DD parameter after the SYSIN DD DUMMY statement.i cant understand ur code becz am a fresher for mainframe.Please reply me detail.

Thanks
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Fri Jan 12, 2007 3:16 pm    Post subject:
Reply with quote

When a dataset is copied, each record is picked up off the old dataset and layed down on the new dataset. In that process the recfm and lrecl can be changed, you just can't wave a wand and proclaim "Change foul blocksize...begone evil recfm"..... icon_eek.gif
Back to top
View user's profile Send private message
Bitneuker

CICS Moderator


Joined: 07 Nov 2005
Posts: 1105
Location: The Netherlands at Hole 19

PostPosted: Fri Jan 12, 2007 5:06 pm    Post subject:
Reply with quote

It can be adjusted but will be empty, and what the use of that is icon_cry.gif If you try to REPRO it will fail because of invalid length. File MOD1 was originally 910 in length.

Quote:
//ADJUST EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//IN DD DSN=$$NL58.XML.MOD1,DISP=SHR
//OUT DD DSN=$$NL58.XML.MOD1,DISP=SHR,
// DCB=(LRECL=920,RECFM=FB,BLKSIZE=920)
//SYSIN DD DUMMY
/*
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: Fri Jan 12, 2007 9:31 pm    Post subject:
Reply with quote

Hello,

Copy the file you want reblocked to a second file.

Delete (or rename) the original file.

Rename the "new" file with the attributes you want.

TaDaa your file is "reblocked" icon_neutral.gif
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 Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
No new posts Partial color change of a field in CI... waseem0424 CICS 5 Fri Sep 29, 2017 7:56 pm
This topic is locked: you cannot edit posts or make replies. Selecting two copybooks of different ... Vignesh Sid COBOL Programming 8 Tue Sep 05, 2017 7:28 pm

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