%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