sql >> Base de Datos >  >> RDS >> Oracle

Crear un temporizador en Oracle Forms/Forms 6i y mostrar un reloj

Crear un temporizador en Oracle Forms/Forms 6i y mostrar un reloj

Se trata del temporizador en D2k

Se puede construir un reloj externo utilizando temporizadores. Los temporizadores corresponden a relojes internos, que tienen un período de tiempo específico. Cuando expira la duración especificada, el temporizador puede realizar una acción una vez y detenerse o repetir la acción regularmente cada vez que expira el temporizador. La duración del temporizador siempre está en milisegundos. Los temporizadores se crean utilizando CREATE_TIMER construido en Oracle Forms y requiere un WHEN-TIMER-EXPIRED disparador para ser escrito en el nivel de formulario. Este activador se activa cada vez que expira el temporizador.

Uso de temporizadores REPETIR

Vamos a crear un elemento de visualización, CURRENT_TIME, en el lienzo de la barra de herramientas horizontal CANVAS_TOOLBAR creado anteriormente. Este elemento muestra la hora en HH24:MI:SS formatea y se actualiza cada segundo (la duración del temporizador). En CUANDO-NEW-FORM-INSTANCE disparador, crea un temporizador llamado CLOCK_TIMER, que itera después de cada segundo y llena el CURRENT_TIME elemento con la fecha del sistema en HH24:MI:SS formato. El código es el siguiente:
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;

Cree un CUANDO-TIMER-EXPIRED desencadenar de la siguiente manera:
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;

Ver también:Crear una presentación de imagen con Timer en Oracle Forms,

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

Creación, detención y reinicio del temporizador en Oracle Forms

Ajuste el código PLSQL de Oracle Form con la ayuda del temporizador

 Creación de un temporizador en Oracle D2k/Forms 6i y visualización de un reloj
Revisado por Rishion el 17 de marzo de 2013
Calificación:4