UPDATE RTCDESC command
Use the UPDATE RTCDESC command to update Fast Path routing code descriptors.
A descriptor is a model that can be used to create descriptors or resources. Updating a descriptor changes only the attributes explicitly specified on the UPDATE command. Attributes not specified retain their existing values. Any routing code resource or descriptor can be created using this descriptor as a model, by specifying the CREATE LIKE(DESC(descriptor_name)) command. Any descriptor or resource that was already created using this descriptor is not updated.
Subsections:
Environment
The following table lists the environments (DB/DC, DBCTL, and DCCTL) in which you can use the commands and keywords.
Command / Keywords | DB/DC | DBCTL | DCCTL |
---|---|---|---|
UPDATE RTCDESC | X | X | |
NAME | X | X | |
OPTION | X | X | |
SET | X | X |
Syntax
.-,----. V | >>-+-UPDATE-+--RTCDESC--NAME(---name-+-)------------------------> '-UPD----' .-,----------------. V | >----SET(---+-DEFAULT(Y)---+-+-)----+----------------+--------->< +-INQ(-+-N-+-)-+ '-OPTION(ALLRSP)-' | '-Y-' | '-PGM(name)----'
Keywords
The following keywords are valid for the UPDATE RTCDESC command:
- NAME
- Specifies the 1-8 character name of the routing code descriptor. Wildcards can be specified in the name. The name is a repeatable parameter. If the NAME parameter specified is a specific or wildcard name, command responses are returned for all the descriptor names that are processed. For NAME(*), command responses are returned only for the descriptor names that resulted in an error. OPTION(ALLRSP) can be specified with NAME(*) to obtain the command responses for all the descriptor names that are processed.
- OPTION
- Specifies additional functions to be performed along with the
command.
- ALLRSP
- Indicates that the response lines are to be returned for all descriptors that are processed on the command. The default action is to return response lines only for the descriptors that resulted in an error. It is valid with NAME(*) only. ALLRSP is ignored for other NAME values.
- SET
- Specifies the attribute values to be changed.
- DEFAULT(Y)
- Specifies this descriptor as the default, which resets the existing default descriptor to DEFAULT(N). When a descriptor or resource is created without the LIKE keyword, any attribute not specified on the CREATE command takes the value defined in the default descriptor. Only one descriptor can be defined as the default for a resource type. IMS™ defines a routing code descriptor called DBFDSRT1, where all attributes are defined with the default value. Defining a user-defined descriptor to be the default overrides the current default descriptor. Because only one routing code descriptor can be the default at one time, only one routing code descriptor name can be specified with DEFAULT(Y).
- INQ
- Specifies the inquiry option.
- N
- This is not an inquiry routing code.
- Y
- This is an inquiry routing code. Any message associated with the routing code is an inquiry transaction. This should be specified only for programs that do not cause a change to a database. Programs are prohibited from issuing Insert, Delete, or Replace calls to a database when processing an inquiry transaction.
- PGM
-
The name of the application program associated with the routing code. The program must exist and be defined with a BMPTYPE of N.
Usage notes
If all the attributes specified by the UPDATE command are already defined for the descriptor, no update is actually made, no descriptors are quiesced, no log record is created, and a completion code of zero is returned. This avoids unnecessary overhead when no action needs to be taken.
Descriptors exist for the life of the IMS unless they are deleted using a DELETE command. The descriptors are recoverable across an IMS warm start or emergency restart. Descriptors are lost if IMS is cold started, unless cold start imports definitions that were exported while IMS was up.
The UPDATE RTCDESC command can be issued only through the OM API. Fast Path must be installed on the system. This command applies to DB/DC and DCCTL systems.
This command is not valid on the XRF alternate, RSR tracker, or FDBR region. The UPDATE RTCDESC commands are not valid if online change for MODBLKS is enabled (DFSDFxxx or DFSCGxxx defined with MODBLKS=OLC, or MODBLKS not defined).
These commands are recoverable.
If the descriptor is the IMS-defined routing code descriptor (DBFDSRT1), the only attribute that can be updated is the DEFAULT attribute.
Each descriptor is updated individually. Individual updating does not work like online change where either all descriptors are updated or no descriptors are updated.
Output fields
- Short label
- Contains the short label generated in the XML output.
- Keyword
- Identifies keyword on the command that caused the field to be generated. N/A appears for output fields that are always returned. error appears for output fields that are returned only in case of an error.
- Meaning
- Provides a brief description of the output field.
Short label | Keyword | Meaning |
---|---|---|
CC | N/A | Completion code. |
CCTXT | error | Completion code text that briefly explains the nonzero completion code. |
DESC | RTCDESC | Routing code descriptor name. |
ERRT | error | Error text with diagnostic information. Error text can be returned for a nonzero completion code and contains information that further explains the completion code. |
MBR | N/A | IMSplex member that built the output line. |
OLDDEF | RTCDESC | Old default descriptor name, if this descriptor is updated to be the default by specifying DEFAULT(Y). The old default descriptor is no longer the default. |
Return, reason, and completion codes
The following table includes the return and reason codes and a brief explanation of the codes. The return or reason code returned for the command might also indicate an error from a CSL request.
Return code | Reason code | Meaning |
---|---|---|
X'00000000' | X'00000000' | Command completed successfully. The command output contains a line for each descriptor, accompanied by its completion code. If NAME(*) is specified without OPTION(ALLRSP), no output lines are returned. See the completion code table for details. |
X'00000008' | X'00002008' | Required keywords were not specified. |
X'00000008' | X'00002123' | Invalid program name. |
X'00000008' | X'00002048' | Invalid SET attribute. |
X'00000008' | X'00002133' | Multiple name parameters were specified with DEFAULT(Y). Only one descriptor can be the default at one time. |
X'0000000C' | X'00003000' | Command was successful for some descriptors but failed for others. The command output contains a line for each descriptor, accompanied by its completion code. If NAME(*) is specified without OPTION(ALLRSP), only descriptors with nonzero completion codes are returned. See the completion code table for details. |
X'00000010' | X'00003004' | Command was not successful for any of the descriptors. The command output contains a line for each descriptor, accompanied by its completion code. See the completion code table for details. |
X'00000010' | X'0000400C' | Command is not valid on the XRF alternate. |
X'00000010' | X'00004014' | Command is not valid on the RSR tracker. |
X'00000010' | X'00004024' | No Fast Path defined. |
X'00000010' | X'00004120' | Online change phase is in progress. |
X'00000010' | X'00004300' | Command is not allowed because online change for MODBLKS is enabled (DFSDFxxx or DFSCGxxx defined with MODBLKS=OLC, or MODBLKS not defined). |
X'00000010' | X'0000431C' | Program is quiesced. Cannot quiesce program. |
X'00000014' | X'00005004' | DFSOCMD response buffer could not be obtained. |
X'00000014' | X'00005008' | DFSPOOL storage could not be obtained. |
X'00000014' | X'0000500C' | AWE could not be obtained. |
Errors unique to the processing of this command are returned as completion codes. The following table includes an explanation of the completion codes.
Completion code | Completion code text | Meaning |
---|---|---|
0 | Command completed successfully for routing code descriptor. | |
10 | NO RESOURCES FOUND | Routing code descriptor name is invalid, or the wildcard parameter specified does not match any descriptor names. |
17 | ANOTHER CMD IN PROGRESS | Another command (such as DELETE or UPDATE) is in progress for this routing code descriptor. This could also mean this command, if the resource is specified by more than one specific or wildcard parameter. |
48 | NOT ALLOWED FOR IMS RESOURCE | The specified UPDATE command is not allowed for the IMS descriptor or resource. DBFDSRT1 is an example of an IMS descriptor. The only IMS descriptor attribute you can update is DEFAULT(Y). |
61 | DFSBCB STORAGE ERROR | DFSBCB storage error. Could not get storage for RCTE control block. |
7A | RTC/FP=N PGM CONFLICT | Program specified is not Fast Path exclusive. |
8A | WILDCARD PARAMETER NOT SUPPORTED | A wildcard parameter was specified with DEFAULT(Y). Only one descriptor can be the default at one time. |
90 | INTERNAL ERROR | Internal error. |
1D7 | IMPORT CHANGE LIST ERROR | The descriptor is in the process of being imported from the change list in the IMSRSC repository or was not successfully imported from the change list. The descriptor cannot be updated until it is successfully imported from the repository. |
Examples
The following are examples of the UPDATE RTCDESC command:
Example 1 for UPDATE RTCDESC command
UPD RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP)
Response for: UPD RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP)
DescName MbrName CC CCText
DBFDSRT1 IMS1 7A RTC/FP=N PGM CONFLICT
DESC001 IMS1 7A RTC/FP=N PGM CONFLICT
DESC002 IMS1 7A RTC/FP=N PGM CONFLICT
DESC003 IMS1 7A RTC/FP=N PGM CONFLICT
DESC004 IMS1 7A RTC/FP=N PGM CONFLICT
DESC005 IMS1 7A RTC/FP=N PGM CONFLICT
RTCDESC1 IMS1 7A RTC/FP=N PGM CONFLICT
CMD(UPDATE RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP))
<imsout>
<ctl>
<omname>OM1OM </omname>
<omvsn>1.3.0</omvsn>
<xmlvsn>20 </xmlvsn>
<statime>2006.312 00:04:22.046943</statime>
<stotime>2006.312 00:04:22.047492</stotime>
<staseq>BFAC1585EA4DF64A</staseq>
<stoseq>BFAC1585EA70488A</stoseq>
<rqsttkn1>USRT011 10160422</rqsttkn1>
<rc>0200000C</rc>
<rsn>00003008</rsn>
<rsnmsg>CSLN054I</rsnmsg>
<rsntxt>None of the clients were successful.</rsntxt>
</ctl>
<cmderr>
<mbr name="IMS1 ">
<typ>IMS </typ>
<styp>DBDC </styp>
<rc>0000000C</rc>
<rsn>00003004</rsn>
<rsntxt>No requests were successful</rsntxt>
</mbr>
</cmderr>
<cmd>
<master>IMS1 </master>
<userid>USRT011 </userid>
<verb>UPD </verb>
<kwd>RTCDESC </kwd>
<input>UPD RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP) </input>
</cmd>
<cmdrsphdr>
<hdr slbl="DESC" llbl="DescName" scope="LCL" sort="a" key="1"
scroll="no" len="8" dtype="CHAR" align="left" />
<hdr slbl="MBR" llbl="MbrName" scope="LCL" sort="a" key="2" scroll="no"
len="8" dtype="CHAR" align="left" />
<hdr slbl="CC" llbl="CC" scope="LCL" sort="n" key="0" scroll="yes"
len="4" dtype="INT" align="right" />
<hdr slbl="CCTXT" llbl="CCText" scope="LCL" sort="n" key="0"
scroll="yes" len="32" dtype="CHAR" align="left" skipb="yes" />
</cmdrsphdr>
<cmdrspdata>
<rsp>DESC(DESC004 ) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(DESC005 ) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(DESC001 ) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(RTCDESC1) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(DBFDSRT1) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(DESC002 ) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
<rsp>DESC(DESC003 ) MBR(IMS1) CC( 7A) CCTXT(RTC/FP=N PGM CONFLICT)
</rsp>
</cmdrspdata>
</imsout>
Explanation: The UPDATE RTCDESC command is issued to update all routing code descriptors to reference program BMPFPE01. The update fails for all routing codes with completion code 7A because a routing code cannot be associated with a non-Fast Path program.