Vérification d'existence de fileref (assert_fexist)

Cette macro fait partie probablement d'un framework de test (FUTS). Elle vérifie si un fileref donné existe à l'aide de la fonction `%fexist`. Si le fileref est manquant (retourne 0), la macro appelle `%generate_event` pour signaler l'anomalie avec des détails configurables (message, niveau, type, etc.) et peut potentiellement arrêter l'exécution via le paramètre ABORT. Elle incrémente également un compteur global de tests `futs_tst_cnt`.

Analyse des données

Type : CREATION_INTERNE

La macro n'accède pas à des données tabulaires. Elle interagit avec le système de fichiers via des filerefs et manipule des compteurs de macro-variables.

1 Bloc de code

Macro

Explication :
Définition de la macro. 1) Incrémentation du compteur de tests `futs_tst_cnt`. 2) Vérification de l'existence du fileref passé en paramètre via `%fexist`. 3) Si le fileref n'existe pas, appel de la macro `%generate_event` pour gérer l'erreur/l'échec du test.

Copié !

1	%macro assert_fexist( FILEREF,
2	MESSAGE=Fileref &FILEREF does not exist,
3	TYPE=,
4	LEVEL=,
5	ATTACHDATA=,
6	ATTACHFILE=,
7	METRIC=,
8	PROPERTIES=,
9	ON_EVENT=,
10	DESCRIPTION=, ABORT= );
11
12	%let futs_tst_cnt = %eval(&futs_tst_cnt.+1);
13
14	%IF %fexist(&FILEREF) eq 0 %THEN
15	%generate_event(TYPE=&TYPE, LEVEL=&LEVEL,
16	MESSAGE=&MESSAGE,
17	ATTACHDATA=&ATTACHDATA, ATTACHFILE=&ATTACHFILE,
18	METRIC=&METRIC,
19	PROPERTIES=&PROPERTIES,
20	ON_EVENT=&ON_EVENT,
21	DESCRIPTION=&DESCRIPTION, ABORT=&ABORT);
22
23	%mend assert_fexist;

Ce matériel est fourni "tel quel" par We Are Cas. Il n'y a aucune garantie, expresse ou implicite, quant à la qualité marchande ou à l'adéquation à un usage particulier concernant le matériel ou le code contenu dans les présentes. We Are Cas n'est pas responsable des erreurs dans ce matériel tel qu'il existe maintenant ou existera, et We Are Cas ne fournit pas de support technique pour celui-ci.

Retour à la liste