GETUSER(output)

donde:

output

Alfanumérico, como mínimo A8

Es el campo de resultado, cuya longitud depende de la plataforma en que se emita la función. Proporcione la longitud necesaria para su plataforma; de lo contrario, la salida quedará truncada.

GETUSER recupera el Id. de usuario de la persona que ejecuta la solicitud:

DEFINE FILE EMPLOYEE
USERID/A8 WITH EMP_ID = GETUSER(USERID);
END

TABLE FILE EMPLOYEE
SUM CURR_SAL AS 'TOTAL SALARIES'
BY DEPARTMENT
HEADING
"SALARY REPORT RUN FROM USERID: <USERID"
" "
END

La salida es:

SALARY REPORT RUN FROM USERID: doccar

DEPARTMENT
----------
MIS
PRODUCTION

TOTAL SALARIES
--------------
   $108,002.00 
   $114,282.00