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.

Table 1. Valid environments for the UPDATE RTCDESC command and keywords
Command / Keywords DB/DC DBCTL DCCTL
UPDATE RTCDESC X   X
NAME X   X
OPTION X   X
SET X   X

Syntax

Read syntax diagramSkip visual syntax diagram
                              .-,----.     
                              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

The following table shows the UPDATE RTCDESC output fields. The columns in the table are as follows:
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.
Table 2. Output fields for the UPDATE RTCDESC command
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.

Table 3. Return and reason codes for the UPDATE RTCDESC command
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.

Table 4. Completion codes for the UPDATE RTCDESC command
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 Start of changeRTC/FP=N PGM CONFLICTEnd of change 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.
Start of change1D7End of change Start of changeIMPORT CHANGE LIST ERROREnd of change Start of changeThe 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. End of change

Examples

The following are examples of the UPDATE RTCDESC command:

Example 1 for UPDATE RTCDESC command

TSO SPOC input:
UPD RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP) 
TSO SPOC output:
Response for: UPD RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP)  
DescName MbrName    CC CCText                                       
DBFDSRT1 IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
DESC001  IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
DESC002  IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
DESC003  IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
DESC004  IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
DESC005  IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                       
RTCDESC1 IMS1       7A Start of changeRTC/FP=N PGM CONFLICTEnd of change                      
OM API input:
CMD(UPDATE RTCDESC NAME(*) SET(PGM(BMPFPE01)) OPTION(ALLRSP))
OM API output:
<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) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change  
</rsp>                                                                 
<rsp>DESC(DESC005 ) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change    
</rsp>                                                                 
<rsp>DESC(DESC001 ) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change    
</rsp>                                                                 
<rsp>DESC(RTCDESC1) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change    
</rsp>                                                                 
<rsp>DESC(DBFDSRT1) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change    
</rsp>                                                               
<rsp>DESC(DESC002 ) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change    
</rsp>                                                                
<rsp>DESC(DESC003 ) MBR(IMS1) CC(  7A) Start of changeCCTXT(RTC/FP=N PGM CONFLICT)End of change   
</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.