× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Hi Eric,

We don't currently use commitment control as practice, but I have written 
an app to use commitment control and modified a trigger to account for the 
use of commitment control for my own educational purposes in the past. 
There are a few developers that are going to start using commitment 
control, and everyone comes to me with questions on new things, and I 
don't have concrete answers.  I'm trying to figure out some "best 
practices" on how to code the CL.  I believe their intent is to implement 
commitment control at the CL level and rollback a whole program upon 
error.  For instance, it appears in RPGIII from the CC red book, that you 
monitor for RPG9001.  In ILE, from looking at job logs after forcing an 
error, it appears CEE9901.  What should they rollback on?

I sure hope they are not going to wholesale convert everything this way; 
otherwise, they will get to know what "deadlock" means intimately, which 
is one of the reasons I didn't push using commitment control.  I think 
transactions should be used at a much smaller scope.

Mark

rpg400-l-bounces@xxxxxxxxxxxx wrote on 09/16/2006 12:00:05 PM:

Send RPG400-L mailing list submissions to
   rpg400-l@xxxxxxxxxxxx

To subscribe or unsubscribe via the World Wide Web, visit
   http://lists.midrange.com/mailman/listinfo/rpg400-l
or, via email, send a message with subject or body 'help' to
   rpg400-l-request@xxxxxxxxxxxx

You can reach the person managing the list at
   rpg400-l-owner@xxxxxxxxxxxx

When replying, please edit your Subject line so it is more specific
than "Re: Contents of RPG400-L digest..."
*** NOTE: When replying to this digest message, PLEASE remove all 
text unrelated to your reply and change the subject line so it is 
meaningful.Today's Topics:

   1. Re: infinite loop (Buck)
   2. Re: infinite loop (Rory Hewitt)
   3. Commitment control resources (Mark Adkins)
   4. RE: Commitment control resources (DeLong, Eric)
   5. Re: infinite loop (Barbara Morris)
   6. Re: infinite loop (Tony Carolla)

----- Message from Buck <kc2hiz@xxxxxxxxx> on Fri, 15 Sep 2006 14:
35:49 -0400 -----

To:

rpg400-l@xxxxxxxxxxxx

Subject:

Re: infinite loop

*hival as far as I knew has no end... isn't it an infinite number?

Nope, there are no infinite numbers in computing. 

IEEE floats can represent infinite numbers: 
http://steve.hollasch.net/cgindex/coding/ieeefloat.html
http://www.cs.berkeley.edu/~wkahan/ieee754status/IEEE754.PDF

Although, RPG balks at divide by zero, even with floating point.

Too bad DOW doesn't support numbers :-)
   --buck


----- Message from "Rory Hewitt" <roryhewitt@xxxxxxxxx> on Fri, 15 
Sep 2006 11:41:28 -0700 -----

To:

"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>

Subject:

Re: infinite loop

All,

On a related note, is there any way one can use a for loop without 
needing
to define an index (effectively replicating DO behavior) e.g.:

for *index = 1 to 20
  exsr process;
endfor;

where *index can be a system-defined index variable? Otherwise I have to
define an index variable just to process my loop 20 times. I just think 
it's
a pain that I used to be able to use a DO-loop for a specified number of
iterations as e.g.:

C                    DO         20
C                    EXSR PROCESS
C                    ENDDO

and now I have to define anindex for a for-loop....

Rory


----- Message from Mark Adkins <adkinsm@xxxxxxxxxx> on Fri, 15 Sep 
2006 16:05:42 -0500 -----

To:

rpg400-l@xxxxxxxxxxxx

Subject:

Commitment control resources

Is there a good reference for commitment control usage?  The IBM manual 
appears to have its examples in RPGIII and isn't a very good reference. 
I'm looking for some real world techniques.

Regards,

Mark

----- Message from "DeLong, Eric" <EDeLong@xxxxxxxxxxxxxxx> on Fri, 
15 Sep 2006 16:33:40 -0500 -----

To:

"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>

Subject:

RE: Commitment control resources

Mark,

There's not much about commitment control that is particularly 
language dependent...  It's really an issue with the design of your app. 
 

http://publib.boulder.ibm.
com/infocenter/iseries/v5r3/topic/rzakj/rzakjcommitkickoff.htm

All commitment control is doing is establishing the start and end 
points of a database transaction.  It's up to the developer to 
understand where these should be specified.  Do you have any 
specific questions? 

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-297-2863 or ext. 1863



-----Original Message-----
From: rpg400-l-bounces+edelong=sallybeauty.com@xxxxxxxxxxxx
[mailto:rpg400-l-bounces+edelong=sallybeauty.com@xxxxxxxxxxxx]On Behalf
Of Mark Adkins
Sent: Friday, September 15, 2006 4:06 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Commitment control resources


Is there a good reference for commitment control usage?  The IBM manual 
appears to have its examples in RPGIII and isn't a very good reference. 
I'm looking for some real world techniques.

Regards,

Mark
-- 
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.





----- Message from Barbara Morris <bmorris@xxxxxxxxxx> on Fri, 15 
Sep 2006 18:04:36 -0400 -----

To:

rpg400-l@xxxxxxxxxxxx

Subject:

Re: infinite loop

Buck wrote:

IEEE floats can represent infinite numbers:

You got me!  But you can't get to infinity gradually by counting.  You
jump from E308 straight to infinity.



----- Message from "Tony Carolla" <carolla@xxxxxxxxx> on Fri, 15 Sep
2006 15:17:35 -0700 -----

To:

"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>

Subject:

Re: infinite loop

With structured programming, infinite loops are unnecessary.  ;-)

We all know this is bs, and there are times when they are appropriate. 
In
my experience though, when I am doing an 'infinite' loop (notice the 
quotes
-- the sun won't be operational long enough technically), it is usually
because I am approaching the procedure in an unstructured way.  But 
there
are times when a loop has multiple possible exit-points, and rather than
code a gamut of nested if- or select- structures, it is simpler to code
LEAVE operations.

The funny thing about this is that GOTO accomplishes the same thing, and 
in
essence the DOW 1=1; operation is acting just like a GOTO, the use of 
GOTO
is just so frowned upon.

My 0.02 unloaded.

On 9/14/06, Lim Hock-Chai <Lim.Hock-Chai@xxxxxxxxxxxxxxx> wrote:

In fix format, I use to do below for infinite loop
C                do        *hival


is there a way to do this similar syntax in free format with declare a
variable?
--
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.




-- 
"Enter any 11-digit prime number to continue..."
"In Hebrew SQL, how do you use right() and left()?..." - Random Thought
"If all you have is a hammer, all your problems begin to look like 
nails"

-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) digest 
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.


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.