Obtener el nombre del sistema de referencia

In order to Get the Reference System Name it is necessary to use the command SCDAT().
It return the name of the current reference system.

$$ Example of SCDAT implementation


DECL/CHAR,50,REFSYS_NAME


REFSYS_NAME=ASSIGN/SCDAT()