+-------------------------------IBM Extension--------------------------------+
This format describes Boolean data. Boolean data items are items that are limited to a value of 1 or 0.
Data Description Entry - Format 4 - Boolean Data
>>-level-number--+-------------+--+------------------------+---->
+-data-name-1-+ +-REDEFINES--data-name-2-+
| (1) | +-LIKE--data-name-3------+
'-FILLER------' '-+----+--TYPEDEF--------'
'-IS-'
>--+------------------+--+----------------+--------------------->
'-+----+--EXTERNAL-' '-+----+--GLOBAL-'
'-IS-' '-IS-'
>--+-------------------------------+---------------------------->
| (2) |
'------+-JUST------+--+-------+-'
'-JUSTIFIED-' '-RIGHT-'
>--+------------------------------+----------------------------->
+-| OCCURS clause - Format 1 |-+
'-| OCCURS clause - Format 2 |-'
>--+---------------------------+--+------------------------+---->
'-+-INDICATOR--+--integer-3-' '-+-PICTURE-+--+----+--1-'
+-INDICATORS-+ '-PIC-----' '-IS-'
'-INDIC------'
>--+--------------------------------+--------------------------->
'-VALUE--+----+--boolean-literal-'
'-IS-'
>--+----------------------------------+------------------------->
| (2) |
'------+-SYNCHRONIZED-+--+-------+-'
'-SYNC---------' +-LEFT--+
'-RIGHT-'
>--+-------------------+--+----------------------------+--.----><
'-TYPE--type-name-1-' '-+---------------+--DISPLAY-'
'-USAGE--+----+-'
'-IS-'
OCCURS clause - Format 1:
|--OCCURS--integer-2--+-------+--------------------------------->
'-TIMES-'
.---------------------------------------.
V |
>----+-----------------------------------+-+--------------------|
| .--------------. |
| V | |
'-INDEXED--+----+----index-name-1-+-'
'-BY-'
OCCURS clause - Format 2:
|--OCCURS--integer-1--TO--integer-2--+-------+------------------>
'-TIMES-'
>--DEPENDING--+----+--data-name-4------------------------------->
'-ON-'
.---------------------------------------.
V |
>----+-----------------------------------+-+--------------------|
| .--------------. |
| V | |
'-INDEXED--+----+----index-name-1-+-'
'-BY-'
Notes:
The special considerations for the clauses used with the Boolean data follow. All other rules for clauses are the same as those for other data.
+----------------------------End of IBM Extension----------------------------+
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.