Filter
Top Products
Defining Externally Described Files
with an indicator, and you then try to rename the field referencing the
unprefixed name, you will get an error. Conversely, if you first rename the
field to something other than the prefixed name, and you then use the pre-
fixed name on a specification, you will get an error.
*.. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... *
IRcdname+++....In.........................................................*
IMSTRITEM 01 1
I..............Ext-field+..................Field+++++++++L1M1..PlMnZr......
I ITEMNUMB 2 ITEM L1 3
*
IMSTRWHSE 02
I ITEMNUMB ITEM L1
*
Figure 133. Overriding and Adding RPG Functions to an External Description
1 To assign a record-identifying indicator to a record in an externally
described file, specify the record-format name in positions 7 through 16
of the input specifications and assign a valid record-identifying indicator
in positions 21 and 22. A typical use of input specifications with
externally described files is to assign record-identifying indicators.
In this example, record-identifying indicator 01 is assigned to the record
MSTRITEM and indicator 02 to the record MSTRWHSE.
2 To rename a field in an externally described record, specify the external
name of the field, left-adjusted, in positions 21 through 30 of the field-
description line. In positions 49 through 62, specify the name that is to
be used in the program.
In this example, the field ITEMNUMB in both records is renamed ITEM
for this program.
3 To assign a control-level indicator to a field in an externally described
record, specify the name of the field in positions 49 through 62 and
specify a control-level indicator in positions 63 and 64.
In this example, the ITEM field in both records MSTRITEM and
MSTRWHSE is specified to be the L1 control field.
*.. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 ...+... *
IFilename++SqNORiPos1+NCCPos2+NCCPos3+NCC..................................
IMSTREC 01 1
I..............Ext-field+..................Field+++++++++L1M1..PlMnZr......
I CUSTNO M1 1
*
IWKREC 02
I CUSTNO M1
I BALDUE 98 2
*
Figure 134. Adding RPG Functions to an External Description
1 To assign a match value to a field in an externally described record,
specify the record-format name in positions 7 through 16 of the record-
identification line. On the field-description line specify the name of the
268 ILE RPG for AS/400 Programmer's Guide