Re: FRCRATIO issue -- RPG400-L

Use the JOB_INFO table instead. https://www.ibm.com/docs/en/i/7.3?topic=services-job-info-table-function

On Tue, 2021-11-16 at 14:34 +0000, (WalzCraft) Jerry Forss wrote:
I think I found the issue.

The pgm B submits the web service calls to a jobq that has only 10 active jobs.
So, a couple of jobs would be sitting in the jobq waiting to be started.

The pgm that checks if the job is active is using the Table(QSYS2.active_job_info()), which does not see it.

I created a new jobq that has more active entries.

How can I change the sql to see the jobs waiting on the jobq?

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Mark Waterbury
Sent: Monday, November 15, 2021 3:47 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: FRCRATIO issue

Jerry,

I think you may be better served to have the web services jobs write their results (records) to a data queue, and have a single program that reads from that *DTAQ and writes to a file ... (that could even be "Program B" in your original post that could also act as the "listener"...)

Data queues perform much better than any database file I/O, either native or SQL-based.

Also, you could then have each web services program send a special message like "**EOF**" (or "*I AM DONE*") to tell the listener job when it has finished ... this should make it much easier for "Program B" to know for certain when they are all finished.

Just my two cents ... :-)

Mark S. Waterbury

On Monday, November 15, 2021, 04:35:24 PM EST, Jerry Forss <jforss@xxxxxxxxxxxxx<mailto:jforss@xxxxxxxxxxxxx>> wrote:

I am adding some additional logging to nail it down.
I am having a sneaking suspicion that the web service pgms are NOT actually done. That would make the most sense.

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>> On Behalf Of Charles Wilt
Sent: Monday, November 15, 2021 3:19 PM
To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxxxxxxxx>>
Subject: Re: FRCRATIO issue

I second FEOD(N)..

Additionally, I'll say that FRCRATIO(1) is never the right answer now-a-days...

Lastly, if the submitted web programs are truely done, ie. those jobs have ended. Then there shouldn't be any reason not to see the records regardless of FRCRATIO() or the use of FEOD(N).

Charles
--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx<mailto: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<mailto: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<mailto:support@xxxxxxxxxxxxxxxxxxxx> for any subscription related questions.

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

Subject to Change Notice:

WalzCraft reserves the right to improve designs, and to change specifications without notice.

Confidentiality Notice:

This message and any attachments may contain confidential and privileged information that is protected by law. The information contained herein is transmitted for the sole use of the intended recipient(s) and should "only" pertain to "WalzCraft" company matters. If you are not the intended recipient or designated agent of the recipient of such information, you are hereby notified that any use, dissemination, copying or retention of this email or the information contained herein is strictly prohibited and may subject you to penalties under federal and/or state law. If you received this email in error, please notify the sender immediately and permanently delete this email. Thank You

WalzCraft PO Box 1748 La Crosse, WI, 54602-1748
www.walzcraft.com<http://www.walzcraft.com><http://www.walzcraft.com> Phone: 1-800-237-1326

[https://www.medtronsoftware.com/img/MedtronMinilogo.bmp]
Kevin Bucknum

Senior Programmer Analyst

MEDDATA / MEDTRON

120 Innwood Drive
Covington LA 70433
Local: 985-893-2550<tel:985-893-2550>
Toll Free: 877-893-2550<tel:877-893-2550>
https://www.medtronsoftware.com

CONFIDENTIALITY NOTICE

This document and any accompanying this email transmission contain confidential information, belonging to the sender that is legally privileged. This information is intended only for the use of the individual or entity named above. The authorized recipient of this information is prohibited from disclosing this information to any other party and is required to destroy the information after its stated need has been fulfilled. If you are not the intended recipient, or the employee of agent responsible to deliver it to the intended recipient, you are hereby notified that any disclosure, copying, distribution or action taken in reliance on the contents of these documents is STRICTLY PROHIBITED. If you have received this email in error, please notify the sender immediately to arrange for return or destruction of these documents.