Previous Topic Next topic Print topic


Support for error feedback during SCLM build for COBOL

The SCLM Attachment supports error feedback for COBOL programs in connection with an SCLM build. Use the compiler option ADATA together with the COBOL exit TAURTOCX, and allocate the error feedback file as a member of a PDS file in a build translator. Use the REXX procedure TAUSCPLA for this purpose.

A maximum of 250 messages are returned from the exit. You can reduce this amount using the option /N. The maximum number of warning and informational messages is specified with /W, and this value must be fewer than the one specified for /N. If not specified, the default value is set to 20.

          FLMTRNSL   CALLNAM='XMLDAT',                                 C 
               FUNCTN=BUILD,                                           C 
               CALLMETH=ISPLNK,                                        C 
               COMPILE=SELECT,                                         C 
               VERSION=1.0,                                            C 
               GOODRC=0,                                               C 
               PDSDATA=Y,                                              C 
               PORDER=1,                                               C 
               OPTIONS='CMD(TAUSCPLA §§FLMMBR)NEST'           
          FLMTRNSL   CALLNAM='ENTERPRISE COBOL COMPILER',              C 
               FUNCTN=BUILD,                                           C 
               COMPILE=IGYCRCTL,                                       C 
               DSNAME=IGY410.SIGYCOMP,                                 C 
               VERSION=3.3.1,                                          C 
               GOODRC=4,                                               C 
               PORDER=1,                                               C 
               OPTIONS='FLAG(I,I),ADATA,LIB,LIST,TEST(NOHOOK,SEPARATE),C 
               EXIT(ADEXIT(''/N 100 /W 50'',TAURTOCX))'           
*         (* SYSADATA *)                                                
          FLMALLOC  IOTYPE=W,RECFM=VB,LRECL=1020,RECNUM=500000,        C 
               DDNAME=SYSADATA
Previous Topic Next topic Print topic