MVSFORUMS.com :: View topic - Error in loading VSAM

MVSFORUMS.com
A Community of and for MVS Professionals

FAQ

Quick Manuals

Profile

Error in loading VSAM
Goto page Previous 1, 2

MVSFORUMS.com Forum Index -> Data Management

View previous topic :: View next topic

Author

Message

mrinalsolanki
Beginner

Joined: 02 May 2006
Posts: 56
Topics: 16

Posted: Thu Sep 13, 2007 2:43 am Post subject:

At last i Achieved what i want and here is the JCL so that some beginner will not stuck on this basic thing.

Code:

//STEP01 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DELETE TEST.VSAM4 CLUSTER PURGE
DEFINE CLUSTER ( -
NAME(TEST.VSAM4) -
VOLUME(STGG18) -
UNIQUE -
SHAREOPTIONS(3 3) -
CYLINDERS(7 7)) -
DATA ( -
NAME(TEST.VSAM4.DATA) -
KEYS (20 0) -
RECORDSIZE(55 55) -
CISZ(4096)) -
INDEX ( -
NAME(TEST.VSAM4.INDEX) -
NOIMBED NOREPLICATE) -
CATALOG(CATALOG.DEVELOP1)
/*
//STEP02 EXEC PGM=IDCAMS
//IN DD DSN=PRAC.FILE,DISP=SHR
//OUT DD DSN=TEST.VSAM4,DISP=SHR,LIKE=PRAC.FILE
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
REPRO INFILE(IN) OUTFILE(OUT)

/*

Thanks for your suggestions
Razz

Display posts from previous:

	MVSFORUMS.com Forum Index -> Data Management	All times are GMT - 5 Hours Goto page Previous 1, 2
Page 2 of 2

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum