Explanation
The error occurred during processing of an OPEN
macro for a telecommunications access method (TCAM) application program
data set.
Register 0 contains a hexadecimal reason code that
explains the error:
- Code
- Explanation
- 01
- An OPEN macro for a TCAM application program data set has been
issued but there is no message control program (MCP) active in the
system.
- 02
- The QNAME= parameter of a DD statement associated with an application
program is not the name of a process entry defined in the terminal
table, or the QUEUES= operand appeared in the TPROCESS macro instruction
when an application program data control block (DCB) was being opened
for output only, or the QUEUES= operand was not specified when an
application program DCB was being opened for input.
- 03
- A process entry named by the QNAME= parameter of a DD statement
associated with an application program is currently being used by
another application program.
- 04
- Insufficient virtual storage was available in the MCP to build
internal control blocks, or the PGFN macro failed for the process
entry work area.
- 05
- Insufficient virtual storage was available in the application
program area to build internal control blocks.
- 06
- The application program attempted to open a secured queue. The
system operator rejected the request.
- 07
- The application program is not an authorized program, but the
user has either coded AUTHA=YES or taken YES as the default value
for AUTHA parameter on the TCAM INTRO macro.
- 08
- Page control block (PCB) error. OPEN was issued for a TPROCESS
entry while its PCB was in use by another task.
- 09
- A TCAM job name was not found with the same name as the TCAM job
name that was qualified on the DD statement as input to IGG01946 (DCB
OPEN).
- 0A
- The number of environmental checkpoint records that can be written
is less than the number of environmental checkpoint records requested.
System action
If an ABEND installation exit is provided in the
EXLST= operand of the DCB macro for the data set, the system gives
control to the routine. If it returns, or if no ABEND installation
exit is provided, the system abnormally ends the task. Message IED015I
may accompany this system completion code.
Programmer response
No action is required if an ABEND installation
exit has been provided in the EXLST= operand of the DCB macro for
the application program data set.
The contents of register 0
indicate the action to be taken:
- Register 0
- Response
- 01
- Ensure that an MCP is active before attempting to start an application
program.
- 02
- Recode the QNAME= parameter specifying the name of a valid process
entry.
- 03
- Recode the QNAME= parameter specifying the name of a valid process
entry.
- 04
- Specify a larger region or partition size on the JOB statement
for the MCP, or restart the system specifying a larger system queue
space.
- 05
- Specify a larger partition size on the JOB statement for the application
program.
- 06
- Recode the SECURE=YES operand associated with the queue, or instruct
the system operator to allow the queue to be opened.
- 07
- Link edit the application program as an authorized program into
an authorized library, or specify AUTHA=NO on the TCAM INTRO macro.
- 08
- Open all TPROCESS entries for the PCB in the same application
program.
- 09
- Either start the TCAM with the jobname wanted or change the jobname
on the QNAME=procname.jobname operand and restart the application
program.
- 0A
- Either increase the number of environmental checkpoint records
that can be written, or decrease the requested number of environmental
checkpoint records.
Source