De flesta företag underhålla datorsystem som passerar kritisk information mellan olika plattformar . Stordatorsystem stödjer äldre kod och stora system kärna , medan mindre klient-server -system som kör Unix , Linux eller Windows- baserade operativsystem används för klient - server- och webbapplikationer . Att integrera systemen , rymmer kärnan datorsystem formatering skillnader när de passerar data till andra plattformar . COBOL är det önskade språket för många äldre system . Med några få kommandon som används i sekvens , översätter det en dag till Unix tid - stämpel . Saker du behöver
COBOL -system
Gränssnittsmetoden
Visa fler instruktioner
1
definiera fält i arbetsminne för att lagra värden .
01 -antals- DAGAR PIC 9 ( 09 )-värdet nollor .
01 CURRENT-DA TE -Fields .
05 CURRENT-DA TE - VÄRDE .
10 CURRENT-YY PIC 9 ( 04 )-värdet nollor.
10 CURRENT-MM PIC 9 ( 02 )-värdet nollor.
10 CURRENT-DD PIC 9 ( 02 )-värdet nollor.
05 aktuell tid - VÄRDE .
10 CURRENT-HO UR PIC 9 ( 02 )-värdet nollor .
10 CURRENT-MI N PIC 9 ( 02 )-värdet nollor .
10 STRÖM - SEC PIC 9 ( 02 )-värdet nollor.
10 CURRENT-MS PIC 9 ( 02 )-värdet nollor.
01 SECONDS-IN - A - DAY PIC 9 ( 05 ) VALUE 86400 .
01 SECONDS-IN - A - HOUR PIC 9 ( 05 ) VALUE 3600 .
01 SECONDS-IN - A - MIN PIC 9 ( 02 ) VALUE 60 .
01 UNIX-TIMES TAMP PIC 9 ( 10 )-värdet nollor.
2
Hitta aktuellt datum och tid med hjälp av denna COBOL funktionen .
Flyttningsfunktion sTRÖM - DATE TO aKTUELLT - DATE -Fields . Addera 3
Unix timestamp representerar antalet sekunder som gått sedan 1 januari 1970. Hitta skillnaden mellan dagens datum och 1 januari 1970 genom att använda beräkna kommandot och heltalet - of-date funktion i ett COBOL -program .
COMPUTE -antals- DAGAR = FUNKTION INTEGER - of-date ( CURRENT - DATE - VÄRDE ) - .
FUNKTION INTEGER - of-date ( " 19.700.101 " )
4
Hitta antalet sekunder som gått sedan 1 januari 1970 av beräkning antalet sekunder efter dag , timme och minut och lägga ihop dem .
COMPUTE UNIX - TIMESTAMP =
( -antals- dAGAR * sEKUNDER - IN - A - DAY ) +
( CURRENT - HOUR * SEKUNDER - IN - A - HOUR ) + Review
( CURRENT - MIN * SEKUNDER - IN - A - MIN ) + Review
STRÖM - SEC .
Addera ditt
