DIAdemでタイムスタンプの足し算と引き算

DIAdem Scriptでタイムスタンプの足し算と引き算を行う方法を確認します。

DIAdem Scriptを開き、下記のスクリプトを実行すると、TimeGenerated1とTimeGenerated2というタイムスタンプによって構成された2つの配列が作成されます。TimeGenerated1は2020/01/01 03:00:00を起点として1時間ずつ増加していくのに対し、TimeGenerated2はタイムスタンプの初期値(0000/00/00 00:00:00)から9時間多い状態です。この2つのタイムスタンプの和を取ると、TimeGenerated1 + 9時間の操作を行う事ができ、差を取るとTimeGenerated1 - 9時間という操作を行う事ができます。
 

Option Explicit   'スクリプト内のすべての変数の明示的な宣言を強制します。
Call Data.Root.Clear()

GenTimeMode      = "StartStepNo"
GenTimeXBeg      = TTR("2020/01/01 03:00:00.00000", "#yyyy/mm/dd hh:nn:ss.ffff")
GenTimeStep      = 1
GenTimeUnit      = "hour"
GenTimeNo        = 1000
'------------ Command -------------------
Set ChnResult = ChnGenTime("/TimeGenerated1", GenTimeUnit, TTR("2020/01/01 03:00:00.00000", "#yyyy/mm/dd hh:nn:ss.ffff"), , GenTimeStep, GenTimeMode, GenTimeNo)


GenTimeMode      = "StartStepNo"
GenTimeXBeg      = TTR("0000/00/00 09:00:00.00000", "#yyyy/mm/dd hh:nn:ss.ffff")
GenTimeStep      = 0
GenTimeUnit      = "hour"
GenTimeNo        = 1000
'------------ Command -------------------
Set ChnResult = ChnGenTime("/TimeGenerated2", GenTimeUnit, TTR("0000/00/00 09:00:00.0000", "#yyyy/mm/dd hh:nn:ss.ffff"), , GenTimeStep, GenTimeMode, GenTimeNo)

Set ChnResult = ChnAdd("[1]/TimeGenerated1", "[1]/TimeGenerated2", "/Added")
Set ChnResult = ChnSub("[1]/TimeGenerated1", "[1]/TimeGenerated2", "/Subtracted")