Previous Topic: Operand DefinitionsNext Topic: FIND Command

Editing in CA Ideal › EXCLUDE Command › Components Used with the EXCLUDE Command

Components Used with the EXCLUDE Command

The EXCLUDE command applies to the components listed below. Default column boundaries for each component are also listed.

 

Column Edited

Column Boundaries

Member

Data area

1‑72

Report

 

 

Detail

Field name

1‑25

Heading

Field name

1‑56

Column

Field name

1‑25

Program

 

 

Procedure

Data area

1‑72

Parameter

Field name

1‑19

Working data

Field name

1‑32

Dataview

 

 

Field

Field name

1‑19

Key (VSAM)

Field name

1‑32

Plan

 

 

DBRM

DBRM

1‑8

Resource

Program name

1‑8

Specifying lines or columns are optional. You can specify line and column clauses in either order. For example,

EXCL /DISPANEL/ LINES 16500 17500 COLUMNS 10 40

or,

EXCL /DISPANEL/ COLUMNS 10 40 LINES 16500 17500

Example

The EXCLUDE command in the following example searches for lines that do not contain the string FOR in columns 5 through 30.

 => EXCL /FOR/ COL 5 30                                                        
                                                                               
....+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....
IDEAL: PROCEDURE DEFINITION  PGM CURRENT (001) TEST          SYS: DEM   FILL-IN   
                                                                               
Command....+....1....+....2....+....3....+....4....+....5....+....6....+....7..
====== ================================ T O P =================================
000100         FOR EACH EMPLOYEE                  
000200                WHERE STATE_ADDRESS = 'CA' OR 'IL'                  
000300                AND NUMBER > 125 AND < 150                  
000400                FOR PAYROLL                  
000500                    WHERE NUMBER = EMPLOYEE.NUMBER                  
000600                    AND NUMBER > 100 AND < 150                  
000700                   SET SALARY = YTD_WAGES + YTD_COMMISSION - YTD_TAX       
000800                   SET STATE1 = 'CA'                  
000900                   SET STATE2 = 'IL'                  
001000                PRODUCE ADRM1                  
001100                ENDFOR                  
001200          ENDFOR                  
001300          FOR EACH EMPLOYEE                  
001400              ORDERED BY STATE_ADDRESS CITY_ADDRESS EMPLOYEE.NAME          
001500                WHERE STATE_ADDRESS = 'CA' OR 'IL'

All lines that exclude the string are found and displayed in the region.

=>


....+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....
IDEAL: PROCEDURE DEFINITION  PGM CURRENT (001) TEST          SYS: DEM   FILL-IN   
EXCL /FOR/                                                                     
Command....+....1....+....2....+....3....+....4....+....5....+....6....+....7..
====== ================================ T O P =================================
000200                 WHERE STATE_ADDRESS = 'CA' OR 'IL'                  
000300                 AND NUMBER > 125 AND < 150
000500                     WHERE NUMBER = EMPLOYEE.NUMBER
000600                     AND NUMBER > 100 AND < 150                  
000700                    SET SALARY = YTD_WAGES + YTD_COMMISSION - YTD_TAX    
000800                    SET STATE1 = 'CA'                  
000900                    SET STATE2 = 'IL'                  
001000                 PRODUCE ADRM1                  
001400              ORDERED BY STATE_ADDRESS CITY_ADDRESS EMPLOYEE.NAME          
001500                WHERE STATE_ADDRESS = 'CA' OR 'IL'