ADSO link level incrementing and decrementing

Products

• IDMS
• IDMS - Database
• IDMS - ADS

Issue/Introduction

What increments and/or decrements the ADSO link level?

Environment

Release: All supported releases.
Component: ADS.

Resolution

The control commands that affect the link level are LINK/INVOKE/RETURN. LINK and INVOKE increment and RETURN decrements it. A LEAVE ADS also returns the level to 0 because it will exit and application immediately skipping all previous levels.

The EXECUTE NEXT FUNCTION works in conjunction with the control commands assigned to the application response in ADSA.

For example, whatever control command is assigned to a response such as ACRFND shown below is what will be used with this EXECUTE NEXT FUNCTION:

MOVE 'ACRFND' TO AGR-CURRENT-RESPONSE.
EXECUTE NEXT FUNCTION

In ADSA, the response could be anyone of these below. All of the LINKs, INVOKEs and RETURNs affect the link level:

Control command. . . . . .  3   1. Transfer               2. Invoke
                                3. Link                   4. Return
                                5. Return continue        6. Return clear
                                7. Return continue clear  8. Transfer
                                9. Invoke nosave         10. Link nosave

This example does a LINK.