The following lines contain the word 'select', 'insert', 'update' or 'delete':
select substr(abs_num,1,instr(abs_num,'.'))
into numeral
from dual;
select description
into c_zero
from fnd_lookup_types flt,
fnd_lookup_values flv
where flt.application_id = 200
and flt.lookup_type = 'NUMBERS'
and flv.lookup_type = flt.lookup_type
and flv.lookup_code = '0'
and flv.language = p_language;
select flv9.meaning,
flv10.meaning,
flv11.meaning
into and_lookup,
dollars_lookup,
cents_lookup
from fnd_lookup_types flt9,
fnd_lookup_values flv9,
fnd_lookup_types flt10,
fnd_lookup_values flv10,
fnd_lookup_types flt11,
fnd_lookup_values flv11
where flt9.application_id = 800
and flt9.lookup_type = 'AMOUNT_IN_WORDS'
and flv9.lookup_type = flt9.lookup_type
and flv9.lookup_code = 'AND'
and flv9.language = p_language
and flt10.application_id = 800
and flt10.lookup_type = 'AMOUNT_IN_WORDS'
and flv10.lookup_type = flt9.lookup_type
and flv10.lookup_code = p_denomination
and flv10.language = p_language
and flt11.application_id = 800
and flt11.lookup_type = 'AMOUNT_IN_WORDS'
and flv11.lookup_type = flt9.lookup_type
and flv11.lookup_code = p_sub_denomination
and flv11.language = p_language;
select ' '||flv1.meaning||' ',
flv2.description
into c_billion,
billion_lookup
from fnd_lookup_values flv1,
fnd_lookup_types flt1,
fnd_lookup_values flv2,
fnd_lookup_types flt2
where flt1.application_id = 800
and flt1.lookup_type = 'AMOUNT_IN_WORDS'
and flv1.lookup_type = flt1.lookup_type
and flv1.lookup_code = 'BILLION'
and flv1.language = p_language
and flt2.application_id = 200
and flt2.lookup_type = 'NUMBERS'
and flv2.lookup_type = flt2.lookup_type
and flv2.lookup_code = billion_seg
and flv2.language = p_language;
select ' '||flv3.meaning||' ',
flv4.description
into c_million,
million_lookup
from fnd_lookup_values flv3,
fnd_lookup_types flt3,
fnd_lookup_values flv4,
fnd_lookup_types flt4
where flt3.application_id = 800
and flt3.lookup_type = 'AMOUNT_IN_WORDS'
and flv3.lookup_type = flt3.lookup_type
and flv3.lookup_code = 'MILLION'
and flv3.language = p_language
and flt4.application_id = 200
and flt4.lookup_type = 'NUMBERS'
and flv4.lookup_type = flt4.lookup_type
and flv4.lookup_code = million_seg
and flv4.language = p_language;
select ' '||flv5.meaning||' ',
flv6.description
into c_thousand,
thousand_lookup
from fnd_lookup_values flv5,
fnd_lookup_types flt5,
fnd_lookup_values flv6,
fnd_lookup_types flt6
where flt5.application_id = 800
and flt5.lookup_type = 'AMOUNT_IN_WORDS'
and flv5.lookup_type = flt5.lookup_type
and flv5.lookup_code = 'THOUSAND'
and flv5.language = p_language
and flt6.application_id = 200
and flt6.lookup_type = 'NUMBERS'
and flv6.lookup_type = flt6.lookup_type
and flv6.lookup_code = thousand_seg
and flv6.language = p_language;
select flv7.description
into units_lookup
from fnd_lookup_values flv7,
fnd_lookup_types flt7
where flt7.application_id = 200
and flt7.lookup_type = 'NUMBERS'
and flv7.lookup_type = flt7.lookup_type
and flv7.lookup_code = units_seg
and flv7.language = p_language;