U domenu naslijeđenih programskih jezika, COBOL je uporište koji nastavlja da igra ključnu ulogu u mnogim poslovnim računarskim okruženjima. Jedan od uobičajenih zadataka kada se radi o COBOL-u je rukovanje datumima, posebno budućim datumima. Ovo uključuje postizanje stručnosti ne samo u osnovnom programiranju COBOL-a, već i da se razumije kako se datumi u budućnosti izračunavaju i manipulišu u okviru njegovog ekosistema. Ovaj članak se bavi time kako se izračunavanje datuma u budućnosti može izvršiti na ilustrativan i sveobuhvatan način u COBOL-u.
S obzirom na datum, cilj je pronaći datum koji će pasti nakon određenog broja dana. Neophodno je voditi računa o različitim scenarijima koji proizlaze iz različitog broja dana u različitim mjesecima, kao i uzimajući u obzir prijestupne godine prilikom izračunavanja budućeg datuma.
ODJEL ZA IDENTIFIKACIJU.
PROGRAM-ID. FutureDate.
DATA DIVISION.
RADNO-SKLADIŠNI ODJEL.
01 ws-datum slika 9(8).
01 ws-budući-dani slika 9(4).
01 ws-future-date slika 9(8).
ODSJEK ZA POSTUPAK.
PRIHVATI ws-datum.
PRIHVATI ws-future-days.
IZRAČUNAJ ws-budući-datum = FUNKCIJA CIJELI-DATUMA (ws-datum)
+ ws-budući-dani.
PRIKAZ FUNKCIJE DATUMA INTEGRA (ws-future-date).
STOP RUN.
Razumijevanje Kodeksa
Upoznavanje s dijelovima ovog COBOL programa je korisno za razumijevanje načina na koji proračun budućih datuma funkcionira na djelu.
U prvom odeljku DEKLARIMO varijable ws-date da prihvatimo trenutni datum, ws-future-days da prihvatimo broj dana za izračunavanje budućeg datuma i ws-future-date da zadržimo budući datum. U `PODELI POSTUPKA` PRIHVATAMO trenutni datum i broj dana od korisnika.
Nakon toga, izračunavamo budući datum. COBOL pruža ugrađene funkcije kao što su `FUNCTION INTEGER-OF-DATE` i `FUNCTION DATE-OF-OF-DATE` za izračunavanje datuma. `FUNCTION INTEGER-OF-DATE` pretvara datum u cijeli broj. Zatim ovom cijelom broju dodajemo broj dana. Nakon toga, `FUNCTION DATE-OF-INTEGER` konvertuje ovaj cijeli broj natrag u format datuma.
COBOL ugrađene funkcije datuma
Vrijedi steći uvid u COBOL funkcije datuma koje imaju ključnu ulogu u efikasnom izvođenju izračunavanja datuma u programima.
COBOL pruža nekoliko ugrađenih funkcija posebno dizajniranih za manipulaciju datumima i izračunavanje. Posebno, `FUNCTION INTEGER-OF-DATE` i `FUNCTION DATE-OF-OF-DATE` su dvije takve funkcije koje se koriste u našem programu za izračunavanje datuma. Ove funkcije nude neprimjetan i efikasan način rukovanja datumima u vašoj COBOL aplikaciji, štedeći vam nevolje pisanja složene logike za rad s različitim formatima datuma i scenarijima prijestupne godine.
COBOL-ove funkcije upravljanja datumima dopunjuju dokazanu robusnost i efikasnost jezika, dajući mu neophodnu snagu za upravljanje modernim scenarijima iz stvarnog svijeta koji zahtijevaju zadatke manipulacije datumima, uključujući izračunavanje budućih datuma.
