你好杰拉德A

看看写货币和SHIFT （左）关键字。
将格式化后的金额值写入一个临时字符变量，并通过SHIFT删除不需要的前导空格。

请注意，
Mateusz

我将"多余空间"称为"正确对齐/理由"。 正确的对齐方式适用于所有类型的数字，不限于CURR字段。

默认情况下，数字是右对齐的，因此当显示在多行上时，数字会以这种方式对齐：

  7,000.00
  1,000,000.00
         25.00 

与您的问题无关，代码中有一个大错误，就是CURR字段应始终根据其货币代码进行呈现：根据货币代码，相同的值100.00表示金额不同/例如，价格为100.00欧元（一百欧元）或10,000日元（1万日元）。

因此，一种可能的解决方案是编写：

写：/'价格阈值='  ，p_price CURRENCY p_curr LEFT-JUSTIFIED，
        /'Currency ='（091），p_curr。

 数据output_value类型c的长度15。
 输出值= p_price
 浓缩：输出值。

 写：/'价格阈值='，输出值，
      /'Currency ='（091），p_curr。