This is the code show how to auto refresh the values shown in the form it will auto refresh in every 5 min or given time and display the result.
1) you need to design the form as per your requirement
2)then you need to write code in two trigger
a).WHEN-TIMER-EXPIRED
b).WHEN-NEW-FORM-INSTANCE
a).WHEN-TIMER-EXPIRED :
DECLARE
timer_id TIMER;
v_count NUMBER;
CURSOR CFP
IS
select BMR.BMRBATCHMST_CODE,bmr.BMR_no,bmr.BMR_DATE,bmr.batch_code,IT.description pro_desc,decode(PROCESS_CATEGORY_STATUS,'INP','INPROGRESS - ') ||' UNDER - '||CM.description as status from BMRPRODUCTBATCHMASTER BMR,items IT,
BMRBATCHPROCESSCATEGORY BPC,pdssstepcategory CM where bmr.product_code = it.sl_no and BPC.PROCESS_CATEGORY = CM.code
and BPC.BMRBATCHMST_CODE = BMR.BMRBATCHMST_CODE and PROCESS_CATEGORY_STATUS = 'INP' order by BMR.BMRBATCHMST_CODE ;
BEGIN
timer_id := FIND_TIMER('refresh_timer');
BEGIN
GO_BLOCK('SHOWATTENDANCEDETAILS_BLOCK');
Clear_Block(No_Validate);
For mFP IN CFP LOOP
:showattendancedetails_block.BMRBATCHMST_CODE := mfp.BMRBATCHMST_CODE;
:showattendancedetails_block.BMR_NO := mfp.BMR_no;
:showattendancedetails_block.BMR_DATE := mfp.BMR_DATE;
:showattendancedetails_block.BATCH_NO:= mfp.batch_code;
:showattendancedetails_block.PRODUCT_NAME := mfp.pro_desc;
:showattendancedetails_block.STATUS:= mfp.status;
NEXT_RECORD;
SYNCHRONIZE;
END LOOP;
END;
END;
b).WHEN-NEW-FORM-INSTANCE
DECLARE
v_count NUMBER;
timer_id Timer;
five_sec NUMBER(5) := 15000;
BEGIN
timer_id := CREATE_TIMER('refresh_timer', five_sec,REPEAT);
EXCEPTION
WHEN NO_DATA_FOUND
THEN
exit_form(NO_VALIDATE);
END;
Here You can see Full output of the form
1) you need to design the form as per your requirement
2)then you need to write code in two trigger
a).WHEN-TIMER-EXPIRED
b).WHEN-NEW-FORM-INSTANCE
a).WHEN-TIMER-EXPIRED :
DECLARE
timer_id TIMER;
v_count NUMBER;
CURSOR CFP
IS
select BMR.BMRBATCHMST_CODE,bmr.BMR_no,bmr.BMR_DATE,bmr.batch_code,IT.description pro_desc,decode(PROCESS_CATEGORY_STATUS,'INP','INPROGRESS - ') ||' UNDER - '||CM.description as status from BMRPRODUCTBATCHMASTER BMR,items IT,
BMRBATCHPROCESSCATEGORY BPC,pdssstepcategory CM where bmr.product_code = it.sl_no and BPC.PROCESS_CATEGORY = CM.code
and BPC.BMRBATCHMST_CODE = BMR.BMRBATCHMST_CODE and PROCESS_CATEGORY_STATUS = 'INP' order by BMR.BMRBATCHMST_CODE ;
BEGIN
timer_id := FIND_TIMER('refresh_timer');
BEGIN
GO_BLOCK('SHOWATTENDANCEDETAILS_BLOCK');
Clear_Block(No_Validate);
For mFP IN CFP LOOP
:showattendancedetails_block.BMRBATCHMST_CODE := mfp.BMRBATCHMST_CODE;
:showattendancedetails_block.BMR_NO := mfp.BMR_no;
:showattendancedetails_block.BMR_DATE := mfp.BMR_DATE;
:showattendancedetails_block.BATCH_NO:= mfp.batch_code;
:showattendancedetails_block.PRODUCT_NAME := mfp.pro_desc;
:showattendancedetails_block.STATUS:= mfp.status;
NEXT_RECORD;
SYNCHRONIZE;
END LOOP;
END;
END;
b).WHEN-NEW-FORM-INSTANCE
DECLARE
v_count NUMBER;
timer_id Timer;
five_sec NUMBER(5) := 15000;
BEGIN
timer_id := CREATE_TIMER('refresh_timer', five_sec,REPEAT);
EXCEPTION
WHEN NO_DATA_FOUND
THEN
exit_form(NO_VALIDATE);
END;
Here You can see Full output of the form
I have a question...
ReplyDeletetimer_id := FIND_TIMER('refresh_timer');
timer_id := CREATE_TIMER('refresh_timer', five_sec,REPEAT);
thus two line i want to know, what is 'refresh_timer'..
'refresh_timer' -- is the name of the timer which user can give accordingly by there choice
ReplyDeleteelazığ
ReplyDeleteerzincan
bayburt
tunceli
sakarya
283B5X
görüntülü
ReplyDeleteucretli show
İİYJJM
sakarya evden eve nakliyat
ReplyDeleteosmaniye evden eve nakliyat
aksaray evden eve nakliyat
çanakkale evden eve nakliyat
zonguldak evden eve nakliyat
5AO
84CE2
ReplyDeleteBartın Şehirler Arası Nakliyat
Çerkezköy Mutfak Dolabı
Kars Şehirler Arası Nakliyat
Malatya Lojistik
Denizli Lojistik
Bolu Lojistik
Çerkezköy Halı Yıkama
Artvin Lojistik
Silivri Parke Ustası
7D834
ReplyDeleteGümüşhane Parça Eşya Taşıma
Bilecik Parça Eşya Taşıma
Sinop Şehir İçi Nakliyat
Sivas Şehirler Arası Nakliyat
Ünye Koltuk Kaplama
Diyarbakır Evden Eve Nakliyat
İzmir Şehir İçi Nakliyat
Kütahya Şehirler Arası Nakliyat
Bonk Coin Hangi Borsada
9591C
ReplyDeleteReferans Kimliği Nedir
Karabük Şehir İçi Nakliyat
Antalya Rent A Car
Bitfinex Güvenilir mi
Ünye Televizyon Tamircisi
Maraş Evden Eve Nakliyat
Tokat Şehirler Arası Nakliyat
Ordu Şehirler Arası Nakliyat
Kırklareli Evden Eve Nakliyat
DA962
ReplyDeletekütahya sohbet siteleri
karabük bedava sohbet odaları
kilis bedava sohbet odaları
mobil sohbet sitesi
izmir en iyi görüntülü sohbet uygulamaları
zonguldak yabancı sohbet
tunceli sohbet
canlı sohbet sitesi
ağrı canlı sohbet siteleri ücretsiz
D7F1C
ReplyDeleteGörüntülü Sohbet
Satoshi Coin Hangi Borsada
Dlive Takipçi Satın Al
Youtube Beğeni Satın Al
Twitter Takipçi Satın Al
Twitter Retweet Hilesi
Periscope Takipçi Satın Al
Bitcoin Nasıl Alınır
Telegram Abone Satın Al
B2887
ReplyDeletephantom
galagames
pancakeswap
uniswap
poocoin
yearn
raydium
defillama
sushi
شركة تنظيف فلل بالدمام AK3ORELudt
ReplyDelete