Anche se gli esperti hanno da tempo previsto la scomparsa del COBOL , il Business-Oriented Language comune per la programmazione informatica , rimane ampiamente usato a partire da inizio 2011 . La capacità di resistenza del linguaggio , che risale al 1959 , è a dir poco notevole. Se si lavora con COBOL , il business report creati bisogno di informazioni data corrente per i titoli di stampa e di recupero dei dati . Un meccanismo incorporato nella COBOL consente di recuperare la data corrente con un unico ACCEPT dichiarazione. Dopo aver recuperato le informazioni di data prima, metterlo in un formato adatto per il vostro rapporto . Istruzioni
1

Crea un record di dati 01 - livello nella sezione " memoria di lavoro " per ricevere la data di sistema . Il record di annullare otto cifre decimali dedicate alla data corrente , con un anno a quattro cifre, seguito dal mese e il giorno con due cifre ciascuno . È possibile chiamare questo record " di oggi - current-date ", per esempio . Dare l' anno , mese e giorno sottocampi nomi come " Current - Year", "Current - Month " e " Current - Day".
2

Creare un record di data nel report 'diretto con il mese , giorno e sottocampi anno organizzate nel vostro formato della data preferita . I tipi di campo devono essere carattere o numerico. Tra il mese e campi di giorno , inserire un singolo carattere con un trattino o barra in una clausola di "Valore" . Fate lo stesso per il giorno e campi anno . Si potrebbe chiamare campo di report " Rubrica - Day", "Intestazione - Mese " e "Intestazione - Anno . "
3

Aggiungere le seguenti righe di una routine di pulizia nel vostro programma di "Procedura " divisione:

Accetti odierno - corrente - Data da Data

Sposta corrente anno a Rubrica - Anno

Sposta corrente - Mese di Rubrica - Mese br < . . .

Sposta> corrente - Day per la rubrica - Day .

Questo pone le informazioni di data nel report voce . Il rapporto verrà stampata la data corretta con la formattazione desiderata.