【COBOL】日付と時刻を扱う方法

COBOL（Common Business Oriented Language）は、ビジネスアプリケーション開発に広く使用されている古典的なプログラミング言語です。この記事では、COBOLを使用して日付と時刻をどのように扱うかについて詳しく説明します。

日付と時刻のデータ型

COBOLでは、日付と時刻を格納するための特定のデータ型が用意されています。これらのデータ型を使いこなすことで、日付と時刻を効果的に操作することができます。

コード例

以下のコード例を通じて、COBOLで日付と時刻を取り扱う方法を示します。このコードは、現在の日付と時刻を取得し、それを表示するものです。

IDENTIFICATION DIVISION.
PROGRAM-ID. DATE-TIME-EXAMPLE.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 CURRENT-DATE.
   05 TODAYS-YEAR      PIC 9(4).
   05 TODAYS-MONTH     PIC 99.
   05 TODAYS-DAY       PIC 99.
01 CURRENT-TIME.
   05 HOUR             PIC 99.
   05 MINUTE           PIC 99.
   05 SECOND           PIC 99.

PROCEDURE DIVISION.
START-PROGRAM.
    MOVE FUNCTION CURRENT-DATE TO CURRENT-DATE
    MOVE FUNCTION CURRENT-TIME TO CURRENT-TIME
    DISPLAY "Current Date: " TODAYS-YEAR "/" TODAYS-MONTH "/" TODAYS-DAY
    DISPLAY "Current Time: " HOUR ":" MINUTE ":" SECOND
    STOP RUN.

この例では、CURRENT-DATEとCURRENT-TIMEという2つのデータ項目を作成し、FUNCTION CURRENT-DATEおよびFUNCTION CURRENT-TIMEを使用して現在の日付と時刻を取得しています。そして、それらの値をDISPLAY文を使用して表示しています。

まとめ

COBOLで日付と時刻を取り扱う方法を学ぶことは、ビジネスアプリケーションの開発において重要です。この記事で紹介した手法を応用し、日付と時刻を効果的に操作してください。