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
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.
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,
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.