Macros de utilidad AHG para manipulación de cadenas

El script define tres macros. 'AHGstartwith' verifica si una cadena comienza con una subcadena dada usando una macro de terceros '%ahgpos'. 'AHGtestANDcut' parece iniciar una condición basada en 'AHGstartwith' pero no contiene ninguna acción (código vacío después de %then). 'AHGmask' inicializa variables locales, pone los argumentos en mayúsculas e inicia un bucle iterativo basado en una macro de terceros '%AHGcount', pero el cuerpo del bucle está vacío.

Análisis de datos

Type : CREATION_INTERNE

Procesamiento puramente macro, no se lee ninguna fuente de datos externa.

1 Bloque de código

MACRO

Explicación :
Macro funcional que devuelve 1 si la variable 'word' comienza con 'leadstr', y 0 en caso contrario. Se basa en una macro externa '%ahgpos'.

¡Copiado!

1	%macro AHGstartwith(word,leadstr);
2	%IF %ahgpos(&word,&leadstr)=1 %THEN 1;
3	%ELSE 0;
4	%mend;

2 Bloque de código

MACRO

Explicación :
Macro estructural que verifica si 'word' comienza con 'leadstr'. El código actual no contiene ninguna instrucción después de la condición (instrucción nula), sugiriendo una implementación incompleta.

¡Copiado!

1	%macro AHGtestANDcut(word,leadstr);
2	%IF %AHGstartwith(&word,&leadstr) %THEN ;
3
4	%mend;
5

3 Bloque de código

MACRO

Explicación :
Bosquejo de macro para aplicar una máscara. Prepara las variables (puesta en mayúsculas) y configura un bucle iterativo basado en el número de elementos en 'mask' (delimitado por ':'), calculado por la macro externa '%AHGcount'. El cuerpo del bucle está vacío.

¡Copiado!

1	%macro AHGmask(word,mask);
2	%local i item;
3	%let mask=%upcase(&mask);
4	/* %let mask=%sysfunc(&mask,);*/
5	%let word=%upcase(&word);
6	%DO i=1 %to %AHGcount(&mask,dlm=:);
7
8	%END;
9	%mend;

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