//JHISGL JOB MSGLEVEL=(1,1),MSGCLASS=X,TIME=1440 JOB01192 //* //* **READ ME ]]]]]]] //* CICS 50=>HLQAREA=05 //* CICS 20=>HLQAREA=02 //* CICS 10=>HLQAREA=01 //* **CHANGE HERE ]]]]]]] //SET1 SET HLQAREA=01 //* //* CICS 50=>KBILIB=55 //* CICS 20=>KBILIB=22 //* CICS 10=>KBILIB=00 //* **CHANGE HERE ]]]]]]] //SET2 SET KBILIB=00 //* **END READ ME ]]]]]]] //* //JOBLIB DD DSN=BCI&HLQAREA..LIB.PROD.LOAD,DISP=SHR // DD DSN=KCI&HLQAREA..LIB.PROD.LOAD,DISP=SHR //* //* SIFILE DD DSN=KCI08.D0506.DAKTR06,DISP=SHR //STEP1D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G01, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP1 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS01,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G01, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT1 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G01,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP2D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G02, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP2 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS02,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G02, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //* //STSPLIT2 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G02,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //STEP3D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G03, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP3 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS03,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G03, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT3 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G03,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP4D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G04, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP4 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS04,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G04, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT4 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G04,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP5D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G05, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP5 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS05,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G05, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT5 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G05,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP6D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G06, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP6 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS06,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G06, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT6 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G06,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP7D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G07, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP7 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS07,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G07, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT7 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G07,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP8D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G08, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP8 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS08,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G08, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLIT8 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G08,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP9D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G09, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP09 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS09,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G09, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLI09 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G09,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP10D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G10, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP10 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS10,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G10, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLI10 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G10,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //* //STEP11D EXEC PGM=IEFBR14 //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G11, // DISP=(MOD,DELETE), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(TRK,1),UNIT=VIO //* //STEP11 EXEC PGM=GLVKALL,REGION=6M //GLTRAN DD DSN=KCI&HLQAREA..DMNSNDSK.GLKHS11,DISP=SHR //UPDPRIN DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G11, // DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=205,DSORG=PS,BUFNO=50), // SPACE=(CYL,(50,5),RLSE),UNIT=VIO //INFILE DD * 01-01-2002 06-05-2007 92310002 0039 END /* //STSPLI11 EXEC PGM=IKJEFT01,DYNAMNBR=20,REGION=4M //SYSPROC DD DSN=BCI&HLQAREA..LIB.BASE.EXEC,DISP=SHR //* INPUT FILE //REPORT DD DSN=PRINT01.KCI&HLQAREA..B6600.HDESK.HISGLACC.G11,DISP=SHR //SYSTSPRT DD SYSOUT=B //SYSTSIN DD * PROFILE NOPREFIX %SPLTREP2 @@** NCC 0 /* //*