RPGExtraire l’état d’un Job

"The AS/400 Programmer's Handbook" (Volume 2), chapitre 4, Application Programming Interfaces, montre un exemple d’un programme RPG ILE qui emploie l’API Retrieving Job Status.
J’utilise cette technique pour connaître l’état d’un job simultané chargé de traiter des commandes.

Notre procédure prévoit d’arrêter ce job deux fois par jour. Pendant ce temps, les commandes ne peuvent pas être traitées, au grand dam des utilisateurs qui ne savent pas si le système est en panne ou si la commande est en suspens.