ミリ秒まで含んだ時刻文字列 in Other DouKaku?

ミリ秒まで含んだ時刻文字列

YYYY年mm月dd日HH時MM分SS.xxx秒なら、「YYYYmmddHHMMSS.xxx」のようにミリ秒まで含んだ文字列を返すプログラムを書いてください。

Posted feedbacks - Other

現在時刻を表示できる関数から年月日時分秒をリストにして取り出しました。

1 2	(defun todaydate () (princ (cdr (cdr (cdr(reverse (multiple-value-list (get-decoded-time))))))))

識別子は大文字、小文字の区別はないのでした。
print はウィンドウを開きそこに表示します。またログファイルにも記録します。
メインプログラムは、関数、サブルーチンの定義の直前までです。
最初、関数定義の後ろに書いていて何故、実行できないのだろうと悩んでいました。

print date_string()　//=>20080903143211.840

FUNCTION date_string()
  GETTIME()
  RESULT = G_TIME_YY4 + G_TIME_MM2 + G_TIME_DD2 + G_TIME_HH2 + G_TIME_NN2 + G_TIME_SS2 + "." + G_TIME_ZZ2
FEND

DouKaku?

ミリ秒まで含んだ時刻文字列

Posted feedbacks - Other

Index

Feed

Other

Link

Pathtraq