Edit macro @TSO                                                  Edit macro @TSO

                                                       Author: David McRitchie
                                                   formatted on  1995/04/01 06:54
          for assistance contact: D. McRitchie                DMcRitchie@hotmail.com
--------------------------------------------------------------------------------
Macro name.  @TSO
users.       PDF EDIT users wishing to enter TSO commands from PANELS
type.        Edit Macro   resides in SYS1.TSOCLIST

--------------------------------------------------------------------------------
@TSO     Edit macro invokes TSO with & convention RECALL
--------------------------------------------------------------------------------
    related   to work same as  regular  PDF EDIT commands prefixed with "&"
--------------------------------------------------------------------------------

PDF  EDIT  users can enter TSO commands with a TSO prefix on any ISPF panel, but
cannot prefix a TSO command with an ampersand ("&") to have a TSO command remain
on the command line for later corrections or modifications as can be  done  with
ISPF commands.

The  use  of  &@TSO allows you to enter your TSO command from an PDF EDIT screen
get your results and provide for immediate reentry.  You are limited to and  PDF
EDIT  screen because the "@TSO"  command is in fact an EDIT macro clist invoking
the requested TSO command.

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

  EDIT  COMMAND ===> &@TSO tso-command

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

                tso-command,  is any TSO command and is required

Examples:

      edit  COMMAND ===> &@TSO LISTCAT LEVEL(xyz) ALL
      edit  COMMAND ===> &@TSO listcat entry(is03.*.list)
      edit  COMMAND ===> &@TSO listds 'datasetname'
      edit  COMMAND ===> &@TSO help listds

Internal Aspects:
   Internals are described so that others can make up their own clists
   and understand how a particular clist functions -- useful for code stealing.

    ISREDIT MACRO (TCOMMAND)
    /*  DESCRIPTION: MAKE A TSO COMMAND STAY UP FOR REENTRY
    /*       YOU MUST BE WITHIN AN EDIT FOR THIS TO FUNCTION
    /*       I.E. EDITING A MEMBER OF A PDS
    /*         -- WORKS FOR  &@TSO LISTCAT LEVEL(XXXX)
    /*         -- WORKS FOR  &@TSO $MIDI
    /*         -- WORKS FOR  &@TSO %TLMSUSER    WORKS -- TSO CLIST  PROC
    /*         -- FAILS FOR  &@TSO %$MIDI       FAILS -- EDIT MACRO
    /*       FROM EDIT THE FOLLOWING ARE VALID
    /*          ===> &@TSO %TLMSUSR          WILL EXECUTE THE CLIST AND THE
    /*                        COMMAND REMAINS ON THE COMMAND LINE FOR REUSE
    /*          ===> &@TSO LISTCAT LEVEL(XXXX)   WHEN LISTCAT COMPLETES THE
    /*                        COMMAND REMAINS ON THE COMMAND LINE FOR REUSE
      CONTROL LIST CONLIST SYMLIST
      &TCOMMAND