STRIP: Como Remover um Caractere de uma String

Como:

Linguagens Disponíveis: Reporting, Maintain

A função STRIP remove todas as ocorrências do caractere específico de uma string. A string de caracteres resultante possui o mesmo comprimento que a original, mas é preenchida com espaços à direita.

Topo da página
x
Sintaxe: Como Remover um Caractere de uma String
STRIP(length, source_string, char, output)

onde:

comprimento

Inteiro

É o número de caracteres da source_string e output ou um campo que contém o número.

source_string

Alfanumérico

É a string da qual o caractere será removido ou um campo contendo a string.

char

Alfanumérico

É o caractere a ser removido da string. Ele pode ser um literal alfanumérico entre aspas simples ou um campo que contém o caractere.Se mais de um caractere for fornecido, o caractere mais à esquerda será usado como caractere de faixa".

Observação: Para remover aspas simples, utilizar duas aspas consecutivas. Você deve então colocar esta combinação de caracteres entre aspas simples.

saída

Alfanumérico

É o campo que contém o resultado ou o formato do valor de saída posto entre aspas simples.

Exemplo: Como Remover Ocorrências de um Caractere de uma String

STRIP remove todas as ocorrências de um ponto final (.) do campo DIRECTOR e armazena o resultado em um campo com o formato A17: 

TABLE FILE MOVIES
PRINT DIRECTOR AND COMPUTE
SDIR/A17 = STRIP(17, DIRECTOR, '.', 'A17');
WHERE CATEGORY EQ 'COMEDY'
END

A saída é:

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
Exemplo: Como Remover Asps Simples de uma String

STRIP remove todas as ocorrências de aspas simples (') do campo TITLE e armazena o resultado em um campo com o formato A39: 

TABLE FILE MOVIES
PRINT TITLE AND COMPUTE
STITLE/A39 = STRIP(39, TITLE, '''', 'A39');
WHERE TITLE CONTAINS '''' 
END

A saída é:

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
Exemplo: Como Remover Vírgulas de uma String (Maintain)

STRIP remove todas as ocorrências de uma vírgula do 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

A saída é:

TITLE IS: SMURFS, THE
NEW TITLE IS: SMURFS THE
Information Builders