In an effort to standardize certain functions and provide some basic options, the Reporting Facility comes with a set of predefined fields for general use. You can reference these fields as if you had coded the DEFINE commands in the program.
The following fields can be printed, interrogated against, used in arithmetic expressions, accumulated, or used as sort keys.
A single alphanumeric character defined with an initial value of X'40'.
An 8-character alphanumeric field that contains the current date in the format MM/DD/YY. This field is updated only once, at the beginning of the Reporting Facility run.
A synonym for CURRDATE described previously. It resides in the same location and contains the same data as CURRDATE.
An 8-character alphanumeric field that contains the current time in the format HH:MM:SS. This field is updated each time a primary input record is read by the Reporting Facility.
Note: If you override the automatic read, it is updated each time the record selection processing cycle begins (for example, GOTO START).
A synonym for CURRTIME described previously. It resides in the same location and contains the same data as CURRTIME.
Numeric representation of the month (2-character alphanumeric field).
Numeric representation of the day (2-character alphanumeric field).
Numeric representation of the year (2-character alphanumeric field).
A 2-character alphanumeric field. It is the numeric representation of the hour. This field redefines positions 1—2 of the CURRENT-TIME field.
A 2-character alphanumeric field. It is the numeric representation of the minute. It redefines positions 4—5 of the CURRENT-TIME field.
A 2-character alphanumeric field. It is the numeric representation of the second. It redefines positions 7—8 of the CURRENT-TIME field.
A 1-character alphanumeric field with an initial value of E, (X'C5'). It is most commonly used in conjunction with the GET command.
A 1-character alphanumeric field with an initial value of N, (X'D5'). It is most commonly used in conjunction with the GET command.
A 1-character alphanumeric field with an initial value of Y, (X'E8'). It is most commonly used in conjunction with the GET command.
A 5-byte packed decimal field that is automatically incremented by 1 each time a primary input record is read. If you override the automatic read, the Reporting Facility updates it each time the record selection processing cycle begins.
QSEQ is defined as containing a maximum of nine integers, with no decimal places. Therefore, the maximum number it can contain is nine 9s (999999999). This field is commonly used:
A single alphanumeric character defined with an initial value of X'40'.
A 1-character alphanumeric field used internally by the SELECT command for the conditional printing or accumulation of fields within a record.
A 1-byte packed decimal field with a value of zero. Use it to initialize fields, or as a first operand in a logical expression.
|
Copyright © 2014 CA.
All rights reserved.
|
|