I found bug in PL/SQL Dev 6.0.4 in comparing:
source:
target:
differnces:
There is no "DROP COLUMN" statement id generated script!!!
source:
Code:
-- Create table
create table RODZAJ_OBIEKTU
(
ID_RODZAJU_OBIEKTU NUMBER(9) not null,
KOD_RODZAJU_OBIEKTU VARCHAR2(15) not null,
NAZWA_RODZAJU_OBIEKTU VARCHAR2(30) not null,
DOSTEPNY CHAR(1) default 'F' not null,
DOSTEPNY_SORT NUMBER(1) default 9 not null,
LICZNIK CHAR(1) default 'F' not null,
ID_KATEGORII_OBIEKTU NUMBER(9) not null,
TYP NUMBER(3) not null,
SANITARNA CHAR(1) default 'F' not null,
DESZCZOWA CHAR(1) default 'F' not null,
OGOLNOSPLAWNA CHAR(1) default 'F' not null,
MATERIAL CHAR(1) default 'F' not null,
SREDNICA CHAR(1) default 'F' not null,
RODZ_WLAZU CHAR(1) default 'F' not null,
ID_RODZ_KANAL NUMBER(9)
)
tablespace USERS
pctfree 10
initrans 1
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
-- Add comments to the columns
comment on column RODZAJ_OBIEKTU.OGOLNOSPLAWNA
is 'Typ rodzaju obiektu';
comment on column RODZAJ_OBIEKTU.MATERIAL
is 'Czy obiekty danego rodzaju mają materiał';
comment on column RODZAJ_OBIEKTU.SREDNICA
is 'Czy obiekty danego rodzaju mają średnicę';
comment on column RODZAJ_OBIEKTU.RODZ_WLAZU
is 'Czy obiekty danego rodzaju mają rodzaj włazu';
-- Create/Recreate primary, unique and foreign key constraints
alter table RODZAJ_OBIEKTU
add constraint PK_RODZAJ_OBIEKTU primary key (ID_RODZAJU_OBIEKTU)
using index
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
alter table RODZAJ_OBIEKTU
add constraint AK_RODZAJ_KAT unique (ID_KATEGORII_OBIEKTU, ID_RODZAJU_OBIEKTU)
using index
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
alter table RODZAJ_OBIEKTU
add constraint FK_RODZAJ_O_REFERENCE_KATEGORI foreign key (ID_KATEGORII_OBIEKTU)
references KATEGORIA_OBIEKTU (ID_KATEGORII_OBIEKTU);
alter table RODZAJ_OBIEKTU
add constraint FK_RODZ_OB_REF_RODZ_KANAL foreign key (ID_RODZ_KANAL)
references RODZAJ_KANALIZACJI (ID_RODZ_KANAL);
-- Create/Recreate check constraints
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_MAT
check (material IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_RODZ_WL
check (rodz_wlazu IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_SRED
check (srednica IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_TYP_RODZAJU
check (TYP IN (10,12,15,17,20,22,25,27,30,32,35,37,40,42,45,47,50,52,55,60,65,68,71,75,80, 85,90,95,97));
alter table RODZAJ_OBIEKTU
add constraint CKT_RODZAJ_OBIEKTU
check ((DOSTEPNY = 'T' AND DOSTEPNY_SORT = 1) OR (DOSTEPNY = 'F' AND DOSTEPNY_SORT=9));
-- Create/Recreate indexes
create index IDX_RODZAJ_OBIEKTU_DOST_KOD on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=POLISH'))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create index IDX_RODZAJ_OBIEKTU_DOST_NAZWA on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(NAZWA_RODZAJU_OBIEKTU),'nls_sort=POLISH'))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create unique index IDX_RODZAJ_OBIEKTU_KAT_KOD on RODZAJ_OBIEKTU (ID_KATEGORII_OBIEKTU, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=POLISH'))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create index IDX_RODZAJ_OBIEKTU_KOD on RODZAJ_OBIEKTU (NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=POLISH'))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create unique index IDX_TYP_RODZAJU_OBIEKTU on RODZAJ_OBIEKTU (TYP)
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
Code:
-- Create table
create table RODZAJ_OBIEKTU
(
ID_RODZAJU_OBIEKTU NUMBER(9) not null,
KOD_RODZAJU_OBIEKTU VARCHAR2(15) not null,
NAZWA_RODZAJU_OBIEKTU VARCHAR2(30) not null,
DOSTEPNY CHAR(1) default 'F' not null,
DOSTEPNY_SORT NUMBER(1) default 9 not null,
LICZNIK CHAR(1) default 'F' not null,
ID_KATEGORII_OBIEKTU NUMBER(9) not null,
TYP NUMBER(3) not null,
MATERIAL CHAR(1) default 'F' not null,
SREDNICA CHAR(1) default 'F' not null,
RODZ_WLAZU CHAR(1) default 'F' not null,
ID_RODZ_KANAL NUMBER(9)
)
tablespace USERS
pctfree 10
initrans 1
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
-- Add comments to the columns
comment on column RODZAJ_OBIEKTU.MATERIAL
is 'Czy obiekty danego rodzaju mają materiał';
comment on column RODZAJ_OBIEKTU.SREDNICA
is 'Czy obiekty danego rodzaju mają średnicę';
comment on column RODZAJ_OBIEKTU.RODZ_WLAZU
is 'Czy obiekty danego rodzaju mają rodzaj włazu';
-- Create/Recreate primary, unique and foreign key constraints
alter table RODZAJ_OBIEKTU
add constraint PK_RODZAJ_OBIEKTU primary key (ID_RODZAJU_OBIEKTU)
using index
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
alter table RODZAJ_OBIEKTU
add constraint AK_RODZAJ_KAT unique (ID_KATEGORII_OBIEKTU, ID_RODZAJU_OBIEKTU)
using index
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
alter table RODZAJ_OBIEKTU
add constraint FK_RODZAJ_O_REFERENCE_KATEGORI foreign key (ID_KATEGORII_OBIEKTU)
references KATEGORIA_OBIEKTU (ID_KATEGORII_OBIEKTU);
alter table RODZAJ_OBIEKTU
add constraint FK_RODZ_OB_REF_RODZ_KANAL foreign key (ID_RODZ_KANAL)
references RODZAJ_KANALIZACJI (ID_RODZ_KANAL);
-- Create/Recreate check constraints
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_MAT
check (material IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_RODZ_WL
check (rodz_wlazu IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_RODZ_OB_SRED
check (srednica IN ('T','F',' '));
alter table RODZAJ_OBIEKTU
add constraint CKC_TYP_RODZAJU
check (TYP IN (10,12,15,17,20,22,25,27,30,32,35,37,40,42,45,47,50,52,55,60,65,68,71,75,80, 85,90,95,97));
alter table RODZAJ_OBIEKTU
add constraint CKT_RODZAJ_OBIEKTU
check ((DOSTEPNY = 'T' AND DOSTEPNY_SORT = 1) OR (DOSTEPNY = 'F' AND DOSTEPNY_SORT=9));
-- Create/Recreate indexes
create index IDX_RODZAJ_OBIEKTU_DOST_KOD on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create index IDX_RODZAJ_OBIEKTU_DOST_NAZWA on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(NAZWA_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create unique index IDX_RODZAJ_OBIEKTU_KAT_KOD on RODZAJ_OBIEKTU (ID_KATEGORII_OBIEKTU, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create index IDX_RODZAJ_OBIEKTU_KOD on RODZAJ_OBIEKTU (NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
create unique index IDX_TYP_RODZAJU_OBIEKTU on RODZAJ_OBIEKTU (TYP)
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
Code:
rem Differences between KN@SZPROD01 and KN@LPORA2, created on 2005-03-10
rem Press Apply button, or run in Command Window or SQL*Plus, connected as KN@LPORA2
------------------------------------
-- Changed table rodzaj_obiektu --
------------------------------------
-- Create/Recreate indexes
drop index IDX_RODZAJ_OBIEKTU_DOST_KOD;
create index IDX_RODZAJ_OBIEKTU_DOST_KOD on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
drop index IDX_RODZAJ_OBIEKTU_DOST_NAZWA;
create index IDX_RODZAJ_OBIEKTU_DOST_NAZWA on RODZAJ_OBIEKTU (DOSTEPNY_SORT, NLSSORT(UPPER(NAZWA_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
drop index IDX_RODZAJ_OBIEKTU_KAT_KOD;
create unique index IDX_RODZAJ_OBIEKTU_KAT_KOD on RODZAJ_OBIEKTU (ID_KATEGORII_OBIEKTU, NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);
drop index IDX_RODZAJ_OBIEKTU_KOD;
create index IDX_RODZAJ_OBIEKTU_KOD on RODZAJ_OBIEKTU (NLSSORT(UPPER(KOD_RODZAJU_OBIEKTU),'nls_sort=''POLISH'''))
tablespace USERS
pctfree 10
initrans 2
maxtrans 255
storage
(
initial 64K
minextents 1
maxextents unlimited
);