JOBQ et JOBD, attendre et se préparer

La file d'attente de travaux (JOBQ)

Quand on soumet un travail par SBMJOB, il ne démarre pas tout de suite : il entre dans une file d'attente de travaux. Il en sortira quand le sous-système qui lit cette file aura de la place. C'est ce qui permet de lancer cent traitements d'un coup sans que les cent tournent en même temps.

Pour notre démonstration, la file DEMOJOBQ alimente le sous-système DEMOSBS, qui n'en exécute qu'un travail à la fois (MAXACT(1)). Nous y avons soumis quatre travaux CALCUL1 à CALCUL4, qui attendent chacun une heure (DLYJOB DLY(3600)), le dernier en HOLD(*YES) :

Dans quel ordre les travaux sortent

1. La disponibilité : les travaux prêts passent avant les travaux planifiés à une date ou une heure, puis viennent les travaux suspendus, qui ne sortent pas tant qu'on ne les libère pas.
2. La priorité, de 0 à 9 : 0 passe en premier. SBMJOB accepte 1 à 9 et prend par défaut celle de la JOBD (5 dans QDFTJOBD).
3. L'heure d'arrivée : à priorité égale, le premier arrivé sort le premier. Le numéro du travail ne compte pas.

Le sous-système, lui, prend des travaux dans la file tant qu'il n'a pas atteint le nombre maximal de travaux actifs fixé pour cette file (MAXACT du poste file d'attente), et, s'il est fixé, le maximum par priorité. Quand il lit plusieurs files, il les traite dans l'ordre de leur numéro de séquence. Une file ne peut alimenter qu'un seul sous-système actif à la fois, mais un sous-système peut lire plusieurs files.

Conséquence pratique : sur ce système, deux traitements soumis en même temps dans QBATCH s'exécutent l'un après l'autre. C'est voulu pour des traitements qui doivent se suivre, gênant pour des traitements indépendants. On peut alors augmenter la limite (CHGJOBQE) ou soumettre dans une autre file.

Pourquoi mon travail reste en file d'attente

Un travail qui ne démarre pas est presque toujours dans l'un de ces cas. Commencez par WRKSBMJOB ou WRKJOBQ :

La description de travail (JOBD)

Une description de travail rassemble des attributs que plusieurs travaux partagent. Plutôt que de tout préciser à chaque SBMJOB, on écrit JOBD(JOBITRV/DEMOJOBD) et le travail reprend ce qu'elle contient. Changer la JOBD change tous les travaux qui l'utilisent, et eux seuls. Voici la nôtre, créée par CRTJOBD et affichée par DSPJOBD :

CRTJOBD    JOBD(JOBITRV/DEMOJOBD) JOBQ(JOBITRV/DEMOJOBQ) JOBPTY(5) +
             OUTPTY(5) OUTQ(JOBITRV/DEMOOUTQ) +
             INLLIBL(JOBITRV QGPL QTEMP) LOG(4 00 *SECLVL) +
             TEXT('Description de travail de démonstration')

Qui utilise une JOBD ?

• Les sessions interactives : la JOBD du poste écran du sous-système, ou, s'il indique *USRPRF, celle du profil utilisateur. Nos profils utilisent QGPL/QDFTJOBD, la JOBD par défaut d'IBM. Pour en donner une à un profil, voyez attacher une JOBD à un profil.
• Les travaux batch : celle du paramètre JOBD de SBMJOB, par défaut celle du profil.
• Les travaux autostart et prédémarrés : celle de leur poste dans la description de sous-système. Un travail autostart tourne sous l'utilisateur de sa JOBD, qui ne peut donc pas être *RQD : protégez qui peut la modifier.

Le piège : SBMJOB ne prend pas tout dans la JOBD

On croit souvent qu'un travail soumis avec une JOBD en reprend tous les attributs. C'est faux : chaque paramètre de SBMJOB a sa propre valeur par défaut, et plusieurs vont chercher la valeur ailleurs que dans la JOBD. Voici ce que dit l'invite de SBMJOB (F4 puis F10) sur notre IBM i 7.5 :

La preuve. Notre travail EDITION a été soumis avec la JOBD DEMOJOBD, dont la liste de bibliothèques est JOBITRV QGPL QTEMP, et avec OUTQ(*JOBD) écrit explicitement. Son historique dit ce qu'il a réellement reçu :

CPF1124  Travail 011954/SAKADM/EDITION démarré le 14/10/26 à
         15:53:59 dans le sous-système DEMOSBS de JOBITRV ; soumis le 14/10/26 à
         15:53:59.
CPI1125  Travail 011954/SAKADM/EDITION soumis.
         Le travail 011954/SAKADM/EDITION a été soumis en file
         d'attente de travaux DEMOJOBQ de JOBITRV à partir du travail
         011953/SAKADM/QPADEV0001. Le travail 011954/SAKADM/EDITION a été démarré par
         la commande SBMJOB (Soumettre un travail) avec les attributs : JOBPTY(5)
         OUTPTY(5) PRTTXT() RTGDTA(QCMDB) SYSLIBL(QSYS       QSYS2      QHLPSYS
         QUSRSYS) CURLIB(*CRTDFT) INLLIBL(QGPL       QTEMP) INLASPGRP(*NONE) LOG(4 00
         *SECLVL) LOGCLPGM(*NO) LOGOUTPUT(*JOBEND) OUTQ(JOBITRV/DEMOOUTQ)
         PRTDEV(PRT01) INQMSGRPY(*RQD) HOLD(*NO) DATE(*SYSVAL) […]
*NONE    -DSPLIB LIB(JOBITRV) OUTPUT(*PRINT)
CPF1164  Travail 011954/SAKADM/EDITION arrêté le 14/10/26 à
         15:53:59; temps UC 0,007; code fin 0 .

• OUTQ(JOBITRV/DEMOOUTQ) : la file de la JOBD, parce que nous avons écrit OUTQ(*JOBD).
• INLLIBL(QGPL QTEMP) : la liste de la session qui a soumis. JOBITRV n'y est pas, alors que la JOBD la contient.
• RTGDTA(QCMDB) : la valeur par défaut de SBMJOB, et non le QCMDI de la JOBD.
• LOG(4 00 *SECLVL) et JOBPTY(5) : bien ceux de la JOBD.

Les commandes des files et des descriptions

Et en SQL :

/* La bibliothèque de démonstration                                  */
CRTLIB     LIB(JOBITRV) TEXT('Démonstration gestion des travaux')

/* Une file d'attente de travaux et une file d'attente de sortie     */
CRTJOBQ    JOBQ(JOBITRV/DEMOJOBQ) +
             TEXT('File d''attente des travaux de démonstration')
CRTOUTQ    OUTQ(JOBITRV/DEMOOUTQ) +
             TEXT('File d''attente de sortie de démonstration')

/* La description de travail qui relie les deux                      */
CRTJOBD    JOBD(JOBITRV/DEMOJOBD) JOBQ(JOBITRV/DEMOJOBQ) JOBPTY(5) +
             OUTPTY(5) OUTQ(JOBITRV/DEMOOUTQ) +
             INLLIBL(JOBITRV QGPL QTEMP) LOG(4 00 *SECLVL) +
             TEXT('Description de travail de démonstration')

/* Le sous-système : un pool, une file, un poste de routage          */
CRTSBSD    SBSD(JOBITRV/DEMOSBS) POOLS((1 *BASE)) +
             TEXT('Sous-système de démonstration')
ADDJOBQE   SBSD(JOBITRV/DEMOSBS) JOBQ(JOBITRV/DEMOJOBQ) MAXACT(1) +
             SEQNBR(10)
ADDRTGE    SBSD(JOBITRV/DEMOSBS) SEQNBR(9999) CMPVAL(*ANY) +
             PGM(QSYS/QCMD) CLS(QGPL/QBATCH)
STRSBS     SBSD(JOBITRV/DEMOSBS)

/* Cinq travaux soumis depuis une session 5250                       */
SBMJOB     CMD(DSPLIB LIB(JOBITRV) OUTPUT(*PRINT)) JOB(EDITION) +
             JOBD(JOBITRV/DEMOJOBD) OUTQ(*JOBD)
SBMJOB     CMD(DLYJOB DLY(3600)) JOB(CALCUL1) JOBD(JOBITRV/DEMOJOBD)
SBMJOB     CMD(DLYJOB DLY(3600)) JOB(CALCUL2) JOBD(JOBITRV/DEMOJOBD)
SBMJOB     CMD(DLYJOB DLY(3600)) JOB(CALCUL3) JOBD(JOBITRV/DEMOJOBD)
SBMJOB     CMD(DLYJOB DLY(3600)) JOB(CALCUL4) JOBD(JOBITRV/DEMOJOBD) +
             HOLD(*YES)

Questions fréquentes