select distinct * from
(select ORGANIZATION from SHOP1
where ORGANIZATION is not null
union
select STORED from SHOP2 where STORED is not null ) O,
(select min(YEAR_CREATE) as MIN_YEAR, max(YEAR_CREATE) as MAX_YEAR from SHOP1) Y

select POSITION from SHOP1
where POSITION is not null
union
select POSITION_PEOPLE from USERS_DATA where POSITION_PEOPLE is not null

select DEGREE from SHOP1
where DEGREE is not null
union
select DEGREE from USERS_DATA where DEGREE is not null

select RANK from SHOP1
where RANK is not null
union
select RANK from USERS_DATA where RANK is not null

create or alter procedure SP_FULL_COMBO_BOX
returns (
    OUT_DEGREE SCIENTIST,
    OUT_POSITION SCIENTIST,
    OUT_RANK SCIENTIST,
    OUT_ORGANIZATION NAME_ORGANIZATION,
    OUT_MIN_YEAR integer,
    OUT_MAX_YEAR integer)
as
declare variable VAR_MIN_YEAR_G integer;
declare variable VAR_MAX_YEAR_G integer;
declare variable VAR_MIN_YEAR_R integer;
declare variable VAR_MAX_YEAR_R integer;
begin
  for
    select KEEP_POSITION
      from GOV_ETALON
        where KEEP_POSITION is not null
    union
      select POSITION_PEOPLE
        from USERS_DATA
          where POSITION_PEOPLE is not null
    into :OUT_POSITION
  do
  begin
    OUT_POSITION = :OUT_POSITION;
    suspend;
  end

  for
    select KEEP_DEGREE
      from GOV_ETALON
        where KEEP_DEGREE is not null
    union
      select DEGREE
        from USERS_DATA
          where DEGREE is not null
    into :OUT_DEGREE
  do
  begin
    OUT_DEGREE = :OUT_DEGREE;
    OUT_POSITION = null;
    suspend;
  end

  for
    select KEEP_RANK
      from GOV_ETALON
        where KEEP_RANK is not null
    union
      select RANK
        from USERS_DATA
          where RANK is not null
    into :OUT_RANK
  do
  begin
    OUT_RANK = :OUT_RANK;
    OUT_DEGREE = null;
    suspend;
  end

  for
    select KEEP_ORGANIZATION
      from GOV_ETALON
        where KEEP_ORGANIZATION is not null
    union
    select STORED_ETALON
      from REGISTER_ETALON
        where STORED_ETALON is not null
    into :OUT_ORGANIZATION
  do
  begin
    OUT_ORGANIZATION = :OUT_ORGANIZATION;
    OUT_RANK = null;
    suspend;
  end

  select min(YEAR_ETALON), max(YEAR_ETALON)
    from GOV_ETALON
    into :VAR_MIN_YEAR_G,
         :VAR_MAX_YEAR_G;

  select min(YEAR_ETALON), max(YEAR_ETALON)
    from REGISTER_ETALON
    into :VAR_MIN_YEAR_R,
         :VAR_MAX_YEAR_R;

  if (VAR_MIN_YEAR_R < VAR_MIN_YEAR_G) then
    OUT_MIN_YEAR = VAR_MIN_YEAR_R;
  else OUT_MIN_YEAR = VAR_MIN_YEAR_G;
  OUT_ORGANIZATION = null;
  suspend;

  if (VAR_MAX_YEAR_R < VAR_MAX_YEAR_G) then
    OUT_MAX_YEAR = VAR_MAX_YEAR_G;
  else OUT_MAX_YEAR = VAR_MAX_YEAR_R;
  OUT_MIN_YEAR = null;
  suspend;
end