5.3.6.1.1 "COBOL Language Reference" IBM Library Server

| 5.3.6.1.1 Date Trigger Values (Host Only)

| >_Host_> When the DATEPROC(TRIG) compiler option is in effect, expansion
| of windowed date fields is sensitive to certain trigger or limit values in
| the windowed date field.

| For alphanumeric windowed date fields, these special values are LOW-VALUE,
| HIGH-VALUE, and SPACE. For alphanumeric and numeric windowed date fields
| with at least one X in the DATE FORMAT clause (that is, windowed date
| fields other than just a windowed year), values of all zeros or all nines
| are also treated as triggers.

| The all-zero value is intended to act as a date earlier than any valid
| date. The purpose of the all-nines value is to behave like a date later
| than any valid date.

| When a windowed date field contains a trigger in this way, it is expanded
| as if the trigger value were copied to the century part of the expanded
| date result, rather than inferring 19 or 20 as the century value.

| This special trigger expansion is done when a windowed date field is used
| either as an operand in a relation condition or as the sending field in an
| arithmetic or MOVE statement. Trigger expansion is not done when windowed
| date fields are used as operands in arithmetic expressions, but may be
| applied to the final windowed date result of an arithmetic expression.
| <_Host_<

Adobe, the Adobe logo, Acrobat, the Acrobat logo, and Acrobat Reader are registered trademarks of Adobe Systems incorporated.

| 5.3.6.1.1 Date Trigger Values (Host Only)

IBM Library Server Copyright 1989, 2005 IBM Corporation. All rights reserved.