For example, if % BEGIN is indented four columns from an IF statement, all lines subordinate to % BEGIN move four columns to the left during processing. Any text at the same or lesser indentation than % BEGIN stops the effect of % BEGIN, and default processing resumes.
Default processing shifts the block to the starting column of the IF statement--column 8.
Input:
Column 8...12..16 % IF &TYPE = 'NEW' 05 PART-CLASS. 10 PART-NUMBER PIC X(5). 01 INV-ITEM.
Output:
Column 8...12..16 05 PART-CLASS. 10 PART-NUMBER PIC X(5). 01 INV-ITEM.
Override default processing with % BEGIN to shift the IF statement block to column 12.
Input:
Column 8...12..16 % IF &TYPE = 'NEW' % BEGIN 05 PART-CLASS. 10 PART-NUMBER PIC X(5). 01 INV-ITEM.
Output:
Column 8...12..16 05 PART-CLASS. 10 PART-NUMBER PIC X(5). 01 INV-ITEM.
Comments:
Do not use the Customizer function &columnnumber+source with % BEGIN.