---

 

CHGTAPF (Change Tape File) syntax diagram

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

>>-CHGTAPF------------------------------------------------------>
 
          .-*LIBL/--------.
>--FILE(--+---------------+--tape-device-file-name--)----------->
          +-*CURLIB/------+
          '-library-name/-'
 
                                         (2)
>--+-----------------------------------+------------------------>
   |       .-*SAME----------------.    |
   '-DEV(--+-*NONE----------------+--)-'
           | .------------------. |
           | V             (1)  | |
           '---device-name------+-'
 
>--+-----------------------------------------+------------------>
   |       .-*SAME----------------------.    |
   '-VOL(--+-*NONE----------------------+--)-'
           | .------------------------. |
           | V                   (3)  | |
           '---volume-identifier------+-'
 
>--+-------------------------------------------+---------------->
   |         .-*SAME-.  .-*SAME-----------.    |
   '-REELS(--+-*SL---+--+-----------------+--)-'
             +-*NL---+  '-number-of-reels-'
             +-*NS---+
             +-*BLP--+
             '-*LTM--'
 
>--+--------------------------------------+--------------------->
   |          .-*SAME----------------.    |
   '-SEQNBR(--+-*END-----------------+--)-'
              +-*NEXT----------------+
              '-file-sequence-number-'
 
>--+-------------------------------------+---------------------->
   |         .-*SAME----------------.    |
   '-LABEL(--+-*NONE----------------+--)-'
             '-data-file-identifier-'
 
>--+-------------------------------+---------------------------->
   |          .-*SAME---------.    |
   '-RCDLEN(--+-*CALC---------+--)-'
              '-record-length-'
 
>--+------------------------------+----------------------------->
   |          .-*SAME--------.    |
   '-BLKLEN(--+-*CALC--------+--)-'
              '-block-length-'
 
>--+--------------------------------------+--------------------->
   |           (4)   .-*SAME---------.    |
   '-BUFOFSET(-------+-*BLKDSC-------+--)-'
                     '-buffer-offset-'
 
>--+-------------------------------+---------------------------->
   |            (5)   .-*SAME-.    |
   '-RCDBLKFMT(-------+-*FB---+--)-'
                      +-*F----+
                      +-*V----+
                      +-*VB---+
                      +-*D----+
                      +-*DB---+
                      +-*VS---+
                      +-*VBS--+
                      '-*U----'
 
>--+------------------------------------+----------------------->
   |          .-*SAME--------------.    |
   '-EXTEND(--+-*NO----------------+--)-'
              |       .-*NOCHECK-. |
              '-*YES--+-*CHECK---+-'
 
>--+-------------------------------+---------------------------->
   |           .-*SAME--------.    |
   '-DENSITY(--+-*DEVTYPE-----+--)-'
               +-*CTGTYPE-----+
               '-tape-density-'
 
>--+------------------------+--+-----------------------+-------->
   |           .-*SAME-.    |  |        .-*SAME---.    |
   '-COMPACT(--+-*DEVD-+--)-'  '-CODE(--+-*EBCDIC-+--)-'
               '-*NO---'                '-*ASCII--'
 
>--+--------------------------------+--------------------------->
   |           .-*SAME---------.    |
   '-CRTDATE(--+-*NONE---------+--)-'
               '-creation-date-'
 
>--+----------------------------------+------------------------->
   |           .-*SAME-----------.    |
   '-EXPDATE(--+-*NONE-----------+--)-'
               +-*PERM-----------+
               '-expiration-date-'
 
>--+-------------------------+---------------------------------->
   |          .-*SAME---.    |
   '-ENDOPT(--+-*REWIND-+--)-'
              +-*LEAVE--+
              '-*UNLOAD-'
 
>--+---------------------------------------------------------------+-->
   |             .-*SAME--------------------------------------.    |
   '-USRLBLPGM(--+-*NONE--------------------------------------+--)-'
                 | .-*LIBL/--------.                          |
                 '-+---------------+--user-label-program-name-'
                   +-*CURLIB/------+
                   '-library-name/-'
 
>--+-----------------------+------------------------------------>
   |          .-*SAME-.    |
   '-IGCDTA(--+-*YES--+--)-'
              '-*NO---'
 
>--+-------------------------------------+---------------------->
   |            .-*SAME-------------.    |
   '-WAITFILE(--+-*IMMED------------+--)-'
                +-*CLS--------------+
                '-number-of-seconds-'
 
>--+----------------------+------------------------------------->
   |         .-*SAME-.    |
   '-SHARE(--+-*NO---+--)-'
             '-*YES--'
 
>--+---------------------------------+-------------------------><
   |        .-*SAME-------------.    |
   '-TEXT(--+-*BLANK------------+--)-'
            '-'--description--'-'
 
 

Notes:

1. A maximum of 4 repetitions.

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

3. A maximum of 50 repetitions.

4. The value *BLKDSC is valid only if the file is record block format *D or *DB.

5. The values *F, *FB, *VS, *VBS and *U are valid for both EBCDIC and ASCII codes; *V and *VB are valid only for EBCDIC; *D and *DB are valid only for ASCII.