IEBCOPY utility does not execute 2 parms at the same time.

In this Mainframe Forum - You can post your queries on DFSORT, ICETOOL , SyncSort & JCL Utilities

Moderators: Frank Yaeger, Moderator Group

Locked
csylyg11
Member
Posts: 6
Joined: Wed Feb 26, 2014 6:45 pm

IEBCOPY utility does not execute 2 parms at the same time.

Post by csylyg11 » Wed Mar 05, 2014 6:59 pm

  • 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?

DikDude
Moderator
Posts: 1001
Joined: Fri Jul 22, 2011 8:39 am
Location: usa

Post by DikDude » Thu Mar 06, 2014 1:27 am

This duplicate is locked . . .

Do Not post the same topic multiple times . . .
Have a good one

Locked

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



Other References
Mainframe Tools and others