Andrei Kaliachka
Andrei Kaliachka

Reputation: 35

How to write jcl to make dbdgen

I write 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)        

And have 8 rc.

I think, that it is problem with asma, am i right? Have anybody any ideas to repair my programm?>

Upvotes: 0

Views: 203

Answers (0)

Related Questions