Traitement SERVJOB : Gestion des fichiers job
SETREQ : Pendant la création d'une requête à partir d'un fichier job
Le point d'entrée SETREQ est déclenché pendant la création d'une requête à partir d'un fichier job. Ceci permet de gérer la synchronisation des processus en récupérant le numéro de requête.
Contexte et mode de fonctionnement
Dans le contexte du point d'entrée :
- Un fichier trace est ouvert
Les tables suivantes sont en ligne :
Table | Contenu significatif | Intitulé Table |
|---|---|---|
ABATRQT [ABR] | Non | Serveur batch (Requêtes) |
ABATPAR [ABP] | Non | Serveur batch (Paramètres) |
Le point d'entrée SETREQ est positionné dans le traitement SERVJOB juste après la création de la requête dans la table ABATRQT. Ce traitement est appelé par le serveur batch et toutes les variables globales de l'application ne sont pas définies.
Le nom de la trace du serveur batch est contenu dans la variable FICTRA et il est possible d'écrire dans cette trace en utilisant le sous-programme STRACE du traitement SERVEUR. Les arguments de ce sous-programme sont dans l'ordre : FICTRA (Alpha), Numéro d'erreur (Integer), Numéro de requête (Integer), Commentaires (Alpha).
FICTRA contient le nom de la trace ouverte
JOB contient le nom du fichier job
APPLI contient le nom de l'application sur laquelle la requête est créée
Les tables ABATRQT et ABATPAR sont ouvertes et renseignées
WRJOB : Pendant la création du fichier sta
Le point d'entrée WRJOB est déclenché pendant la création du fichier 'sta' ou 'run'. Ceci permet de gérer le nom du fichier et pouvoir modifier le paramètres avant l'écriture du fichier.
Contexte et mode de fonctionnement
Dans le contexte du point d'entrée :
- Un fichier trace est ouvert
Les tables suivantes sont en ligne :
Table | Contenu significatif | Intitulé Table |
|---|---|---|
ABATRQT [ABR] | Non | Serveur batch (Requêtes) |
ABATPAR [ABP] | Non | Serveur batch (Paramètres) |
Contexte d'appel
Le point d'entrée WRJOB est positionné dans le traitement SERVJOB juste avant la création du fichier "sta".Ce traitement est appelé par le serveur batch et toutes les variables globales de l'application ne sont pas définies.
GPE est initialisé à 0, si GSE superieure à 0 au retour du point d'entrée , on sort du sous-programme sans écrire le fichier.
Variables
Liste des variable passé par l'appel du subprog :
JOB : nom du fichier .job
TYP : typ de fichier , par exemple "sta"
ERR : Numéro d'erreur
REQ : Numéro requête
APP : Dossier
USR : Utilisateur
TAC : Tâche
MES : Message
Aprés la création du fichier si DATDEB et DATFIN sont vide on initialise ces variables suivant les règles suivantes :
Case TYP
When "sta"
If [L]NUMREQ=0 : DATDEB = DD+HS
Else
If [F:ABR]DAT<>[0/0/0] : DATDEB = [F:ABR]DAT : Else : DATDEB = DD : Endif
If [F:ABR]HDEB<>"" : DATDEB += [F:ABR]HDEB
Elsif [F:ABR]HEURE<>"" : DATDEB += [F:ABR]HEURE+"00"
Else : DATDEB += HS :
Endif
Endif
DATFIN = DD+HS
When Default
DATDEB = DD+HS
DATFIN = ""
Endcase
Le reste des variable ne sont pas modifier avant leurs écritures.
Exemple d'utilisation
On peut modifier la variable FICHIER pour modifier le nom de fichier "sta"