tak my móc zdecydowanie móc ale przedtem ale pozwalać debug/bela wiadomość the funkcja kod także unerstand che linia dawać the błąd. Używać the ekran kod wykonywać the test znowu i dawać the bela wiadomość przesyłać test ty dostawać na the ekran.
TWORZYĆ LUB ZAMIENIAĆ PROCEDURA GEO_COUNT_DB_LONG_SIZE
być
kursor log_id_cursor być
wybrany to_char (log_id) od bela
dokąd sti_casetype wewnątrz (
wybrany sti_casetype
od ford_acs_casetypes
dokąd transition_phase = "DB"
);
local_log_id liczba;
/* long_desc_length liczba (20,0); *
long_desc_length liczba;
my_err varchar2 (100);
zaczynać
otwierać log_id_cursor;
przynosić log_id_cursor w local_log_id;
my_err: = ' po fetch';
podczas gdy log_id_cursor%found
pętla
my_err: = ' przed funkcja wezwanie length';
wybrany find_length3 (local_log_id) w long_desc_length od bela DOKĄD LOG_ID = local_log_id;
my_err: = ' po funkcja wezwanie length';
wszywka w geo_field_count2 (case_no, field_size) wartość (local_log_id, long_desc_length);
my_err: = ' po wszywka inny table';
popełniać;
przynosić log_id_cursor w local_log_id;
kończyć pętla;
wyjątek gdy inny wtedy
dbms_output.put_line ('i być w wyjątek: '|| my_err);
dbms_output.put_line ('błąd: '||sqlerrm);
dbms_output.put_line ("błąd kod: " || sqlcode);
końcówka;
/
tworzyć lub zamieniać funkcja Find_Length3 (geo_log_id liczba)
wracać liczba
być
x clob;
y tęsknić;
my_err varchar2 (100);
zaczynać
dbms_lob.createtemporary (x, fałszywy);
my_err: = ' FUNKCJA: po createtemporary';
wybrany long_desc w y od bela dokąd log_id = geo_log_id;
my_err: = ' FUNKCJA: po select';
x: = to_clob (y);
my_err: = ' FUNKCJA: po to_clob';
powrotny dbms_lob.getlength (x);
my_err: = ' FUNKCJA: po getlength';
dbms_lob.freetemporary (x); --> notatka, to dostawać wykonywać
-- oświadczenie być po powrotny oświadczenie.
wyjątek
gdy inny wtedy
dbms_output.put_line ('inside funkcja wyjątek: '|| my_err);
dbms_output.put_line ('inside funkcja błąd: '||sqlerrm);
dbms_output.put_line ("inside funkcja błąd kod: " || sqlcode);
końcówka;
/
