February 14
Anche se gli esperti hanno da tempo previsto la scomparsa del COBOL, il Common Language Business-Oriented per la programmazione dei computer, rimane ampiamente utilizzato agli inizi del 2011. La capacità di resistenza del linguaggio, che risale al 1959, è a dir poco notevole. Se si lavora con COBOL, i rapporti di lavoro creati hanno bisogno di informazioni data corrente per la stampa delle rubriche e il recupero dei dati. Un meccanismo integrato in COBOL consente di recuperare la data corrente con una singola istruzione ACCETTA. Dopo aver recuperato le informazioni sulla data grezzo, metterlo in un formato adatto per il rapporto.
1 Creare un record di dati 01-level nella sezione "Working bagagli" per ricevere la data di sistema. Il record di annullare otto cifre decimali dedicati alla data corrente, con un anno di quattro cifre seguito dal mese e il giorno con due cifre ciascuno . È possibile chiamare questo record di "odierno-current-date", per esempio. Dare l'anno, mese e giorno sottocampi nomi come "Current-Year", "Current-Month" e "Current-Day".
2 Creare un record data nel titolo della sua relazione con il mese, giorno e anno sottocampi disposte nel formato della data preferito. I tipi di campo devono essere carattere o numerico. Tra i campi di mese e giorno, inserire un singolo personaggio con un trattino o barra in una clausola "Valore". Fare lo stesso per i campi di giorno e l'anno. Si potrebbe chiamare campo di report "Intestazione-Day", "Intestazione-Month" e "Intestazione-Year."
3 Aggiungere le seguenti righe di una routine di pulizia nella divisione "Procedura" del vostro programma:
Accetta di oggi-corrente-Data Dal Data.
Spostare Current-Year alla rubrica anni.
Spostare Current-Month alla rubrica-mese.
Spostare Current-Day, voce-Day.
Questo pone le informazioni sulla data nella vostra rubrica rapporto. Il rapporto verrà stampata la data corretta con la formattazione preferita.