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
 

 

Change/modify the record length of the PDS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
sivasu_usavis

New User


Joined: 28 Jun 2006
Posts: 21
Location: Chennai

PostPosted: Fri Dec 15, 2006 6:19 pm    Post subject: Change/modify the record length of the PDS
Reply with quote

can we change/modify the record length of the partitioned DS? If so how?


Thans
siva
Back to top
View user's profile Send private message

cobolunni

Active User


Joined: 07 Aug 2006
Posts: 128
Location: kerala,india

PostPosted: Fri Dec 15, 2006 6:22 pm    Post subject:
Reply with quote

Once pds is created i dont think that there is any option to update the properties
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 Dec 15, 2006 6:26 pm    Post subject:
Reply with quote

Oh yes? icon_wink.gif Just copy some jcl to you load lib and see.... icon_lol.gif
Back to top
View user's profile Send private message
cobolunni

Active User


Joined: 07 Aug 2006
Posts: 128
Location: kerala,india

PostPosted: Fri Dec 15, 2006 6:30 pm    Post subject:
Reply with quote

William, I cant follow you if u had any idea of changing the properties of a data set
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 Dec 15, 2006 6:53 pm    Post subject:
Reply with quote

Quote:
I have a PDS ..or more like had a PDS ...a standard PDS RECFM=80, LRECL=80 and stuff .....one fine day i like a smart @ss do an XDC from my SFSD to create a new member in my pds and it conked it off ...now the stats for my PDS look liks



Organization . . . : PO Used cylinders . . : 2

Record format . . . : FBA Used extents . . . : 2

Record length . . . : 121

Block size . . . . : 1210

1st extent cylinders: 2

Secondary cylinders : 500

Data set name type : PDS



Now it won't let me do anything(read/create) with the any member in my PDS except the XDC thingy which i ported in there ....any suggestions on how i can recover this pds ...i tried things like IEBCOPY and stuff...but no use....

Quote:
Code:
//xxxxxxxF JOB (yyyy,zzzzzzzz),'aaaaaaaa - bbbbbbbbb',

//             CLASS=C,

//             MSGCLASS=9,

//             NOTIFY=&SYSUID

//*  I AM xxxxxxx.TSO.JCL(FIXPDS)

//*

//FIXPDS  EXEC PGM=IEBGENER

//SYSPRINT DD  SYSOUT=*

//SYSIN    DD  DUMMY

//SYSUT2   DD  DSN=pds.to.be.fixed(DELETEME),

//             DISP=MOD,

//             BLKSIZE=27920,

//             LRECL=80,

//             RECFM=FB

//SYSUT1   DD  *

DELETE ME

//*

//
Back to top
View user's profile Send private message
sivasu_usavis

New User


Joined: 28 Jun 2006
Posts: 21
Location: Chennai

PostPosted: Sat Dec 16, 2006 10:22 pm    Post subject:
Reply with quote

so, there is no possible to change the properties of PDS???
Back to top
View user's profile Send private message
William Thompson

Global Moderator


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

PostPosted: Sat Dec 16, 2006 10:27 pm    Post subject:
Reply with quote

sivasu_usavis wrote:
so, there is no possible to change the properties of PDS???

Huh? What didn't you understand of my last post?????
Back to top
View user's profile Send private message
sivasu_usavis

New User


Joined: 28 Jun 2006
Posts: 21
Location: Chennai

PostPosted: Mon Dec 18, 2006 1:01 pm    Post subject:
Reply with quote

William Thompson wrote:
sivasu_usavis wrote:
so, there is no possible to change the properties of PDS???

Huh? What didn't you understand of my last post?????



Sorry, I didnt get u. Whats that XDC? Could u explain more detaily? Actually i've the PDS with 120 length LRECL size, but i want to change that into 80 size....
Back to top
View user's profile Send private message
William Thompson

Global Moderator


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

PostPosted: Mon Dec 18, 2006 1:15 pm    Post subject:
Reply with quote

Your safest bet would be to rename the current, allocate the new and copy mem over. To dynamically redefine the lrecl, you risk loss of data.
Back to top
View user's profile Send private message
sivasu_usavis

New User


Joined: 28 Jun 2006
Posts: 21
Location: Chennai

PostPosted: Mon Dec 18, 2006 1:23 pm    Post subject:
Reply with quote

William Thompson wrote:
Your safest bet would be to rename the current, allocate the new and copy mem over. To dynamically redefine the lrecl, you risk loss of data.


I did what u suggest me and i got thru my task. but i need to know, whether can i able to modify that parameter or not?
Back to top
View user's profile Send private message
William Thompson

Global Moderator


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

PostPosted: Mon Dec 18, 2006 2:42 pm    Post subject:
Reply with quote

sivasu_usavis wrote:
but i need to know, whether can i able to modify that parameter or not?

Look at my longer post from Friday, the person had a pds originally 80 lrecl, that he suddenly found with a 121 lrecl. The gener job fixed it, in other words, modified that parameter - the lrecl.
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2237
Location: @my desk

PostPosted: Tue Dec 19, 2006 12:45 pm    Post subject:
Reply with quote

Hi William

Quote:
the person had a pds originally 80 lrecl, that he suddenly found with a 121 lrecl. The gener job fixed it, in other words, modified that parameter - the lrecl.


I dint understand how he managed to change the LRECL from 80 to 121 while doing XDC.

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

Global Moderator


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

PostPosted: Tue Dec 19, 2006 5:46 pm    Post subject:
Reply with quote

Code:
               HELP: Job Data Set Panel -- Action Characters  Panel 2 of 2
COMMAND INPUT ===>                                                       
                                                                         
          V     View a job's page-mode data sets using GDDM.             
          X     Print output data sets.  You can add the following:       
                C - Close the print file after printing (XC)             
                D - Display the Open Print Data Set panel (XD or XDC)     
                F - Display the Open Print File panel (XF or XFC)         
                S - Display the Open Print panel (XS or XSC)             


An XDC gives you a this
Code:
                            SDSF Open Print Data Set                     
COMMAND INPUT ===>                                            SCROLL ===>
                                                                         
                                                                         
Data set name  ===>                                                       
Member to use  ===>                                                       
Disposition    ===>            (OLD, NEW, SHR, MOD)                       
                                                                         
If the data set is to be created, specify the following.                 
Volume serial will be used to locate existing data sets if specified.     
                                                                         
Management class     ===>           (Blank for default management class) 
Storage class        ===>           (Blank for default storage class)     
  Volume serial      ===>           (Blank for authorized default volume)
  Device type        ===>           (Generic unit or device address)     
Data class           ===>           (Blank for default data class)       
  Space units        ===> BLKS      (BLKS, TRKS, CYLS, BY, KB, or MB)     
  Primary quantity   ===> 500       (In above units)                     
  Secondary quantity ===> 500       (In above units)                     
  Directory blocks   ===>           (Zero for sequential data set)       
  Record format      ===> VBA                                             
  Record length      ===> 240                                             
  Block size         ===> 3120                                           

and if you point the output of the print to an 80 byte lrecl pds, things will change.
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 -> COBOL Programming 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 IMS DB-How to update a record (a sing... Nic Clouston IMS DB/DC 9 Thu Mar 09, 2017 4:38 pm
No new posts Writing on to GSAM variable length rohanthengal JCL & VSAM 6 Fri Mar 03, 2017 7:46 pm
No new posts To Merge mutliple records into a sing... anandgbe DFSORT/ICETOOL 6 Wed Feb 22, 2017 8:49 am


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