Re: Update the first 1500 records that need updating

OOOOOHHHHHH, nice
thanks



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill



"SJL"
<sjl_abc@hotmail.
com> To
Sent by: "RPG programming on the AS400 /
rpg400-l-bounces@ iSeries" <rpg400-l@xxxxxxxxxxxx>
midrange.com cc

Subject
12/04/2007 05:08 Re: Update the first 1500 records
PM that need updating


Please respond to
RPG programming
on the AS400 /
iSeries
<rpg400-l@midrang
e.com>






This should work:

UPDATE FILEA F
SET FIELDA = 'N' where RRN(F) in

(
SELECT RRN(F) from FILEA F where FIELDA='X'
Fetch first 1500 rows only
)

- sjl

----- Original Message -----
From: "Alan Shore" <AlanShore@xxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Tuesday, December 04, 2007 3:23 PM
Subject: Update the first 1500 records that need updating

Hi everyone
(Hopefully) A quick sql question.
I have a simple SQL update
UPDATE FILEA SET FIELDA = 'N' WHERE FIELDA = 'X'

However there are thousands of records that will be updated. I only need

to

update the first 1500 of these records (no other selection criteria, just
the first 1500)

Is this possible?
If so, how?

Thanks in advance



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing

list

To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.