Comando COBOL: STRING OF – Concatena várias strings em uma só.

O COBOL (Common Business Oriented Language) é uma linguagem de programação amplamente utilizada em sistemas de negócios, especialmente em aplicações legadas. Uma das operações comuns em programação é a manipulação de strings, e o COBOL oferece um comando específico para isso: o comando STRING. Este comando permite a concatenação de várias strings em uma só, facilitando a construção de mensagens, relatórios e dados formatados.

Comando COBOL: Utilizando STRING para Concatenação de Strings

O comando STRING no COBOL é uma ferramenta poderosa que permite juntar múltiplas strings em uma única variável de destino. A sintaxe do comando envolve a definição da variável que receberá o resultado da concatenação, seguida das strings que queremos juntar. O comando também oferece opções para incluir delimitadores, que podem ser úteis para separar os textos concatenados. A operação é realizada em um único comando, tornando o código mais legível e organizado. A utilização do STRING é especialmente valiosa em aplicações que requerem a formatação de dados antes de serem exibidos ou processados.

Exemplo Prático de Concatenação com o Comando STRING em COBOL

Para ilustrar a utilização do comando STRING, consideremos um exemplo prático onde queremos concatenar um título, um nome e uma saudação em uma única string. O código a seguir demonstra essa operação:

       IDENTIFICATION DIVISION.
       PROGRAM-ID. ConcatenaStrings.
       DATA DIVISION.
       WORKING-STORAGE SECTION.
       01  Titulo      PIC A(10) VALUE 'Sr.'.
       01  Nome        PIC A(20) VALUE 'João'.
       01  Saudacao    PIC A(30).
       01  Resultado    PIC A(50).

       PROCEDURE DIVISION.
           STRING Titulo DELIMITED BY SPACE
                  Nome DELIMITED BY SPACE
                  'Bem-vindo!' DELIMITED BY SIZE
                  INTO Resultado
           END-STRING.

           DISPLAY Resultado.
           STOP RUN.

Neste exemplo, as variáveis Titulo e Nome são concatenadas, seguidas de uma string literal "Bem-vindo!", resultando em uma mensagem de saudação completa armazenada na variável Resultado.

O comando STRING no COBOL é uma solução prática e eficiente para a concatenação de strings, contribuindo para a criação de mensagens e relatórios formatados de maneira estruturada. Com seu uso, os desenvolvedores podem facilmente construir textos complexos a partir de componentes simples, melhorando a legibilidade do código e a eficiência do desenvolvimento em ambientes de negócios. A adoção e compreensão desse comando são essenciais para qualquer programador que deseje manipular strings de forma eficaz em suas aplicações COBOL.

Leia mais