Why the CA OPS/MVS OPSDEV function returns the error "FAILURE IN SYSTEM SERVICE"?
Running the following statement in an OPS/REXX program:
nnn = OPSDEV('D','DASD')
Produces the following error:
OPS1048I ERROR 48 RUNNING pgmname, LINE nn: FAILURE IN SYSTEM SERVICE
Another symptom that can be addressed by this solution is the following error message:
OPS3152W MESSAGE SEND OVERFLOW ERROR, DETECTED AT OPMGPR+X'00001
The External Data Queue available for this REXX program was exhausted.
This error indicates the OPSDEV function or the command issued by the REXX program returned too many lines and the OPS/REXX EDQ (External Data Queue) was exhausted. There are 2 possible solutions:
OI PROGRAM(pgmname) MAXEDQ(32768)
Note: For both the REXXMAXQUEUE parameter and the MAXEDQ keyword the maximum value allowed is 32768. If more than 32768 lines are returned the problem will still occur. You may need to use the filters allowed in the keywords of the OPSDEV function.