USRCOD - get current userid.

Usage:

call usrcod(userid)

Where:

userid

is a character*12 variable where the userid is returned.

Description:

USRCOD returns the userid that a program is running under.

Copyright © 1996, Thinkage Ltd.