Contexte Métier
Dans une usine connectée, des modèles de prédiction de panne sont réentraînés chaque nuit. Un script automatisé doit vérifier ces nouveaux modèles. Si le modèle est valide, le pipeline continue ; sinon, une alerte est levée. Ce scénario teste la capacité à récupérer le code de retour pour automatiser la décision.
Préparation des Données
Création d'un fichier binaire valide simulé pour le test.
Copié !
| 1 | DATA _null_; |
| 2 | file "/tmp/model_machine_v2.onnx" recfm=n; |
| 3 | put '0800123456789ABC'x; |
| 4 | RUN; |
Étapes de réalisation
1
Chargement du binaire et exécution conditionnelle basée sur le résultat.
Copié !
| 1 | PROC CAS; |
| 2 | /* Fonction de lecture */ |
| 3 | function read_binary_file(path varchar[*] ) RESULT(blob); |
| 4 | file_in filevar recfm=n LENGTH=len unbuf; |
| 5 | char(len) str; |
| 6 | file_in = fopen(path, 'I', len, 'B'); |
| 7 | fread(file_in, str); |
| 8 | fclose(file_in); |
| 9 | return (str); |
| 10 | endsub; |
| 11 | |
| 12 | blob model_blob = read_binary_file('/tmp/model_machine_v2.onnx'); |
| 13 | |
| 14 | /* Vérification */ |
| 15 | astore.check RESULT=check_res STATUS=s / |
| 16 | onnx=model_blob |
| 17 | ; |
| 18 | |
| 19 | /* Logique métier automatisée */ |
| 20 | IF (s.severity == 0) THEN DO; |
| 21 | PRINT "Modèle valide. Prêt pour déploiement."; |
| 22 | END; |
| 23 | ELSE DO; |
| 24 | PRINT "Erreur critique : Modèle invalide."; |
| 25 | END; |
| 26 | PRINT check_res; |
| 27 | RUN; |
Résultat Attendu
Le code CASL interprète dynamiquement le statut de l'action. Le journal affiche 'Modèle valide...' ou 'Erreur critique...' selon la validité du blob fourni, prouvant que l'action peut être intégrée dans des scripts logiques complexes.