The Symdump Batch IVP demo program JCL member CARXDEMO fails in the COBOL 6.2 compile step with RC=16.

Products

• SymDump Batch

Issue/Introduction

Just completed the installation of Symdump Batch. When executing the Symdump Batch IVP program CAOEDEMO JCL member CARXDEMO with Enterprise COBOL 6.2 the compile step fails with a return code 16 (RC=16). The Compile step output contains the following message that the SYSMDECK could not be opened..

       END PROGRAM PROCESS-PARMS.                                
       END PROGRAM CAOEDEMO.                                     
Assertion failed at ../../ibm/env/ListingAgent.cpp:4252: 0       
Could not open source DD:SYSMDECK                               

Environment

Z/OS

Cause

The SYSMDECK DD statement allocated in the compile step was missing the  UNIT and SPACE parameter as shown below. 

//SYSUT1   DD  UNIT=&WORK,SPACE=(TRK,(10,10))  
//SYSUT2   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT3   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT4   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT5   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT6   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT7   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT8   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT9   DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT10  DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT11  DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT12  DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUT13  DD  UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSLIN   DD  DSN=&&LOADSET,DISP=(MOD,PASS),                          
//             UNIT=&WORK,SPACE=(TRK,(3,3))                            
//SYSPRINT DD  DSN=&&LISTING,DISP=(MOD,PASS),                          
//             UNIT=&WORK,SPACE=(TRK,(10,10))                          
//SYSUDUMP DD  SYSOUT=*                                                
//SYSMDECK DD  SYSOUT=*                                                
//SYSPUNCH DD  DUMMY         

Resolution

The client added the UNIT and SPACE parameter to the SYSMDECK as shown below and that resolved the problem.

The client also increased the Space allocation for DD statements SYSUT1 through SYSUT13 to cylinder allocations from tracks. The IVP shipped with Symdump batch ships with cylinder allocations for all the SYSUT* DD statements.

//SYSUT1   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT2   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT3   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT4   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT5   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT6   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT7   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT8   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT9   DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT10  DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT11  DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT12  DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSUT13  DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSMDECK DD  UNIT=&WORK,SPACE=(CYL,(1,2))                                         
//SYSLIN   DD  DSN=&&LOADSET,DISP=(MOD,PASS),                                       
//            UNIT=&WORK,SPACE=(CYL,(1,2))                                          
//SYSPRINT DD  DSN=&&LISTING,DISP=(MOD,PASS),                                       
//            UNIT=&WORK,SPACE=(CYL,(1,2))