+-------------------------------IBM Extension--------------------------------+
FILE-CONTROL Paragraph - Format 5 - Transaction
>>-FILE-CONTROL.--SELECT--file-name----------------------------->
.-----------------------.
V | (1)
>--ASSIGN--+----+----+-assignment-name-1-+-+-------------------->
'-TO-' '-literal-1---------'
>--+----------------------+--TRANSACTION------------------------>
'-ORGANIZATION--+----+-'
'-IS-'
>--+-----------------------------------------------------------+-->
'-ACCESS--+------+--+----+--+-SEQUENTIAL--+-------------+-+-'
'-MODE-' '-IS-' | '-| rel-key |-' |
'-DYNAMIC--| rel-key |--------'
>--+--------------------------------------------------------+--->
'-+------+--STATUS--+----+--data-name-1--+-------------+-'
'-FILE-' '-IS-' '-data-name-5-'
>--+-----------------------------------+--.--------------------><
'-CONTROL-AREA--+----+--data-name-7-'
'-IS-'
rel-key:
|--RELATIVE--+-----+--+----+--data-name-4-----------------------|
'-KEY-' '-IS-'
Notes:
See the chapter on Transaction Files in the ILE COBOL for AS/400 Programmer's Guide for more information on working with transaction files.
+----------------------------End of IBM Extension----------------------------+
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.