A team of developers are trying to upgrade our COBOL from Micro Focus 4 to 5 - and our date processing keeps throwing exceptions
working storage
...
01 WS-CURRENT-TIMESTAMP PIC X(026).
...
procedure
...
01434 EXEC SQL
SELECT CURRENT_TIMESTAMP INTO :WS-CURRENT-TIMESTAMP
01436 END-EXEC.
...
further down
...
MOVE WS-CURRENT-TIMESTAMP TO XX-LST-UPD-TS.
01578 EXEC SQL
01579 UPDATE NHP083TB
SET XX_LST_UPD_TS = :XX-LST-UPD-TS
END-EXEC.
...
ends with a SQLCODE of 241
XX_LST_UPD_TS
is a SQL Server DATETIME2