TAKESOCKET call

The TAKESOCKET call acquires a socket from another program and creates a new socket. Typically, a child server issues this call using client ID and socket descriptor data that it obtained from the concurrent server. See GIVESOCKET call for a discussion of the use of GETSOCKET and TAKESOCKET calls.

Note: When TAKESOCKET is issued, a new socket descriptor is returned in RETCODE. You should use this new socket descriptor in subsequent calls such as GETSOCKOPT, which require the S (socket descriptor) parameter.

The following requirements apply to this call:

Requirement	Description
Authorization:	Supervisor state or problem state, any PSW key
Dispatchable unit mode:	Task
Cross memory mode:	PASN = HASN
Amode:	31-bit or 24-bit
ASC mode:	Primary address space control (ASC) mode
Interrupt status:	Enabled for interrupts
Locks:	Unlocked
Control parameters:	All parameters must be addressable by the caller and in the primary address space

Figure 1 shows an example of TAKESOCKET call instructions.

Figure 1. TAKESOCKET call instruction example

    WORKING-STORAGE SECTION.
        01  SOC-FUNCTION    PIC X(16)  VALUE IS 'TAKESOCKET'.
        01  SOCRECV         PIC 9(4) BINARY.
        01  CLIENT.
            03  DOMAIN      PIC 9(8) BINARY.
            03  NAME        PIC X(8).
            03  TASK        PIC X(8).
            03  RESERVED    PIC X(20).
        01  ERRNO           PIC 9(8) BINARY.
        01  RETCODE         PIC S9(8) BINARY.
 
    PROCEDURE DIVISION.
         CALL 'EZASOKET' USING SOC-FUNCTION  SOCRECV CLIENT
                         ERRNO RETCODE.

For equivalent PL/I and assembler language declarations, see Converting parameter descriptions.