Reverses the sign of a numeric expression. Do not confuse this operator with the subtraction operator that subtracts one expression from another.

Syntax

- expression
expression
An expression whose value is numeric.

Example

If you supply a negative value for the variable fx, the r-uneg.p procedure uses the unary negative operator (-) to reverse the sign of fx, producing the absolute value of fx (fabs-x).

r-uneg.p 

DEFINE VARIABLE fx     AS DECIMAL NO-UNDO LABEL "X".
DEFINE VARIABLE fabs-x AS DECIMAL NO-UNDO LABEL "ABS(X)".

REPEAT:
  SET fx.
  IF fx < 0 THEN
   fabs-x = -fx.
  ELSE 
    fabs-x = fx.
  DISPLAY fabs-x.
END.

See also

+ Unary positive operator