COBOL - Funções intrínsecas - SIGN
The SIGN function returns +1, 0, or –1 depending on the sign of the argument.
The function type is integer.
The returned value is as follows: