Программное обеспечение базы данный "Экологический мониторинг"

VALIGN=TOP>



203








300 Передано сторонним организациям, всего




Х Х Х

301

в том числе по кодам:

Х Х
302





Х Х
303





Х Х

Продолжение таблицы 1

А	Б	1	2	3	4	5	6	7	8
400	Переработано в организации, всего						Х	Х	Х
401	в том числе по кодам:						Х	Х
402							Х	Х
403							Х	Х
500	Образовалось вторично после переработки, всего						Х	Х	Х
501	в том числе по кодам:
502
503
Наличие на конец отчетного года
600	Всего						Х	Х	Х
601	в том числе по кодам:
602
603
604
605
700	Количество РАО, ОЯТ, разрешенное к размещению						Х	Х	Х
701	в том числе по кодам:
702
703

Примечание:

1) Коды РАО, ОЯТ, а также пунктов их хранения, захоронения приведены в инструкции по заполнению.

2) Количество жидких радиоактивных отходов указывается в м3 (гр.1), количество твердых радиоактивных отходов – в тоннах (гр.2), количество отработавших закрытых радионуклидных источников – в штуках (гр.3). Для ОЯТ указывается количество тонн облученного урана (гр.2) и количество ОТВС в штуках (гр.3).

2. Поступление радионуклидов в атмосферный воздух

Разрешение на допустимые пределы выброса радионуклидов в атмосферу № __________ от __ ____ _________

Наименование государственного органа, выдавшего разрешение _________________________________________________________

Срок действия разрешения с __ ____ _________ до __ ____ _________

Код по ОКЕИ: Бк - 323

№ строки	Наименование радионуклида	Разрешенный выброс радионуклида в атмосферу за год, Бк	Фактически выброшено радионуклида в атмосферу, Бк
			за отчетный год	за предыдущий год
А	В	1	2	3
201
202
203
204
205
206
207
208
209
210

3. Сброс сточных вод, содержащих радионуклиды

Разрешение на сброс радионуклидов в водные объекты и на рельеф местности № __________ от __ ____ _________

Наименование государственного органа, выдавшего разрешение _________________________________________________________

Срок действия разрешения с __ ____ _________ до __ ____ _________

Код по ОКЕИ: тыс.м3 –114; Бк - 323

№ строки

№ (наименование) выпуска сточных вод

Наименование приемника сточных вод

Отведено сточных вод, со-держащих радионук-лиды, тыс.м3

Сброс радионуклидов со сточными водами за отчетный год, Бк

_________________ 1)

_________________

_________________

_________________

_________________

разрешен-ный

фактичес-ки

разрешен-ный

фактичес-ки

разрешен-ный

фактичес-ки

разрешен-ный

фактичес-ки

разрешен-ный

фактичес-ки

А

Б

В

1

2

3

4

5

6

7

8

9

10

11

300

Х

Х

301

302

303

304

Примечание:

1) Здесь и далее указывается наименование радионуклида.

4. Превышение значений уровня вмешательства в подземных водах

Количество наблюдательных скважин, находящихся на балансе предприятия: _________ шт.

Код по ОКЕИ: шт –796; км - 008

№ строки	№ наблюда-тельной скважины	Наименование зоны контроля 1)	Источник поступления радионуклидов в подземные воды	Расстояние от источника до наблюдательной скважины, км	Среднегодовое содержание радионуклидов в подземных водах в наблюдательных скважинах с превышением УВ вода, Бк/кг
					___________ 2)	_____________	_____________	_____________	_____________
А	Б	В	Г	1	2	3	4	5	6
401
402
403
404

Примечание:

1) В графе В проставляются следующие обозначения: “ПП” (промплощадка); “СЗЗ” (санитарно-защитная зона); “ЗН” (зона наблюдения).

2) Здесь и далее указывается наименование радионуклида.

5. Территории, загрязненные радионуклидами, и их реабилитация

Код по ОКЕИ: тыс.м2–058

№ стро-ки	Наименование показателя	Площадь загрязненных и реабилитированных территорий, тыс.м2	Радионуклиды, определяющие загрязнение
		Всего	с мощностью дозы гамма-излучения мкГр/час	с плотностью загрязнения, Бк/м2	альфа-активными нуклидами
				стронций - 90	цезий - 137
			до 0,5	от 0,5 до 2	более 2	до 5*104	более 5*104	до 5*105	более 5*105
А	Б	1	2	3	4	5	6	7	8	9	10
510	ЗА ОТЧЕТНЫЙ ГОД Загрязнено, выявлено загрязненных территорий, всего (511+512+513)
511	в том числе: на промплощадке
512	в санитарно-защитной зоне
513	в зоне наблюдения
520	ЗА ОТЧЕТНЫЙ ГОД Реабилитировано территорий, всего (521+522+523+524)
521	в том числе: под сельскохозяйственные угодья
522	под лесные насаждения
523	под строительство
524	для санитарно-гигиенического использования
530	НАЛИЧИЕ НА КОНЕЦ ОТЧЕТНОГО ГОДА Загрязненных территорий, всего (531+532+533)
531	в том числе: на промплощадке
532	в санитарно-защитной зоне
533	в зоне наблюдения

Продолжение таблицы 5

А	Б	1	2	3	4	5	6	7	8	9	10
540	Из строки 530: Загрязненные земли, всего (541+551+561)
541	в том числе: на промплощадке
542	из них:
543
544
545
546
551	в санитарно-защитной зоне
552	из них:
553
554
561	в зоне наблюдения
562	из них:
563
564
570	Загрязненные водоемы, всего (571+581+591)
571	в том числе: на промплощадке
572	из них:
573
574
575
581	в санитарно-защитной зоне
582	из них:
583
584
591	в зоне наблюдения
592	из них:
593
594

6. Выполнение мероприятий по снижению радиационного воздействия на окружающую среду

Код по ОКЕИ: млн.руб. – 385; м3 – 113; тыс.м2 – 114; т – 168; Бк - 323

№ строки	Мероприятия, выполнение которых предусмотрено в отчетном году	Сроки выполнения (начало - окончание)	Использовано (освоено) средств на проведение мероприятий (за счет всех источников финансирования) - млн.руб.	Природоохранный эффект мероприятия
				Код при-родоох-ранного эффекта 1)	Сокращение количества РАО, объема сбросов (выбросов); площадь тер-риторий со снижением уровня загрязнения	Наименование радионуклида, по которому происходит снижение воздействия на окружающую среду	Величина предотвращенного сброса (выброса) радионуклида, уменьшение количества РАО (Бк); снижение уровня загрязнения территорий, (Бк/м2, мкГр/час)
			Всего за отчетный год	в том числе средств из федерального бюджета		единица из-мерения 2)	всего за отчетный год		единица из-мерения 3)	Фактичес-кая за от-четный год	расчетная годовая
А	Б	1	2	3	4	5	6	7	8	9	10
601
602
603
604
605

Примечание:

1) В графе 4 проставляются следующие коды:

01 – обезвреживание и сокращение радиоактивных отходов;	02 – сокращение выбросов радионуклидов;
03 – сокращение сброса радионуклидов;	04 – снижение поступления радионуклидов в подземные воды;
05 – уменьшение площади загрязненных территорий;	06 – прочие природоохранные эффекты.

2) Единицы измерения: м3; тыс.м2; т; Бк.

3) Единицы измерения: Бк; Бк/м2; мкГр/час.

Руководитель
организации	(Ф.И.О.)		(подпись)
Должностное лицо,
ответственное за
составление формы	(должность)		(Ф.И.О.)		(подпись)
			“____” _________20__ год
	(номер контактного телефона)		(дата составления документа)

Приложение 2. Коды генерации базы данных в репозитарий

-- c:tempuir.tab

--

-- Generated for Oracle 8 on Tue Dec 25 16:29:20 2001 by Server Generator 6.0.3.3.0

PROMPT Creating Table 'OTCHETNOST'

CREATE TABLE OTCHETNOST

(CODE NUMBER(6) NOT NULL

,ПЕРИОДИЧН_CODE VARCHAR2(240) NOT NULL

,PARAM_CODE NUMBER(6) NOT NULL

,НОРМАТИВ_CODE NUMBER(6) NOT NULL

,НОРМАТИВ_CODE_ЯВЛЯЕТСЯ NUMBER(6) NOT NULL

,UNI1_UNITMEAS VARCHAR2(20)

,ОБЪЕКТ_ЭМ_CODE NUMBER(6) NOT NULL

)

/

COMMENT ON COLUMN OTCHETNOST.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN OTCHETNOST.ПЕРИОДИЧН_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN OTCHETNOST.PARAM_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN OTCHETNOST.НОРМАТИВ_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN OTCHETNOST.НОРМАТИВ_CODE_ЯВЛЯЕТСЯ IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN OTCHETNOST.ОБЪЕКТ_ЭМ_CODE IS 'Уникальный идентификатор'

/

PROMPT Creating Table 'ORGANIZATION'

CREATE TABLE ORGANIZATION

(CODE NUMBER(6,0) NOT NULL

,NAME VARCHAR2(200) NOT NULL

,SHORTNAME VARCHAR2(50)

,ORG_TYPE VARCHAR2(50) NOT NULL

,ADDRESS VARCHAR2(200)

,SERVICE VARCHAR2(2000)

,TELEPHONE VARCHAR2(200)

,REKV VARCHAR2(200)

,STATUS VARCHAR2(1) DEFAULT '(''н'')'

,SGYK NUMBER(1,0) DEFAULT 0

,EXPORG NUMBER(1,0) DEFAULT 0

,LAWSTATUS VARCHAR2(50)

,POWERORG NUMBER(1,0) DEFAULT 0

,INFEXCH VARCHAR2(3)

,ORG_CODE NUMBER(6,0)

,ПОДОТЧЕТНА_ОРГ NUMBER(6,0)

)

/

PROMPT Creating Table 'FORMA_OTCHETNOSTI'

CREATE TABLE FORMA_OTCHETNOSTI

(CODE NUMBER(6) NOT NULL

,POST VARCHAR2(240)

,NAME VARCHAR2(240)

,DATA VARCHAR2(240)

,DATA2 VARCHAR2(4)

,DATA3 VARCHAR2(240)

,ORG_CODE NUMBER(6,0) NOT NULL

,ORG_CODE_УТВЕРЖДЕНА NUMBER(6,0) NOT NULL

,ПЕРИОДИЧН_CODE VARCHAR2(240) NOT NULL

,ФОРМА_CODE NUMBER(6)

)

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.CODE IS 'Уникльный идентификатор'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.POST IS 'Должность лица ответственного за заполнение формы'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.NAME IS 'ФИО лица ответственного за заполнение формы'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.DATA IS 'дата составления документа'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.DATA2 IS 'дата получения документа'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.DATA3 IS 'дата введения формы отчнтности'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.ПЕРИОДИЧН_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN FORMA_OTCHETNOSTI.ФОРМА_CODE IS 'Уникльный идентификатор'

/

PROMPT Creating Table 'SUBSTANCE'

CREATE TABLE SUBSTANCE

(CODE NUMBER(6) NOT NULL

,FULLNAME VARCHAR2(50) NOT NULL

,SHORTNAME VARCHAR2(20) NOT NULL

,CEMICALNAME VARCHAR2(30)

,DESCR VARCHAR2(1000)

)

/

COMMENT ON COLUMN SUBSTANCE.CODE IS 'Уникальный идентификатор'

/

COMMENT ON COLUMN SUBSTANCE.FULLNAME IS 'В соответствии с реестром'

/

COMMENT ON COLUMN SUBSTANCE.SHORTNAME IS 'В соответствии с реестром'

/

COMMENT ON COLUMN SUBSTANCE.CEMICALNAME IS 'Химическая формула (название)'

/

COMMENT ON COLUMN SUBSTANCE.DESCR IS 'воздействует на ...'

/

PROMPT Creating Table 'PERIOD'

CREATE TABLE PERIOD

(CODE VARCHAR2(240) NOT NULL

,NAME VARCHAR2(240) NOT NULL

)

/

COMMENT ON COLUMN PERIOD.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN PERIOD.NAME IS 'Наименование периода отчетности'

/

PROMPT Creating Table 'ECOLOGY_NUMBER'

CREATE TABLE ECOLOGY_NUMBER

(CODE NUMBER(6) NOT NULL

,FULLNAME VARCHAR2(50)

,SHORTNAME VARCHAR2(20)

,FLAG VARCHAR2(1) NOT NULL

,DESCR VARCHAR2(100)

,ГРУППА_ПАР_CODE NUMBER(6) NOT NULL

,UNI1_UNITMEAS VARCHAR2(20)

,ТИП_ЭВ_CODE NUMBER(6) NOT NULL

)

/

COMMENT ON COLUMN ECOLOGY_NUMBER.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.FULLNAME IS 'Наименование полное'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.SHORTNAME IS 'Наименование краткое'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.FLAG IS 'указатель на тип значения (числовое, текстовое)'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.DESCR IS 'Описание'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.ГРУППА_ПАР_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_NUMBER.ТИП_ЭВ_CODE IS 'Уникальный идентификатор'

/

PROMPT Creating Table 'GROUP_PARAMETR'

CREATE TABLE GROUP_PARAMETR

(CODE NUMBER(6) NOT NULL

,NAME VARCHAR2(240) NOT NULL

,ГРУППА_ПАР NUMBER(6)

)

/

COMMENT ON COLUMN GROUP_PARAMETR.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN GROUP_PARAMETR.NAME IS 'Наименование группы параметров'

/

COMMENT ON COLUMN GROUP_PARAMETR.ГРУППА_ПАР IS 'Уникальный идентификатор сущности'

/

PROMPT Creating Table 'TYPE_ECOLOGY_NUMBER'

CREATE TABLE TYPE_ECOLOGY_NUMBER

(CODE NUMBER(6) NOT NULL

,NAME VARCHAR2(240) NOT NULL

,ТИП_ЭВ NUMBER(6)

)

/

COMMENT ON COLUMN TYPE_ECOLOGY_NUMBER.CODE IS 'Уникальный идентификатор'

/

COMMENT ON COLUMN TYPE_ECOLOGY_NUMBER.NAME IS 'Наименование типа параметра'

/

COMMENT ON COLUMN TYPE_ECOLOGY_NUMBER.ТИП_ЭВ IS 'Уникальный идентификатор'

/

PROMPT Creating Table 'ZAGRAZN_VV'

CREATE TABLE ZAGRAZN_VV

(CODE NUMBER(6) NOT NULL

,СМЕСИ_CODE NUMBER(6)

,ISO_SHORTNAME VARCHAR2(10)

,SUBSTANCE_CODE NUMBER(6)

)

/

COMMENT ON COLUMN ZAGRAZN_VV.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ZAGRAZN_VV.СМЕСИ_CODE IS 'Уникальный идетификатор сущности'

/

COMMENT ON COLUMN ZAGRAZN_VV.SUBSTANCE_CODE IS 'Уникальный идентификатор'

/

PROMPT Creating Table 'SMES'

CREATE TABLE SMES

(CODE NUMBER(6) NOT NULL

,FULLNAME VARCHAR2(200) NOT NULL

,SHORTNAME VARCHAR2(20)

)

/

COMMENT ON COLUMN SMES.CODE IS 'Уникальный идетификатор сущности'

/

COMMENT ON COLUMN SMES.FULLNAME IS 'Полное наименование смеси веществ'

/

COMMENT ON COLUMN SMES.SHORTNAME IS 'Краткое наименование смеси веществ'

/

PROMPT Creating Table 'ECOLOGY_PARAM'

CREATE TABLE ECOLOGY_PARAM

(CODE NUMBER(6) NOT NULL

,DATA_B DATE NOT NULL

,DATA_E DATE

,TYPE_PARAMETR VARCHAR2(240) NOT NULL

,TYPE_ZNACH VARCHAR2(240) NOT NULL

,DESCR VARCHAR2(100)

,UNI1_UNITMEAS VARCHAR2(20)

,ЭКОЛОГ_CODE NUMBER(6) NOT NULL

,ЗАГР_ВВ_CODE NUMBER(6)

,НОРМАТИВ_CODE NUMBER(6) NOT NULL

,НОРМАТИВ_CODE_ИМЕЕТ NUMBER(6) NOT NULL

,ФОРМА_CODE NUMBER(6)

,ПЕРИОДИЧН_CODE VARCHAR2(240) NOT NULL

)

/

COMMENT ON COLUMN ECOLOGY_PARAM.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_PARAM.DATA_B IS 'Дата ввода в действие параметра'

/

COMMENT ON COLUMN ECOLOGY_PARAM.DATA_E IS 'Дата завершения действия параметра'

/

COMMENT ON COLUMN ECOLOGY_PARAM.TYPE_PARAMETR IS 'Тип параметра (фактический, согласованный, норматив)'

/

COMMENT ON COLUMN ECOLOGY_PARAM.TYPE_ZNACH IS 'Тип значения (расчетное, исходное)'

/

COMMENT ON COLUMN ECOLOGY_PARAM.DESCR IS 'Комментарий'

/

COMMENT ON COLUMN ECOLOGY_PARAM.ЭКОЛОГ_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_PARAM.ЗАГР_ВВ_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_PARAM.НОРМАТИВ_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_PARAM.НОРМАТИВ_CODE_ИМЕЕТ IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN ECOLOGY_PARAM.ФОРМА_CODE IS 'Уникльный идентификатор'

/

COMMENT ON COLUMN ECOLOGY_PARAM.ПЕРИОДИЧН_CODE IS 'Уникальный идентификатор сущности'

/

PROMPT Creating Table 'NORMATIV_PARAM'

CREATE TABLE NORMATIV_PARAM

(CODE NUMBER(6) NOT NULL

,НОРМАТИВ_TYPE VARCHAR2(240)

)

/

COMMENT ON COLUMN NORMATIV_PARAM.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN NORMATIV_PARAM.НОРМАТИВ_TYPE IS 'Тип норматива'

/

PROMPT Creating Table 'TERRITORIES'

CREATE TABLE TERRITORIES

(CODE NUMBER NOT NULL

,KINDT NUMBER(2,0) NOT NULL

,NAME VARCHAR2(200) NOT NULL

,DESCR VARCHAR2(4000)

,SQUARE NUMBER

,GRIF NUMBER(2,0) DEFAULT 0 NOT NULL

)

/

PROMPT Creating Table 'OBJECT_EM'

CREATE TABLE OBJECT_EM

(CODE NUMBER(6) NOT NULL

,TYPE_OBJ VARCHAR2(240)

,CODE_OBJ VARCHAR2(240)

,CLASS VARCHAR2(240)

,DET_STRUCT VARCHAR2(240)

,DET_TER VARCHAR2(240)

)

/

COMMENT ON COLUMN OBJECT_EM.CODE IS 'Уникальный идентификатор'

/

COMMENT ON COLUMN OBJECT_EM.TYPE_OBJ IS 'Тип объекта мониторинга'

/

COMMENT ON COLUMN OBJECT_EM.CODE_OBJ IS 'код объекта мониторинга'

/

COMMENT ON COLUMN OBJECT_EM.CLASS IS 'класс объекта (население территория объект)'

/

COMMENT ON COLUMN OBJECT_EM.DET_STRUCT IS 'детализация структуры'

/

COMMENT ON COLUMN OBJECT_EM.DET_TER IS 'детализация по местонахождению'

/

PROMPT Creating Table 'UNITMEASURE'

CREATE TABLE UNITMEASURE

(UNITMEAS VARCHAR2(20) NOT NULL

,MEASSYST VARCHAR2(15) NOT NULL

,FACTOR NUMBER

,CODE NUMBER(4,0)

,DISPLAY_FORMAT VARCHAR2(20)

)

/

COMMENT ON COLUMN UNITMEASURE.FACTOR IS 'Коэффициент перевода единиц измерения (1-для основного)'

/

COMMENT ON COLUMN UNITMEASURE.CODE IS 'Уникальный код'

/

COMMENT ON COLUMN UNITMEASURE.DISPLAY_FORMAT IS 'Форматная маска'

/

PROMPT Creating Table 'VALUE'

CREATE TABLE VALUE

(CODE NUMBER(6) NOT NULL

,DATA_START DATE NOT NULL

,DATA_STOP DATE NOT NULL

,VALUE_NUMBER NUMBER

,VALUE_TEXT VARCHAR2(240)

,DESCR VARCHAR2(240)

,PARAM_CODE NUMBER(6) NOT NULL

,ORG_CODE NUMBER(6,0) NOT NULL

,ОТЧЕТНОСТЬ_CODE NUMBER(6) NOT NULL

)

/

COMMENT ON COLUMN VALUE.CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN VALUE.DATA_START IS 'Дата начала усреднения параметра'

/

COMMENT ON COLUMN VALUE.DATA_STOP IS 'Дата окончания усреднения'

/

COMMENT ON COLUMN VALUE.VALUE_NUMBER IS 'Численное значение величины'

/

COMMENT ON COLUMN VALUE.VALUE_TEXT IS 'Текстовое значение величины'

/

COMMENT ON COLUMN VALUE.DESCR IS 'Комментарии'

/

COMMENT ON COLUMN VALUE.PARAM_CODE IS 'Уникальный идентификатор сущности'

/

COMMENT ON COLUMN VALUE.ОТЧЕТНОСТЬ_CODE IS 'Уникальный идентификатор сущности'

/

PROMPT Creating Table 'ISOTOPE'

CREATE TABLE ISOTOPE

(SHORTNAME VARCHAR2(10) NOT NULL

,FULLNAME VARCHAR2(50) NOT NULL

)

/

-- c:tempuir.con

--

-- Generated for Oracle 8 on Tue Dec 25 16:29:20 2001 by Server Generator 6.0.3.3.0

PROMPT Creating Primary Key on 'OTCHETNOST'

ALTER TABLE OTCHETNOST

ADD CONSTRAINT ОТЧЕТНОСТЬ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'ORGANIZATION'

ALTER TABLE ORGANIZATION

ADD CONSTRAINT ORG_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'FORMA_OTCHETNOSTI'

ALTER TABLE FORMA_OTCHETNOSTI

ADD CONSTRAINT ФОРМА_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'SUBSTANCE'

ALTER TABLE SUBSTANCE

ADD CONSTRAINT SUBSTANCE_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'PERIOD'

ALTER TABLE PERIOD

ADD CONSTRAINT ПЕРИОДИЧН_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'ECOLOGY_NUMBER'

ALTER TABLE ECOLOGY_NUMBER

ADD CONSTRAINT ЭКОЛОГ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'GROUP_PARAMETR'

ALTER TABLE GROUP_PARAMETR

ADD CONSTRAINT ГРУППА_ПАР_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'TYPE_ECOLOGY_NUMBER'

ALTER TABLE TYPE_ECOLOGY_NUMBER

ADD CONSTRAINT ТИП_ЭВ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'ZAGRAZN_VV'

ALTER TABLE ZAGRAZN_VV

ADD CONSTRAINT ЗАГР_ВВ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'SMES'

ALTER TABLE SMES

ADD CONSTRAINT СМЕСИ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'ECOLOGY_PARAM'

ALTER TABLE ECOLOGY_PARAM

ADD CONSTRAINT PARAM_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'NORMATIV_PARAM'

ALTER TABLE NORMATIV_PARAM

ADD CONSTRAINT НОРМАТИВ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'TERRITORIES'

ALTER TABLE TERRITORIES

ADD CONSTRAINT TER3_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'OBJECT_EM'

ALTER TABLE OBJECT_EM

ADD CONSTRAINT ОБЪЕКТ_ЭМ_PK PRIMARY KEY

(CODE)

/

PROMPT Creating Primary Key on 'UNITMEASURE'

ALTER TABLE UNITMEASURE

ADD CONSTRAINT UNI1_PK PRIMARY KEY

(UNITMEAS)

/

PROMPT Creating Primary Key on 'ISOTOPE'

ALTER TABLE ISOTOPE

ADD CONSTRAINT ISO_PK PRIMARY KEY

(SHORTNAME)

/

PROMPT Creating Unique Keys on 'ORGANIZATION'

ALTER TABLE ORGANIZATION

ADD ( CONSTRAINT ORG_SYS_C002890_UK UNIQUE

(NAME))

ADD ( CONSTRAINT ORG_SYS_C002891_UK UNIQUE

(SHORTNAME))

/

PROMPT Creating Unique Keys on 'TERRITORIES'

ALTER TABLE TERRITORIES

ADD ( CONSTRAINT TER3_SYS_C0027487_UK UNIQUE

(NAME))

/

PROMPT Creating Foreign Keys on 'OTCHETNOST'

ALTER TABLE OTCHETNOST ADD CONSTRAINT

ОТЧЕТНОСТЬ_ПЕРИОДИЧН_FK FOREIGN KEY

(ПЕРИОДИЧН_CODE) REFERENCES PERIOD

(CODE) ADD CONSTRAINT

ОТЧЕТНОСТЬ_PARAM_FK FOREIGN KEY

(PARAM_CODE) REFERENCES ECOLOGY_PARAM

(CODE) ADD CONSTRAINT

ОТЧЕТНОСТЬ_НОРМАТИВ_FK FOREIGN KEY

(НОРМАТИВ_CODE) REFERENCES NORMATIV_PARAM

(CODE) ADD CONSTRAINT

ОТЧЕТНОСТЬ_НОРМАТИВ_ЯВЛЯЕТС_FK FOREIGN KEY

(НОРМАТИВ_CODE_ЯВЛЯЕТСЯ) REFERENCES NORMATIV_PARAM

(CODE) ADD CONSTRAINT

ОТЧЕТНОСТЬ_UNI1_FK FOREIGN KEY

(UNI1_UNITMEAS) REFERENCES UNITMEASURE

(UNITMEAS) ADD CONSTRAINT

ОТЧЕТНОСТЬ_ОБЪЕКТ_ЭМ_FK FOREIGN KEY

(ОБЪЕКТ_ЭМ_CODE) REFERENCES OBJECT_EM

(CODE)

/

PROMPT Creating Foreign Keys on 'FORMA_OTCHETNOSTI'

ALTER TABLE FORMA_OTCHETNOSTI ADD CONSTRAINT

ФОРМА_ФОРМА_FK FOREIGN KEY

(ФОРМА_CODE) REFERENCES FORMA_OTCHETNOSTI

(CODE) ADD CONSTRAINT

ФОРМА_ORG_УТВЕРЖДЕНА_FK FOREIGN KEY

(ORG_CODE_УТВЕРЖДЕНА) REFERENCES ORGANIZATION

(CODE) ADD CONSTRAINT

ФОРМА_ПЕРИОДИЧН_FK FOREIGN KEY

(ПЕРИОДИЧН_CODE) REFERENCES PERIOD

(CODE)

/

PROMPT Creating Foreign Keys on 'ECOLOGY_NUMBER'

ALTER TABLE ECOLOGY_NUMBER ADD CONSTRAINT

ЭКОЛОГ_UNI1_FK FOREIGN KEY

(UNI1_UNITMEAS) REFERENCES UNITMEASURE

(UNITMEAS) ADD CONSTRAINT

ЭКОЛОГ_ТИП_ЭВ_FK FOREIGN KEY

(ТИП_ЭВ_CODE) REFERENCES TYPE_ECOLOGY_NUMBER

(CODE) ADD CONSTRAINT

ЭКОЛОГ_ГРУППА_ПАР_FK FOREIGN KEY

(ГРУППА_ПАР_CODE) REFERENCES GROUP_PARAMETR

(CODE)

/

PROMPT Creating Foreign Keys on 'GROUP_PARAMETR'

ALTER TABLE GROUP_PARAMETR ADD CONSTRAINT

ГРУППА_ПАР_ГРУППА_ПАР_FK FOREIGN KEY

(ГРУППА_ПАР) REFERENCES GROUP_PARAMETR

(CODE)

/

PROMPT Creating Foreign Keys on 'TYPE_ECOLOGY_NUMBER'

ALTER TABLE TYPE_ECOLOGY_NUMBER ADD CONSTRAINT

ТИП_ЭВ_FK FOREIGN KEY

(ТИП_ЭВ) REFERENCES TYPE_ECOLOGY_NUMBER

(CODE)

/

PROMPT Creating Foreign Keys on 'ZAGRAZN_VV'

ALTER TABLE ZAGRAZN_VV ADD CONSTRAINT

ЗАГР_ВВ_СМЕСИ_FK FOREIGN KEY

(СМЕСИ_CODE) REFERENCES SMES

(CODE) ADD CONSTRAINT

ЗАГР_ВВ_ISO_FK FOREIGN KEY

(ISO_SHORTNAME) REFERENCES ISOTOPE

(SHORTNAME) ADD CONSTRAINT

ЗАГР_ВВ_SUBSTANCE_FK FOREIGN KEY

(SUBSTANCE_CODE) REFERENCES SUBSTANCE

(CODE)

/

PROMPT Creating Foreign Keys on 'ECOLOGY_PARAM'

ALTER TABLE ECOLOGY_PARAM ADD CONSTRAINT

PARAM_UNI1_FK FOREIGN KEY

(UNI1_UNITMEAS) REFERENCES UNITMEASURE

(UNITMEAS) ADD CONSTRAINT

PARAM_ЭКОЛОГ_FK FOREIGN KEY

(ЭКОЛОГ_CODE) REFERENCES ECOLOGY_NUMBER

(CODE) ADD CONSTRAINT

PARAM_ЗАГР_ВВ_FK FOREIGN KEY

(ЗАГР_ВВ_CODE) REFERENCES ZAGRAZN_VV

(CODE) ADD CONSTRAINT

PARAM_ФОРМА_FK FOREIGN KEY

(ФОРМА_CODE) REFERENCES FORMA_OTCHETNOSTI

(CODE) ADD CONSTRAINT

PARAM_ПЕРИОДИЧН_FK FOREIGN KEY

(ПЕРИОДИЧН_CODE) REFERENCES PERIOD

(CODE)

/

PROMPT Creating Foreign Keys on 'VALUE'

ALTER TABLE VALUE ADD CONSTRAINT

VALUE_ORG_FK FOREIGN KEY

(ORG_CODE) REFERENCES ORGANIZATION

(CODE) ADD CONSTRAINT

VALUE_ОТЧЕТНОСТЬ_FK FOREIGN KEY

(ОТЧЕТНОСТЬ_CODE) REFERENCES OTCHETNOST

(CODE)

/

Приложение 3. Пример текста программы.

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "main.h"

#include "basic.h"

#include "unislct.h"

#include "filter.h"

#include "fieldsN.h"

#include "fieldText.h"

#include "fieldList.h"

#include "fieldValue.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma link "tbltmpl"

#pragma resource "*.dfm"

void __fastcall UploadMetaInfo(TformDescription *t_desc, AnsiString formname)

{

TADOQuery *mrT = new TADOQuery(NULL);

try

{

mrT->Connection = frmMain->cnncMetaInfo;

t_desc->formname = formname;

if (SELECT(mrT, "select * from forms where name = '" + t_desc->formname + "'"))

{

t_desc->title = mrT->FieldByName("title")->AsString;

t_desc->edittitle = mrT->FieldByName("edittitle")->AsString;

t_desc->accepttitle = mrT->FieldByName("accepttitle")->AsString;

t_desc->table = mrT->FieldByName("table")->AsString;

t_desc->keyfield = mrT->FieldByName("keyfield")->AsString;

t_desc->namefield = mrT->FieldByName("namefield")->AsString;

t_desc->listfield = mrT->FieldByName("listfield")->AsString;

t_desc->shortnamefield = mrT->FieldByName("shortnamefield")->AsString;

t_desc->sortfield = mrT->FieldByName("sortfield")->AsString;

t_desc->sequencename = mrT->FieldByName("sequencename")->AsString;

t_desc->readonly = mrT->FieldByName("readonly")->AsBoolean;

t_desc->takefieldsfrom = mrT->FieldByName("takefieldsfrom")->AsString;

t_desc->type = mrT->FieldByName("type")->AsString;

t_desc->hideonaccept = mrT->FieldByName("hideonaccept")->AsBoolean;

t_desc->parentfield = mrT->FieldByName("parentfield")->AsString;

} else

{

throw Exception("Ошибка: Форма {" + t_desc->formname + "} отсутствует");

}

} __finally

{

delete mrT;

}

}

//---------------------------------------------------------------------------

__fastcall TfrmUniForm::TfrmUniForm(TComponent* Owner, TMenuItem* itm, AnsiString formname)

: TForm(Owner)

{

this->itm = itm;

uid = "";

link = false;

desc = new TformDescription();

slv = NULL; lnk = NULL;

desc->formname = formname;

form->dsc = desc;

parentform = NULL;

if (itm) itm->Enabled = false;

accept = false;

btnlst = new TList();

fltlst = new TList();

fldlst = new TList();

UploadInfo();

}

//---------------------------------------------------------------------------

void __fastcall TfrmUniForm::UploadInfo()

{

UploadMetaInfo(desc, desc->formname);

this->Caption = desc->title;

form->editpanel->Caption =