Depuis la PTF F004 de la partie AS/400 d'Adélia Studio 13, lors de la génération d’objets sur AS/400 Adélia appelle un programme Exit sur l’AS/400 juste avant la création des objets et juste après leur création.
Ce programme Exit vous permet de faire des actions sur votre AS/400 lors de la création par Adélia de vos objets.

Le programme Exit doit s’appeler ADELPEXIT et avoir les 4 paramètres en entrée suivants 

ALPHA(6) : nature de l’appel. Les valeurs possibles sont :

« SQLTAB » : génération table SQL
« SQLIND » : génération index SQL
« CMDCMP » : exécution des commandes de compilation de programme ou de fichier physique ou logique
« MSGF » : génération du fichier des messages d’erreur

ALPHA(1) : Moment de l’appel. Les valeurs possibles sont :

« B » appel avant la création de l’objet
« A » appel après la création de l’objet.

ALPHA(300) : valeur associée à la nature de l’appel. Les valeurs possibles en fonction de la nature de l'appel sont :

SQLTAB : positions 1 à 10 : bibliothèque la table
                positions 11 à 138 : nom de la table
SQLIND : positions 1 à 10 : bibliothèque de l’index
                positions 11 à 138 : nom de l’index
                positions 139 à 266 : nom de la table associé à l’index
MSGF :    positions 1 à 10 : bibliothèque du fichier des messages d’erreur
                positions 11 à 20 : nom du fichier des messages d’erreur
CMDCMP : position 1 à 200 : Description du travail fournie par le gestionnaire de travaux.

ALPHA(10) : Code retour de l'opération de génération d'objet.

Pour le moment « B » la valeur est toujours à blanc.
Pour le moment « A »  la valeur blanc signifie que la génération de l'objet s'est bien passée. Les valeurs possibles d'erreur en fonction de la nature de l'appel sont :

SQLTAB/SQLIND :

    • valeur négative du SQL code rencontrée lors de l’échec de l’exécution de la commande de création de la table ou de l'index.
    • « COPY ERROR » s'il y a eu une erreur lors de la phase de copie des données (génération avec conservation des données)

CMDCMP : « ERROR » si une commande de compilation a échouée.

MSGF :  toujours à blanc

Le programme Exit doit être accessible dans le contexte du profil de connexion du middleware utilisé par le gestionnaire de travaux ainsi que dans le contexte de la jobd des travaux de compilation.