how to create running clock in oracle forms 6i

[subashsavji]

pls. send the proper step by step coding.

[smartali4u]

in new_form_instan ce on form level

DECLARE 
CurrTime TIMER; 
OneSec CONSTANT NUMBER := 1000; 
BEGIN 
CurrTime := CREATE_TIMER('CURRTIME',OneSec,REPEAT); 
END; 


in when_timer_expired  on form level

DECLARE 
ExpTimer VARCHAR2(40) := Get_Application_Property(TIMER_NAME); 
vTime Varchar2(30) := :SYSTEM.CURRENT_DATETIME; 
BEGIN 

IF ExpTimer = 'CURRTIME' THEN 

:yourblockname.clock := SUBSTR(vTime, instr(vTime,' ')+1); 

END IF; 
END;

hope it will be work

ALI

[subashsavji]

in new_form_instan ce on form level

DECLARE
CurrTime TIMER;
OneSec CONSTANT NUMBER := 1000;
BEGIN
CurrTime := CREATE_TIMER('C URRTIME',OneSec ,REPEAT);
END;


in when_timer_expi red on form level

DECLARE
ExpTimer VARCHAR2(40) := Get_Application _Property(TIMER _NAME);
vTime Varchar2(30) := :SYSTEM.CURRENT _DATETIME;
BEGIN

IF ExpTimer = 'CURRTIME' THEN

:yourblockname. clock := SUBSTR(vTime, instr(vTime,' ')+1);

END IF;
END;



hope it will be work

ALI

Thank you............ ............... ..

[amitpatel66]

Duplicate post by smartali4u is deleted

[maneeshkumar]

Digital Clock

:yourblockname. clock := SUBSTR(vTime, instr(vTime,' ')+1);

giving an error if I put :yourblock.fiel dname
then it works properly