UWSC辞典

文字列表記の日付をシリアル値にします。

構文

1. Double = getSerialTime( date )

引数

date

日付（”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”）

戻値

シリアル値

プログラム

//////////////////////////////////////////////////
// 【引数】
//   date : 日付（”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”） 
// 【戻値】
//   シリアル値 
//////////////////////////////////////////////////
FUNCTION getSerialTime(uwscTime)
	RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
FEND//////////////////////////////////////////////////
// 【引数】
//   date : 日付（”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”） 
// 【戻値】
//   シリアル値 
//////////////////////////////////////////////////
FUNCTION getSerialTime(uwscTime)
	RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
FEND

解説

1. 2行目

   	RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
   	RESULT = (GETTIME(0, uwscTime) - GETTIME(0, "1899/12/30 00:00:00")) / 86400
   

   「1899/12/30 00:00:00」から変数dateまでの日数