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



Same program. Jobs running concurrently for different business units.

They are Robot reacts from another job so I just put in varying DLYJOB a few seconds for each to stagger them.

Still dumbfounded....


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Darryl Freinkel
Sent: Sunday, April 16, 2017 6:27 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: DTAARA Lock Issue?

Are both programs locking the data area. If the second one is not, it may
be able to read the data area in READ mode hence the result you are getting.

Its been a while since I used the data areas but have not tried using LOCK
in 1 program and a simple read (IN) in another.

Darryl.

On Sat, Apr 15, 2017 at 1:33 PM, Roger Harman <roger.harman@xxxxxxxxxxx>
wrote:

3 line of code
IN
Increment
OUT

Kind of hard to fail I'd think.

No save running. IN fact the other concurrent job finished in < 1 second.

As to adding an autoincrement.... Yeah, obviously the best choice.
Changing a widely used table in an ERP... not likely. Changing it on a
system being phased out in favor of Oracle... No way.

Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Steinmetz, Paul
Sent: Saturday, April 15, 2017 10:08 AM
To: 'RPG programming on the IBM i (AS/400 and iSeries)'
Subject: RE: DTAARA Lock Issue?

If a save was running, the save will allocate the datara, and it will not
be available.

Paul

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Paul
Therrien
Sent: Saturday, April 15, 2017 9:27 AM
To: 'RPG programming on the IBM i (AS/400 and iSeries)'
Subject: RE: DTAARA Lock Issue?

Is there ANY chance that the update/out logic failed and the data area did
not get incremented by the first process.


Paul


-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger
Harman
Sent: Friday, April 14, 2017 2:07 PM
To: 'RPG programming on the IBM i (AS/400 and iSeries)'
<rpg400-l@xxxxxxxxxxxx>
Subject: DTAARA Lock Issue?

We had two jobs submitted for the same process - different companies.

Each (RPGLE) does an IN *LOCK of a data area for a unique identifier.
Increment and then OUT for the next use.

From the joblogs, programs were initiated .06 seconds apart (6/100th's).
Both got the same unique ID. I can't see how this could happen. Default
wait time (job) should be 30 seconds, I believe.

There is no error indicator on the IN. If the LOCK failed and no
indicator specified, would the fail just be ignored?

Thanks.

Roger Harman
COMMON Certified Application Developer - ILE RPG on IBM i on Power




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

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

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

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

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

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





As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

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.