COBOL: cosa è e a cosa serve

COBOL: cosa è e a cosa serve

Cosa è il COBOL?

Il COBOL (acronimo di Common Business-Oriented Language) è un linguaggio di programmazione progettato per realizzare applicazioni aziendali, noto per la sua leggibilità e stabilità, usato prevalentemente nei settori bancario, assicurativo e pubblica amministrazione.

La storia del COBOL inizia alla fine degli anni ’50, un’epoca in cui il settore informatico stava iniziando a prendere forma. Con l’obiettivo di disporre di un linguaggio di programmazione standard, comprensibile e utilizzabile dalle aziende, il Dipartimento della Difesa degli Stati Uniti in quel periodo convocò una commissione di esperti per sviluppare un nuovo linguaggio di programmazione. Tale gruppo di lavoro, conosciuto come la Conference on Data Systems Languages (CODASYL), creò il COBOL.

Il COBOL fu progettato con un forte orientamento al business e con una sintassi simile a quella della lingua inglese, per facilitarne la comprensione e l’utilizzo. Per tale ragione questo linguaggio si diffuse rapidamente e fu utilizzato per lo sviluppo di applicazioni in grado di gestire grandi volumi di transazioni e di dati.

Impronta EgoValeo
Cerchi personale tecnico?

Le caratteristiche principali di questo linguaggio sono:

  1. Leggibilità. La sintassi è stata progettata per essere simile al linguaggio naturale, il codice è comprensibile anche a chi non ha una formazione tecnica.
  2. Portabilità. Il COBOL è stato progettato per essere portabile tra diverse piattaforme hardware e software.
  3. Stabilità ed affidabilità. Molte applicazioni critiche, soprattutto nel settore finanziario, si basano ancora su sistemi COBOL e sono operative da decenni.
  4. Gestione dati e report. Questo linguaggio è particolarmente efficace per la gestione di grandi quantità di dati e per la produzione di report analitici.

A cosa serve il COBOL?

Il COBOL serve principalmente per sviluppare applicazioni aziendali destinate a gestire grandi quantità di dati e di transazioni. Viene utilizzato soprattutto nei settori bancario, finanziario, assicurativo e della pubblica amministrazione, per elaborare operazioni contabili, gestire database, creare report analitici, laddove è richiesta alta affidabilità e stabilità.

Un linguaggio datato, ma ancora vivo e vegeto

Nonostante l’età avanzata, questo linguaggio è ancora vivo e vegeto, molti sistemi legacy si basano su applicazioni scritte in COBOL.

Tuttavia, la carenza di nuovi programmatori esperti in COBOL rappresenta un grande problema, poiché molte delle persone che conoscono bene questo linguaggio stanno terminando la propria carriera professionale e si avviano verso il meritato pensionamento.

Per tale ragione, negli ultimi anni sono stati fatti diversi sforzi per modernizzare il COBOL, integrandolo con tecnologie più moderne e con piattaforme cloud.

Logo EgoValeo
Cerchi nuove opportunità professionali?

EgoValeo è leader nell’Head Hunting di professionisti in ambito Information Technology e Engineering.

Mini tutorial di COBOL

Con l’auspicio di incuriosire qualche giovane developer, di seguito proponiamo un semplice esempio di codice scritto in linguaggio COBOL.

In particolare il codice che segue legge i dati di alcune fatture da un file, ne calcola il totale delle fatture e scrive il totale in un file di output.

Supponiamo che il file di input (invoices.dat) abbia la seguente struttura:

  • Numero fattura: 10 caratteri
  • Data fattura: 8 caratteri (formato YYYYMMDD)
  • Importo fattura: 9 cifre con 2 decimali (es. 12345.67)
IDENTIFICATION DIVISION.
PROGRAM-ID. InvoiceTotalCalculator.

ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
    SELECT InvoiceFile ASSIGN TO 'invoices.dat'
        ORGANIZATION IS LINE SEQUENTIAL.
    SELECT OutputFile ASSIGN TO 'total.dat'
        ORGANIZATION IS LINE SEQUENTIAL.

DATA DIVISION.
FILE SECTION.
FD InvoiceFile.
01 InvoiceRecord.
    05 InvoiceNumber    PIC X(10).
    05 InvoiceDate      PIC X(8).
    05 InvoiceAmount    PIC 9(7)V99.

FD OutputFile.
01 OutputRecord.
    05 TotalAmount      PIC 9(9)V99.

WORKING-STORAGE SECTION.
01 WS-TotalAmount      PIC 9(9)V99 VALUE 0.
01 EOF                 PIC X VALUE 'N'.

PROCEDURE DIVISION.
    OPEN INPUT InvoiceFile.
    OPEN OUTPUT OutputFile.

    PERFORM UNTIL EOF = 'Y'
        READ InvoiceFile INTO InvoiceRecord
            AT END
                MOVE 'Y' TO EOF
            NOT AT END
                ADD InvoiceAmount TO WS-TotalAmount
        END-READ
    END-PERFORM.

    MOVE WS-TotalAmount TO TotalAmount.
    WRITE OutputRecord FROM TotalAmount.

    CLOSE InvoiceFile.
    CLOSE OutputFile.

    STOP RUN.

END PROGRAM InvoiceTotalCalculator.

IDENTIFICATION DIVISION: Specifica l’identità del programma.

ENVIRONMENT DIVISION: Definisce l’ambiente di esecuzione e i file di input e output.

DATA DIVISION:

  • FILE SECTION: Definisce la struttura dei record di input (InvoiceRecord) e output (OutputRecord).
  • WORKING-STORAGE SECTION: Contiene variabili di lavoro, incluso il totale delle fatture (WS-TotalAmount) e una variabile di controllo per la fine del file (EOF).

PROCEDURE DIVISION: Contiene il codice eseguibile. In questo esempio:

  • Apre i file di input (invoices.dat) e output (total.dat).
  • Legge i record dal file di input in un ciclo fino alla fine del file.
  • Somma gli importi delle fatture.
  • Scrive il totale delle fatture nel file di output.
  • Chiude i file.

FAQ

A cosa serve il COBOL?

Il COBOL serve per sviluppare applicazioni aziendali, dove è necessario gestire grandi quantità di dati e transazioni, soprattutto nei settori bancario, assicurativo e della pubblica amministrazione.

Chi ha inventato il COBOL?

Il COBOL è stato inventato nel 1959 da un gruppo di esperti della Conference on Data Systems Languages (CODASYL), sponsorizzato dal Dipartimento della Difesa degli Stati Uniti.

Condividi questa pagina: