BPX4TGS (tcgetsid) example
The following code retrieves the process group ID of the
session for which the terminal specified by file descriptor
is the controlling terminal.
For the callable service, see tcgetsid (BPX1TGS, BPX4TGS) — Get a process group ID for the session leader for the controlling terminal.
AMODE 31 callers use BPX1TGS (tcgetsid) example.
CALL BPX4TGS, Get session process group ID +
(=A(STDIN_FILENO), Input: File descriptor +
RETVAL, Return value: 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
MF=(E,PLIST) ----------------------------------