Discussion :

[lololebricoleur]

Bonjour,

Dans le cadre d'une mise à jour d'application, je dois importer des données d'anciens fichiers Hyperfiles vers des nouveaux. Pour cela, j'utilise la déclaration de fichiers externes (fonction "HDéclareExterne()") et la copie d'enregistrements (fonction "HCopieEnreg()"). Cela fonctionne bien chez la plupart de mes clients mais j'ai quelques exception et j'avoue ne pas toujours être capable d'expliquer certaines "erreurs".

Du coup, je souhaite me simplifier la tâche en utilisant la fonction "QUAND EXCEPTION DANS... FAIRE... FIN". J'ai compris le fonctionnement mais j'ai encore deux interrogations et je ne trouve pas de réponse claire.

1 - La fonction "QUAND EXCEPTION DANS... FAIRE... FIN" supporte telle l'imbrication ? Autrement dit, est ce que je peux mettre un traitement d'exception dans un autre traitement d'exception ?

2 - La fonction "HAnnuleDéclaration()" supporte telle le "*" pour l'annulation de l'ensemble des fichiers externes déclarés ?

Merci de votre aide

[lololebricoleur]

Pour info, il est interdit de déclarer un traitement d'exception à l'intérieur d'un autre traitement d'exception.

[tatayo]

Bonjour,

Pour info, il est interdit de déclarer un traitement d'exception à l'intérieur d'un autre traitement d'exception.

C'est exact, mais il est possible de contourner cette limitation: tu peux mettre un traitement d'exception dans une procédure, elle-même appelée dans un traitement d'exception.

Tatayo.

[lololebricoleur]

Merci pour le tuyau Tatayo ;-)

[ErwanA]

Pour compléter la réponse de Tatayo, la fonction ExceptionDeclenche, permet de créer ses propres numéro d'exception.

On aurait donc un code similaire à celui-ci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
QUAND EXCEPTION DANS
    SELON <Valeur>
        CAS 1
            ExceptionDeclenche(1)
        CAS 2
            ExceptionDeclenche(2)
        CAS 3
            ExceptionDeclenche(3)
    FIN // SELON <Valeur>
FAIRE // QUAND EXCEPTION DANS
    SELON ExceptionInfo(errCode)
        CAS 1
            // Exception Cas 1
        CAS 2
            // Exception Cas 2
        CAS 3
            // Exception Cas 3
    FIN // SELON ExceptionInfo(errCode)
FIN // FAIRE QUAND EXCEPTION DANS

[zouzoukha]

Hou la
+1 Erwan

J'espère que cela fonctionne en WD12