Skip to main content

Problem:

How to convert a given UTC time  into a local time using Net Express functions ?

Resolution:

This intrinsic function CURRENT-DATE delivers the difference back inbetween GMT (Greenwich Mean Time => UTC => Universal Time, coordinated) and the time running onto a local machine.

For example:

01 myDateTime pic x(21).

.

move function CURRENT-DATE to myDateTime

.

Positions 17 up to 21 from myDateTime having included a content of: 0100 onto a local machine running under Central European Time (CET), means UTC 1 hour.

Net Express documentation files: All details can be found  here:

Help -> Index -> CURRENT-DATE function -> COBOL Language

Old KB# 1588