(読取り専用)DSECONDSオプションは、経過時間をDECIMAL
値として返すオプションです。OracleがインストールされているのがUNIXである場合、DSECONDSオプションが返すのは、Oracleが開始されてからの経過時間(秒)になります。OracleがインストールされているのがWindowsである場合、DSECONDSオプションが返すのは、Oracleがインストールされているコンピュータが起動してからの経過時間(秒)になります。プログラムの動作速度向上に役立てるため、DSECONDSは、プログラムの実行中に経過する時間を調べる目的で使用できます。
例
例5-25 DSECONDSによるプログラムの時間測定
次のプログラムを実行すると、プログラム開始時のDSECONDSの値がt1
という変数に書き込まれ、次にt1
とプログラム実行後のDSECONDSの値との差が表示されます。
DEFINE prodsummary PROGRAM PROGRAM VARIABLE t1 DECIMAL t1 = dseconds LIMIT product TO ALL BLANK FOR product DO ROW WIDTH 16 name.product ACROSS month Jun96: DECIMAL 0 LSET - '$'WIDTH 18 <RSET ' (Actual)' sales rset ' (Plan)' sales.plan> DOEND BLANK ROW WIDTH 35 LSET 'The program took ' rset ' seconds.' - (dseconds - t1) END
このプログラムを実行すると、次の結果が生成されます。
3-Person Tents $95,121 (actual) $80,138 (plan) Aluminum Canoes $157,762 (actual) $132,931 (plan) Tennis Racquets $97,174 (actual) $84,758 (plan) Warm-up Suits $79,630 (actual) $73,569 (plan) Running Shoes $153,688 (actual) $109,219 (plan) The program took .20 seconds.