GETUSER(output)

où :

output

Alphanumérique, au moins A8

est le champ résultat, dont la longueur dépend de la plate-forme sur laquelle la fonction est invoquée. Fournit un longueur aussi longtemps que nécessaire pour votre plate-forme; sans quoi, la sortie seras tronquée.

GETUSER récupère l'identifiant de l'utilisateur de la personne exécutant la requête :

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 sortie est :

SALARY REPORT RUN FROM USERID: doccar

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

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