The attached .zip file contains sample source code for a procedure to place an EXCLUSIVE LOCK on a network-defined record.
The file contains the procedure definition, the source code of the implementing cobol program, and sample Java code to invoke it.