IBM AS/400 Frozen Dessert Maker User Manual


 
Defining Externally Described Files
In the creation of a new record, the fields specified in the output field specifica-
tions are placed in the record. Fields not specified in the output field specifica-
tions or not meeting the conditions specified by the output indicators are written
as default values, which depend on the data format specified in the external
description (for example: a blank for character fields; zero for numeric fields).
*.. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... *
OFilename++DF..N01N02N03Excnam++++B++A++Sb+Sa+............................*
OITMREC D 20
O..............N01N02N03Field+++++++++YB.End++PConstant/editword/DTformat++
O *ALL 1
*
OSLSREC D 30
O SLSNAM 2
O COMRAT
O 15 BONUS
*
Figure 135. Output Specifications for an Externally Described File
1 For an update file, all fields in the record are written to the externally
described record ITMREC using the current values in the program for all
fields in the record.
For the creation of a new record, all fields in the record are written to
the externally described record ITMREC using the current values in the
program for the fields in the record.
2 To update a record, the fields SLSNAM and COMRAT are written to the
externally described record SLSREC when indicator 30 is on. The field
BONUS is written to the SLSREC record when indicators 30 and 15 are
on. All other fields in the record are written with the values that were
read.
To create a new record, the fields SLSNAM and COMRAT are written to
the externally described record SLSREC when indicator 30 is on. The
field BONUS is written when indicators 30 and 15 are on. All other fields
in the record are written as default values, which depend on their data
type (for example: a blank for character fields; zero for numeric fields).
Level Checking
HLL programs are dependent on receiving, at run time, an externally described file
whose format agrees with what was copied into the program at compilation time.
For this reason, the system provides a level-check function that ensures that the
format is the same.
The RPG compiler always provides the information required by level checking when
an externally described DISK, WORKSTN, or PRINTER file is used. The level-
check function can be requested on the create, change, and override file com-
mands. The default on the create file command is to request level checking.
Level checking occurs on a record-format basis when the file is opened unless you
specify LVLCHK(*NO) when you issue a file override command or create a file. If
the level-check values do not match, the program is notified of the error. The RPG
program then handles the OPEN error as described in Chapter 12, “Handling
Exceptions” on page 217.
270 ILE RPG for AS/400 Programmer's Guide