Edit macro SHIFT                                                Edit macro SHIFT

                                                       Author: David McRitchie
                                                   formatted on  1995/04/01 06:54
                                                              DMcRitchie@hotmail.com
--------------------------------------------------------------------------------
Macro name.  SHIFT
users.       PDF EDIT users particularly SCRIPT users
type.        Edit Macro   resides in SYS1.TSOCLIST,  and in IS03.SPF2.MACROS for
             use on SPF/PC

--------------------------------------------------------------------------------
SHIFT    Shift Right or Left
--------------------------------------------------------------------------------
    related   to the line shift commands of PDF EDIT  (( )) << >>
    related   to the constructed SHIFTNX edit macro
    related   ALIGNTAB, LEFT@, REFORMAT, SHIFTNX
--------------------------------------------------------------------------------

The SHIFT edit macro permits the user to shift lines LEFT or RIGHT.  This  macro
will not allow you to shift any lines which would result in loss of data.

The  SHIFT line commands in PDF edit allow you to specify a block of lines to be
shifted.  This macro allows you to mark out the block of lines with  labels  and
to  exclude/include  only the lines within this area that you want to shift.  An
example would be in SCRIPT where all lines except SCRIPT control  commands  were
indented and you wish to remove this indentation, to permit normal formatting to
occur  or  to  use ".FO OFF FOLD|trunc|extend" and not lose the positions at the
beginning of each line.

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

  ISREDIT  SHIFT [lptr-range|ENTIRE] [X|NX] LEFT|RIGHT number-of-columns

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

     lptr-range  indicates that two line pointers are required to indicate a
               range of lines to be deleted.  The line pointers must be a
               labels.  Specifying one line pointer is invalid.
               Labels if used must be presented first.
               If omitted the defaults ".ZFIRST" and ".ZLAST" will be used.

     ENTIRE      will be substituted by .ZFIRST .ZLAST       (default)

     LEFT|RIGHT  choose LEFT or RIGHT as the direction to be shifted.

     number-of-columns   the number of columns non excluded (viewable) lines
               are to be shifted.  Each non excluded line will be shifted
               with the PDF EDIT "(" or ")" shift line command.

     X         Affects only lines that are EXCLUDED from the display
     NX        Affects only lines that are NOT EXCLUDED from the display

     FORCE     (optional) will ignore check which insures that data
               will not be dropped from beginning or end of lines.

     VALIDNX   (optional) will exclude lines which would lose data
               had normal line shift commands been used.  Valid only
               with option NX not with X.  Alternative to FORCE.

Examples:

      SHIFT .A .B    LEFT 10

Internal Aspects:
  1) Labels, if presented, are checked for validity.  If no labels used
     will use .ZFIRST and .ZLAST
  2) Columns to be dropped are checked to insure that they are blank.
  3) Loops through the lptr-range area and shifts NX and/or X lines as
     requested.