获取参考系统名称

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()