ALTER TABLE SPR ADD CONSTRAINT CHK_SPR_SHORT_NAME_N CHECK (SHORT_NAME_N similar to '[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9/]*' escape '\');

update spr set spr.short_name_n =
  iif(spr.short_name is not null and trim(spr.short_name)<>'',spr.short_name,'')||'__'||
  iif(spr.street_str is not null and trim(spr.street_str)<>'',substring(spr.street_str from 1 for 5),'')||'_'||
  iif(spr.house_str is not null and trim(spr.house_str)<>'',spr.house_str,'')
where
  (iif(spr.short_name is not null and trim(spr.short_name)<>'',spr.short_name,'')||'__'||
  iif(spr.street_str is not null and trim(spr.street_str)<>'',substring(spr.street_str from 1 for 5),'')||'_'||
  iif(spr.house_str is not null and trim(spr.house_str)<>'',spr.house_str,''))
   similar to '[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9]*\_{1,1}[ А-Яа-я0-9/]*' escape '\'

ALTER TABLE SPR ADD CONSTRAINT CHK_SPR_SHORT_NAME_N CHECK (SHORT_NAME_N similar to '[ А-ЯЁа-яё0-9]*\_{1,1}[ А-ЯЁа-яё0-9]*\_{1,1}[ А-ЯЁа-яё0-9]*\_{1,1}[ А-ЯЁа-яё0-9/]*' escape '\');