IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Problem with writing to VSAM dataset


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
TizMe

New User


Joined: 05 Jan 2006
Posts: 72

PostPosted: Tue May 08, 2007 7:12 am
Reply with quote

Using standard IBM utilities you can use the following JCL to prime a KSDS with one low values record.

I use this for a KSDS with lrecl=96 and a KEYLEN=44 (offset=0)

You should be able to modify it for your own file.

Code:
//IEBDG    EXEC PGM=IEBDG                             
//SYSPRINT DD SYSOUT=*                               
//PRIMER   DD DSN=&&PRIMER,DISP=(NEW,PASS),UNIT=VIO, 
// DCB=(RECFM=F,LRECL=96,BLKSIZE=96),SPACE=(TRK,(1)) 
//SYSIN    DD *                                       
 DSD OUTPUT=(PRIMER)                                 
 FD NAME=A,LENGTH=44,STARTLOC=1,PICTURE=44,           
   '00000000000000000000000000000000000000000000'     
 CREATE NAME=A                                       
 END                                                 
/*                                                   
//*                                                   
//STEP1 EXEC PGM=IDCAMS                               
//SYSPRINT DD SYSOUT=*                               
//INPRIMER DD DSN=&&PRIMER,DISP=(OLD,DELETE)         
//KSDS     DD DSN=............,DISP=OLD               
//SYSIN DD *                                         
 REPRO OFILE(KSDS) INFILE(INPRIMER)                   
/*                                                   
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Access to non cataloged VSAM file JCL & VSAM 18
No new posts FINDREP - Only first record from give... DFSORT/ICETOOL 3
No new posts Map Vols and Problem Dataset All Other Mainframe Topics 2
No new posts Allocated cylinders of a dataset DB2 12
No new posts Sort First/last record of a subset th... DFSORT/ICETOOL 7
Search our Forums:

Back to Top