//GDGBORRA  JOB (9999),'',CLASS=A,MSGCLASS=Q,MSGLEVEL=(1,1),        
// REGION=0M,NOTIFY=&SYSUID                                         
//* BORRA LAS VERSIONES DEL GDG Y EL GDG BASE                   */  
//BORRAGDG EXEC PGM=IDCAMS                                          
//SYSPRINT DD SYSOUT=*                                              
//SYSIN DD *                                                        
 DELETE (IBMUSER.PRUEBA.GDG) GDG FORCE                              
/*