Re: *INH1

Another issue with QBATCH, if the queues all have pending jobs in them, or
all of the activity levels are used the SBMJOB will not run right away.
Aside from there being better options, you would need to use QUSRNOMAX to
ensure the job ran right away.
You could include priority levels but that might not work every time
either.

Too much chance to get it right in my view.

On Sun, Jan 8, 2023 at 3:32 PM Daniel Gross <daniel@xxxxxxxx> wrote:

Hi Javier,

no, I don't think so - the H1-H8 indicators had the effect, than when one
of them was turned *ON at return, the calling program received an automatic
*ESCAPE message.

You could say H1-H8 was the "poor mans esxception" at times, when we all
wrote RPG/III code - it worked, and you were able to communicate an
unsuccessful program execution to the called, without resorting to
QMHSNDPM, which was (IMHO) a huge PITA in RPG/III.

Today SND-MSG *ESCAPE ... %TARGET(...) is clearly a superior solution.

Regards,
Daniel

Am 08.01.2023 um 21:10 schrieb Javier Sanchez <

javiersanchezbarquero@xxxxxxxxx>:

Ok, I misunderstood your point. You want to end a whole job. Well, try

to

submit (SBMJOB) a job with the ENDJOB command right after at the line

where

you get the error. You can use the "system()" Unix-type API or the

QCMDEXC

program.

Something like system("ENDJOB JOB(123456/YOURJOBUSR/YOURJOBNAME)")
and make sure to include the *IMMED option.
Use the QBATCH job queue to also make sure it will run.

Then use the exit(-1) API call.


I think this should work well.

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

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

--

--
Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects