IBM AS/400 manual Level Checking, Defining Externally Described Files, Oslsrec

Defining Externally Described Files

¹

In

the

creation of a new record, the

fields

specified in

the o

tions are placed in the record.

Fields not specified in the outpu

tions or

not

meeting the

conditions

specified

by

the output

indicat

as default values, which depend on the data format specified in

description

(for example:

a

blank

for

character

fields; zero

for

*

.. 1 ...

+...

2 ...+...

3 ...+... 4 ...

+...

5 ...+

... 6

...+

... 7

...+...

*

OFilename++DF..N01N02N03Excnam++++B++A++Sb+Sa+

*

OITMREC

D

20

O

..............

N01N02N03Field+++++++++YB.End++PConstant/editword/DTforma￿t++

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 described record ITMREC using the current values in the progra fields in the record.

For the	creation	of a	new	record, all fields in	the record
the externally described record ITMREC using the					current values
program	for the	fields	in	the record.

.2/ To update a record, the fields SLSNAM and COMRAT are written to externally described record SLSREC when indicator 30 is on. The BONUS is written to the SLSREC record when indicators 30 and 15 on. All other fields in the record are written with the value read.

To create		a new record, the fields				SLSNAM	and	COMRAT	are	writte
the externally described record SLSREC						when	indicator		30	is	on.
field	BONUS	is written	when	indicators		30 and 15 are on. All					o
in the record are written				as	default	values,		which	depend		on
type	(for	example: a	blank	for	character		fields; zero			for	nu

Level Checking

HLL programs are dependent on receiving, at run time, an externally des whose format agrees with what was copied into the program at compilat For this reason, the system provides a level-check function that ensures format is the same.

The RPG	compiler always	provides the information		required			by level		chec
an externally described DISK, WORKSTN, or			PRINTER	file		is	used.	The	lev
check function can be requested on the			create,		change,		and	override
mands.	The default on	the create file	command	is	to	request		level	che

Level checking occurs on a record-format basis when the file is opened specify LVLCHK(*NO) when you issue a file override command or create a the level-check values do not match, the program is notified of the e program then handles the OPEN error as described in Chapter 12, “Handlin Exceptions” on page 217.

270 ILE RPG for AS/400 Programmer's Guide