COLS—Display Fixed Columns Line

The COLS primary command displays a non-scrolling columns indicator line at the top of the data area.

Syntax


         .-ON--.   
>>-COLS--+-----+-----------------------------------------------><
         '-OFF-'

ON: Display columns line.
OFF: Remove columns line from the display.

Description

The COLS command displays a columns indicator line at the top of the data area in Edit and View mode. This works in the same manner as the columns line under Browse.

The columns line differs from that displayed by the COLS line command in that the line command field is protected. This means that it cannot be copied, moved, or deleted by overtyping with line commands. The line does not scroll with the data, and therefore the number of data lines displayed is reduced by one.

Entering COLS with no parameter toggles the display to the opposite. For example, if the columns line is currently displayed, entering COLS removes it.

Examples

To display the columns indicator line, enter this command:

COLS ON

Figure 1 shows an example of an edit screen displaying the columns indicator line.

Figure 1. Member with COLS indicator line

   File  Edit  Edit_Settings  Menu  Utilities  Compilers  Test  Help
 ───────────────────────────────────────────────────────────────────────────────
 EDIT       LEEBURR.TEST($$ZZZZ) - 01.10                    Columns 00001 00072
 =COLS> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
 ****** ***************************** Top of Data ******************************
 000001 //LEEBURRC JOB CLASS=A,MSGCLASS=X
 000002 //STEPPLX  EXEC PGM=AKEEPLX,REGION=2048K,PARM='SOURCE(SEG)'
 000003 //SYSPRINT DD  SYSOUT=A
 000004 //SYSUT1   DD  UNIT=SYSDA,SPACE=(TRK,(30,10))
 000005 //SYSUT2   DD  UNIT=SYSDA,DSN=&&ASM,DISP=(NEW,PASS),
 000006 //             SPACE=(TRK,(30,10))
 000007 //SYSUT3   DD  UNIT=SYSDA,SPACE=(TRK,(30,10))
 000008 //SYSUT4   DD  UNIT=SYSDA,SPACE=(TRK,(30,10))
 000009 //SYSLIB   DD  DISP=SHR,DSN=PDFTOS2C.LEEBURR.SOURCE
 000010 //         DD  DISP=SHR,DSN=PDFTOS2C.APARTEST.SOURCE
 ⋮

 Command ===> ________________________________________________ Scroll ===> CSR 
  F1=Help      F2=Split     F3=Exit      F5=Rfind     F6=Rchange   F7=Up
  F8=Down      F9=Swap     F10=Left     F11=Right    F12=Cancel