A função UPPER-CASE no COBOL é utilizada para converter letras minúsculas de uma cadeia de caracteres em letras maiúsculas. É uma ferramenta prática para padronizar textos em aplicações que requerem consistência de dados.
Descrição
A função retorna a mesma cadeia de caracteres fornecida como entrada, substituindo apenas as letras minúsculas pelas correspondentes maiúsculas. O comportamento depende do tipo de argumento fornecido:
- Alfabético ou Alfanumérico: Segue a sequência de colagem EBCDIC, convertendo os caracteres ‘a’ a ‘z’ em ‘A’ a ‘Z’.
- Nacional ou UTF-8: A conversão é baseada na especificação Unicode.
A função preserva o comprimento original da string, exceto para entradas UTF-8, onde o tamanho pode variar devido à codificação.
Sintaxe
FUNCTION UPPER-CASE(argument-1)
Requisitos
- O argumento deve ser de classe alfabética, alfanumérica, nacional ou UTF-8.
- Deve conter pelo menos um caractere.
- Strings alfanuméricas não podem conter dados codificados em UTF-8.
MOVE "cobol exemplo" TO texto. DISPLAY FUNCTION UPPER-CASE(texto).
Exemplo
MOVE "cobol exemplo" TO texto. DISPLAY FUNCTION UPPER-CASE(texto).
Saída: COBOL EXEMPLO
Para mais informações, consulte a documentação oficial: IBM COBOL Documentation.