سؤال حول استخراج الاسماء

أخ sahara999

إليك الحل:

declare
	a number;
	b varchar(100);
begin
   a:=instr(:block2.txt1,' ');
   b:=substr(:block2.txt1,a+1);
   while a<>0 loop
    a:=instr(b,' ');
     b:=substr(b,a+1);
   end loop;
   :block2.txt2:=b;
end;

حيث :block2.txt1 هو حيث يوجدالإسم كامل ويمكن إستبداله بإسم الحقل

و block2.txt2 هو ناتج العملية وهو إسم العائلة

حل آخر

declare
	a number;
	b varchar(100);
begin
	a:=instr(:block2.txt1,' ');
	b:=substr(:block2.txt1,a+1);
  loop
   exit when a=0;
   a:=instr(b,' ');
   b:=substr(b,a+1);
	end loop;
	:block2.txt2:=b;
end;