how do i use REPRO in REXX program to update in KSDS

sandhya rani · New User Joined: 05 Dec 2006 Posts: 22 Location: hyderabad

Hi,

My requirement is to add the message entered by the user in the Vsam file by incrementing the key

I had written the code as follows

Say 'enter thr message'
Pull message
"alloc DA(temp.flatfile") dd(INDD) shr"
"alloc DA(temp.Vsam.KSDS) dd(OUTDD) mod"
"repro Ifile(INDD) ofile(OUTDD) TOKEY('00000008')"

when i execute the same it is expecting a FROMKEY

whateven message enter by the user iam copying the same into the flatfile.Now iam using repro utility to copy that message to the VSAM by incrementing the key or specified key.

Can anyone tell me how do we use repro to add the record for KSDS(key information is not present in flatfile..and the keylength is 8).

Thanks & Regards
Sandhya Rani

superk · Posted: Wed Dec 27, 2006 1:33 am

As far as I know, you can't use REPRO to simply update a VSAM dataset. I believe that you'll need to REPRO all of the VSAM dataset to the QSAM dataset, add the comment record along with an appropriate key, then REPRO all of the QSAM dataset back into the VSAM dataset.

Comment: wouldn't this be easier to much more efficient to do in COBOL?

Mickeydusaor · Posted: Thu Dec 28, 2006 12:12 am

You need the KEY to the RECORD you are trying to update in the VSAM file. You also need to use the FROM and To Option. I do this all the time. here is an EXAMPLE. The FROM and TO keys are both the same VSAM
record KEY which allows you to replace the one VSAM RECORD.

diwa_thilak · Posted: Sun Feb 25, 2007 12:19 pm

Sandhya,

You cannot copy a flast PS file to VSAM file(i.e updation) as it is.

If the VSAM file is KSDS you cannot do that.

Simple way is ,

1.Get the records from the user( as you did in the flat file)

2.Sort the record in PS based on the key defined in VSAM.

3.Update the VSAM file.