CREATE CURSOR C_spr_fio (id_fio I, surname C( 50 ), name C( 50 ), ot C( 50 ))
INSERT INTO C_spr_fio (id_fio, surname, name, ot) ;
  VALUES ( 1 , 'Иванов','Иван','Иванович')
INSERT INTO C_spr_fio (id_fio, surname, name, ot) ;
  VALUES ( 2 , 'Петров','Петр','Петрович')
INSERT INTO C_spr_fio (id_fio, surname, name, ot) ;
  VALUES ( 3 , 'Семенов','Семен','Семенович')

CREATE CURSOR C_spr_tel (id_tel I, id_fio I, tel_numb C( 15 ))
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 1 ,  2 , '264568855')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 2 ,  1 , '366578799')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 3 ,  2 , '356654654')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 4 ,  3 , '951951951')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 5 ,  1 , '357357357')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 6 ,  3 , '654654654')
INSERT INTO C_spr_tel (id_tel, id_fio, tel_numb) ;
  VALUES ( 7 ,  1 , '684582321')

SELECT C_spr_fio.surname, C_spr_fio.name, C_spr_fio.ot, C_spr_tel.tel_numb;
 FROM C_spr_fio INNER JOIN C_spr_tel ;
   ON  C_spr_fio.id_fio = C_spr_tel.id_fio;
 ORDER BY C_spr_fio.surname, C_spr_tel.tel_numb ;
 INTO CURSOR C_fio_tel

BROWSE