RE: *INLR

Don Brown via RPG400-L <[email protected]> Mon, 20 Apr 2026 00:18:55 +0000
Newsgroups gmane.comp.lang.as400.rpg
Message-ID <ME3P282MB35715AE9B26335254D0CA595E92F2@ME3P282MB3571.AUSP282.PROD.OUTLOOK.COM>
--===============7200658250292447560==
Content-Language: en-US
Content-Type: text/plain; charset="us-ascii"

   If PGMA can do a sbmjob for PGMB I would suggest the amount of work to
   change this to use a DTAQ (data queue) would be minimal and a significant
   improvement. Additionally this approach enables multiple jobs to process
   the requests should that be necessary now or in the future.

   If you do not want to change PGMB, write a new program to monitor for new
   entries on the data queue and call PGMB with the required parameters.

   Cheers
   Don

    

   Don Brown

   Senior Consultant
    
   [1]OneTeam IT Pty Ltd
   P: 1300 088 400

   -----Original Message-----
   From: RPG400-L <rpg400-l-bounces-+hD5IHI5Xscn3HwCXmMcX9BPR1lH4CV8@public.gmane.org> On Behalf Of
   [email protected]
   Sent: Friday, 17 April 2026 5:06 AM
   To: 'Midrange RPG List' <[email protected]>
   Subject: RE: *INLR

   Thanks everyone for your thoughts on how to rewrite this but
   unfortunately, the logic was only an example to show the program flow.
   Because of how the system is written and what needs to be done, PgmA
   submitting PgmB as individual jobs is the only solutions without spending
   a ton of hours doing code rewrite.

   I think that I have my answer in that *inlr being on or off really makes
   no difference because when the job ends, everything from PgmB gets cleaned
   up either way. Feel free to correct that if I misunderstood some of the
   explanations.

   -----Original Message-----
   From: [email protected] <[email protected]>
   Sent: Wednesday, April 15, 2026 4:48 PM
   To: Midrange RPG List <[email protected]>
   Subject: *INLR

   If I have PgmA and it repeatedly calls PgmB, I know not setting on LR
   makes the process faster because it doesn't have to reload PgmB into
   memory every time.

   The argument that we are having is related to PgmA submitting PgmB to
   enable multi-thread processing. Does not setting on LR help in this case
   because they are different jobs?

   For example,
   PgmA
   Do until shutdown
   Read Invoice Header File for unprocessed invoices
   If a new invoice is found
   Mark the invoice as In-Process
   Submit PgmB to process the invoice

   PgmB
   Process invoice based on invoice number received
   Mark invoice as Processed
   ** Note: no *INLR logic here
   Return

   VS

   Process invoice based on invoice number received
   Mark invoice as Processed
   *inlr = *on
   Return

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

   Please contact support-FMtJrHiV//lnDLsaKlm4mFaTQe2KTcn/@public.gmane.org for any subscription related
   questions.

   --
   Message protected by MailGuard: e-mail anti-virus, anti-spam and content
   filtering.
   [4]https://www.mailguard.com.au

References

   Visible links
   1. https://www.oneteamit.com.au/
   2. https://lists.midrange.com/mailman/listinfo/rpg400-l
   3. https://archive.midrange.com/rpg400-l.
   4. https://www.mailguard.com.au/

--===============7200658250292447560==
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

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

Please contact support-FMtJrHiV//lnDLsaKlm4mFaTQe2KTcn/@public.gmane.org for any subscription related questions.


--===============7200658250292447560==--