View previous topic :: View next topic |
Author |
Message |
vazigarasen Beginner
Joined: 16 Nov 2005 Posts: 4 Topics: 2
|
Posted: Wed Nov 16, 2005 3:06 pm Post subject: IDCAMS help - copy VSAM (LRECL 64) to GDG (LRECL 65) |
|
|
Hi
I have requirement where i need to copy the VSAM file which is of length 64 to a gdg file whose length is 65 .....Please suggest me a good way to achieve this one
Thanks
Sen |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Wed Nov 16, 2005 3:28 pm Post subject: |
|
|
vazigarasen,
Try this
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=YOUR VSAM FILE,
// DISP=SHR
//SORTOUT DD DSN=YOUR GDG(+1),
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(X,Y),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(1,64,X)
/*
|
Hope this helps...
Cheers
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
vazigarasen Beginner
Joined: 16 Nov 2005 Posts: 4 Topics: 2
|
Posted: Wed Nov 16, 2005 3:34 pm Post subject: |
|
|
Hi Kolusu
We have our LRECL changing will this SORT will help us in changing that |
|
Back to top |
|
|
kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
|
Posted: Wed Nov 16, 2005 3:47 pm Post subject: |
|
|
Quote: |
We have our LRECL changing will this SORT will help us in changing that
|
vazigarasen,
Try running the JCL and see the output !
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
|
vazigarasen Beginner
Joined: 16 Nov 2005 Posts: 4 Topics: 2
|
Posted: Thu Nov 17, 2005 2:31 am Post subject: |
|
|
Thanks a Lot Kolusu it really works well ...................... |
|
Back to top |
|
|
|
|