Attention : cette rubrique ne concerne pas le générateur C.
Si lors de l'appel d'un programme le message suivant est affiché :
"CPF4101 reçu pendant Open"
"Fichier £xxxxx ou xxxxxD non trouvé dans *LIBL"
Cela signifie :
Soit que le fichier xxxxx est défini en clé non unique et qu'il est mis à jour dans le modèle (utilisation d'un ordre RANGER, PLACER, CLASSER). La mise à jour par clé étant rendue impossible par sa non-unicité, Adélia réagit de la façon suivante :
la relecture de l'enregistrement (ordres RANGER ou PLACER) se fait par accès direct (Adélia sauvegarde le numéro du rang à l'exécution de l'ordre PRESENTER) ;
pour ce faire, lors de la génération RPG, Adélia doit déclarer le fichier sous un second nom (il est déjà déclaré en accès par clé). Ce nom est celui spécifié dans l'écran des caractéristiques du fichier (glossaire des fichiers).
En conséquence, avant de lancer l'exécution de son programme, le programmeur doit taper la commande OVRDBF.
OVRDBF FILE(nom fichier pour accès direct) |
TOFILE(nom fichier) |
code fichier |
nom fichier sur disque |
"mise à jour en mode direct" |
|
défini dans le glossaire. |
|
Attention : cela n'est valable que pour la génération RPG.
Soit que le fichier xxxxx n'existe pas ; dans ce cas il faut vérifier la liste de bibliothèques ou vérifier si la génération/compilation du fichier s'est bien terminée ; voir à ce sujet Echec de la génération d'un fichier .