DB2/400 SQL实现数值补前导零并右对齐的方法求助

需求场景 #

在DB2/400环境中，需要将数值字段处理为：当整数部分为空（即.xxxx形式）时补前导零，同时保持右对齐格式。预期输出示例：

NUMERIC     REQUIRED_OUTPUT
   .0000              0.0000
  1.0000              1.0000
   .0000              0.0000
100.0000            100.0000

原方法的问题 #

之前尝试的REPLACE(CHAR(NBUN62), '.', '0.')会错误转换，比如把1.0000变成10.0000——因为该语句会替换所有小数点，无法区分整数部分是否为空的情况。

正确实现方法 #

方法一：CASE语句精准判断（支持正负数值）

SELECT 
    NBUN62 AS NUMERIC,
    CHAR(NBUN62) AS CHARACTER,
    CASE 
        -- 处理0到1之间的非负数值，补前导零
        WHEN NBUN62 >= 0 AND NBUN62 < 1 THEN CONCAT('0', CHAR(NBUN62))
        -- 处理-1到0之间的负数值，补前导零（保留负号）
        WHEN NBUN62 > -1 AND NBUN62 < 0 THEN CONCAT('-0', SUBSTR(CHAR(NBUN62), 2))
        -- 其他正常数值直接返回原字符格式
        ELSE CHAR(NBUN62)
    END AS REQUIRED_OUTPUT
FROM Cost_File

方法二：简化处理（仅非负数值场景）

如果确定数值都是非负的，可以用更简洁的写法：

SELECT 
    NBUN62 AS NUMERIC,
    CHAR(NBUN62) AS CHARACTER,
    CONCAT(
        -- 去掉前导空格后，判断首字符是否为小数点，是则补0
        CASE WHEN LEFT(LTRIM(CHAR(NBUN62)), 1) = '.' THEN '0' ELSE '' END,
        LTRIM(CHAR(NBUN62))
    ) AS REQUIRED_OUTPUT
FROM Cost_File

说明 #

DB2/400的CHAR函数转换数值时默认会自动右对齐，所以只要处理好前导零的补全逻辑，就能直接满足右对齐的需求。

内容的提问来源于stack exchange，提问作者user2972041