RPGLE程序中如何获取小数点后的数字

Question

我在 rpgle 程序中有一个 PF，其字段值为 1001.123、1001.234、1001.561 等。我需要捕获小数点后的数字来进行一些计算。所以我需要从 1001.123 获取 123 ，从 1001.234 获取 234 等等。

有人可以告诉我如何在 RPGLE 中实现这一目标吗？

Answer 1

使用 %dec 获取小数点为 0 的整数，然后从 var 中减去它：

your_var - %dec(your_var: 0)