Al automatizar tareas en SAS© Viya™, es común usar macros para configurar fuentes de datos. Un caso clásico es iterar sobre una lista de dominios de autenticación (por ejemplo, para Oracle) para crear dinámicamente CASLIBs.
Sin embargo, a menudo surge una dificultad cuando se debe ejecutar este código varias veces: la gestión de duplicados.
Imagine un escenario en el que su macro recorre una lista para crear conexiones.
Primera ejecución: Todo funciona perfectamente. Se crean las CASLIBs.
Segunda ejecución: El sistema devuelve un error fatal porque las CASLIBs ya existen (ERROR: Duplicate Caslib).
La reacción natural es agregar una instrucción para eliminar (DROP) la biblioteca antes de volver a crearla. Pero esto crea un nuevo problema: en la primera ejecución, o si la sesión es nueva, la biblioteca aún no existe. ¿El resultado? Un error en el registro (ERROR: The caslib ... does not exist).
Aunque se puede ignorar este error, contamina el registro (log) y puede ocultar problemas reales. El objetivo es tener un código "limpio" que se ejecute sin errores, sea cual sea el estado inicial.
El método más robusto para solucionar este problema es usar la función CLIBEXIST.
Esta función permite verificar la existencia de una CASLIB en la sesión actual antes de intentar una acción. Si la biblioteca existe, se elimina para volver a crearla limpiamente. Si no existe, se pasa directamente a la creación.
A continuación se muestra cómo integrar esta lógica en su bucle de macro. El truco consiste en envolver la instrucción DROP en una condición %IF que llama a CLIBEXIST.
| 1 | /* Exemple de macro boucle pour gérer les connexions Oracle */ |
| 2 | %macro ora_libs; |
| 3 | %local i authdomain schema; |
| 4 | |
| 5 | /* Boucle sur la liste des domaines d'authentification */ |
| 6 | %DO i=1 %to %sysfunc(countw(&auth_list)); |
| 7 | %let authdomain = %scan(&auth_list, &i); |
| 8 | %let schema = &authdomain.; |
| 9 | |
| 10 | /* C'est ici que la magie opère : */ |
| 11 | /* On vérifie si la CASLIB existe déjà dans la session active (ici 'mysession') */ |
| 12 | |
| 13 | %IF %sysfunc(clibexist(mysession, &schema)) %THEN %DO; |
| 14 | caslib &schema. drop; |
| 15 | %END; |
| 16 | |
| 17 | /* Création de la CASLIB propre et sans erreur */ |
| 18 | caslib &schema. datasource=( |
| 19 | srctype="oracle", |
| 20 | authdomain=&authdomain. |
| 21 | path=&path. |
| 22 | schema=&schema. |
| 23 | ); |
| 24 | %END; |
| 25 | %mend; |
El uso de CLIBEXIST hace que su código sea idempotente. Esto significa que puede ejecutarlo una vez o cien veces, el resultado final será el mismo (las bibliotecas están configuradas) y, sobre todo, su registro de ejecución permanecerá en verde, sin preocupantes mensajes de error en rojo.
Es una pequeña modificación que mejora enormemente la calidad y la mantenibilidad de sus programas de SAS© Viya™.
The codes and examples provided on WeAreCAS.eu are for educational purposes. It is imperative not to blindly copy-paste them into your production environments. The best approach is to understand the logic before applying it. We strongly recommend testing these scripts in a test environment (Sandbox/Dev). WeAreCAS accepts no responsibility for any impact or data loss on your systems.