序列格式的 AS400 日期

AS400 Date in Serial Format

有谁知道如何将旧 AS400 (v5r2) 的当前日期和时间转换为 yyyymmddhhmmss 格式?我已尝试使用 sysibm.sysdumm1 当前时间戳函数,但我无法删除系统格式。

这是一种方式:

select                                                         
  replace(
    replace(                                               
      substr(cast(current_timestamp as varchar(26)), 1, 19),
    '-', ''),  
  '.', '')                                                     
from sysibm.sysdummy1                                          

这是应该在 V5R2 中工作的另一种方式:

select                             
  digits(decimal(                  
    year(current_timestamp) * 10000 +
    month(current_timestamp) * 100 + 
    day(current_timestamp), 8, 0)) ||
  digits(decimal(                  
    hour(current_timestamp) * 10000 +
    minute(current_timestamp) * 100 +
    second(current_timestamp), 6, 0))
from sysibm.sysdummy1