Скрипт дополнений к ЕГАИС

set term ^;

CREATE TABLE EGAIS_PRODUCERS (
    ID           DM_TEXT NOT NULL /* DM_TEXT = VARCHAR(250) */,
    INN          DM_TEXT /* DM_TEXT = VARCHAR(250) */,
    KPP          DM_TEXT /* DM_TEXT = VARCHAR(250) */,
    FULLNAME     DM_TEXT1024 /* DM_TEXT1024 = VARCHAR(1024) */,
    SHORTNAME    DM_TEXT1024 /* DM_TEXT1024 = VARCHAR(1024) */,
    COUNTRY      DM_TEXT1024 /* DM_TEXT1024 = VARCHAR(1024) */,
    POSTINDEX    DM_TEXT /* DM_TEXT = VARCHAR(250) */,
    REGIONCODE   DM_TEXT /* DM_TEXT = VARCHAR(250) */,
    DESCRIPTION  DM_TEXT1024 /* DM_TEXT1024 = VARCHAR(1024) */,
    CITY         DM_TEXT /* DM_TEXT = VARCHAR(250) */,
    STREET       DM_TEXT /* DM_TEXT = VARCHAR(250) */
);^

CREATE UNIQUE INDEX EGAIS_PRODUCERS_IDX1 ON EGAIS_PRODUCERS (ID);^

create generator GEN_EGAIS_SHOP_ID;
^

create table EGAIS_SHOP (
ID integer not null,
PART_ID DM_ID_NULL /* DM_ID_NULL = bigint */,
SNAME DM_TEXT1024 /* DM_TEXT1024 = varchar (1024) */,
QUANT DM_DOUBLE /* DM_DOUBLE = double precision */,
EGAIS_QUANT DM_DOUBLE /* DM_DOUBLE = double precision */,
ALCCODE DM_TEXT1024 /* DM_TEXT1024 = varchar (1024) */,
UNITTYPE DM_TEXT /* DM_TEXT = varchar (250) */,
ALCVOLUME DM_DOUBLE /* DM_DOUBLE = double precision */,
PRODUCTVCODE DM_STATUS /* DM_STATUS = integer */,
PRODUCER_ID DM_TEXT /* DM_TEXT = varchar (250) */);
^

create or alter trigger EGAIS_SHOP_BI for EGAIS_SHOP
active before insert position 0
as
begin
 if (new.ID is null) then
  new.ID = gen_id(GEN_EGAIS_SHOP_ID, 1);
end^

create or alter view VW_WARESHOP (
    ID,
    PART_ID,
    SNAME,
    QUANT,
    EGAIS_QUANT,
    ALCCODE,
    UNITTYPE,
    ALCVOLUME,
    PRODUCTVCODE,
    PRODUCER_ID)
as
select ID,
       PART_ID,
       SNAME,
       QUANT,
       EGAIS_QUANT,
       ALCCODE,
       UNITTYPE,
       ALCVOLUME,
       PRODUCTVCODE,
       PRODUCER_ID
from EGAIS_SHOP;
^

set term;
^