Purpose
Specifies an occurrence of a singly- or multiply-occurring field defined on a REC parameter or work field parameter.
The field can be defined as alphanumeric or numeric. The data in a numeric field can be in any numeric format; that is, binary, zoned decimal, packed signed decimal, packed unsigned decimal, or bit.
Syntax
►►──── field-name ──┬─────────────────────────┬───────────────────────────────►◄ ├─ .subscript-value ──────┤ └─ .subscript-field-name ─┘
Syntax Rules
Specifies the name of a singly- or multiply-occurring field defined on a REC or work field parameter.
Specifies a subscript for a multiply-occurring input or work field.
If a subscript value is provided, it must be separated from the name of the multiply-occurring field by a period (.). The value of the subscript should be an integer in the range 1 to n, where n is the number of repetitions of the multiply-occurring field.
For example, if EMPLOYEE occurs ten times, the value of the subscript should not exceed 10. The value of the subscript can be tested in procedure logic.
Specifies a numeric literal that identifies a specific occurrence of a multiply-occurring field; for example, EMPLOYEE.4 identifies the fourth occurrence of EMPLOYEE.
Specifies the name of a singly-occurring numeric input or work field whose value identifies a specific occurrence of a multiply-occurring field; for example, if INDX has a value of 2, then EMPLOYEE.INDX identifies the second occurrence of EMPLOYEE.
The subscript field definition must not specify a decimal point.
Usage
The following CA Culprit reserved words can replace field-name-expression in procedure logic:
In a match-file run, CA Culprit creates a 1-byte binary field for each file; the field is called a file-specific status byte. M*ID is a binary combination of the file-specific status bytes for all files in a match run. This field can be tested for values that reflect various conditions, as listed in the following table.
|
Decimal Value of M*ID |
Condition |
|---|---|
|
8 |
File(s) out of sequence |
|
4 |
Duplicate key value |
|
- |
Not used |
|
1 |
End of file(s) |
Note: For more information on match-file runs, see the CA Culprit for CA IDMS User Guide.
LEVL is used to test for a specific control break; if the test is true, CA Culprit executes procedure logic specified for the control break.
LEVL can be equated to values in the range 1 through 21. For the most minor control break, LEVL equals 1; at grand totals time, LEVL equals one more than the number of control break codes specified on the SORT parameter.
|
Copyright © 2014 CA.
All rights reserved.
|
|