//DEL$@@@@ JOBCARD GOES HERE /*JOBPARM L=30,COPIES=1 //OUT1 OUTPUT DEFAULT=YES,JESDS=ALL,PAGEDEF=L1,DEST=K8N1, // FORMDEF=PRIM //BBR14 EXEC PGM=IEFBR14 //ACCTFUND DD DSN=USERACCT.R@@@@.ACCTFUND,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //ANALYSIS DD DSN=USERACCT.R@@@@.ANALYSIS,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //BIND DD DSN=USERACCT.R@@@@.BIND,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //BMSLIB DD DSN=USERACCT.R@@@@.BMSLIB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //CARDEXP DD DSN=USERACCT.R@@@@.CARDEXP,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //CARDLIB DD DSN=USERACCT.R@@@@.CARDLIB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //COBOL DD DSN=USERACCT.R@@@@.COBOL,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //COPYLIB DD DSN=USERACCT.R@@@@.COPYLIB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //DDL DD DSN=USERACCT.R@@@@.DDL,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //DGIPNL DD DSN=USERACCT.R@@@@.DGIPNL,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //EDBCHG DD DSN=USERACCT.R@@@@.EDBCHG,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //EMPLOYEE DD DSN=USERACCT.R@@@@.EMPLOYEE,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //FCPAPPT DD DSN=USERACCT.R@@@@.FCPAPPT,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //FNLPARMO DD DSN=USERACCT.R@@@@.FNLPARMO,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //FOCAFD DD DSN=USERACCT.R@@@@.FOCAFD,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //FOCEXEC DD DSN=USERACCT.R@@@@.FOCEXEC,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //FOCMAST DD DSN=USERACCT.R@@@@.FOCMAST,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //HELPANCH DD DSN=USERACCT.R@@@@.HELPANCH,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //HELPDDSE DD DSN=USERACCT.R@@@@.HELPDDSE,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //HELPSCRN DD DSN=USERACCT.R@@@@.HELPSCRN,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //INCLUDE DD DSN=USERACCT.R@@@@.INCLUDE,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //JCL DD DSN=USERACCT.R@@@@.JCL,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //MAPLIB DD DSN=USERACCT.R@@@@.MAPLIB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //NEWACTIV DD DSN=USERACCT.R@@@@.NEWACTIV,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //RCSTORE DD DSN=USERACCT.R@@@@.RCSTORE,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //REPORTS DD DSN=USERACCT.R@@@@.REPORTS,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2CDB DD DSN=USERACCT.R@@@@.UDB2CDB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2CTL DD DSN=USERACCT.R@@@@.UDB2CTL,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2CTL2 DD DSN=USERACCT.R@@@@.UDB2CTL2,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2EDB DD DSN=USERACCT.R@@@@.UDB2EDB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2EDB2 DD DSN=USERACCT.R@@@@.UDB2EDB2,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2HDB DD DSN=USERACCT.R@@@@.UDB2HDB,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2PAR DD DSN=USERACCT.R@@@@.UDB2PAR,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //UDB2PCD DD DSN=USERACCT.R@@@@.UDB2PCD,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //WIDETIME DD DSN=USERACCT.R@@@@.WIDETIME,DISP=(MOD,DELETE), // UNIT=3380,SPACE=(TRK,0) //