TRIM
A função TRIM em COBOL é utilizada para remover espaços em branco no início, no final ou em ambos os lados de uma string, facilitando o processamento de dados textuais. Essa função é especialmente útil quando se lida com entradas de dados que podem conter espaços indesejados, garantindo que as strings sejam manipuladas de forma consistente.
Sintaxe da Função TRIM:
FUNCTION TRIM(string [LEADING/TRAILING/BOTH])
- string: A variável ou literal de texto a ser processada.
- LEADING: Remove apenas os espaços à esquerda da string.
- TRAILING: Remove apenas os espaços à direita da string.
- BOTH: Remove espaços em branco tanto à esquerda quanto à direita da string (padrão, caso não seja especificado).
Exemplos de Uso:
Removendo Espaços à Esquerda:
MOVE FUNCTION TRIM(" Exemplo de texto", LEADING) TO ws-texto.
Resultado em ws-texto
: "Exemplo de texto"
Removendo Espaços à Direita:
MOVE FUNCTION TRIM("Exemplo de texto ", TRAILING) TO ws-texto.
Resultado em ws-texto
: "Exemplo de texto"
Removendo Espaços em Ambos os Lados:
MOVE FUNCTION TRIM(" Exemplo de texto ") TO ws-texto.
Considerações Importantes:
- A função TRIM é suportada em versões mais recentes do COBOL, como o Enterprise COBOL da IBM.
- Ao mover o resultado da função TRIM para uma variável, certifique-se de que o tamanho da variável destino seja adequado para conter a string resultante sem truncamentos.
Referências:
- https://www.cadcobol.com.br/funcobol_trim.htm
- https://www.ibm.com/docs/en/cobol-linux-x86/1.2?topic=functions-trim
Veja também: