De meeste bedrijven houden computersystemen die kritische informatie tussen verschillende platforms passeren . Mainframe -systemen ondersteunen legacy code en grote core systemen , terwijl kleinere client- server systemen met Unix , Linux of Windows gebaseerde besturingssystemen worden gebruikt voor client - server en web applicaties . Om de systemen te integreren , de kern computersysteem herbergt opmaak verschillen bij het passeren van gegevens naar andere platformen . COBOL is de voorkeurstaal voor veel legacy -systemen . Met een paar opdrachten die in volgorde , het vertaalt een datum om de Unix tijdstempel . Wat je nodig hebt
COBOL systeem
Interfacemethode
Toon Meer Aanwijzingen
1 Definieer velden in het werken opslag om waarden op te slaan .
01 NUMBER - VAN - DAGEN PIC 9 ( 09 ) WAARDE NULLEN . 01 CURRENT-DA TE- FIELDS
. 05 CURRENT-DA
TE- WAARDE . 10 CURRENT-YY PIC
9 ( 04 ) WAARDE NULLEN .
10 CURRENT-MM PIC 9 ( 02 ) WAARDE NULLEN .
10 CURRENT-DD PIC 9 ( 02 ) WAARDE NULLEN .
05 CURRENT - TIME - WAARDE .
10 CURRENT-HO UR PIC 9 ( 02 ) WAARDE NULLEN .
10 CURRENT-MI N PIC 9 ( 02 ) WAARDE NULLEN .
10 HUIDIGE - SEC PIC 9 ( 02 ) WAARDE NULLEN . 10 CURRENT-MS
PIC 9 ( 02 ) WAARDE NULLEN .
01 SECONDS-IN - A - DAY PIC 9 ( 05 ) WAARDE 86.400 . 01 SECONDS-IN - A - UUR PIC 9 ( 05 ) WAARDE 3600 . 01 SECONDS-IN - A - MIN PIC 9 ( 02 ) WAARDE
60 .
01 UNIX-TIMES TAMP PIC 9 ( 10 ) WAARDE NULLEN . kopen van 2 Zoek de huidige datum en tijd met behulp van deze COBOL functie . MOVE fUNCTIE
CURRENT - dATE TE CURRENT - dATE - FIELDS .
3 de Unix timestamp staat voor het aantal seconden dat is verstreken sinds 1 januari 1970. Zoek het verschil tussen de huidige datum en 1 januari 1970 met de compute commando en de integer - of-date functie in een COBOL programma . COMPUTE NUMBER - VAN - DAGEN = FUNCTIE INTEGER - of-date
( CURRENT - DATE - WAARDE ) - . FUNCTIE INTEGER - of-date
( " 19700101 " )
4 Vind het aantal seconden dat is verstreken sinds 1 januari 1970 door het berekenen het aantal seconden per dag , het uur en de minuten en ze samen te voegen . COMPUTE UNIX - tijdstempel
=
( NUMBER - vAN - dAGEN * sECONDEN - IN - A - DAY ) + < br > ( CURRENT - UUR * SECONDEN - IN - A - UUR ) +
( CURRENT - MIN * SECONDEN - IN - A - MIN ) +
CURRENT - SEC . < br >
|
