RE: prob in deleting records using a subfile from a pf.

hello.sir
  thanks a lot.....for your suggesstion . this will work..thanks for ur help

Lim Hock-Chai <Lim.Hock-Chai@xxxxxxxxxxxxxxx> wrote:
  INFDS will tell you how many records is in the subfile (see
http://publib.boulder.ibm.com/iseries/v5r2/ic2924/books/c092508409.htm#H
DRDSFEED for example).


In the subfile create hidden fields to save the unique key of the
record. Populate those hidden fields when loading the subfile. (Note:
code below has not been tested/compiled)

Preferred method:
C for ix=1 to NUM_RCDS
C ix chain SubFile
C S1HidKey chain FileFmt 
C if %found
C delete FileFmt
C endif
C endfor

Personally not so Preferred method:
C for ix=1 to NUM_RCDS
C ix chain SubFile
C S1HidKey delete(e) FileFmt
C endfor

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of sunny singh
Sent: Monday, May 01, 2006 9:38 AM
To: MIDRANGE-L@xxxxxxxxxxxx
Subject: prob in deleting records using a subfile from a pf.

hi all..
i have a prob regarding subfiles..
i have a load all subfile displaying for example four selected
records by the user.
now i want all the records to be deleted when the user presses certain
key say f11.
i am having a prob when i tried to do this by reading the subfile
record format from the top and then chaining to the physical file in a
loop..can any one plz explain the proceedure for just idea of how this
could be done
example...
date xyz bank
time

number name
dept salary 
101 john
comp 12344
102 franky
mba 38474
103 rocky
comp 123454
104 nick
b.tech 345676

how can we delete above all four records that has been displayed on
the above screen.niumber beeing key field.
why cant i perform readp or reads operation on this subfile.
thanks in advance...
please do reply.
have a nice day........






---------------------------------
Talk is cheap. Use Yahoo! Messenger to make PC-to-Phone calls. Great
rates starting at 1¢/min.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.