VALUES (Values) keyword for physical and logical files

You can specify this keyword at the field level, the select/omit-field level, or both.

The format of the keyword is:
VALUES(value-1 [value-2...[value-100]])

Examples

The following examples show how to specify the VALUES keyword.

Example 1

The following example uses character and numeric values.

|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
00010A          R RECORD1                   PFILE(PF1)
00020A            FIELDA         1  0       VALUES(1 6 9)        1
00030A            FIELDB         1          VALUES('A' 'B' 'C')  1
00040A          K FIELDA
00050A          S FIELDB                    VALUES('A' 'B')      2
00060A          S FIELDA                    VALUES(1 6)          2
     A
1
VALUES is specified for FIELDA and FIELDB as a validity checking keyword for display files that refer to FIELDA and FIELDB.
2
VALUES is also specified for FIELDA and FIELDB as a select/omit keyword. Records from the physical file PF1 are retrieved through this logical file record format depending on the values of the following fields:
  • FIELDB: Records are selected only when FIELDB equals A or B.
  • FIELDA: Records not already selected are selected when FIELDA equals 1 or 6.

Example 2

The following example uses hexadecimal values.

|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
00010A          R RCD1                      PFILE(PF1)
00020A            CODEA
00030A            FLD1
00040A            FLD2
00050A          K FLD1
00060A          S CODEA                     VALUES(X'51' X'54' X'AE')
     A

VALUES is specified as a select/omit keyword for CODEA (which is a 1-byte field). Records from physical file PF1 are retrieved through this record format only if the value of field CODEA is hexadecimal 51, hexadecimal 54, or hexadecimal AE.