Edit macro @XMIT                                                Edit macro @XMIT

                                                       Author: David McRitchie
                                                   formatted on  1995/04/01 06:54
          for assistance contact: D. McRitchie                DMcRitchie@hotmail.com
--------------------------------------------------------------------------------
Macro name.  @XMIT
users.       PDF EDIT users who need to transmit data to another user
type.        Edit Macro   resides in SYS1.TSOCLIST

--------------------------------------------------------------------------------
@XMIT    Macro generates TSO TRANSMIT for member currently displayed in EDIT
--------------------------------------------------------------------------------
related  @PRINT dest(),  @SCRIPT dest(),  @SCRIPT profs()
--------------------------------------------------------------------------------

Use  the  @XMIT edit macro as an alternative to typing in the long TRANSMIT com-
mand.  (TRANSMIT can be abbreviated as XMIT).

The @XMIT edit macro will generate the TRANSMIT command required to transmit the
file which is currently displayed in EDIT to another TSO user.   @XMIT will sup-
ply the dataset name for the invoked TRANSMIT command.    See  internal  aspects
later for details of the actual TRANSMIT command generated.

A list of valid locations can be found in "TSOMODEL.PUBLIC.TEXT(DEST)".

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

                               Since square brackets are not available, optional
                                material is enclosed in European brackets <...>.
  ISREDIT  @XMIT node.userid   < MSG >

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

Examples

      ===> @XMIT CCC.CCxxx
      ===> @XMIT AHCENTER.userid
      ===> @XMIT LOCAL.IS03

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

Complete example from transmit through receive

1.  For this example "TECHTSO.COMBINE.ISRCLIB(@XMIT)"   was the dataset and mem-
    ber  currently in edit.  While we are in edit this data is to be transmitted
    to  AHCENTER.IS03.  In reality since the user is already  at  AHCENTER  just
    using CREATE or REPLACE while in PDF EDIT   would be more direct.

     ===> @XMIT AHCENTER.IS03

            INMX000I 0 message and 68 data records sent as 38 records
                                          to AHCENTER.IS03
            INMX001I Transmission occurred on 05/20/1988 at 23:52:44.

2.  To receive the transmitted file enter:    (receiver is logged on at the sent
     to node)

     ===> TSO RECEIVE

            The actual generated command is ...
               TRANSMIT AHCENTER.IS03 'TECHTSO.COMBINE.ISRCLIB(@XMIT)' SEQ

            INMR901I Dataset TECHTSO.COMBINE.ISRCLIB from IS03 on ????????
            INMR902I Members: @XMIT
            INMR906A Enter restore parameters or 'DELETE' or 'END'

     ===> da(libr.clist(@xmit))

           INMR001I Restore successful to dataset 'IS03.LIBR.CLIST'
           INMR000I No more files remain for the receive command to process.


Internal Aspects:

1.  Data changes checked using   ISREDIT (DCHG) = DATA-CHANGED; failure
    to save data will terminate the edit macro with the following message:

            ************************************************************
            *                ===> @XMIT node.userid                    *
            *                                                          *
            *       YOUR FILE HAS NOT BEEN SAVED AFTER MAKING CHANGES  *
            *                                                          *
            *       YOUR FILE WILL NOT BE TRANSMITTED                  *
            *                  ... SORRY,  BETTER LUCK NEXT TIME       *
            ************************************************************

2.  The TRANSMIT command will be generated with SEQ and invoked.

    ===> TSO TRANSMIT 'addresselist'  'datasetname(member)' SEQ  < MSG >

     'addresseelist'   must specify at least this parameter to the TRANSMIT com-
                   You
                   mand.   You may specify one or a combination of the following
                   forms of addressees

        node/userid    ===> POK/IBMUSER
        node.userid    ===> POK.IBMUSER
        nickname       ===> JPALMER   (use TSO HELP NICKNAME for more informatio
        n)
        distribution list   SANJOSE   (use TSO HELP NICKNAME for more informatio
                       ===>
        n)

     DATASET        Enter DATASET(dsname) to indicate to the TRANSMIT    command
                   the  data  set that you want transmitted to the specified ad-
                   dressee.

     MSG           You may, in addition to transmitted a data set,  append  mes-
                   sages  to  your transmission by simply specifying the MESSAGE
                   keyword.  Your input may be in line mode (LINE keyword) or in
                   full screen (FULLSCREEN keyword). Your input will default  to
                   FULLSCREEN  mode  if  you  are logged onto a 3270 Information
                   Display System terminal with a minimum screen size of 24 rows
                   by 80 columns.

     SEQ            You may request the TRANSMIT command not to preserve the di-
                   rectory information, but rather to transmit  the  partitioned
                   data set as a sequential data set.  This allows the addressee
                   to  receive  the file as a sequential data set or as a member
                   of a partitioned data set.  You may only specify SEQ when you
                   specify a single member of a partitioned data set.