jcl - 如何编写jcl来制作dbdgen

Question

我写 jcl 4 dbdgen：

//C      EXEC PGM=ASMA90,REGION=8M,                              
//            PARM=(OBJECT,NODECK,NODBCS,'SIZE(MAX,ABOVE)')      
//SYSIN    DD DSN=USER19.DBDSRC(LIBDBD),DISP=SHR                 
//SYSLIB   DD DSN=DFSD10.SDFSMAC,DISP=SHR                        
//SYSLIN   DD UNIT=SYSDA,DISP=(,PASS),                           
//            SPACE=(80,(100,100),RLSE),                         
//            DCB=(BLKSIZE=80,RECFM=F,LRECL=80)                  
//SYSPRINT DD SYSOUT=*                                           
//SYSUT1   DD UNIT=SYSDA,DISP=(,DELETE),                         
//            SPACE=(CYL,(10,5))                                                                                               
//L      EXEC PGM=HEWL,PARM='XREF,LIST',                         
//            COND=(0,LT,C),REGION=120K                          
//SYSLIN   DD DSN=*.C.SYSLIN,DISP=(OLD,DELETE)                   
//SYSPRINT DD SYSOUT=*                                           
//SYSLMOD  DD DISP=SHR,                                          
//            DSN=USER19.DBDLIB(LIBDBD)                          
//SYSUT1   DD UNIT=(SYSDA,SEP=(SYSLMOD,SYSLIN)),                 
//            SPACE=(1024,(100,10),RLSE),DISP=(,DELETE)        

并有 8 个 rc。

我认为，这是 asma 的问题，对吗？有没有人想修复我的程序？>