Re: SQL UPDATE of SELECTed records -- RPG400-L

Daniel -

Thanks for your response.  Using pure SQL - will be run with RUNSQLSTM but 
am testing interactively with STRSQL.  I added a semi-colon after the 
closing parenthesis - no joy.

Thanks,

Steve

<DGray@xxxxxxxxxxxxxxx> wrote in message 
news:OF786D1D03.D3CACEAC-ON86256FB7.005B15C6-86256FB7.005BFB4E@xxxxxxxxxxxxxxxxxx
> Steve, If you are doing this in SQLRPGLE, then no problem:
>
> C/exec sql
> C+    update MYFILE set FIELD1= :variable1
> C+           where FIELD2=:variable2
> C+           or         FIELD3=:variable3
> C/end-exec
>
> If you are doing this via a source member executed RUNSQLSTM, you probably
> just need to round out your statement with a semi-colon
>
> _________________________
> Daniel L. Gray
> Systems Analyst
> Maverick Transportation, Inc.
> 13301 Valentine Road
> North Little Rock, AR 72117
>
> Phone: 501-955-1221
> Fax: 501-955-4221
>
>
>
>             "Steve McKay"
>             <nospammers1@yaho
>             o.com>                                                     To
>             Sent by: 
> rpg400-l@xxxxxxxxxxxx
>             rpg400-l-bounces@                                          cc
>             midrange.com
>                                                                   Subject
>                                       SQL UPDATE of SELECTed records
>             03/01/2005 10:14
>             AM
>
>
>             Please respond to
>              RPG programming
>              on the AS400 /
>                  iSeries
>             <rpg400-l@midrang
>                  e.com>
>
>
>
>
>
>
> All -
>
> My apologies for posting in the RPG group - I didn't find an SQL group.
>
> I am trying to UPDATE several records returned by a SELECT statement but 
> am
>
> getting SQL0104 (Token <END-OF-STATEMENT> was not valid. Valid tokens: < >
> =
> <> <= !<).
>
> Can this be done?  Current statement looks like this:
>
> UPDATE library/file
> SET field = 'U'
> WHERE
> (SELECT fields
> FROM library/file
> WHERE conditions)
>
> Obviously, I've left out actual library and field names plus the 
> conditions
>
> that I'm testing, but you get the idea.
>
> Thanks in advance,
>
> Steve
>
>
>
> --
> 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.
>
>