| View previous topic :: View next topic |
| Author |
Message |
Vinodch
Beginner
Joined: 23 Dec 2002
Posts: 80
Topics: 32
Location: Chennai, India
|
 Posted: Tue Feb 28, 2006 8:15 am Post subject: Prime KSDF using SORT/IDCAMS |
 |
|
Hi
Is it possible to prime a KSDF or adding a dummy record '000000000'
using SORT or IDCAMS.
_________________
Thanks,
Vinod. |
|
| Back to top |
|
 |
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
|
| Posted: Tue Feb 28, 2006 9:02 am Post subject: |
|
|
Vinodch,
Try this
| Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
//SORTOUT DD DSN=YOUR EMPTY KSDS,
// DISP=SHR
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(C'000000000',n-9X)
/*
|
Change n-9 on the outrec fields to your actual lrecl - 9 bytes . ie if you ksds cluster length is 100, then the control card should be as follows
| Code: |
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(C'000000000',91X)
/*
|
Hope this helps...
Cheers
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Vinodch
Beginner
Joined: 23 Dec 2002
Posts: 80
Topics: 32
Location: Chennai, India
|
| Posted: Wed Mar 01, 2006 1:55 am Post subject: |
|
|
Hi Kolusu
I tried the job mentioned by you but still could not able to add a dummy record, file remains empty.
_________________
Thanks,
Vinod. |
|
| Back to top |
|
|
kolusu
Site Admin
Joined: 26 Nov 2002
Posts: 12376
Topics: 75
Location: San Jose
|
| Posted: Wed Mar 01, 2006 4:20 am Post subject: |
|
|
| Quote: |
Hi Kolusu
I tried the job mentioned by you but still could not able to add a dummy record, file remains empty.
|
Vinodch,
Look at the job posted by me carefully. The SORTIN is having 1 all space record and if you ran my job as is your Vsam dataset should have 1 record.
Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu |
|
| Back to top |
|
|
Vinodch
Beginner
Joined: 23 Dec 2002
Posts: 80
Topics: 32
Location: Chennai, India
|
| Posted: Wed Mar 01, 2006 5:41 am Post subject: |
|
|
Sorry Kolusu I missed to notice the space record, now its working fine.
Thanks for your Help !
_________________
Thanks,
Vinod. |
|
| Back to top |
|
|
|
|
|
FAQ
Search
Quick Manuals
Register
Profile
Log in to check your private messages
Log in
