serialToUwsc

シリアル値をUWSC時間に変換します。シリアル値は、1日(24時間)を1.0とし、1日ごとに1ずつ増える。整数部分は日付を、小数部分は時刻を表す。Windows版では、1900年日付システムを適用しており、1900年1月1日の午前0時を起点として、シリアル値は1から始まる。

構文
  1. Double = serialToUwsc( serialDate )
引数
serialTime
シリアル値
戻値
UWSC時間

プログラム

//////////////////////////////////////////////////
// 【引数】
//   serialTime : シリアル値 
// 【戻値】
//   UWSC時間 
//////////////////////////////////////////////////
FUNCTION serialToUwsc(serialDate)
	RESULT = GETTIME(serialDate, "18991230000000")
FEND

解説

  1. 2行目
    	RESULT = GETTIME(serialDate, "18991230000000")