次の例は、拡張日付フィールドと比較されるウィンドウ表示日付フィールドを示しています。
77 Todays-Date Pic X(8) Date Format yyyyxxxx.
01 Loan-Record.
05 Date-Due-Back Pic X(6) Date Format yyxxxx.
. . .
If Date-Due-Back > Todays-Date Then . . .
世紀ウィンドウが Date-Due-Back に適用されます。 Todays-Date に DATE FORMAT 節を指定して、それを拡張日付フィールドとして定義しなければなりません。 そうしないと、そのフィールドは非日付フィールドとして扱われ、その結果、そのフィールドは年の桁数が Date-Due-Back と同じであるものと見なされます。コンパイラーは 1900-1999 の仮定による世紀ウィンドウを適用するため、矛盾した比較が作成されます。