//CSDORPHN JOB ...................
   //*                                                                        */
   //******** DELETE RESIDUAL SYSPRINT DATASET                                */
   //IEFDLETE EXEC PGM=IEFBR14
   //DDLIST1  DD  DSN=&SYSUID..DFHCSD.REPORT,DISP=(MOD,DELETE),
   //             SPACE=(TRK,0)
   //*                                                                        */
   //******** LIST ALL CSD LISTS & GROUPS                                     */
   //CSDLISTS EXEC PGM=DFHCSDUP,PARM='CSD(READONLY)'
   //DFHCSD   DD  DSN=YOURCICS.DFHCSD,DISP=SHR
   //SYSPRINT DD  DSN=&SYSUID..DFHCSD.REPORT,DISP=(MOD,CATLG),
   //             DCB=(RECFM=FBA,BLKSIZE=0,LRECL=121),
   //             SPACE=(TRK,(300,75),RLSE),UNIT=DISK
   //SYSIN    DD  *
     LIST   LIST(*)
     LIST  GROUP(*)
   /*                                                                         */
   //