IDMS - ABRT check and a rollback message in log but no dialog did not abend

Products

• IDMS
• IDMS - Database
• IDMS - ADS

Issue/Introduction

I don't see any abend codes being put out in the system, the dialog does not abort either, but I can see on the journal the ABRT check and a rollback message in the log.  There are no explicit rollback commands in the dialog that I can find.  

Environment

Release : 19.0

Component : CA ADS

Cause

If you #RETURN NXTTASK=xxxxx  that means the current task is ended and a new task started.  Ending the current task means any open Database transactions (rununits) will be rolled out.

Resolution

Client has a dialog that does database access and also links to an assembler program to submit JCL to INTRDR. When the Assembler program does the #RETURN to go back to the dialog, it uses the #RETURN parameter NXTTASK=ADSR. Using NXTTASK parameter means the current task is ended and a new task is started. When the current task is ended any open database transaction (rununit) is rolled out. That is the behavior they saw. Changing the assembler program to do plain #RETURN without NXTTASK resolved the problem

Additional Information

#RETURN