Re: Select/Update Loop in SQL

["Art Tostaine, Jr." <atostaine@xxxxxxxxx>]

Thank you.  Art

On Mon, Apr 9, 2018 at 10:22 AM, Tommy Holden <Tommy.Holden@xxxxxxxxx>
wrote:

> UPDATE xxx WHERE CURRENT OF C
> You'll have to check the syntax since I'm not in a position to look it up
> right now but that should be close
>
>
> Thanks,
> Tommy Holden
>
> -----Original Message-----
> From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Art
> Tostaine, Jr.
> Sent: Monday, April 9, 2018 9:17 AM
> To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> Subject: Select/Update Loop in SQL
>
> What's the best way to update a row after it's read and processed in a SQL
> Loop?  Can I just do an update in the loop?
>
> EXEC SQL DECLARE CURSOR C
> DOW SQLSTT = 00000
> EXEC SQL FETCH NEXT
> EXEC SQL UPDATE?
> EXEC SQL FETCH NEXT
> ENDDO
>
> Thanks
> --
> Art Tostaine
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
> unsubscribe, or change list options,
> visit: https://na01.safelinks.protection.outlook.com/?url=
> https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%
> 2Frpg400-l&data=02%7C01%7CTommy.Holden%40tmcat.com%
> 7C88705ee0b34745c239bc08d59e24981c%7C7bedfe4f5ee143529ded95e9c966
> aa39%7C0%7C0%7C636588802368468559&sdata=1sRHDR4iskDjIrcbb4qkc5%
> 2BsR9l2DaCWCAwxwHliyr4%3D&reserved=0
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives at
> https://na01.safelinks.protection.outlook.com/?url=https%3A%2F%2Farchive.
> midrange.com%2Frpg400-l&data=02%7C01%7CTommy.Holden%40tmcat.com%
> 7C88705ee0b34745c239bc08d59e24981c%7C7bedfe4f5ee143529ded95e9c966
> aa39%7C0%7C0%7C636588802368468559&sdata=sTKNTLrZXZf6E5%
> 2FyQbnUk5nYH8KRqmnp5i0uPlQ9r7g%3D&reserved=0.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://na01.safelinks.protection.outlook.com/?url=
> http%3A%2F%2Famzn.to%2F2dEadiD&data=02%7C01%7CTommy.Holden%40tmcat.com%
> 7C88705ee0b34745c239bc08d59e24981c%7C7bedfe4f5ee143529ded95e9c966
> aa39%7C0%7C0%7C636588802368468559&sdata=qZ%2B4YQUsILjMu%2FS9WECGkCtbT%
> 2F6BvV70co0Fj2%2FVm7M%3D&reserved=0
> --
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: http://amzn.to/2dEadiD