Код: Выделить всё
begin
for select v.family, v.name, V.farther, v.sex, V.date_born,
v.doc_name, v.doc_nomb, v.streetname, v.housenomber, v.kvartirano
from
vibor2000 V
where v.family starting with :like_family
and v.name starting with :like_name
and v.farther starting with :like_farther
and v.streetname starting with :like_streetname
and v.housenomber starting with :like_housenomber
and v.kvartirano starting with :like_kvartirano
into
:family,
:name,
:farther,
:sex,
:date_born,
:doc_name,
:doc_nomb,
:streetname,
:housenomber,
:kvartirano
do
begin
suspend;
end
end