//BLD$@@@@ JOBCARD GOES HERE /*JOBPARM L=30,COPIES=1 //OUT1 OUTPUT DEFAULT=YES,JESDS=ALL,PAGEDEF=L1,DEST=K8N1, // FORMDEF=PRIM //ALLOC EXEC PGM=IEFBR14 //ACCTFUND DD DSN=USERACCT.R@@@@.ACCTFUND,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=134,DSORG=PS) //ANALYSIS DD DSN=USERACCT.R@@@@.ANALYSIS,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //BIND DD DSN=USERACCT.R@@@@.BIND,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //BMSLIB DD DSN=USERACCT.R@@@@.BMSLIB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //CARDEXP DD DSN=USERACCT.R@@@@.CARDEXP,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=102,DSORG=PO) //CARDLIB DD DSN=USERACCT.R@@@@.CARDLIB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //COBOL DD DSN=USERACCT.R@@@@.COBOL,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(200,10,50)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //COPYLIB DD DSN=USERACCT.R@@@@.COPYLIB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(100,10,50)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //DDL DD DSN=USERACCT.R@@@@.DDL,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //DGIPNL DD DSN=USERACCT.R@@@@.DGIPNL,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //EDBCHG DD DSN=USERACCT.R@@@@.EDBCHG,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=162,DSORG=PS) //EMPLOYEE DD DSN=USERACCT.R@@@@.EMPLOYEE,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=337,DSORG=PS) //FCPAPPT DD DSN=USERACCT.R@@@@.FCPAPPT,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PS) //FNLPARMO DD DSN=USERACCT.R@@@@.FNLPARMO,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=11875,DSORG=PS) //FOCAFD DD DSN=USERACCT.R@@@@.FOCAFD,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //FOCEXEC DD DSN=USERACCT.R@@@@.FOCEXEC,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //FOCMAST DD DSN=USERACCT.R@@@@.FOCMAST,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //HELPANCH DD DSN=USERACCT.R@@@@.HELPANCH,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(20,10)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=4608,DSORG=PS) //HELPDDSE DD DSN=USERACCT.R@@@@.HELPDDSE,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PS) //FOCMAST DD DSN=USERACCT.R@@@@.FOCMAST,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PS) //INCLUDE DD DSN=USERACCT.R@@@@.INCLUDE,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //JCL DD DSN=USERACCT.R@@@@.JCL,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //MAPLIB DD DSN=USERACCT.R@@@@.MAPLIB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PO) //NEWACTIV DD DSN=USERACCT.R@@@@.NEWACTIV,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=80,DSORG=PS) //RCSTORE DD DSN=USERACCT.R@@@@.RCSTORE,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(70,10)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=224,DSORG=PS) //REPORTS DD DSN=USERACCT.R@@@@.REPORTS,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=133,DSORG=PO) //UDB2CDB DD DSN=USERACCT.R@@@@.UDB2CDB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(30,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=429,DSORG=PO) //UDB2CTL DD DSN=USERACCT.R@@@@.UDB2CTL,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(50,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=500,DSORG=PO) //UDB2CTL2 DD DSN=USERACCT.R@@@@.UDB2CTL2,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(50,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=500,DSORG=PO) //UDB2EDB DD DSN=USERACCT.R@@@@.UDB2EDB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(50,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=529,DSORG=PO) //UDB2EDB2 DD DSN=USERACCT.R@@@@.UDB2EDB2,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(50,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=529,DSORG=PO) //UDB2HDB DD DSN=USERACCT.R@@@@.UDB2HDB,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(70,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=529,DSORG=PO) //UDB2PAR DD DSN=USERACCT.R@@@@.UDB2PAR,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(70,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=350,DSORG=PO) //UDB2PCD DD DSN=USERACCT.R@@@@.UDB2PCD,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(30,10,30)),UNIT=SYSDA, // DCB=(RECFM=VB,LRECL=529,DSORG=PO) //WIDETIME DD DSN=USERACCT.R@@@@.WIDETIME,DISP=(NEW,CATLG,DELETE), // SPACE=(TRK,(10,10,30)),UNIT=SYSDA, // DCB=(RECFM=FB,LRECL=118,DSORG=PO) //