LISTUSR-NEXT

The LISTUSR-NEXT function retrieves the next item in the list.

Syntax:

CALL "A$LIST_USERS" USING LISTUSR-NEXT                             listHandle                            uid                            uname                            uaddr                            ucomp                            tid                            prog

Parameters:

LISTUSR-NEXT	Constant
listHandle	USAGE HANDLE	Specifies the handle of a list returned by the LISTUSR-OPEN function
uid	PIC X(n)	Receives the user ID. If it is zero, it means that the user is an administrator, if it is –1, it means that no login has been made
uname	PIC X(n)	Receives the user name. If no login has been made, it’s set to the operating system user name
uaddr	PIC X(n)	Receives the IP address of the client machine[*]
ucomp	PIC X(n)	Receives the name of the client machine[*]
tid	PIC 9(n)	Receives the unique thread ID of the client. The returned value is between 1 and 2147483647.
prog	PIC X(n)	Receives the name of the program launched by the client or the name of the last program called through the CHAIN statement.   The special value "File server" identifies a connection to the isCOBOL File Server.   The special value "Server Call Session" identifies a remote call. The text between square brackets tells the name of the program that was remotely called. See Remote objects for details.

[*] A computer may have multiple IPs and multiple alias name for the same IP too, so you might not receive the expected IP and name. Usually a safe method to get the desired information is to change the hosts configuration file (/etc/hosts on Linux/Unix, %SystemRoot%\System32\drivers\etc\hosts on Windows) appropriately.