This exit can use the data passed to it to determine what the SECOTMA variable should be set to. This variable needs to match the OTMASE parameter configured for OTMA in the IMS region.
Set SECOTMA to F or C to cause TIRxxTCP to populate the OTMA Security Header with provided user ID, group ID, or token and the OTMA User Header Passticket with the provided password.
Set SECOTMA to N to cause TIRxxTCP to not populate the OTMA Security and User Headers with security data.
The security data used is the user ID and password provided in the security offset of the cooperative buffer if enhanced security is used, the user ID and password provided in the cooperative buffer header if standard security is used and blanks if none is provided. However if SECOTMA is set to a value other than N and no security data is provided the IMS Connect User is used as the user ID, no password will be provided and this can result in a failure from OTMA with a reason code of SECFNPUI, which will be interpreted as an XERR with a code of 0902, message 'Security: Invalid User ID'.
With the changes to support IPv6 the length of the TCP/IP IP Address has changed. The SECIPAD parameter contains the address of an IP Address that is 4 bytes in length for IPv4 implementations and is 16 bytes in length for IPv6 implementations. This is further represented in the SECIP DSECT.
Modify the exit as required. Ensure SECRC points to the relevant return code. Return control to the caller using the value passed in Register 14 at entry. All registers except Register 15 must be restored. Results are unpredictable if invalid data is returned. Register 15 should contain the return code.
Note: Be sure to use the source that corresponds to your IMS release.
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|