Nel campo dei linguaggi di programmazione legacy, COBOL è un punto fermo che continua a svolgere un ruolo chiave in molti ambienti informatici aziendali. Uno dei compiti più comuni quando si ha a che fare con COBOL è la gestione delle date, in particolare delle date future. Ciò implica acquisire competenza non solo nella programmazione COBOL di base, ma anche comprendere come le date future vengono calcolate e manipolate all'interno del suo ecosistema. Questo articolo approfondisce come eseguire il calcolo della data futura in modo illustrativo e completo in COBOL.
Data una data, l'obiettivo è trovare una data che cada dopo un determinato numero di giorni. È essenziale tenere conto dei diversi scenari derivanti dal numero variabile di giorni nei diversi mesi e considerare anche gli anni bisestili durante il calcolo della data futura.
IDENTIFICAZIONE DELLA DIVISIONE.
ID PROGRAMMA. FutureDate.
DIVISIONE DATI.
SEZIONE LAVORO-STOCCAGGIO.
01 ws-data foto 9(8).
01 ws-giorni-futuri foto 9(4).
01 ws-data-futura foto 9(8).
DIVISIONE PROCEDURA.
ACCETTO ws-date.
ACCETTO ws-futuri-giorni.
CALCOLO ws-data-futura = FUNZIONE INTERO-DELLA-DATA (ws-data)
+ ws-giorni-futuri.
FUNZIONE VISUALIZZAZIONE DATA-DI-INTERO (ws-data-futura).
FERMA CORSA.
Capire il codice
Conoscere le sezioni di questo programma COBOL è utile per capire come funziona il calcolo della data futura in azione.
Nella prima sezione, DICHIARIAMO le variabili ws-date per accettare la data corrente, ws-future-days per accettare il numero di giorni per calcolare la data futura e ws-future-date per contenere la data futura. Nella `DIVISIONE PROCEDURA`, ACCETTIAMO la data corrente e il numero di giorni dall'utente.
Successivamente calcoliamo la data futura. COBOL fornisce funzioni integrate come "FUNCTION INTEGER-OF-DATE" e "FUNCTION DATE-OF-INTEGER" per i calcoli delle date. "FUNZIONE INTEGER-OF-DATE" converte una data in un numero intero. Aggiungiamo quindi il numero di giorni a questo numero intero. Successivamente, "FUNCTION DATE-OF-INTEGER" riconverte questo numero intero in un formato di data.
Funzioni di data integrate COBOL
Vale la pena acquisire informazioni sulle funzioni di data di COBOL che svolgono un ruolo essenziale nell'esecuzione efficiente dei calcoli delle date nei programmi.
COBOL fornisce diverse funzioni integrate progettate specificatamente per la manipolazione e il calcolo delle date. In particolare, "FUNCTION INTEGER-OF-DATE" e "FUNCTION DATE-OF-INTEGER" sono due di queste funzioni che vengono utilizzate nel nostro programma di calcolo della data. Queste funzioni offrono un modo semplice ed efficiente per gestire le date nell'applicazione COBOL, risparmiandoti la fatica di scrivere logica complessa per gestire diversi formati di data e scenari di anni bisestili.
Le funzioni di gestione delle date di COBOL completano la comprovata robustezza ed efficienza del linguaggio, conferendogli l'abilità necessaria per gestire scenari moderni e reali che richiedono attività di manipolazione delle date, incluso il calcolo delle date future.
