La DLL utilisateur vous permet d'effectuer des traitements complexes lors d'une mise à niveau de la base de données.
Elle est implémentée sous la forme d'un programme SADELIA ou VADELIA BATCH respectant une interface d'appel précise. Ce programme s'exécute en connexion à la base de données.
Avec une base SQL ou BTrieve, le programme peut être un SADELIA ou un VADELIA utilisant le serveur logique LOCAL. Dans le cas d'une base AS/400, le programme doit obligatoirement être un SADELIA et doit être déployé sur le serveur avant d'exécuter DBTOOL sur le poste client.
Les lignes suivantes doivent être insérées dans la section déclarative du programme SADELIA :
* Paramètre réservé – NE PAS MODIFIER
NUM_BIN_4 Reserved
* Numéro de service appelé
NUM_BIN_4 ActionCode
* Contient le numéro de la version d'origine durant la phase de migration
NUM_E(15,9) Param1
* Contient le numéro de la version intermédiaire durant la phase de migration
NUM_E(15,9) Param2
* Code retour indiquant le statut de l'exécution
* 0 => exécution ok
* > 0 => avertissement, l'exécution de l'utilitaire continue
* < 0 => erreur, l'exécution de l'utilitaire s'arrête
NUM_BIN_4 ReturnCode
PARAM Reserved ActionCode Param1 Param2 ReturnCode
La variable ActionCode contient le numéro de service requis.
Service |
Description |
Action requise |
0 |
Réservé. |
Indiquer 0 dans ReturnCode. |
1 |
Réservé. |
Indiquer 0 dans ReturnCode. |
2 |
Demande la version. |
Indiquer le numéro de version courant dans Param2. Indiquer le statut de l'opération dans ReturnCode. |
3 |
Réservé. |
Indiquer 0 dans ReturnCode. |
4 |
Appelé avant l'exécution du script de la section PDM. |
Exécuter les opérations nécessaires à votre application. Indiquer le statut de l'opération dans ReturnCode. |
5 |
Appelé avant l'exécution du script de la section Data. |
Exécuter les opérations nécessaires à votre application. Indiquer le statut de l'opération dans ReturnCode. |
6 |
Appelé après l'exécution du script de la section Data. |
Exécuter les opérations nécessaires à votre application. Indiquer le statut de l'opération dans ReturnCode. |
L'algorithme de base de la mise à jour devient :
appel_service (reserved, 2, version_base, 0, coderetour)
tant_que version_base < version_courante
si rechercher_script_pdm (version_base, version_intermediaire) = erreur
sortir (erreur)
fin
appel_service (reserved, 4, version_base, version_intermediaire, coderetour)
si (coderetour <> 0)
sortir (erreur)
fin
si executer_script_pdm (version_base) = erreur
sortir (erreur)
fin
appel_service (reserved, 5, version_base, version_intermediaire, coderetour)
si (coderetour <> 0)
sortir (erreur)
fin
si rechercher_executer_script_donnees (version_base) = erreur
sortir (erreur)
fin
appel_service (reserved, 6, version_base, version_intermediaire, coderetour)
si (coderetour <> 0)
sortir (erreur)
fin
version_base = version_intermediaire
REFAIRE