%ABS（表达式的绝对值）

在线编辑

%ABS(numeric expression)

%ABS 返回指定为参数的数字表达式的绝对值。如果数字表达式的值是非负数，那么将返回未更改的值。如果值为负数，那么返回的值是表达式的值，但除去了负号。

%ABS 可以在表达式中使用，也可以用作关键字的参数。当与关键字一起使用时，操作数必须是数字文字，表示数字值的常量名称或具有在编译时已知的数字值的内置函数。

有关更多信息，请参阅算术运算或内置函数。

图 1。 %ABS 示例

 *..1....+....2....+....3....+....4....+....5....+....6....+....7...+....
D*Name +++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D f8         s              8f   inz (-1)
D i10        s             10i 0 inz (-123)
D p7         s              7p 3 inz (-1234.567)

 /FREE
    f8  = %abs (f8);        // "f8" is now 1.
    i10 = %abs (i10 - 321); // "i10" is now 444.
    p7  = %abs (p7);        // "p7" is now 1234.567.
 /END-FREE