GETUSER(output)

onde:

saída

Alfanumérico, pelo menos A8

É o campo de resultado, cujo comprimento depende da plataforma na qual a função é emitida. Forneça um comprimento tão grande quanto requerido por sua plataforma; caso contrário, o resultado será truncado.

GETUSER obtém a ID do usuário da pessoa executando a solicitação:

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

A saída é:

SALARY REPORT RUN FROM USERID: doccar

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

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