3020 on TRANSFER CONTROL from DC COBOL to ADS
Article ID: 15645
Updated On:
Products
Issue/Introduction
A DC COBOL program is linking to an ADS dialog with the following code:
TRANSFER CONTROL 'DIALOG1' RETURN .
The program DIALOG1 is ADS mainline dialog. This gets error:
DC027007 TASK ABENDED WITH CODE 3020
The 3020 is an IDMS DC error-status meaning the request cannot be serviced because of an I/O, program-not-found, or potential deadlock error.
How can a DC COBOL program pass control to an ADS dialog?
Environment
Release: All supported releases.
Component: ADS.
Resolution
ADS dialog load modules can only be executed under the control of the ADS runtime system so it is not possible to link to ADS dialogs directly.
A DC COBOL program can instead execute the following command to invoke a dialog:
DC RETURN NEXT TASK CODE 'DIALOG1' .
The task code needs to be defined with the same name as the dialog name and invoke program ADSOURN1.
ADD TASK DIALOG1 INVOKES PROGRAM ADSORUN1 NOINPUT.
Additional Information
Feedback
