Membuat Timer di Oracle Forms / Forms 6i dan Menampilkan Jam

Ini tentang pengatur waktu di D2k

Sebuah jam eksternal dapat dibangun menggunakan timer. Timer sesuai dengan jam internal, yang memiliki periode waktu tertentu. Ketika durasi yang ditentukan berakhir, pengatur waktu dapat melakukan tindakan sekali dan menghentikan atau mengulangi tindakan secara teratur setiap kali pengatur waktu berakhir. Durasi timer selalu dalam milidetik. Timer dibuat menggunakan CREATE_TIMER dibangun di Oracle Forms dan memerlukan WHEN-TIMER-EXPIRED pemicu untuk ditulis pada tingkat formulir. Pemicu ini menyala setiap kali timer habis.

Menggunakan REPEAT Timer

Mari kita buat item tampilan, CURRENT_TIME, di kanvas bilah alat horizontal CANVAS_TOOLBAR dibuat lebih awal. Item ini menunjukkan waktu dalam HH24:MI:SS memformat dan memperbarui dirinya sendiri setiap detik (durasi pengatur waktu).Dalam WHEN-NEW-FORM-INSTANCE pemicu, buat timer bernama CLOCK_TIMER, yang berulang setiap satu detik dan mengisi CURRENT_TIME item dengan tanggal sistem di HH24:MI:SS format. Kodenya adalah sebagai berikut:

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;

Buat KAPAN-TIMER-EXPIRED pemicu sebagai berikut:

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;

Lihat Juga:Membuat presentasi gambar dengan Timer di Oracle Forms,

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

Membuat, Menghentikan, Memulai Ulang timer di Oracle Forms

Setel Kode PLSQL Oracle Form dengan bantuan pengatur waktu

Membuat Timer di Oracle D2k / Forms 6i dan Menampilkan Jam
Ditinjau oleh Rishion 17 Mar 2013
Rating:4