138

Explanation
Global resource serialization encountered an error
occurred during processing of an ENQ macro. One of the following is
true: One ENQ macro instruction was issued for a list of resources.
The same resource appears more than once in the list.
Two ENQ macro instructions were issued for the same resource in
the same task without an intervening DEQ macro instruction to release
the resource. The second ENQ macro instruction did not specify TEST,
USE, or HAVE in its RET operand.

System action
Processing continues.

System programmer response
  If the problem persists, search
problem reporting data bases for a fix for the problem. If no fix
exists, contact the IBM® Support
Center. Provide the ABEND dump.

Programmer response
For the first type of error, delete duplicate
resources from the list on the ENQ macro instruction.
For the
second type of error, do one of the following: Specify RET=TEST, RET=USE, or RET=HAVE in the second ENQ macro
instruction
Add a DEQ macro instruction between the two ENQ macro instructions
Delete one of the ENQ macro instructions.

If the problem persists, do the following: Obtain the address of the DEQ parameter list from register 1 in
the UNIQUE-3 column of the SVC 30 or SVC 38 entry in the system trace.
Check the parameter list against the SVC 30 or 38 mapping. When
analyzing the parameter list, remember that the unit control block
(UCB) pointer, if present, is the address of a field that, in turn,
contains the address of the UCB. If the parameter list contains
incorrect data, continue diagnosis in the program that issued the
macro.

Source
Global resource serialization