- Target library initial allocation status before IEBCOPY has been run:
Code: Select all
Data Set Information Data Set Name . . . : VSYS.CSYLYG.JCL General Data Current Allocation Volume serial . . . : S0VN01 Allocated cylinders : 18 Device type . . . . : 3390 Allocated extents . : 10 Organization . . . : PO Maximum dir. blocks : 300 Record format . . . : FB Record length . . . : 80 Block size . . . . : 6240 Current Utilization 1st extent cylinders: 9 Used cylinders . . : 18 Secondary cylinders : 1 Used extents . . . : 10 Used dir. blocks . : 207 Number of members . : 1,239 Dates Creation date . . . : 2014/02/04 Referenced date . . : 2014/03/05 Expiration date . . : ***None*** [list] Now I run a job: JESMSGLG: [code][/code] ********************************* TOP OF DATA ******************************************************************************* J E S 2 J O B L O G -- S Y S T E M O F T V -- N O D E T 1 O F T V A N 08.14.22 STC05588 ---- WEDNESDAY, 05 MAR 2014 ---- 08.14.22 STC05588 IEF695I START ACFCOPY2 WITH JOBNAME ACFCOPY2 IS ASSIGNED TO USER STCID , GROUP $STCGRP 08.14.22 STC05588 $HASP373 ACFCOPY2 STARTED 08.14.22 STC05588 IEF403I ACFCOPY2 - STARTED - TIME=08.14.22 08.14.23 STC05588 - --TIMINGS (MINS.)-- ----PAGING COUNTS--- 08.14.23 STC05588 -JOBNAME STEPNAME PROCSTEP RC EXCP CPU SRB CLOCK SERV PG PAGE SWAP VIO SWAPS STEPNO 08.14.23 STC05588 -ACFCOPY2 COPYCOMP 00 116 .00 .00 .01 885 0 0 0 0 0 1 08.14.23 STC05588 IEF404I ACFCOPY2 - ENDED - TIME=08.14.23 08.14.23 STC05588 -ACFCOPY2 ENDED. NAME- TOTAL CPU TIME= .00 TOTAL ELAPSED TIME= .01 08.14.23 STC05588 $HASP395 ACFCOPY2 ENDED ------ JES2 JOB STATISTICS ------ 05 MAR 2014 JOB EXECUTION DATE 2 CARDS READ 1,320 SYSOUT PRINT RECORDS 0 SYSOUT PUNCH RECORDS 66 SYSOUT SPOOL KBYTES 0.01 MINUTES EXECUTION TIME 1 //ACFCOPY2 JOB MSGLEVEL=1 STC05588 2 //STARTING EXEC ACFCOPY2 [/list]JESJCL: [code] SDSF OUTPUT DISPLAY ACFCOPY2 STC05588 DSID 3 LINE 0 COLUMNS 02- 133 COMMAND INPUT ===> SCROLL ===> CSR ******************************** TOP OF DATA ********************************************* 1 //ACFCOPY2 JOB MSGLEVEL=1 STC05588 2 //STARTING EXEC ACFCOPY2 3 XXACFCOPY PROC 00001000 4 XX SET SC=&SYSCHAR 00002000 XX* COPIES COMMON ACF LIBRARY TO THE AGENCY ACF LIBRARY 00003000 IEFC653I SUBSTITUTION JCL - SC=V 5 XXCOPYCOMP EXEC PGM=IEBCOPY,REGION=4M,PARM='COMPRESS,REPLACE' 00004004 6 XXSYSPRINT DD SYSOUT=* 00005000 7 XXSYSUT1 DD DISP=SHR,DSN=ASYS.CSYLYG.JCL 00006000 8 XXSYSUT2 DD DISP=SHR,DSN=&SC.SYS.CSYLYG.JCL 00007000 IEFC653I SUBSTITUTION JCL - DISP=SHR,DSN=VSYS.CSYLYG.JCL ******************************* BOTTOM OF DATA ************ [list]SYSPRINT ACFCOPY2: [/list][/code] SDSF OUTPUT DISPLAY ACFCOPY2 STC05588 DSID 101 LINE 0 COLUMNS 02- 133 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ************************************************************************** IEBCOPY MESSAGES AND CONTROL STATEMENTS PAGE 1 IEB1135I IEBCOPY FMID HDZ1D10 SERVICE LEVEL UA67459 DATED 20121210 DFSMS 01.13.00 z/OS 01.13.00 HBB7780 CPU 2097 IEB1035I ACFCOPY2 ACFCOPY2 08:14:22 WED 05 MAR 2014 PARM='COMPRESS,REPLACE' ACFCOPY2 COPY INDD=((SYSUT2,R)),OUTDD=SYSUT2 GENERATED STATEMENT IEB1018I COMPRESSING PDS OUTDD=SYSUT2 VOL=S0VN01 DSN=VSYS.CSYLYG.JCL IEB1097I FOLLOWING MEMBER(S) MOVED IN DATA SET REFERENCED BY SYSUT2 IEB154I $$$SEND HAS BEEN SUCCESSFULLY MOVED IEB154I $$ACFSUB HAS BEEN SUCCESSFULLY MOVED IEB154I $$TEMP1 HAS BEEN SUCCESSFULLY MOVED IEB154I $$TEMP2 HAS BEEN SUCCESSFULLY MOVED IEB154I ##ACFSUB HAS BEEN SUCCESSFULLY MOVED IEB154I AA HAS BEEN SUCCESSFULLY MOVED IEB154I ACFCOPY HAS BEEN SUCCESSFULLY MOVED IEB154I ACFDS1 HAS BEEN SUCCESSFULLY MOVED IEB154I ACFDS2 HAS BEEN SUCCESSFULLY MOVED ............................................ ............................................ IEB154I Z HAS BEEN SUCCESSFULLY MOVED IEB154I ZAPDUMP HAS BEEN SUCCESSFULLY MOVED IEB154I ZAPFZ HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDITHFS HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDITMVS HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDIT25A HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDI2MVS HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDI225A HAS BEEN SUCCESSFULLY MOVED IEB154I ZEDTPATH HAS BEEN SUCCESSFULLY MOVED IEB1098I 1239 OF 1239 MEMBERS MOVED IN DATA SET REFERENCED BY SYSUT2 IEB144I THERE ARE 139 UNUSED TRACKS IN OUTPUT DATA SET REFERENCED BY SYSUT2 IEB149I THERE ARE 93 UNUSED DIRECTORY BLOCKS IN OUTPUT DIRECTORY IEB147I END OF JOB - 0 WAS HIGHEST SEVERITY CODE ******************************** BOTTOM OF DATA **** [list]So, you can see that no replace copy was performed. Now I run this JCL: [code] SDSF OUTPUT DISPLAY ACFCOPY3 STC05590 DSID 2 LINE 0 COLUMNS 02- 133 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ******************************************************************************* J E S 2 J O B L O G -- S Y S T E M O F T V -- N O D E T 1 O F T V A N 08.24.50 STC05590 ---- WEDNESDAY, 05 MAR 2014 ---- 08.24.50 STC05590 IEF695I START ACFCOPY3 WITH JOBNAME ACFCOPY3 IS ASSIGNED TO USER STCID , GROUP $STCGRP 08.24.50 STC05590 $HASP373 ACFCOPY3 STARTED 08.24.50 STC05590 IEF403I ACFCOPY3 - STARTED - TIME=08.24.50 08.24.50 STC05590 - --TIMINGS (MINS.)-- ----PAGING COUNTS--- 08.24.50 STC05590 -JOBNAME STEPNAME PROCSTEP RC EXCP CPU SRB CLOCK SERV PG PAGE SWAP VIO SWAPS STEPNO 08.24.50 STC05590 -ACFCOPY3 COPYCOMP 00 123 .00 .00 .00 1004 0 0 0 0 0 1 08.24.50 STC05590 IEF404I ACFCOPY3 - ENDED - TIME=08.24.50 08.24.50 STC05590 -ACFCOPY3 ENDED. NAME- TOTAL CPU TIME= .00 TOTAL ELAPSED TIME= .00 08.24.50 STC05590 $HASP395 ACFCOPY3 ENDED ------ JES2 JOB STATISTICS ------ 05 MAR 2014 JOB EXECUTION DATE 2 CARDS READ 1,321 SYSOUT PRINT RECORDS 0 SYSOUT PUNCH RECORDS 68 SYSOUT SPOOL KBYTES 0.01 MINUTES EXECUTION TIME ******************************** BOTTOM OF DATA ***************************************************************************** SDSF OUTPUT DISPLAY ACFCOPY3 STC05590 DSID 3 LINE 0 COLUMNS 02- 133 COMMAND INPUT ===> SCROLL ===> CSR ******************************** TOP OF DATA ******************************************** 1 //ACFCOPY3 JOB MSGLEVEL=1 STC05590 2 //STARTING EXEC ACFCOPY3 3 XXACFCOPY3 PROC 00001000 4 XX SET SC=&SYSCHAR 00002000 XX* COPIES COMMON ACF LIBRARY TO THE AGENCY ACF LIBRARY 00003000 IEFC653I SUBSTITUTION JCL - SC=V 5 XXCOPYCOMP EXEC PGM=IEBCOPY,REGION=4M,PARM='REPLACE' 00004000 6 XXSYSPRINT DD SYSOUT=* 00005000 7 XXSYSUT1 DD DISP=SHR,DSN=ASYS.CSYLYG.JCL 00006000 8 XXSYSUT2 DD DISP=SHR,DSN=&SC.SYS.CSYLYG.JCL 00007000 IEFC653I SUBSTITUTION JCL - DISP=SHR,DSN=VSYS.CSYLYG.JCL ******************************* BOTTOM OF DATA ****************************************** SDSF OUTPUT DISPLAY ACFCOPY3 STC05590 DSID 101 LINE 0 COLUMNS 02- 133 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ************************************************************************** IEBCOPY MESSAGES AND CONTROL STATEMENTS PAGE 1 IEB1135I IEBCOPY FMID HDZ1D10 SERVICE LEVEL UA67459 DATED 20121210 DFSMS 01.13.00 z/OS 01.13.00 HBB7780 CPU 2097 IEB1035I ACFCOPY3 ACFCOPY3 08:24:50 WED 05 MAR 2014 PARM='REPLACE' ACFCOPY3 COPY INDD=((SYSUT1,R)),OUTDD=SYSUT2 GENERATED STATEMENT IEB1013I COPYING FROM PDS INDD=SYSUT1 VOL=S0AN03 DSN=ASYS.CSYLYG.JCL IEB1014I TO PDS OUTDD=SYSUT2 VOL=S0VN01 DSN=VSYS.CSYLYG.JCL IEB167I FOLLOWING MEMBER(S) COPIED FROM INPUT DATA SET REFERENCED BY SYSUT1 IEB154I $$$SEND HAS BEEN SUCCESSFULLY COPIED IEB154I $$ACFSUB HAS BEEN SUCCESSFULLY COPIED IEB154I $$TEMP1 HAS BEEN SUCCESSFULLY COPIED IEB154I $$TEMP2 HAS BEEN SUCCESSFULLY COPIED IEB154I ##ACFSUB HAS BEEN SUCCESSFULLY COPIED IEB154I AA HAS BEEN SUCCESSFULLY COPIED IEB154I ACFCOPY HAS BEEN SUCCESSFULLY COPIED IEB154I ACFDS1 HAS BEEN SUCCESSFULLY COPIED IEB154I ACFDS2 HAS BEEN SUCCESSFULLY COPIED IEB154I ACFDUMP HAS BEEN SUCCESSFULLY COPIED ............................................. ............................................. IEB154I Y2SORTA HAS BEEN SUCCESSFULLY COPIED IEB154I Z HAS BEEN SUCCESSFULLY COPIED IEB154I ZAPDUMP HAS BEEN SUCCESSFULLY COPIED IEB154I ZAPFZ HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDITHFS HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDITMVS HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDIT25A HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDI2MVS HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDI225A HAS BEEN SUCCESSFULLY COPIED IEB154I ZEDTPATH HAS BEEN SUCCESSFULLY COPIED IEB1098I 1239 OF 1239 MEMBERS COPIED FROM INPUT DATA SET REFERENCED BY SYSUT1 IEB144I THERE ARE 14 UNUSED TRACKS IN OUTPUT DATA SET REFERENCED BY SYSUT2 IEB149I THERE ARE 93 UNUSED DIRECTORY BLOCKS IN OUTPUT DIRECTORY IEB147I END OF JOB - 0 WAS HIGHEST SEVERITY CODE ******************************** BOTTOM OF DATA ***** [/code][/list] So, you can see that COPY REPLACE works when REPLACE is a single parm, but when COMPRESS,REPLACE was specified then compress only occurred. Did I do anything wrong?
IEBCOPY utility does not execute 2 parms at the same time.
Moderators: Frank Yaeger, Moderator Group
IEBCOPY utility does not execute 2 parms at the same time.
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page