Obnovení / aktualizace obrazovky formuláře v Oracle D2k Forms 6i

Obnovení / aktualizace obrazovky formuláře v Oracle D2k Forms 6i

Problém

Chcete na formuláři pomocí procedury zobrazit počet zpracovaných záznamů nebo ukazatel průběhu.

Řešení

Declare
nTotalRec Number :=10000;
nCurrRec Number :=1;
Začátek
For i v 1..nTotalRec Loop
:ablock.aitem :=nCurrRec;
Synchronizovat; -- tím se aktualizuje obrazovka
--- zde něco udělejte
nCurrRec :=nCurrRec + 1;
End Loop;
End;

To udělá potřebné. Pokud však během tohoto procesu někdo klikne na formulář, neukáže průběh, ale zpracování bude pokračovat. Řešením tohoto problému je umístit níže uvedený příkaz do triggeru when-new-form-instance:

:system.message_level :=5;

Nyní proběhne plynulá aktualizace obrazovky.

Můžete se zeptat na jakékoli dotazy týkající se Oracle PLSQL a D2k prostřednictvím komentáře, brzy vám odpovím.