Go to LeighWeb Home Page            

Back To LeighWeb Mainframe Utilities Page

View the module associated with this documentation

 The COPYCOL utility allow you to copy one column of data/text in a file which
 you are editing to another column next to it.  You simply specify the beginning
 and ending column numbers to be copied, the column number where you want to
 copy the data to and any limiting qualifiers such as "X", "NX", and edit labels
 (any valid combination of these).  Here's an example:

 Let's assume that we have a column of data, and some of the rows of data
 contain the value 'xyz' in them.  In these rows, we need the column of data
 repeated next to itself.  We can do this with two commands.  First we exclude
 the lines containing 'xyz' as follows:

 EDIT ---- JP6409A.PDS.WORKFILE(TESTTEST) - 01.00 -------------- COLUMNS 001 072
 COMMAND ===> x all 'xyz'                                        SCROLL ===> CSR
 =COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
 000001 qwertyuiop
 000002 asdfghjkl;
 000003  copycol 1 5 20 x                                   SCROLL ===> CSR
 =COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
 000001 qwertyuiop
 000002 asdfghjkl;
 000003                                                     SCROLL ===> CSR
 *** 3 LINE(S) PROCESSED ***
 000001 qwertyuiop
 000002 asdfghjkl;
 000003