Oracle Forms /Forms6iでのタイマーの作成と時計の表示

Oracle Forms /Forms6iでタイマーを作成して時計を表示する

これはD2kのタイマーについてです

外部クロックは、タイマーを使用して構築できます。タイマーは、特定の期間を持つ内部クロックに対応しています。指定された期間が経過すると、タイマーはアクションを1回実行して停止するか、タイマーが期限切れになるたびにアクションを定期的に繰り返すことができます。タイマーの継続時間は常にミリ秒単位です。タイマーはCREATE_TIMERを使用して作成されます Oracle Formsに組み込まれており、 WHEN-TIMER-EXPIREDが必要ですフォームレベルで書き込まれるトリガー。このトリガーは、タイマーが切れるたびに起動します。

REPEATタイマーの使用

表示項目CURRENT_TIMEを作成しましょう水平ツールバーキャンバス内CANVAS_TOOLBAR 以前に作成されました。このアイテムは、 HH24：MI：SSで時刻を表示しますフォーマットして毎秒更新します（タイマー期間）。 WHEN-NEW-FORM-INSTANCE トリガーし、 CLOCK_TIMER、という名前のタイマーを作成しますこれは1秒ごとに繰り返され、 CURRENT_TIMEに入力されます。 HH24：MI：SSにシステム日付が含まれるアイテムフォーマット。コードは次のとおりです。

DECLARE

   timer_id TIMER;

   one_second NUMBER := 1000;

BEGIN

   timer_id := FIND_TIMER('CLOCK_TIMER');

   IF NOT ID_NULL(timer_id) THEN

     DELETE_TIMER(timer_id);

   ELSE

     timer_id := CREATE_TIMER('CLOCK_TIMER',one_second, REPEAT);

   END IF;

     SELECT  TO_CHAR(SYSDATE,'HH24:MI:SS')

     INTO   :toolbar.current_time

     FROM   DUAL;

   EXCEPTION WHEN OTHERS THEN

     MESSAGE(TO_CHAR(SQLCODE)||''||SQLERRM);

END;

WHEN-TIMER-EXPIREDを作成します次のようにトリガーします。

DECLARE

   timer_name VARCHAR2(30);

BEGIN

   timer_name := GET_APPLICATION_PROPERTY(TIMER_NAME);

   IF  timer_name = 'CLOCK_TIMER' THEN

      SELECT  TO_CHAR(SYSDATE,'HH24:MI:SS')

      INTO   :toolbar.current_time

      FROM   DUAL;

   END IF;

   EXCEPTION WHEN OTHERS THEN

      MESSAGE(TO_CHAR(SQLCODE)||''||SQLERRM);

END;

https://www.foxinfotech.in/2014/02/creating-stopping-restarting-deleting-timer-oracleforms.html

Oracle Formsでのタイマーの作成、停止、再起動

タイマーを使用してOracleFormのPLSQLコードを調整します