UPDATE IMSFUNC command
Use the UPDATE IMSFUNC command to dynamically enable or disable IMS functions.
To see the functions that can be dynamically enabled or disabled by using the UPDATE IMSFUNC command, issue the QUERY IMSFUNC command without specifying the NAME parameter.
Environment
The following table lists the environments (DB/DC, DBCTL, and DCCTL) in which you can use the
command and keywords.
| Command/Keywords | DB/DC | DBCTL | DCCTL |
|---|---|---|---|
| UPDATE IMSFUNC | X | X | X |
| NAME | X | X | X |
| SET | X | X | X |
| ENABLED | X | X | X |
Syntax
Keywords
- NAME
- Specifies the 1-16 character name of the IMS function to be
updated. To see the IMS function names that you can specify on
this parameter, see IMS 15 continuous delivery functions.
You cannot specify wildcards for the NAME parameter.
- SET
- Specifies the parameters to be modified.
- ENABLED
- Specifies whether the IMS function is to be enabled or disabled.
- Y
- Enable the IMS function.
- N
- Disable the IMS function. Not all IMS functions that can be enabled by using the UPDATE IMSFUNC command can be disabled by using the UPDATE IMSFUNC command.
Output fields
The following table shows the UPDATE IMSFUNC output fields. The columns in the
table are:
- Short label
- Contains the short label that is generated in the XML output.
- Long label
- Contains the column heading for the output field in the formatted output.
- Keyword
- Identifies the 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.
- Scope
- Identifies the scope of the output field.
- Meaning
- Provides a brief description of the output field.
| Short Label | Long Label | Keyword | Scope | Meaning |
|---|---|---|---|---|
| CC | CC | N/A | N/A | The completion code for the line of output. The completion code is always returned. |
| CCTXT | CCText | error | LCL | Completion code text returned to provide more information about the completion code. CC text might include a return code from a service. CC text is returned only if the completion code is nonzero. |
| MBR | MbrName | N/A | N/A | The IMS identifier of the IMS that built the output line. The IMS identifier is always returned. |
| NAME | FunctionName | IMSFUNC | LCL | IMS function name. |
Return, reason, and completion codes
| Return Code | Reason Code | Meaning |
|---|---|---|
| X'00000000' | X'00000000' | The UPDATE IMSFUNC command completed successfully. The command output contains a line for each IMS function and its completion code. |
| X'00000004' | X'00001000' | The UPDATE IMSFUNC command was not processed on the IMS system because the IMS system is not the command master. No IMS function information is returned. |
| X'00000010' | X'00004000' | The UPDATE IMSFUNC command is not processed because IMS restart is not complete. |
| X'00000010' | X'00004004' | No CQS address space. |
| X'00000010' | X'0000401C' | The UPDATE IMSFUNC command is not valid on the FDBR region. |
| X'00000010' | X'00004100' | The resource structure is full. |
| X'00000010' | X'00004104' | The UPDATE IMSFUNC command is not processed because RM is not available. |
| X'00000010' | X'00004108' | The UPDATE IMSFUNC command is not processed because SCI is not available. |
| X'00000010' | X'00004124' | The UPDATE IMSFUNC command is not processed because a process step is in progress. |
| X'00000010' | X'00004128' | The UPDATE IMSFUNC command is not processed because no RM process step is in progress. |
| X'00000010' | X'00004200' | The UPDATE IMSFUNC command is not processed because IMS shutdown is in progress. |
| X'00000010' | X'00004208' | Invalid command for RMENV=NO. |
| X'00000014' | X'00005000' | The UPDATE IMSFUNC command is not processed as the IMODULE GETSTOR storage could not be obtained. |
| X'00000014' | X'00005004' | The UPDATE IMSFUNC command processing terminated because a DFSOCMD response buffer could not be obtained. |
| X'00000014' | X'00005100' | The UPDATE IMSFUNC command is not processed because of an RM request error. |
| X'00000014' | X'00005104' | The UPDATE IMSFUNC command is not processed because of a CQS error. |
| X'00000014' | X'00005108' | The UPDATE IMSFUNC command is not processed because of a SCI request error. |
| X'00000014' | X'0000510C' | The UPDATE IMSFUNC command is not processed as another process is in progress. |
| X'00000014' | X'00005FF0' | Invalid function. The function table does not exist. This might be an internal error, for example, the function table address is overlaid. |
| Completion Code | Completion Code Text | Meaning |
|---|---|---|
| 0 | Command completed successfully for IMS function. | |
| 8A | WILDCARD PARAMETER NOT SUPPORTED | The UPDATE IMSFUNC command does not support wildcard parameters. You must explicitly specify the names of the IMS functions that you want to update. |
| 146 | INVALID KEYWORD FOR DCCTL | The IMS function keyword that is specified is not valid for a DCCTL system. |
| 229 | INVALID FUNCTION | The IMS function keyword that is specified is invalid. The function is not defined to IMS, or the PTF containing the function is not applied to this IMS. |
| 22A | INVALID KEYWORD FOR DBCTL | The IMS function keyword that is specified is not valid for a DBCTL system. |
| 22B | DISABLE IS NOT ALLOWED | The IMS function cannot be disabled. |
| 22C | ALREADY ENABLED BY DEFAULT | The IMS function cannot be dynamically enabled because it is enabled by default. |
Example 1 for the UPDATE IMSFUNC command
In this example, the local function level function is enabled by default. The IMSplex consists of the IMS system IMS1. The UPDATE IMSFUNC command is routed to IMS1. The UPDATE IMSFUNC command is rejected with an error because the FUNCTIONLEVEL function is enabled by default and cannot be enabled.
TSO SPOC input:
UPDATE IMSFUNC NAME(FUNCTIONLEVEL) SET(ENABLED(Y)) TSO SPOC
output:
FunctionName MbrName CC CCText
FUNCTIONLEVEL IMS1 22C ALREADY ENABLED BY DEFAULT
OM API Input:
CMD(UPD IMSFUNC NAME(FUNCTIONLEVEL) SET(ENABLED(Y))OM API
Output:
<imsout>
<ctl>
<omname>OM1OM </omname>
<omvsn>1.8.0</omvsn>
<xmlvsn>20 </xmlvsn>
<statime>2017.264 16:10:05.677966</statime>
<stotime>2017.264 16:10:05.678617</stotime>
<staseq>D32C59C13098ED8C</staseq> <stoseq>D32C59C130C1998C</stoseq> <rqsttkn1>USRT011 10091005</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>IMSFUNC </kwd>
<input>UPDATE IMSFUNC NAME(FUNCTIONLEVEL) SET(ENABLED(Y)) </input>
</cmd>
<cmdrsphdr>
<hdr slbl="NAME" llbl="FunctionName" scope="LCL" sort="a" key="1"
scroll="yes" len="16" dtype="CHAR" align="left" skipb="no" />
<hdr slbl="MBR" llbl="MbrName" scope="LCL" sort="a" key="2" scroll="no"
len="8" dtype="CHAR" align="left" skipb="no" />
<hdr slbl="CC" llbl="CC" scope="LCL" sort="n" key="0" scroll="yes"
len="4" dtype="INT" align="right" skipb="no" />
<hdr slbl="CCTXT" llbl="CCText" scope="LCL" sort="n" key="0"
scroll="yes" len="32" dtype="CHAR" align="left" skipb="yes" />
</cmdrsphdr> <cmdrspdata> <rsp>NAME(FUNCTIONLEVEL ) MBR(IMS1) CC( 22C) CCTXT(ALREADY ENABLED BY
DEFAULT) </rsp>
</cmdrspdata> </imsout> Example 2 for the UPDATE IMSFUNC command
In this example, the local function NEWFUNCTION2 is disabled by default. The IMSplex consists of the IMS systems IMS1, IMS2, IMS3 (DCCTL), and IMS4. The UPDATE IMSFUNC command is routed only to IMS1, IMS2, and IMS3. NEWFUNCTION2 is enabled dynamically on IMS1 and IMS2, but not IMS3, because NEWFUNCTION2 is not supported by DCCTL, and IMS4, which does not have the NEWFUNCTION2 PTF applied.
TSO SPOC input:
UPDATE IMSFUNC NAME(NEWFUNCTION2) SET(ENABLED(Y))TSO SPOC
output:
FunctionName MbrName CC CCText
NEWFUNCTION2 IMS1 0
NEWFUNCTION2 IMS2 0
NEWFUNCTION2 IMS3 146 INVALID KEYWORD FOR DCCTL
NEWFUNCTION2 IMS4 229 INVALID FUNCTION
Example 3 for the UPDATE IMSFUNC command
In this example, the global function NEWFUNCTION3 must be enabled on all of the IMS systems at the same time. The IMSplex consists of the IMS systems IMS1 IMS2, IMS3, and IMS4. IMS1, IMS2, and IMS3 have the PTF containing the function applied. IMS4 does not have the PTF containing the function applied. The UPDATE IMSFUNC command is routed to command master IMS1. The UPDATE IMSFUNC command fails for IMS4 because it does not have the PTF applied, so the command master IMS1 fails the command for IMS1, IMS2, and IMS3 as well.
TSO SPOC input:
UPDATE IMSFUNC NAME(NEWFUNCTION3) SET(ENABLED(Y))TSO SPOC
output:
FunctionName MbrName CC CCText
NEWFUNCTION3 IMS1 2 CMD NOT ATTEMPTED BY THIS IMS
NEWFUNCTION3 IMS2 2 CMD NOT ATTEMPTED BY THIS IMS
NEWFUNCTION3 IMS3 2 CMD NOT ATTEMPTED BY THIS IMS
NEWFUNCTION3 IMS4 229 INVALID FUNCTION
Example 4 for the UPDATE IMSFUNC command
This example shows how you can use the UPDATE IMSFUNC command to enable the DEDBGT2K function, which allows you to open more than 2048 (up to 9999) areas under one DEDB.
TSO input:
UPDATE IMSFUNC NAME(DEDBGT2K) SET(ENABLED(Y))
If the command is successful, you see the following
message:
DFS4879I THE IMS FUNCTION DEDBGT2K IS ENABLEDTo disable the DEDBGT2K function, you can enter the following command:
UPDATE IMSFUNC NAME(DEDBGT2K) SET(ENABLED(N))If the command is successful, you see the following
message:
DFS4881I THE IMS FUNCTION DEDBGT2K IS DISABLED