//MFIOUTPU JOB 'MFIDMFOU',CLASS=9,MSGCLASS=A,NOTIFY=&SYSUID,
//             MSGLEVEL=(1,2)
//*
//*-------------------------------------------------------------------
//*-------------------------------------------------------------------
//SEARCH  JCLLIB ORDER=(PC.CPP.PROC)
/*JOBPARM LINES=9999
//SAR      OUTPUT  DEFAULT=N,CLASS=A
//SAR1     OUTPUT  DEFAULT=N,JESDS=ALL
//N390     OUTPUT  FORMDEF=N390,PAGEDEF=STD8,DEFAULT=Y,
//            DEST=FRAYNE.SUNAHARA,FORMS=A1234567
//*--------------------------------------------------------------------
//STEP00  EXEC PGM=IDCAMS
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//AMSDUMP  DD SYSOUT=*
//SYSIN    DD *
     DELETE MFIDMF.VSAM.ESDS.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.REU.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.NONUNQK.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.NONUNQK.AIX PURGE
     DELETE MFIDMF.VSAM.RRDS.TESTFILE PURGE
     DELETE MFIDMF.QSAM.TESTFILE PURGE
     SET MAXCC = 0
/*
//STEP10  EXEC PGM=IDCAMS
//SYSOUT   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//AMSDUMP  DD SYSOUT=*
//SYSIN    DD *
     DELETE MFIDMF.VSAM.ESDS.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.REU.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.NONUNQK.TESTFILE PURGE
     DELETE MFIDMF.VSAM.KSDS.NONUNQK.AIX PURGE
     DELETE MFIDMF.VSAM.RRDS.TESTFILE PURGE
     DELETE MFIDMF.QSAM.TESTFILE PURGE
     SET MAXCC = 0
/*
