CREATE PROCEDURE TEMP.UPD_ONEADDR()
  SPECIFIC TEMP.UPD_ONEADDR
  MODIFIES SQL DATA 
  NOT DETERMINISTIC
  LANGUAGE SQL
BEGIN
DECLARE pers Integer;
DECLARE op integer;
DECLARE st_date date;
FOR addr AS (SELECT insurance_number, B_address, R_address, l_address FROM temp.address_) DO
BEGIN
   SET pers = (SELECT max(id_person) FROM form.natural WHERE insurance_number=addr.insurance_number and end_date is null);
   SET op = (SELECT max(id_operation) FROM form.natural WHERE insurance_number=addr.insurance_number and end_date is null);
   SET st_date = (SELECT max(start_date) FROM form.natural WHERE insurance_number=addr.insurance_number and end_date is null); 
   /* адрес рождения */
   IF EXISTS (SELECT oneaddress FROM form.address WHERE id_person=pers and type='B') THEN
 	 BEGIN	
         IF (SELECT oneaddress FROM form.address WHERE id_person=pers and type='B')=null THEN
	  	   UPDATE form.address SET oneaddress=addr.b_address, start_date=st_date
		   		  WHERE id_person=pers and type='B';
	 END IF;
         END;
	 ELSE
         BEGIN
         INSERT INTO form.address (id_person, oneaddress, type, start_date, id_operation)
            values (pers, addr.b_address, 'B', st_date, op);
 	 END;
   END IF;
END;
END FOR;
END;

SQL0811N  The result of a scalar fullselect, SELECT INTO statement, or VALUES INTO statement is more than one row.  SQLSTATE= 21000