COBOL: Uma Linguagem de Programação com Longevidade e Utilidade

Introdução

COBOL, que significa "COmmon Business-Oriented Language", é uma linguagem de programação de alto nível que foi desenvolvida pela primeira vez em 1959. Embora tenha sido criada há décadas, COBOL continua sendo uma linguagem relevante e amplamente utilizada no mundo dos negócios. Seu objetivo principal é fornecer uma forma de programação que seja fácil de entender e ler para os profissionais do setor financeiro e empresarial.

Comandos Básicos

Aqui estão alguns comandos básicos em COBOL que ajudarão você a começar a escrever programas simples:

1. DIVISIONS (DIVISÕES): Um programa COBOL é dividido em quatro partes principais: IDENTIFICATION DIVISION (divisão de identificação), ENVIRONMENT DIVISION (divisão de ambiente), DATA DIVISION (divisão de dados) e PROCEDURE DIVISION (divisão de procedimentos). Cada divisão desempenha um papel importante na estruturação do programa.

2. IDENTIFICATION DIVISION (DIVISÃO DE IDENTIFICAÇÃO): Nesta divisão, você deve fornecer informações básicas sobre o programa, como o nome do programa, o autor, a data de criação e a finalidade do programa. É aqui que você define o nome do programa usando a declaração "PROGRAM-ID".

   Exemplo:

   css
   IDENTIFICATION DIVISION.
   PROGRAM-ID. MEU-PROGRAMA.
   AUTHOR. SEU-NOME.
   DATE-WRITTEN. DD-MM-AAAA.
   

3. ENVIRONMENT DIVISION (DIVISÃO DE AMBIENTE): A divisão de ambiente é usada para descrever o ambiente em que o programa será executado. Isso inclui a especificação de arquivos de entrada e saída, dispositivos de E/S e outras configurações de ambiente.

   Exemplo:

   vbnet
   ENVIRONMENT DIVISION.
   INPUT-OUTPUT SECTION.
   FILE-CONTROL.
   SELECT ARQUIVO-ENTRADA ASSIGN TO "INPUT.TXT".
   SELECT ARQUIVO-SAIDA ASSIGN TO "OUTPUT.TXT".
   

4. DATA DIVISION (DIVISÃO DE DADOS): Nesta divisão, você define as variáveis que serão usadas no programa. COBOL é uma linguagem altamente orientada a registros, portanto, a maioria das variáveis é definida como campos em registros.

   Exemplo:

   scss
   DATA DIVISION.
   FILE SECTION.
   FD ARQUIVO-ENTRADA.
   01 REGISTRO-ENTRADA.
       05 CAMPO1 PIC X(10).
       05 CAMPO2 PIC 9(5).
   

5. PROCEDURE DIVISION (DIVISÃO DE PROCEDIMENTOS): A divisão de procedimentos contém a lógica real do programa. Aqui, você escreve o código que manipula os dados, executa cálculos e toma decisões.

   Exemplo:

   sql
   PROCEDURE DIVISION.
   OPEN INPUT ARQUIVO-ENTRADA.
   OPEN OUTPUT ARQUIVO-SAIDA.
   READ ARQUIVO-ENTRADA INTO REGISTRO-ENTRADA.
   PERFORM UNTIL REGISTRO-ENTRADA = 'FIM'
       MOVE CAMPO1 TO CAMPO2.
       WRITE REGISTRO-ENTRADA.
       READ ARQUIVO-ENTRADA INTO REGISTRO-ENTRADA.
   END-PERFORM.
   CLOSE ARQUIVO-ENTRADA, ARQUIVO-SAIDA.
   STOP RUN.
   

Conclusão

COBOL é uma linguagem de programação de longa data que continua sendo amplamente utilizada em aplicações de negócios. Embora a sintaxe e a estrutura possam parecer um pouco diferentes das linguagens mais modernas, a natureza clara e legível do COBOL o torna uma escolha popular para o desenvolvimento de sistemas financeiros e empresariais. Esperamos que este breve tutorial tenha fornecido uma introdução aos comandos básicos em COBOL e inspire você a explorar ainda mais essa linguagem rica e duradoura.