% BEGIN

Use in conditional or looping statement blocks to control the number of columns that AMB or APS moves the blocks during processing. The number of columns that you indent % BEGIN in a conditional or looping construct is the same number of columns that AMB moves the subordinate block to the left. Default processing moves the block to the starting column of the controlling conditional or looping construct.

Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.

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.

Syntax:

% BEGIN

Comments:

Do not use the Customizer function &columnnumber+source with % BEGIN.

Example:

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.