RE: Conditional Commit with Embedded SQL -- RPG400-L

SET OPTION is set at compile time.
No way to change it at runtime.

You may have 2 Insert/Update statement one that ends with WITH NC (with no commit) and the other ends with the default (assumed commitment control is set in the compile command or in the SET OPTION Statement.

Mit freundlichen Grüßen / Best regards

Birgitta Hauser
Modernization – Education – Consulting on IBM i

"Shoot for the moon, even if you miss, you'll land among the stars." (Les Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them and keeping them!"
„Train people well enough so they can leave, treat them well enough so they don't want to.“ (Richard Branson)

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of DFreinkel
Sent: Donnerstag, 22. September 2022 16:23
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Subject: Re: Conditional Commit with Embedded SQL

Use the SET OPTIONS statement to turn commitment control off.

Sent from my iPhone

On Sep 22, 2022, at 9:55 AM, Jack Prucha <Jack.Prucha@xxxxxxx> wrote:

We have been using for years the F-Spec Commit keyword to conditionally set on or off commitment control. In some cases a web process using commitment control executes programs via a stored procedure which passes a '1' in a parameter list to turn on commitment control. Green screen programs not using commitment control call the same program with that parameter set to '0'. The called program opens the files with commitment control turned on or off.

Now, we have a new RPG program using embedded SQL Insert and Update. Is there some straightforward way to set commitment control on or off at execution time?

TIA

Jack Prucha
NCSP529 Programming Team Supervisor

College Foundation, Inc.

This email, including any documents, files, or previous email messages attached to it, has been sent from an email account of College Foundation Inc., (CFI) and may contain confidential, proprietary, or legally privileged information belonging to CFI. If you are not the intended recipient, any dissemination, distribution, or copying of this email or its attachments is strictly prohibited. If you have received this email in error, please immediately notify the sender by email and destroy the original email and any attachments.
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a
message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

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

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com