CBL_SEMAPHORE_OPEN_INTRA

Creates an intra-process semaphore.

Note: This routine is not supported in JVM COBOL.

Syntax:

call "CBL_SEMAPHORE_OPEN_INTRA" using by reference semaphore-handle
                                by value           semaphore-start
                                by value           open-flags

Parameters:

	Using call prototype (see Key)	Picture
`semaphore-handle`	cblt-pointer	usage pointer.
`semaphore-start`	cblt-x4-comp5	pic x(4) comp-5.
`open-flags`	cblt-os-flags	pic x(4) comp-5 or pic x(8) comp-5 (64-bit native programs only)

Using call prototype (see Key)

Picture

semaphore-handle

cblt-pointer

usage pointer.

semaphore-start

cblt-x4-comp5

pic x(4) comp-5.

open-flags

cblt-os-flags

pic x(4) comp-5

pic x(8) comp-5 (64-bit native programs only)

On Entry:

`semaphore-start`	Initial count for the semaphore.
`open-flags`	Reserved. Should be set to zero.

On Exit:

`semaphore-handle`	Semaphore handle.
`return-code`	A value of 0 indicates that the call was successful. Any other value indicates an error. See RETURN-CODE Values For Synchronization Routines

Comments:

None.