Re: APIs for file-reords

["Al Barsa, Jr." <barsa2@xxxxxxx>]

At 04:18 PM 12/23/98 PST, you wrote:
>Hi Everybody,

>
>2. Where does the system keeps deleted records and where are the delete 
>flags stored?

There is a 'delete byte' in front of every record.  I do not remember what
they are (maybe x'80' for valid and x'30' for deleted, but this goes back
to CPF release 6.0, and I keep getting these 'senior moments' where I
forget everything).

To check it out, save a SMALL file (just a few records) to a save file,
write a trivial RPG program to copy the save file to a physical file, and
then look at it.  Make sure that there is at least one deleted record to
see.  A save file is 528 bytes long, and needs to be opened with the
OVRSAVF command first executed.

If I remember correctly, a "damaged record" (one that got screwed when it
wrapped the 32760 length of the tape record) is a x'A0'.  My memory is
clearly hazy here.  It's been 12+ years.
>
>3. How come SAVF stores informations such as Delete flags, CRC etc. when 
>PF doesnot, and not even file description?
>
Unless you specify REUSEDLT(*YES), a PF clearly stored deleted records
until you do a reorg.  It's just that they are not visiable.  

Al




+--------------------------------------------------+
| Please do not send private mail to this address. |
| Private mail should go to barsa@ibm.net.         |
+--------------------------------------------------+

Al Barsa, Jr. - Account for Midrange-L
Barsa Consulting, LLC.  
400 > 390

Phone:  914-251-1234
Fax:    914-251-9406
http://www.barsaconsulting.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---