REXX execute GDGNEW                                          REXX execute GDGNEW

                                                       Author: David McRitchie
                                                   formatted on  1995/04/01 06:54
          for assistance contact: D. McRitchie                DMcRitchie@hotmail.com
--------------------------------------------------------------------------------
REXX execute NAME. GDGNEW
 users.      PDF user or TSO batch users
 type.       REXX execute

--------------------------------------------------------------------------------
GDGNEW   Copy sequential file to create new GDG dataset (+1)
--------------------------------------------------------------------------------
    related   TSO COPY,  AMSRCAT (change levels kept, and recatalog),  $USERS (o
btains latest GDG)
--------------------------------------------------------------------------------

     Copy  sequential dataset to new GDG level.  The  .GxxxxV00 will be in-
     creased by one from the last one currently in the catalog for the sec-
     ond dataset specified and will be allocated and  copied  to  from  the
     first file.

--------------------------------------------------------------------------------

  ISREDIT  GDGNEW sequential.data.set gdg.data.set

--------------------------------------------------------------------------------

     sequential  dataset        A fully qualified sequential dataset.  Also
                  valid is a fully qualified PDS dataset  with  member  in-
                  cluded.
     gdg.dataset  A fully qualified GDG dataset without the generation num-
                  ber included.  PDS dataset with member included.

Examples

           GDGNEW I00n.LIBR.CNTL I00n.GDG.dataset


Internal Aspects

     The  second dataset will be checked for validity, as will be the first
     dataset.  Using output trap a list catalog for the GDG level  will  be
     checked  to  obtain the .GxxxxV00 of the latest.  The GxxxxV00 will be
     increased by one and appended to the user dsname of the  second  file.
     The space allocation is 10 tracks primary and secondary -- this can be
     modified or elaborated upon later.  The GDGNEW clist was set up mainly
     as  an example for Jack Quinn (1991/09/20) who need something to convert
     a file created by PC transfer to a GDG dataset.