STD.System.Job.User ( )
The User function returns the username of the person running the workunit.
Example:
A := STD.System.Job.User();