Rational Developer for System z
Enterprise COBOL for z/OS バージョン 4.1 プログラミング・ガイド


例: 年先行型日付フィールドの比較

次の例は、拡張日付フィールドと比較されるウィンドウ表示日付フィールドを示しています。

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-DateDATE FORMAT 節を指定して、それを拡張日付フィールドとして定義しなければなりません。 そうしないと、そのフィールドは非日付フィールドとして扱われ、その結果、そのフィールドは年の桁数が Date-Due-Back と同じであるものと見なされます。コンパイラーは 1900-1999 の仮定による世紀ウィンドウを適用するため、矛盾した比較が作成されます。


ご利用条件 | フィードバック

このインフォメーション・センターでは Eclipse テクノロジーが採用されています。(http://www.eclipse.org)