RPG/400 Help

Positions 24-27 (Record Length)

Use positions 24 through 27 to indicate the length of the logical records contained in a program-described file. The maximum record size that can be specified is 9999; however, record-size constraints of any device may override this value. This entry must be blank for externally described files.

If the file being defined is a record-address file and the record length specified is 3, it is assumed that each record in the file consists of a 3-byte binary field for the relative-record numbers starting at offset 0. If the record length is 4 or greater, each relative-record number in the record-address file is assumed to be a 4-byte field starting at offset 1. If the record length is left blank, the actual record length is retrieved at run time to determine how to handle the record-address file.

If the file opened at run time has a primary record length of 3, then 3-byte relative-record numbers (one per record) are assumed; otherwise, 4-byte relative-record numbers are assumed. This support can be used to allow RPG/400 programs to use System/36 environment SORT files as record-address files.

*----------------------------------------------------------------*
|          Valid Combinations for a RAF Table File               |
*---------------*----------------*-------------------------------*
| RECORD LENGTH | RAF LENGTH     | TYPE OF SUPPORT               |
| POSITIONS     | POSITIONS      |                               |
| 24-27         | 29-30          |                               |
*---------------*----------------*-------------------------------*
| Blank         | Blank          | Support determined at run     |
|               |                | time.                         |
*---------------*----------------*-------------------------------*
| 3             | 3              | System/36 support.            |
*---------------*----------------*-------------------------------*
| > = 4         | 4              | Native support.               |
*---------------*----------------*-------------------------------*


[ Top of Page | Previous Page | Next Page | Table of Contents ]