Re: Retrieving Deleted Records

[PaulMmn <PaulMmn@xxxxxxxxxxxxx>]

If you can print them, can't you just jimmy the tool to write to a file
instead of a printer?

If I remember the technique, it relies on the fact that deleted records are
not physically stripped from the file until you do a RGZPFM.

You do a SAVOBJ to a Save File.  Then, in RPG, read the save file (I believe
it's a 528 byte record...).  The save file will have both live and dead
records, marked with a flag.

A problem is that the records are wrapped in the save file records (much as
I assume spool file records are wrapped in a spool file).  You have to have
a couple of roving pointers to track START-OF-RECORD, END-OF-RECORD in the
incoming data stream, and write out physical records when you have the right
length of data in your hands.


--Paul E Musselman
PaulMmn@ix.netcom.com



>DAsmussen wrote:
>
>> Hey Folks!
>>
>> Time to ask a question, rather than annoy you with my opinions ;-).  Does
>> anyone know of a way to retrieve deleted records from an AS/400 file (not
just
>> print them, as there is a TAATOOL for this)?  The person asking for this was
>> _sure_ that she had seen an article in "Midrange Computing" for this, but
>> couldn't remember the title or date.  My searches of their web site turned up
>> nothing...
>>
>> TIA,
>>
>> Dean Asmussen

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---