View previous topic :: View next topic
|
Author |
Message |
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
Hi Everyone:
Please I need some help. To make a test with one of my datasets. I have a PS dataset with data. But I need to convert this PS dataset into a VSAM dataset. So I can make the test.
Please let me know if this is possible. And if it is would you please send me an JCL example so I can follow up to make the program.
Thank you
Regards
Jose Jacome
|
|
Back to top |
|
|
DavidatK
Active Member
Joined: 22 Nov 2005 Posts: 700 Location: Troy, Michigan USA
|
|
|
|
The only way I know of doing this is to define a VSAM dataset and repro your PS file into it.
Dave |
|
Back to top |
|
|
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
Thank you.
I need to do this quickly, Can you send me the JCL program.
Please
Regards |
|
Back to top |
|
|
dneufarth
Active User
Joined: 27 Apr 2005 Posts: 419 Location: Inside the SPEW (Southwest Ohio, USA)
|
|
|
|
I'm sure someone where you work has some JCL you can use! |
|
Back to top |
|
|
priyesh.agrawal
Senior Member
Joined: 28 Mar 2005 Posts: 1448 Location: Chicago, IL
|
|
|
|
Code: |
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE HLQ.VSAM.DATASET
DEFINE CLUSTER (NAME('HLQ.VSAM.DATASET') -
REUSE IMBED NOREPLICATE SPEED SHR(2) -
CNVSZ(4096) -
KEYS(23 0)-
CYL(100 10)-
RECSZ(200 200))-
DATA (NAME('HLQ.VSAM.DATASET.DATA')) -
INDEX (NAME('HLQ.VSAM.DATASET.INDEX') CNVSZ(1024))
//*
//STEP2 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDSET DD DSN=HLQ.PS.INPUT.DATASET,DISP=SHR
//VSDSET DD DSN=HLQ.VSAM.DATASET,DISP=OLD
//SYSIN DD *
REPRO -
INFILE(INDSET) -
OUTFILE(VSDSET)
//* |
Regards,
Priyesh. |
|
Back to top |
|
|
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
Hi:
I am still trying to make a PS dataset into VSAM dataset but it is giving me an error I am attaching the the error and the JCL. To see if you can help.
Thank you
priyesh.agrawal wrote: |
Code: |
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DELETE HLQ.VSAM.DATASET
DEFINE CLUSTER (NAME('HLQ.VSAM.DATASET') -
REUSE IMBED NOREPLICATE SPEED SHR(2) -
CNVSZ(4096) -
KEYS(23 0)-
CYL(100 10)-
RECSZ(200 200))-
DATA (NAME('HLQ.VSAM.DATASET.DATA')) -
INDEX (NAME('HLQ.VSAM.DATASET.INDEX') CNVSZ(1024))
//*
//STEP2 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//INDSET DD DSN=HLQ.PS.INPUT.DATASET,DISP=SHR
//VSDSET DD DSN=HLQ.VSAM.DATASET,DISP=OLD
//SYSIN DD *
REPRO -
INFILE(INDSET) -
OUTFILE(VSDSET)
//* |
Regards,
Priyesh. |
|
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
Your input file's records are out of order (exactly what the messages state).
You did sort the input file first, in ascending order, on the key field, right? |
|
Back to top |
|
|
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
No I did not sort the input file. How Can I do it? Or do you think is when I am defining the VSAM dataset that I am running out of space. Or the other thing was when I am doing REPRO that I am not defining something that I should know about?
Please help me? Thanks
Regards
Jose Jacome
superk wrote: |
Your input file's records are out of order (exactly what the messages state).
You did sort the input file first, in ascending order, on the key field, right? |
|
|
Back to top |
|
|
|