Books on this subject:
Subfile Programming Essentials
AS/400 Expert : Ready-To-Run RPG/400 Techniques
RPG IV By Example

You can't delete an individual subfile record. You can delete a whole subfile with the SFLDLT keyword. (You use this only if you already have 24 subfiles (!) in use and you want to put another into use) At my company, when a record is deleted, we update the subfile record with the text "*DELETED*" and protect the option field. Another thing you might try is to rebuild the subfile after a delete is performed, and position the subfile to the record that was before the one that was deleted.

---

Why not load the subfile from the original file as a page at a time subfile? Sure the subfile will start again at the first page, but a good practice is to have a "position to" field at the top as to where to start loading from the file.

---

Thank you anyone who has responded I realized I was in error late last night, the book actually does not say you can delete a record in a sub file. damn. > Yet, in a text book I have it notes that you > can delete from a sub file, but doesn't have an examples. So I have devised a method of storing the records in a temp file because the program is actually adding records as it runs, then if the user places a 4 in the OPT field then it will clear the sub file delete the record in the temp file and then reload the sub file with the records in the temp file. I was going to do it with a run-time array, but someone said that may use up to much resources.

---

You can't delete a subfile record. I always use a READC loop, delete my record from the file and "mark" the subfile record as deleted. You could do this by putting a text "** deleted **" in a text field and/or by protecting your option field so the user can't delete the same record twice. Make a F5=Refesh key to reload your subfile.

---

You can do it. To do a Delete or update the file you are working on has to be set in the file specs as "update" E.G. (FSPECS) FDATAFILE UF A E DISK To do the delete use this sample code:

      *****************************************************************
      * $PFDLT   Primary File record deletion subroutine
      *****************************************************************
     C     $PFDLT        BEGSR
     C     SVKR          CHAIN     RUPDAT                             47
     C     *IN47         IFEQ
*OFF                                        * If rcd exists then delete
it
     C                   DELETE
RUPDAT                                     C                   MOVE
'Y'           DELF
     C                   ENDIF
     C                   ENDSR

after you do a deletion or a change or add. You need to do a READC on the subfile and then reload the subfile so it will reflec the change.

---

The basic method is that you delete the record from the file from which the subfile is build, and then reload the subfile. I know that you can update a subfile record but I've never tried to delete a record on it, and I've my doubts that it can be done.

---

It has been a couple of years since did what you want to do, but, all you need is the READC and then check for the correct value in the OPT1 field. if it is correct then - DELET SFLRCD (DELETE for RPG / ILE). this should not pose any problems. if you can fill the sub-file then you can delete from it. you do not need to subtract anything from RRN either. hope this helps.

---