---

 

CPYPTF (Copy Program Temporary Fix) syntax diagram

Job: B,I Pgm: B,I REXX: B,I Exec

Threadsafe: No

>>-CPYPTF--LICPGM(--licensed-program--)------------------------->
 
>--FROMDEV(--+-*SERVICE-------------+--)------------------------>
             +-*SAVF----------------+
             +-diskette-device-name-+
             +-tape-device-name-----+
             '-optical-device-name--'
 
>--TODEV(--+-*SAVF----------------+--)-------------------------->
           +-diskette-device-name-+
           +-tape-device-name-----+
           '-optical-device-name--'
 
                                           (2)
>--+-SELECT(--+-*ALL----------------+--)-+---------------------->
   |          | .-----------------. |    |
   |          | V            (1)  | |    |
   |          '---PTF-number------+-'    |
   |        .-----------------.          |
   |        V            (1)  |          |
   '-OMIT(----PTF-number------+--)-------'
 
>--+------------------------------------------------------+----->
   |           (3)   .-*LIBL/--------.                    |
   '-FROMSAVF(-------+---------------+--save-file-name--)-'
                     +-*CURLIB/------+
                     '-library-name/-'
 
>--+------------------------------------------+----------------->
   |             (4)   .-*SEARCH---------.    |
   '-FROMSEQNBR(-------+-sequence-number-+--)-'
 
>--+----------------------------------+------------------------->
   |             (4)   .-*REWIND-.    |
   '-FROMENDOPT(-------+-*LEAVE--+--)-'
                       '-*UNLOAD-'
 
>--+------------------------------------------+----------------->
   |                   .-*FIRST----------.    |
   |             (5)   |         (6)     |    |
   '-FROMPATHID(-------+-*SELECT---------+--)-'
                       '-path-identifier-'
 
>--+---------------------------------------+-------------------->
   |        (7)   .-*MOUNTED----------.    |
   '-TOVOL(-------+-volume-identifier-+--)-'
 
>--+----------------------------------------+------------------->
   |           (8)   .-*END------------.    |
   '-TOSEQNBR(-------+-sequence-number-+--)-'
 
>--+--------------------------------+--------------------------->
   |           (8)   .-*REWIND-.    |
   '-TOENDOPT(-------+-*LEAVE--+--)-'
                     '-*UNLOAD-'
 
>--+-----------------------------------------------+------------>
   |          .-*LIBL/--------.                    |
   '-TOSAVF(--+---------------+--save-file-name--)-'
              +-*CURLIB/------+
              '-library-name/-'
 
>--+---------------------------+--+---------------------+------->
   |        (9)   .-*NONE-.    |  |         .-*YES-.    |
   '-CLEAR(-------+-*ALL--+--)-'  '-COVER(--+-*NO--+--)-'
 
>--+---------------------------------------+-------------------->
   |            (10)   .-*ONLY--------.    |
   '-CVRLTRLNG(--------+-feature-code-+--)-'
 
>--+----------------------+--+----------------------------+----><
   |          .-*DEV-.    |  |       .-*ONLY---------.    |
   '-DTACPR(--+-*NO--+--)-'  '-RLS(--+-release-level-+--)-'
              '-*YES-'
 
 

Notes:

1. A maximum of 50 repetitions on either the SELECT or the OMIT parameter.

2. All parameters preceding this point can be specified in positional form.

3. FROMSAVF can only be used with FROMDEV(*SAVF).

4. SEQNBR parameters can only be used when the corresonding DEV parameter specifies a tape.

5. FROMPATHID applies only when FROMDEV is an optical device.

6. FROMPATHID(*SELECT) is not valid in a batch environment.

7. TOVOL applies only to tape, diskette or optical media.

8. FROMENDOPT and TOENDOPT apply only when corresponding DEV parameter is a tape device or optical device.

9. CLEAR can be used only when TODEV(*SAVF) is specified.

10. CVRLTRLNG(feature-code) can be used only when COVER(*YES) and FROMDEV(*SERVICE) are specified.