RE: HELP! Records deleted in a file

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

Query might come in handy here.  Copy the current production file and the
most recent backup to a convenient place.  Use an exception (type 3) join to
find all the records that are in the backup that aren't in the production
file and write them to an output file.  Copy the current production file and
the output from the query to a third file that will become your new
production file.

> -----Original Message-----
> From: Jim Langston [mailto:jlangston@celsinc.com]
> Sent: Thursday, June 27, 2002 2:59 PM
> To: 'rpg400-l@midrange.com'
> Subject: RE: HELP! Records deleted in a file
>
>
> I would restore your backup to a different library first of
> all, one that's
> not in the library list.
>
> What I did in this situation once was to write a quick RPG
> program that
> opened up the file twice, once for Primary Input, once for
> full procedure.
> Then I did an OVRDBF to override the input to the restored
> version, and the
> full procedure update to the active one.  One of the
> situations where using
> a Primary file is justified, IMO.
>
> Simple program chain to the full procedure.  If it doesn't
> exist in the full
> procedure, then I add the record with a write.
>
> What this winds up doing is adding all deleted records from
> the restored
> file to the active file, leaving the rest alone.  You may wind up with
> records that were deleted that were supposed to be deleted,
> but that is
> cleanup you'll have to do.
>
> Good luck.
>
> Regards,
>
> Jim Langston
>
> -----Original Message-----
> From: Wills, Mike N. (TC) [mailto:MNWills@taylorcorp.com]
>
> We have a file that mysteriously had a number of records
> deleted. The good
> thing is it isn't a mission critical file. The bad thing, the file has
> changed, and we don't know when the records were deleted.
> What is the best
> approach to retrieving the records we have from a backup and
> adding them
> back in the file. Obliviously we have to cut our losses on
> some of the other
> data and re-enter it, but that is better than what we are at now.
>
> Thanks for any help at all.
>
> Mike Wills
> IT Corporate Support
> Taylor Corporation
> mnwills@taylorcorp.com
> Phone: (507) 386-3187
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise
recorded by The Sharper Image corporate e-mail system and is subject to
archival, monitoring, review by and/or disclosure to Sharper Image security
and other management. This message is intended only for the use of the
addressee and may contain information that is privileged and confidential.
If you are not the intended recipient, dissemination of this communication
is prohibited.