ILE COBOL 解説書

+----------------------------------IBM 拡張----------------------------------+

WHEN-COMPILED 特殊レジスター

この特殊レジスターには、コンパイルの開始日付が入ります。 このレジスターは、次の暗黙定義および形式を持つ英数字データから構成されます。

01     WHEN-COMPILED GLOBAL PICTURE X(16) USAGE DISPLAY

形式

MM/DD/YYhh.mm.ss (MONTH/DAY/YEARhour.minute.second)

たとえば、コンパイルが 1994 年 12 月 15 日の午後 2 時 4 分に開始された場合には、WHEN-COMPILED に値 12/15/9414.04.00 が入ります。

ジョブ関連コマンド (CHGJOB など) の DATSEP または TIMSEP パラメーターは、WHEN-COMPILED 特殊レジスター内で使用される日付区切りまたは時刻分離文字を指定します。 DATFMT パラメーターは、WHEN-COMPILED 特殊レジスター内で使用される日付形式を指定します。

これは MOVE ステートメントの送信項目についてのみ有効です。

特殊レジスターのデータは、送り出しデータ項目として使用されているときにのみ参照変更できます。

ネストされたプログラムでは、この特殊レジスターは最外部のプログラム内で暗黙に定義されます。

注:
日付および時刻の組み込み関数 WHEN-COMPILED を使用して、コンパイル日付および時刻をアクセスすることもできます (WHEN-COMPILEDを参照してください)。 この関数は 4 桁の年の値をサポートし、追加情報を提供します。

+------------------------------End of IBM 拡張-------------------------------+


[ ページのトップ | 前ページ | 次ページ | 目次 | 索引 ]