En aquest tema, aprendrem sobre l'estructura bàsica d'un programa COBOL. Un programa COBOL està dividit en diverses divisions, cadascuna amb un propòsit específic. A continuació, desglossarem aquestes divisions i veurem un exemple pràctic.

Divisions d'un Programa COBOL

Un programa COBOL típicament es divideix en les següents divisions:

  1. Identification Division
  2. Environment Division
  3. Data Division
  4. Procedure Division

  1. Identification Division

Aquesta divisió proporciona informació sobre el programa, com el seu nom i l'autor. És obligatòria en tots els programes COBOL.

IDENTIFICATION DIVISION.
PROGRAM-ID. HelloWorld.
AUTHOR. John Doe.

  1. Environment Division

Aquesta divisió descriu l'entorn en què s'executarà el programa. Inclou informació sobre el sistema operatiu i els fitxers que s'utilitzaran. Aquesta divisió és opcional.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

  1. Data Division

Aquesta divisió defineix totes les dades que el programa utilitzarà. Es divideix en diverses seccions, com la File Section i la Working-Storage Section.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(20) VALUE 'Hello, COBOL!'.

  1. Procedure Division

Aquesta divisió conté el codi executable del programa. Aquí és on es defineixen les instruccions que el programa seguirà per realitzar les seves tasques.

PROCEDURE DIVISION.
DISPLAY WS-MESSAGE.
STOP RUN.

Exemple Complet d'un Programa COBOL

A continuació, es mostra un exemple complet d'un programa COBOL que imprimeix un missatge a la pantalla.

IDENTIFICATION DIVISION.
PROGRAM-ID. HelloWorld.
AUTHOR. John Doe.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(20) VALUE 'Hello, COBOL!'.

PROCEDURE DIVISION.
DISPLAY WS-MESSAGE.
STOP RUN.

Explicació del Codi

  1. Identification Division: Defineix el nom del programa (HelloWorld) i l'autor (John Doe).
  2. Environment Division: Especifica el tipus de computadora font i objecte.
  3. Data Division: Declara una variable (WS-MESSAGE) amb una longitud de 20 caràcters i li assigna el valor 'Hello, COBOL!'.
  4. Procedure Division: Conté les instruccions per mostrar el missatge i finalitzar el programa.

Exercicis Pràctics

Exercici 1

Crea un programa COBOL que mostri el teu nom a la pantalla.

Solució

IDENTIFICATION DIVISION.
PROGRAM-ID. ShowName.
AUTHOR. [El teu nom].

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC X(30) VALUE '[El teu nom]'.

PROCEDURE DIVISION.
DISPLAY WS-NAME.
STOP RUN.

Exercici 2

Modifica el programa anterior per mostrar el teu nom i la teva edat en línies separades.

Solució

IDENTIFICATION DIVISION.
PROGRAM-ID. ShowNameAndAge.
AUTHOR. [El teu nom].

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC X(30) VALUE '[El teu nom]'.
01 WS-AGE PIC 99 VALUE 25.

PROCEDURE DIVISION.
DISPLAY WS-NAME.
DISPLAY 'Age: ' WS-AGE.
STOP RUN.

Resum

En aquest tema, hem après sobre l'estructura bàsica d'un programa COBOL, incloent les divisions principals: Identification Division, Environment Division, Data Division i Procedure Division. També hem vist un exemple pràctic i hem realitzat alguns exercicis per reforçar els conceptes apresos. En el següent mòdul, explorarem la sintaxi bàsica del COBOL i els tipus de dades.

© Copyright 2024. Tots els drets reservats