SETDAT

実行時関数:システム日付を設定します。

モジュールUSE DFLIB

形式

result = SETDAT (iyr, imon, iday)

iyr
(入力) INTEGER(2)。年 (xxxx AD)。

imon
(入力) INTEGER(2)。月 (1 ~ 12)。

iday
(入力) INTEGER(2)。日 (1 ~ 31)。

結果

結果の型は LOGICAL(4) です。システム日付が変更された場合,結果は .TRUE. で,変更されなければ .FALSE. です。

関数 SETDAT の実引数は,どのような正しい INTEGER(2) 式でも取ることができます。

許可される日付の範囲については,オペレーティング・システムのマニュアルを参照してください。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

GETDATGETTIMSETTIM

	USE DFLIB
	LOGICAL(4) success
	success = SETDAT(INT2(1997+1), INT2(2*3), INT2(30))
	END