Updating TechNotes V3.#1 TIME ZONE CONVERSION IN INFORMIX-4GL USING INFORMIX-ESQL/C

----------------------- FOR INFORMIXLINK------------------------- TECH ALERT: ERRATA Missing from the article, Time Zone Conversion in INFORMIX-4GL Using INFORMIX-ESQL/C, printed in Tech Notes, Volume 3, Issue 1, 1993, was one test program called test_tz.4gl. This test program is referred to on page 50 of the Tech Notes issue. The program shows how the time zone functions work and is included below. ------------------------ CUT HERE ------------------------------- test_tz.4gl ------------------------ CUT HERE ------------------------------- MAIN DEFINE dtvar1 DATETIME YEAR TO SECOND, dtvar2 DATETIME YEAR TO SECOND, dvar1 DATE, dvar2 DATE, tvar1 CHAR(5), tvar2 CHAR(5) LET dtvar1 = CURRENT DISPLAY "The current local date/time is: ", dtvar1 CALL dt_loc_to_gmt(dtvar1) RETURNING dtvar2 DISPLAY "The current GMT date/time is: ", dtvar2 CALL dt_gmt_to_loc(dtvar2) RETURNING dtvar1 DISPLAY "The converted local date/time is: ", dtvar1 LET dvar1 = TODAY LET tvar1 = "12:00" DISPLAY "The current local date/char is: ", dvar1 USING "mm/dd/yyyy", " ", tvar1 CALL ch_loc_to_gmt(dvar1, tvar1) RETURNING dvar2, tvar2 DISPLAY "The current GMT date/char is: ", dvar2 USING "mm/dd/yyyy", " ", tvar2 CALL ch_gmt_to_loc(dvar2, tvar2) RETURNING dvar1, tvar1 DISPLAY "The converted local date/char is: ", dvar1 USING "mm/dd/yyyy", " ", tvar1 END MAIN -- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% William Daul Advanced Support INFORMIX SOFTWARE INC. 4100 Bohannon Dr. (415) 926-6488 - wk Menlo Park, CA. 94025 uunet!infmx!billd or billd@informix.com