Terça 7 Mai 2024

No COBOL há três tipos básicos de dados usados nas instruções:

  • Numérico (sinalizado ou não, com decimal ou inteiros);
  • Alfanumérico;
  • Constantes figurativas.

 

O COBOL consiste basicamente em 4 divisões separadas, cada uma delas tem uma função especifica dentro do programa e devem ser escritas em uma ordem pré-definida.

  • IDENTIFICATION DIVISION

A IDENTIFICATION DIVISION possui informações documentais, como nome do programa, quem o codificou e quando essa codificação foi realizada.

 

  • ENVIRONMENT DIVISION

A ENVIRONMENT DIVISION descreve o computador e os periféricos que serão utilizados pelo programa.

 

  • DATA DIVISION

A DATA DIVISION descreve os arquivos de entrada e saída que serão usadas pelo programa. Também define as áreas de trabalho e constantes necessárias para o processamento dos dados.

 

  • PROCEDURE DIVISION

A PROCEDURE DIVISION contém o código que irá manipular os dados descritos na DATA DIVISION. É nesta divisão que o desenvolvedor descreverá o algoritmo do programa.

 

IDENTIFICATION DIVISION.
PROGRAM-ID. PROGRAMA1.

ENVIRONMENT DIVISION.

   INPUT-OUTPUT SECTION.
   FILE-CONTROL.
   SELECT FILEN ASSIGN TO INPUT.
          ORGANIZATION IS SEQUENTIAL.
          ACCESS IS SEQUENTIAL.
          
DATA DIVISION.
   FILE SECTION.
   FD FILEN
   01 NOME        PIC x(40).
   
   WORKING-STORAGE SECTION.
   01 WS-ENDERECO PIC X(60).
   01 WS-ID       PIC 9(05).

   LOCAL-STORAGE SECTION.
   01 LS-CLASSE   PIC 9(03).
   
   LINKAGE SECTION.
   01 LS-ID       PIC 9(05).
   
PROCEDURE DIVISION.
   DISPLAY 'EXECUTANDO PROGRAMA COBOL USANDO JCL'.
STOP RUN.