Cómo: |
Idiomas disponibles: informes, Maintain
La función STRIP elimina todos los casos de un carácter determinado de una cadena. La cadena de caracteres resultante tiene la misma longitud que la cadena original, aunque se ha rellenado con espacios a la derecha.
STRIP(length, source_string, char, output)
donde:
Número entero
Es el número de caracteres en source_string y output, o un campo que contenga el número.
Alfanumérico
Es la cadena de la que se va a eliminar el carácter, o un campo que la contenga.
Alfanumérico
Es el carácter que se va a eliminar de la cadena. Puede tratarse de un literal alfanumérico entre comillas simples, o un campo que contenga el carácter. Si hay más de un carácter, se elimina el primero por la izquierda.
Nota: Para eliminar las comillas simples, emplee dos comillas consecutivas. A continuación, coloque la combinación de caracteres entre comillas simples.
Alfanumérico
Es el campo que contiene el resultado o el formato del valor de salida, entre comillas simples.
STRIP elimina todas las repeticiones de un punto (.) del campo DIRECTOR y almacena el resultado en un campo con el formato A17:
TABLE FILE MOVIES
PRINT DIRECTOR AND COMPUTE
SDIR/A17 = STRIP(17, DIRECTOR, '.', 'A17');
WHERE CATEGORY EQ 'COMEDY'
END
La salida es:
DIRECTORS SDIR --------- ---- ZEMECKIS R. ZEMECKIS R ABRAHAMS J. ABRAHAMS J ALLEN W. ALLEN W HALLSTROM L. HALLSTROM L MARSHALL P. MARSHALL P BROOKS J.L. BROOKS JL
STRIP elimina todas las repeticiones de una comilla simple (') del campo TITLE y almacena el resultado en un campo con el formato A39:
TABLE FILE MOVIES PRINT TITLE AND COMPUTE STITLE/A39 = STRIP(39, TITLE, '''', 'A39'); WHERE TITLE CONTAINS '''' END
La salida es:
TITLE STITLE ----- ------ BABETTE'S FEAST BABETTES FEAST JANE FONDA'S COMPLETE WORKOUT JANE FONDAS COMPLETE WORKOUT JANE FONDA'S NEW WORKOUT JANE FONDAS NEW WORKOUT MICKEY MANTLE'S BASEBALLTIPS MICKEY MANTLES BASEBALL TIPS
STRIP elimina todas las repeticiones de una coma del campo TITLE:
MAINTAIN FILE MOVIES
FOR 10 NEXT MOVIECODE INTO MOVSTK
WHERE TITLE CONTAINS ',';
COMPUTE I/I2=1;
REPEAT MOVSTK.FOCINDEX
TYPE "TITLE IS: <MOVSTK(I).TITLE"
COMPUTE NOCOMMA/A39=STRIP(39,MOVSTK().TITLE, ',',NOCOMMA);
TYPE "NEW TITLE IS: <NOCOMMA";
COMPUTE I=I+1
ENDREPEAT
END
La salida es:
TITLE IS: SMURFS, THE
NEW TITLE IS: SMURFS THE
WebFOCUS |