実行時サブルーチン:日時の値を詰め込みます。
モジュール:USE DFLIB
形式
CALL PACKTIMEQQ (timedate, iyr, imon, iday, ihr, imin, isec)
timedate
(出力) INTEGER(4)。日時情報を詰め込むバッファ。
iyr
(入力) INTEGER(2)。年 (xxxx AD)。
imon
(入力) INTEGER(2)。月 (1 ~ 12)。
iday
(入力) INTEGER(2)。日 (1 ~ 31)。
ihr
(入力) INTEGER(2)。時 (0 ~ 23)。
imin
(入力) INTEGER(2)。分 (0 ~ 59)。
isec
(入力) INTEGER(2)。秒 (0 ~ 59)。
詰め込まれる時刻は,グリニッジ平均時 1970 年 1 月 1 日 00:00:00 からの秒数です。詰め込まれた時刻値が数値的に比較できるため,相対日時値で作業する場合に PACKTIMEQQ を使うことができます。詰め込まれた時刻情報を元に戻すには,UNPACKTIMEQQ を使います。SETFILETIMEQQ は詰め込まれた時刻を使用します。
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
GETFILEINFOQQ,SETFILETIMEQQ,TIME,UNPACKTIMEQQ
例
USE DFLIB INTEGER(2) year, month, day, hour, minute, second, hund INTEGER(4) timedate CALL GETDAT (year, month, day) CALL GETTIM (hour, minute, second, hund) CALL PACKTIMEQQ (timedate, year, month, day, hour, & minute, second) END