Supporting Error Feedback in COBOL Processors

In general AWM supports error feedback for COBOL, a function which displays mainframe COBOL Compiler messages in the Error Feedback view. Double-clicking on a compiler message opens the editor and marks all relevant lines.

To support error feedback in combination with the Endevor Attachment you need to modify all COBOL processors.

The following sample shows how to support error feedback in a COBOL processor.

Sample PROC statement

To support error feedback you must specify the ADATA and ADEXIT options like the following sample:

//             SYSXMLLD=’Error-Feedback-Dataset',
//             PARMCOB='LIB,NOSEQ,OBJECT,APOST,ADATA',       
//             PARMCOBX=',EXIT(ADEXIT(''/N 100 /W 50'',TAURTOCX))',
...

Sample COBOL compile step:

//COMPILE EXEC PGM=IGYCRCTL,COND=(0,LT),MAXRC=4, 
// PARM='&PARMCOB.&PARMCOBX.' 
//STEPLIB DD DISP=SHR, 
// DSN=HLQ.MFA.LOADLIB  * MFA server load library which contains TAURTOCX
//SYSXMLSD DD DISP=SHR, 
// DSN=&SYSXMLLD(&C1ELEMENT), 
// MONITOR=COMPONENTS
//SYSADATA DD SPACE=(CYL(2,5)),RECFM=V
...

The error feedback data set must exist as a variable blocked partitioned data set with record length 16383.