Eliminación de un Proceso Almacenado (Stored Process) a través de Metadatos

Attention : Este código requiere privilegios de administrador.

Esta macro, `mm_deletestp`, está diseñada para interactuar con el servidor de metadatos SAS^© con el fin de eliminar un Proceso Almacenado específico. Toma como parámetro la ruta completa del Stored Process (`target=`). La macro comienza verificando la existencia del Stored Process utilizando la función `metadata_pathobj`. Si el Stored Process no se encuentra (o si el objeto no es de tipo 'ClassifierMap'), se emite un mensaje NOTE y la macro finaliza. Si se encuentra el Stored Process, la macro genera un documento XML temporal que contiene las instrucciones de eliminación de metadatos para el objeto `ClassifierMap` correspondiente al Stored Process. Esta solicitud XML se envía luego al servidor de metadatos a través de `PROC METADATA`. Una vez ejecutada la operación, la macro lee y muestra el resultado de `PROC METADATA` en el log de SAS^©. Finalmente, la macro realiza una verificación posterior a la eliminación para asegurarse de que el Stored Process haya sido efectivamente retirado de los metadatos. En caso de fallo de eliminación (si el objeto todavía está presente), se emite un mensaje de error y la variable de sistema `syscc` se actualiza para indicar un fallo.

Análisis de datos

Type : CREATION_INTERNE

La macro interactúa principalmente con el servidor de metadatos SAS para gestionar los Stored Processes. No consume datos externos ni conjuntos de datos SASHELP directamente para su funcionamiento principal de eliminación. Los datos procesados son información de metadatos generada y gestionada por el propio sistema SAS.

1 Bloque de código

DATA STEP (metadata_pathobj) y Macro IF

Explicación :
Este bloque inicializa la macro `mm_deletestp` y realiza una primera etapa de verificación. Utiliza un paso `DATA _NULL_` con la función `metadata_pathobj` para consultar el servidor de metadatos. El objetivo es determinar si un 'StoredProcess' existe en la ruta especificada por el parámetro `&target`. El tipo (`type`) y la URI (`uri`) del objeto encontrado se almacenan en variables macro. Si el objeto no se identifica como un 'ClassifierMap' (tipo interno para los Stored Processes), se emite una nota y la macro finaliza, indicando la ausencia del Stored Process.

¡Copiado!

1	%macro mm_deletestp(
2	target=
3	)//STORE SOURCE/;
4
5	/**
6	* Check STP does exist
7	*/
8	%local cmtype;
9	DATA _null_;
10	LENGTH type uri $256;
11	rc=metadata_pathobj("","&target",'StoredProcess',type,uri);
12	call symputx('cmtype',type,'l');
13	call symputx('stpuri',uri,'l');
14	RUN;
15	%IF &cmtype ne ClassifierMap %THEN %DO;
16	%put NOTE: No Stored Process found at ⌖
17	%return;
18	%END;

2 Bloque de código

DATA STEP (Generación XML) Data

Explicación :
Este bloque prepara el terreno para la eliminación asignando dos filerefs temporales (`__in` y `__out`) para la entrada y salida del procedimiento `PROC METADATA`. Luego, un paso `DATA _NULL_` genera una cadena XML formateada directamente en el archivo `__in`. Esta cadena representa una solicitud de eliminación de metadatos que apunta al objeto 'ClassifierMap' cuyo ID está contenido en la variable macro `&stpuri`, preparando así la instrucción para el servidor de metadatos.

¡Copiado!

1	filename __in temp lrecl=10000;
2	filename __out temp lrecl=10000;
3	DATA _null_ ;
4	file __in ;
5	put "<DeleteMetadata><Metadata><ClassifierMap Id='&stpuri'/>";
6	put "</Metadata><NS>SAS</NS><Flags>268436480</Flags><Options/>";
7	put "</DeleteMetadata>";
8	RUN ;

3 Bloque de código

PROC METADATA

Explicación :
El procedimiento `PROC METADATA` se ejecuta para enviar la solicitud XML generada previamente (contenida en `__in`) al servidor de metadatos SAS. La opción `verbose` asegura que se registre la máxima información sobre la ejecución y el resultado de la solicitud, con la salida redirigida al archivo temporal `__out`.

¡Copiado!

1	PROC METADATA in=__in out=__out verbose;RUN;

4 Bloque de código

DATA STEP (Lectura de archivo)

Explicación :
Este bloque es un simple paso `DATA _NULL_` que tiene la función de leer y mostrar el contenido del archivo temporal `__out` en el log de SAS. Esto permite visualizar la respuesta detallada del servidor de metadatos después del intento de eliminación.

¡Copiado!

1	/* list the result */
2	DATA _null_;
3	INFILE __out;
4	INPUT;
5	list;
6
7	RUN;
8

5 Bloque de código

SAS Global Statement

Explicación :
Estas declaraciones `filename CLEAR` son instrucciones esenciales para liberar correctamente los filerefs temporales `__in` y `__out` que se han utilizado. Es una buena práctica para evitar la retención innecesaria de recursos y posibles conflictos en ejecuciones SAS posteriores.

¡Copiado!

1	filename __in clear;
2	filename __out clear;

6 Bloque de código

DATA STEP (metadata_pathobj) y Macro IF

Explicación :
Este último bloque realiza una verificación crucial después del intento de eliminación. Vuelve a utilizar `metadata_pathobj` para asegurarse de que el Stored Process (`&target`) haya sido efectivamente retirado de los metadatos. Si el objeto todavía se encuentra y se identifica como un 'ClassifierMap', se genera un mensaje de error en el log, la variable de sistema `syscc` se establece en 4 (indicando un error), y la macro finaliza para señalar el fallo de la eliminación. El `%mend` marca el final de la macro `mm_deletestp`.

¡Copiado!

1	/**
2	* Check deletion
3	*/
4	%local isgone;
5	DATA _null_;
6	LENGTH type uri $256;
7	call missing (of _all_);
8	rc=metadata_pathobj("","&target",'Note',type,uri);
9	call symputx('isgone',type,'l');
10	RUN;
11	%IF &isgone = ClassifierMap %THEN %DO;
12	%put %str(ERR)OR: STP not deleted from ⌖
13	%let syscc=4;
14	%return;
15	%END;
16
17	%mend mm_deletestp;

Este material se proporciona "tal cual" por We Are Cas. No hay garantías, expresas o implícitas, en cuanto a la comerciabilidad o idoneidad para un propósito particular con respecto a los materiales o el código contenidos en este documento. We Are Cas no es responsable de los errores en este material tal como existe ahora o existirá, ni We Are Cas proporciona soporte técnico para el mismo.

Retour à la liste

Consejo del Experto

Simon

Expert SAS et fondateur.

« La macro mm_deletestp representa una técnica avanzada y profesional para la administración de entornos SAS 9. Al utilizar PROC METADATA con instrucciones XML en lugar de eliminaciones manuales en la consola, se garantiza que la limpieza del entorno sea automatizada, repetible y auditable. La elección del tipo de objeto ClassifierMap es técnicamente precisa, ya que es la clase de metadatos que define la existencia de un Proceso Almacenado (Stored Process) dentro de la Open Metadata Architecture (OMA).

Recomendaciones estratégicas y puntos clave
El papel crítico de los Flags: En la solicitud XML, el valor <Flags>268436480</Flags> es vital. Esta máscara de bits indica al servidor cómo manejar las asociaciones. Un error común en la gestión de metadatos es dejar "objetos huérfanos" (como definiciones de parámetros o notas de metadatos). El uso de los flags correctos asegura una eliminación limpia que mantiene la salud a largo plazo del repositorio de metadatos.

Programación defensiva y control de errores: La macro implementa una doble verificación robusta: comprueba la existencia antes de la ejecución y confirma la eliminación después. Actualizar syscc=4 en caso de fallo es una práctica esencial para entornos de producción, ya que alerta a los planificadores de tareas (como LSF o SAS Job Execution) de que ocurrió una anomalía, incluso si la sesión de SAS no falló técnicamente.

Eliminación lógica frente a física: Es importante tener en cuenta que esta macro elimina la definición en los metadatos. Si su Stored Process apunta a un archivo físico externo (un archivo .sas en el servidor), ese archivo permanecerá en el disco. Para una limpieza integral, se recomienda combinar esta macro con el comando FDELETE para eliminar el código fuente físico. »