GETTIME関数(日時取得):UWSC,

// 日付、時間の取得(時間変数に時間を設定する)
戻値 = GETTIME( [±n日, 基準日] ) 
引数
 ±n日: nを指定すると当日もしくは基準日からプラスマイナス n日とする、小数点以下は時間(デフォルト=0)
 基準日: 指定された日付を基に日付を設定する (デフォルト=当日)
      (”YYYYMMDD” or “YYYY/MM/DD” or “YYYY-MM-DD” or “YYYYMMDDHHNNSS” or “YYYY/MM/DD HH:NN:SS”)
戻値
 2000年1月1日からの秒数を返す

 値がセットされる特殊変数
  G_TIME_YY    // 年
  G_TIME_MM    // 月
  G_TIME_DD    // 日
  G_TIME_HH    // 時
  G_TIME_NN    // 分
  G_TIME_SS    // 秒
  G_TIME_ZZ    // ミリ秒
  G_TIME_WW    // 曜日 (0:日曜….6:土曜)
  G_TIME_YY2   // 年をxxの文字型
  G_TIME_MM2    // 月をxxの文字型
  G_TIME_DD2   // 日をxxの文字型
  G_TIME_HH2   // 時をxxの文字型
  G_TIME_NN2   // 分をxxの文字型
  G_TIME_SS2   // 秒をxxの文字型
  G_TIME_ZZ2   // ミリ秒をxxxの文字型
  G_TIME_YY4   // 年をxxxxの文字型

【例:サンプル】
// CSVファイルの値を2倍して書き戻す
fid = FOPEN(“TEST.CSV”, F_READ or F_WRITE)    // ファイルオープン
For 行 = 1 to FGET(fid, -1)            // 行数分
  For 列 = 1 to 3                // 3列
    atai = FGET(fid, 行, 列)         // GET
    if ChkNum(atai) then atai = atai * 2   // 数字であれば2倍
    FPUT(fid, atai, 行, 列)          // PUT
  next
next
FCLOSE(fid)                    // ファイルクローズ

// 昨日の日報(yymmdd.dat), 月報(yymm.dat)名を生成
GetTime(-1)                    // 昨日の日付を取得
日報ファイル = G_TIME_YY2 +G_TIME_MM2 +G_TIME_DD2 +”.DAT”
月報ファイル = G_TIME_YY2 +G_TIME_MM2 +”.DAT”

// 2005年4月1日から60日目を算出
GetTime(60, “2005/04/01″)             // 2005年4月1日を基準に+60日
指定日 = G_TIME_YY2 +G_TIME_MM2 +G_TIME_DD2 +”.DAT”

// 現在時間から6時間後
GetTime(6/24)                   // 小数点以下は時間計算

// 2005年4月1日12時30分から+1日と12時間を算出
GetTime(1.5, “2005/04/01 12:30:00″)

このエントリーをはてなブックマークに追加

コメントを残す