可搬用関数とサブルーチン:ASCII 文字列として現在の日時を返します。
モジュール:USE DFPORT
形式
サブルーチン
CALL FDATE ( [string] )
関数
result = FDATE( )
string
(省略可能,出力) CHARACTER*(*)。FDATE がサブルーチンとして呼ばれた時,string には次の書式の 24 文字の文字列が返されます。
Mon Jan 31 04:37:23 1996
結果
関数 FDATE の結果とサブルーチン FDATE(string) が返す string の値は同じです。改行とヌルは文字列には含まれません。
FDATE を関すとして使う場合,以下のように宣言します。
CHARACTER*24 FDATE
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
DATE_AND_TIME例
USE DFPORT CHARACTER*24 today ! CALL FDATE(today) write (*,*), 'Today is ', today ! write (*,*), 'Today is ', fdate()