Explanation
The error occurred during processing of a RDJFCB
macro instruction.
In the message text:
- rc
- Associates this message with system completion code 240 and with
the return code.
- jjj
- The job name.
- sss
- The step name.
- ddname[-#]
- DDname (followed by a concatenation number if it is part of a
concatenation and not the first DD statement in the concatenation)
- dev
- The device number.
- ser
- The volume serial number.
- mod
- The name of the module in which the error occurred.
- dsname(member)
- The data set name. Member name if specified.
The explanation for the hex return code is as
follows:
- Return Code
- Explanation
- 04
- A RDJFCB macro instruction was issued, but the DCB did not contain
a foundation extension block. Specify a JFCB exit in the DCB exit
list. If the DCB is correct, verify that it was not modified during
processing.
- 08
- A RDJFCB macro instruction was issued, but no EXLST address was
found in the DCB. Specify a JFCB exit in the DCB exit list. If the
DCB is correct, verify that it was not modified during processing.
In addition, make sure that EXLST is on a fullword boundary.
- 0C
- A RDJFCB macro instruction was issued, but no JFCB exit was specified
in the DCB exit list. Specify a JFCB exit in the DCB exit list and
run the job step again.
- 10
- A RDJFCB macro instruction was issued, but the JFCB buffer is
not within the user's storage. Correct any errors that may have caused
the exit list to be incorrectly modified and run the job step again.
System action
The task is ended unless the error is to be ignored
as specified in the DCB ABEND exit routine.
Operator response
Start a generalized trace facility (GTF) trace,
and re-create the problem. Reply to message AHL100A with:
TRACE=SYS,USR,SLIP
On
the DD statement for the data set in error, specify:
DCB=DIAGNS=TRACE
System programmer response
If the error recurs and the program
is not in error, look at the messages in the job log for more information.
Search problem reporting data bases for a fix for the problem. If
no fix exists, contact the IBM® Support
Center. Provide the SYSOUT output for the job.
Programmer response
Probable user error. Correct the errors
causing abnormal end as indicated by the return code in the message
text. Rerun the job.
Source
Module
Routing code
Descriptor code