how to add a record at the end of a dataset

Damire · New User Joined: 25 Aug 2006 Posts: 6

ei guys! just want to ask on how do you indicate that a new record will be added at the last line of a dataset. is der any jcl command that can do this?

tnx in advance!

regards,

dAmire

ofer71 · Posted: Mon Sep 11, 2006 12:16 pm

JCL does not have any WRITE commands. However, you can invoke a program using JCL.

O.

IQofaGerbil · Posted: Mon Sep 11, 2006 3:05 pm

Not sure what you are asking here
your topic is how to add a record

try something like this (DISPS at you discretion, assumes all LRECLS etc same)

//S01 EXEC PGM=IEBGENER,COND=(0,NE)
//SYSUT1 DD DSN=MYFILE.ORIGINAL,DISP=SHR
// DD DSN=MYFILE.LAST.LINE,DISP=SHR
//SYSUT2 DD DSN=MYFILE.PLUS.NEW.LAST.LINE,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY

but your text asks how to indicate that a record will be written, what do you mean by that?

shyam_shagam · New User Joined: 07 Sep 2006 Posts: 15 Location: india

dAmire,

By using the following you can do ...........

//REPRO1 EXEC PGM=IDCAMS
//AMSDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//OLDFILE DD * ( You can give your input dataset here also )
SHYAMSUNDER 1
/*
//NEWFILE DD DSN=Give your existing Dataset to add the recods at end,DISP=MOD
//SYSIN DD *
REPRO INFILE (OLDFILE) OUTFILE (NEWFILE)
//*
*

Thank,
Shyamsunder S [/i][/b]