Come convertire una data in timestamp Unix in COBOL

La maggior parte delle aziende a mantenere i sistemi informatici che passano le informazioni critiche tra piattaforme diverse . Sistemi mainframe supportano codice legacy e grandi sistemi core , mentre i sistemi client server più piccoli in esecuzione Unix , Linux o sistemi operativi basati su Windows sono utilizzati per applicazioni client-server e web . Per integrare i sistemi , il sistema informatico centrale accoglie le differenze di formattazione quando il passaggio di dati ad altre piattaforme . COBOL è la lingua preferita per molti sistemi legacy . Con pochi comandi usati in sequenza , si traduce una data per la Unix timestamp . Cose che ti serviranno
COBOL sistema
Interfaccia metodo
Mostra più istruzioni
1

definire i campi in memoria di lavoro per memorizzare valori .

01 numero- DAYS PIC 9 ( 09) ZERI VALUE.

01 CURRENT-DA TE -Fields.

05 CURRENT-DA TE - VALORE .

10 CURRENT-YY PIC 9 ( 04) ZERI valore.

10 CURRENT-MM PIC 9 ( 02) ZERI valore.

10 CURRENT-DD PIC 9 ( 02) ZERI valore.

05 CORRENTE - TEMPO - VALORE .

10 CURRENT-HO UR PIC 9 ( 02) ZERI VALUE.

10 CURRENT-MI N PIC 9 ( 02) ZERI VALUE.

10 CORRENTE -SEC PIC 9 ( 02) ZERI valore.

10 CURRENT-MS PIC 9 ( 02) ZERI valore.

01 SECONDS-IN - A- DAY PIC 9 ( 05 ) VALORE 86400 .

01 SECONDS-IN - A- HOUR PIC 9 ( 05 ) VALORE 3600 .

01 SECONDS-IN - A- MIN PIC 9 ( 02 ) VALORE 60 .

01 UNIX-TIMES TAMP PIC 9 ( 10) ZERI valore.
2

Trova la data e l' ora corrente utilizzando questa funzione COBOL .

funzione Move cORRENTE - dATA DI cORRENTE - dATA - CAMPI
3

. l' timestamp UNIX rappresenta il numero di secondi trascorsi dal 1 ° gennaio 1970. Trova la differenza tra la data corrente e 1 gennaio 1970 utilizzando il comando compute e la funzione integer - of- data in un programma COBOL .

COMPUTE numero- GIORNI = FUNZIONE INTEGER -of-date ( current-date - VALUE ) - .

FUNZIONE INTEGER - of-date ( " 19.700.101 " ) economici 4

Trovare il numero di secondi trascorsi dal 1 ° gennaio 1970 da calcolo il numero di secondi per giorno, ora e minuti e aggiungerli insieme .

COMPUTE UNIX TIMESTAMP =

( numero- gIORNI * sECONDI - IN - A- DAY ) +

( CURRENT ORE * SECONDI - IN - A- ORA) + Commercio

( CURRENT - MIN * SECONDI - IN - A- MIN ) + Commercio

CURRENT - SEC .

Informazioni correlate

Articoli consigliati

Competenze informatiche di base