//FSUPP17A JOB (ACCT#),CLASS=F,MSGCLASS=W,NOTIFY=FSUPP17                        
//JOBCAT   DD  DSN=TSOCAT,DISP=SHR                                              
//A       PROC SM=,OM=                                                          
//A       EXEC PGM=ASMA90,PARM=OBJECT                                           
//SYSIN    DD  DSN=KIMU.REV.CNTL(&SM.),DISP=SHR                                 
//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR                                         
//         DD  DSN=SYS1.AMODGEN,DISP=SHR                                        
//         DD  DSN=KIMU.REV.CNTL,DISP=SHR                                       
//         DD  DSN=ISP.SISPSAMP,DISP=SHR                                        
//SYSUT1   DD  UNIT=(SYSDA,SEP=SYSLIB),SPACE=(CYL,(10,5)),DSN=&SYSUT1           
//SYSPUNCH DD  DUMMY                                                            
//SYSPRINT DD  SYSOUT=*,DCB=(BLKSIZE=3509),                                     
//         UNIT=(,SEP=(SYSUT1,SYSPUNCH))                                        
//SYSLIN   DD  DSN=KIMU.OBJLIB(&OM.),DISP=SHR                                   
//        PEND                                                                  
//* -----------------------------------------------------------------           
//BTH     EXEC PROC=A,SM=RV1#BTH,OM=RV1BTH                                      
//DLAC    EXEC PROC=A,SM=RV1#DALC,OM=RV1DALC                                    
//DARD    EXEC PROC=A,SM=RV1#DARD,OM=RV1DARD                                    
//DSI     EXEC PROC=A,SM=RV1#DSI,OM=RV1DSI                                      
//MAIN    EXEC PROC=A,SM=RV1#MAIN,OM=@RV#090                                    
//TC      EXEC PROC=A,SM=RV1#TC,OM=RV1TC                                        
//EXTR    EXEC PROC=A,SM=RV1#EXTR,OM=RV1EXTR                                    
//TRC     EXEC PROC=A,SM=RV1#TRC,OM=RV1TRC                                      
//* -----------------------------------------------------------------           
//L       EXEC PGM=HEWL,PARM='MAP,LET,LIST',                                    
//         REGION=1M                                                            
//SYSLIN   DD  DDNAME=SYSIN                                                     
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(3,2)),DSN=&SYSUT1                         
//SYSPRINT DD  SYSOUT=*,DCB=(RECFM=FB,BLKSIZE=3509)                             
//LINK     DD  DSN=ISP.SISPLOAD,DISP=SHR                                        
//OBJ      DD  DISP=SHR,UNIT=SYSDA,                                             
//         DSN=KIMU.OBJLIB                                                      
//SYSLMOD  DD  DISP=SHR,UNIT=SYSDA,                                             
//         DSN=KIMU.LOADLIB                                                     
//SYSIN    DD  *                                                                
 INCLUDE OBJ(@RV#090)                                                           
 INCLUDE LINK(ISPLINK)                                                          
 INCLUDE OBJ(RV1DALC)                                                           
 INCLUDE OBJ(RV1BTH)                                                            
 INCLUDE OBJ(RV1DSI)                                                            
 INCLUDE OBJ(RV1TC)                                                             
 INCLUDE OBJ(RV1DARD)                                                           
 INCLUDE OBJ(RV1EXTR)                                                           
 INCLUDE OBJ(RV1TRC)                                                            
 ENTRY   @RV#090                                                                
 NAME    @RV#1(R)                                                               
//                                                                              
