﻿SQLMODE INTERNAL
//
CREATE USER ANDRIUS PASSWORD initial  DBA EXCLUSIVE 
//
CREATE USER ZIEMA PASSWORD initial  RESOURCE NOT EXCLUSIVE 
//
CREATE SEQUENCE  "AUTOMOBILIS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 4602 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "DARBUOTOJAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 202 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "KORTELE_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 19202 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_DALYVIS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 21402 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_DARBAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 19302 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_DARBO_LAIKAS_CHEMUA_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 1902 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_GRANDZIU_DARBO_LAIKAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2802 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_GYVUNAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2602 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_IRANGA_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 17202 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_NARU_DARBO_LAIKAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2002 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_NUKENTEJES_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2502 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_OBJEKTAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 12202 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_PMP_PRIEMONE_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2202 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_PMP_PRIEZASTIS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2302 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_PRIEMONE_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 8502 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_TECHNIKA_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 27302 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_TRANSP_PRIEMONE_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2602 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_VADOVAS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 9702 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_VANDENS_SALTINIS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 6702 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_VEIKSMAS_PO_PMP_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2302 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE SEQUENCE  "K_ZUVUSYSIS_SEQ" MINVALUE 1 NOMAXVALUE  START WITH 2502 INCREMENT BY 1 NOCYCLE  CACHE 100 ORDER 
//
CREATE TABLE "AMZIAUS_GRUPE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (20) UNICODE,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.AMZIAUS_GRUPE TO ZIEMA
//
CREATE TABLE "PARASAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAREIGOS1"               Varchar (60) UNICODE,
	"PAREIGOS2"               Varchar (60) UNICODE,
	"PAREIGOS3"               Varchar (60) UNICODE,
	"VARDAS"               Varchar (60) UNICODE,
	"PAVARDE"               Varchar (60) UNICODE,
	PRIMARY KEY ("KODAS")
)
//
GRANT SELECT ON ADMIN.PARASAS TO ZIEMA
//
CREATE TABLE "APSKRITIS"
(
	"KODAS"               Varchar (5) UNICODE    NOT NULL,
	"PAVADINIMAS"               Varchar (30) UNICODE    NOT NULL,
	"EILNR"               Smallint,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.APSKRITIS TO ZIEMA
//
CREATE TABLE "INCIDENTO_KILIMO_VIETA"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (50) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.INCIDENTO_KILIMO_VIETA TO ZIEMA
//
CREATE TABLE "GAMINYS_MEDZIAGA"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (40) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.GAMINYS_MEDZIAGA TO ZIEMA
//
CREATE TABLE "PRIEZASTIS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (80) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PRIEZASTIS TO ZIEMA
//
CREATE TABLE "GYVUNAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (30) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.GYVUNAS TO ZIEMA
//
CREATE TABLE "TRANSP_PRIEMONE"
(
	"KODAS"               Varchar (1) UNICODE    NOT NULL,
	"PAVADINIMAS"               Varchar (60) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.TRANSP_PRIEMONE TO ZIEMA
//
CREATE TABLE "ZUVIMO_APLINKYBE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (60) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.ZUVIMO_APLINKYBE TO ZIEMA
//
CREATE TABLE "ATVIROJI_TERITORIJA"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (30) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.ATVIROJI_TERITORIJA TO ZIEMA
//
CREATE TABLE "DALYVIS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (60) UNICODE    NOT NULL,
	"PAV_TRUMPAS"               Varchar (30) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.DALYVIS TO ZIEMA
//
CREATE TABLE "NAUDOTA_IRANGA"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (70) UNICODE    NOT NULL,
	"TRPAVADINIMAS"               Varchar (10) UNICODE,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.NAUDOTA_IRANGA TO ZIEMA
//
CREATE TABLE "PRIEMONE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (50) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PRIEMONE TO ZIEMA
//
CREATE TABLE "VANDENS_SALTINIS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (80) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.VANDENS_SALTINIS TO ZIEMA
//
CREATE TABLE "VADOVAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (110) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.VADOVAS TO ZIEMA
//
CREATE TABLE "PMP_PRIEZASTIS"
(
	"KODAS"               Varchar (3) UNICODE    NOT NULL,
	"PAVADINIMAS"               Varchar (80) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PMP_PRIEZASTIS TO ZIEMA
//
CREATE TABLE "PMP_PRIEMONE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (130) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PMP_PRIEMONE TO ZIEMA
//
CREATE TABLE "VEIKSMAS_PO_PMP"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (50) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.VEIKSMAS_PO_PMP TO ZIEMA
//
CREATE TABLE "LYTIS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (7) UNICODE,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.LYTIS TO ZIEMA
//
CREATE TABLE "DARBAS_ATLIKTAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (20) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.DARBAS_ATLIKTAS TO ZIEMA
//
CREATE TABLE "VIETOS_TIPAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (14) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.VIETOS_TIPAS TO ZIEMA
//
CREATE TABLE "PAREIGYBE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (70) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PAREIGYBE TO ZIEMA
//
CREATE TABLE "APLINKYBE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (10) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.APLINKYBE TO ZIEMA
//
CREATE TABLE "DARBU_GRUPE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (100) UNICODE    NOT NULL,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.DARBU_GRUPE TO ZIEMA
//
CREATE TABLE "OBJEKTU_GRUPE"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (100) UNICODE,
	PRIMARY KEY ("KODAS")
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.OBJEKTU_GRUPE TO ZIEMA
//
CREATE TABLE "ADM_VIENETAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (50) UNICODE    NOT NULL,
	"APSKRITIS"               Varchar (5) UNICODE    NOT NULL,
	"GYVSKAICIUS"               Float (16),
	"APSKRITIS_OP"               Varchar (5) UNICODE,
	PRIMARY KEY ("KODAS"),
	FOREIGN KEY "APSKRITIS_ADM_VIENETAS"	("APSKRITIS") REFERENCES "ADMIN"."APSKRITIS" ("KODAS") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.ADM_VIENETAS TO ZIEMA
//
CREATE TABLE "DARBAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (130) UNICODE    NOT NULL,
	"DARBU_GRUPE"               Smallint    NOT NULL,
	PRIMARY KEY ("KODAS"),
	FOREIGN KEY "DARBU_GRUPE_DARBAS"	("DARBU_GRUPE") REFERENCES "ADMIN"."DARBU_GRUPE" ("KODAS") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.DARBAS TO ZIEMA
//
CREATE TABLE "OBJEKTAS"
(
	"KODAS"               Smallint    NOT NULL,
	"PAVADINIMAS"               Varchar (150) UNICODE    NOT NULL,
	"OBJ_GRUPE"               Smallint    NOT NULL,
	PRIMARY KEY ("KODAS"),
	FOREIGN KEY "OBJEKTAS_OBJEKTU_GRUPE"	("OBJ_GRUPE") REFERENCES "ADMIN"."OBJEKTU_GRUPE" ("KODAS") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.OBJEKTAS TO ZIEMA
//
CREATE TABLE "AUTOMOBILIS"
(
	"KODAS"               Varchar (6) UNICODE    NOT NULL,
	"PAVADINIMAS"               Varchar (40) UNICODE    NOT NULL,
	"NUMERIS"               Varchar (10) UNICODE,
	"ID"               Integer    NOT NULL,
	"METAI"               Smallint,
	"ADM_VIENETAS"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "ADM_VIENETAS_AUTOMOBILIS"	("ADM_VIENETAS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.AUTOMOBILIS TO ZIEMA
//
CREATE TABLE "PILDYMO_ISIMTIS"
(
	"PILDANTIS_PADALINYS"               Smallint    NOT NULL,
	"PILDOMAS_PADALINYS"               Smallint    NOT NULL,
	PRIMARY KEY ("PILDANTIS_PADALINYS", "PILDOMAS_PADALINYS"),
	FOREIGN KEY "ADM_VIENETAS_PILDYMO_ISIMTIS"	("PILDANTIS_PADALINYS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ADM_VIENETAS_PILDYMO_ISIMTIS1"	("PILDOMAS_PADALINYS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.PILDYMO_ISIMTIS TO ZIEMA
//
CREATE TABLE "DARBUOTOJAS"
(
	"ID"               Integer    NOT NULL,
	"VARDAS"               Varchar (20) UNICODE    NOT NULL,
	"PAVARDE"               Varchar (20) UNICODE    NOT NULL,
	"PAREIGYBE"               Smallint    NOT NULL,
	"PADALINYS"               Smallint    NOT NULL,
	"LOGINNAME"               Varchar (20) UNICODE    NOT NULL,
	"PASSWORD"               Varchar (20) UNICODE    NOT NULL,
	"DUOMENU_IVEDIMAS_LEIDZIAMAS"               Smallint,
	"ATASKAITOS_LEIDZIAMOS"               Smallint,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "PAREIGYBE_DARBUOTOJAS"	("PAREIGYBE") REFERENCES "ADMIN"."PAREIGYBE" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ADM_VIENETAS_DARBUOTOJAS"	("PADALINYS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT
)
//
COMMENT ON COLUMN "DARBUOTOJAS"."DUOMENU_IVEDIMAS_LEIDZIAMAS" IS 'Ar leidžiama pildyti korteles: NULL - neleidžiama, 1 - leidžiama už Lietuvą (centrinis operatorius) 3 - leidžiama už tarnybą'
//
COMMENT ON COLUMN "DARBUOTOJAS"."ATASKAITOS_LEIDZIAMOS" IS 'Ar leidžiama dirbti su ataskaitomis: NULL - neleidžiama, 1 - leidžiama už Lietuvą (centrinis operatorius), 2 - leidžiama už apskritį, 3 - leidžiama už tarnybą'
//
CREATE UNIQUE INDEX "INDEX_DARBUOTOJAS_LOGINNAME" ON "ADMIN"."DARBUOTOJAS" ("LOGINNAME"  ASC )
//
GRANT ALTER,INDEX,SELECT,INSERT,DELETE,REFERENCES ON ADMIN.DARBUOTOJAS TO ANDRIUS
//
GRANT UPDATE(VARDAS,PAVARDE,PAREIGYBE,PADALINYS,LOGINNAME,PASSWORD,DUOMENU_IVEDIMAS_LEIDZIAMAS,ATASKAITOS_LEIDZIAMOS) ON ADMIN.
DARBUOTOJAS TO ANDRIUS
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.DARBUOTOJAS TO ZIEMA
//
CREATE TABLE "KORTELE"
(
	"K_ID"               Integer    NOT NULL,
	"K_NR"               Integer    NOT NULL,
	"K_DATA"               Date    NOT NULL,
	"K_KUR"               Smallint,
	"K_KURKODAS"               Smallint,
	"K_VIETOS_TIPAS"               Smallint    NOT NULL,
	"K_ADRESAS"               Varchar (100) UNICODE    NOT NULL,
	"K_SAVININKAS"               Varchar (100) UNICODE,
	"K_PRLAIKASDATA"               Date,
	"K_PRLAIKASLAIKAS"               Time,
	"K_PIRMDATA"               Date,
	"K_PIRMLAIKAS"               Time,
	"K_PASKDATA"               Date,
	"K_PASKLAIKAS"               Time,
	"K_LOKDATA"               Date,
	"K_LOKLAIKAS"               Time,
	"K_LIKVDATA"               Date,
	"K_LIKVLAIKAS"               Time,
	"K_BAIGDATA"               Date,
	"K_BAIGLAIKAS"               Time,
	"K_INCVIETA"               Smallint,
	"K_INC_GAMINYS_MEDZIAGA"               Smallint,
	"K_PRIEZASTIS"               Smallint,
	"K_ISGZMONIU"               Smallint    DEFAULT      0,
	"K_ISGNEPILNAMECIU"               Smallint    DEFAULT      0,
	"K_ISGSTATINIU"               Smallint    DEFAULT      0,
	"K_EVAKZMONIU"               Smallint    DEFAULT      0,
	"K_ZUVOZMONIU"               Smallint    DEFAULT      0,
	"K_ZUVONEPILNAMECIU"               Smallint    DEFAULT      0,
	"K_ZUVIMOAPLINKYBE"               Smallint,
	"K_TRAUMUOTA"               Smallint    DEFAULT      0,
	"K_TRAUMUOTANEPILNAMECIU"               Smallint    DEFAULT      0,
	"K_TRAUMUOTAPGT"               Smallint    DEFAULT      0,
	"K_TRAUMUOTAPGP"               Smallint    DEFAULT      0,
	"K_SUNAIKINTASTATINIU"               Smallint    DEFAULT      0,
	"K_SUNAIKINTAGYVPLOTO"               Smallint    DEFAULT      0,
	"K_SUNAIKINTANEGYVPLOTO"               Integer    DEFAULT           0,
	"K_SUGADINTAGYVPLOTO"               Smallint    DEFAULT      0,
	"K_SUGADITANEGYVPLOTO"               Integer    DEFAULT           0,
	"K_SUNAIKINTAPASARU"               Smallint    DEFAULT      0,
	"K_ISDATVTERITORIJA"               Smallint,
	"K_DKAGRANDZIUSK"               Smallint    DEFAULT      0,
	"K_DKADARBSK"               Smallint    DEFAULT      0,
	"K_NARUSK"               Smallint    DEFAULT      0,
	"K_ZMCHEMUSTSK"               Smallint    DEFAULT      0,
	"K_PMP_PRIEZASTIS_APRASYMAS"               Varchar (500) UNICODE,
	"K_PMP_PRIEMONE_APRASYMAS"               Varchar (700) UNICODE,
	"K_PMP_VEIKSMAS_APRASYMAS"               Varchar (200) UNICODE,
	"K_APRASYMAS"               Varchar (1700) UNICODE,
	"K_UZPILDE"               Integer    NOT NULL,
	"K_UZPILDATA"               Date    NOT NULL    DEFAULT DATE,
	"K_ISDEG_ATV_TER_ARU_SK"               Integer    DEFAULT           0,
	"K_INC_VIETA_AUKSTAS"               Smallint,
	"K_PADALINYS"               Smallint    NOT NULL,
	"K_DARBU_ATLIKIMO_METAI"               Smallint    NOT NULL,
	"K_UZPILLAIKAS"               Time    NOT NULL    DEFAULT TIME,
	"K_PAGR_KORTELE"               Integer,
	"K_REDAGAVO"               Integer,
	"K_REDAGDATA"               Date,
	"K_REDAGLAIKAS"               Time,
	"INCIDENTO_SVARBA"               Smallint    NOT NULL    DEFAULT      0,
	"KAIMYNAI_DALYVAVO"               Smallint,
	PRIMARY KEY ("K_ID"),
 CONSTRAINT "CNSTR_DARBU_ATLIKIMO_METAI" CHECK K_DARBU_ATLIKIMO_METAI=YEAR(K_DATA),
	FOREIGN KEY "DARBAS_ATLIKTAS_KORTELE"	("K_KUR") REFERENCES "ADMIN"."DARBAS_ATLIKTAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ADM_VIENETAS_KORTELE"	("K_KURKODAS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "VIETOS_TIPAS_KORTELE"	("K_VIETOS_TIPAS") REFERENCES "ADMIN"."VIETOS_TIPAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "INCIDENTO_KILIMO_VIETA_KORTELE"	("K_INCVIETA") REFERENCES "ADMIN"."INCIDENTO_KILIMO_VIETA" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "GAMINYS_MEDZIAGA_KORTELE"	("K_INC_GAMINYS_MEDZIAGA") REFERENCES "ADMIN"."GAMINYS_MEDZIAGA" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "PRIEZASTIS_KORTELE"	("K_PRIEZASTIS") REFERENCES "ADMIN"."PRIEZASTIS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ATVIROJI_TERITORIJA_KORTELE"	("K_ISDATVTERITORIJA") REFERENCES "ADMIN"."ATVIROJI_TERITORIJA" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ZUVIMO_APLINKYBE_KORTELE"	("K_ZUVIMOAPLINKYBE") REFERENCES "ADMIN"."ZUVIMO_APLINKYBE" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "ADM_VIENETAS_KORTELE1"	("K_PADALINYS") REFERENCES "ADMIN"."ADM_VIENETAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "KORTELE_KORTELE"	("K_PAGR_KORTELE") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "DARBUOTOJAS_KORTELE"	("K_UZPILDE") REFERENCES "ADMIN"."DARBUOTOJAS" ("ID") ON DELETE  RESTRICT,
	FOREIGN KEY "KORTELE_DARBUOTOJAS_REDAGAVO"	("K_REDAGAVO") REFERENCES "ADMIN"."DARBUOTOJAS" ("ID") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_NR_METAI_PADALINYS" ON "ADMIN"."KORTELE" ("K_NR"  ASC,"K_PADALINYS"  ASC,"K_DARBU_ATLIKIMO_METAI"  ASC )
//
CREATE  INDEX "INDEX_UZPILDATALAIKAS" ON "ADMIN"."KORTELE" ("K_UZPILDATA"  ASC,"K_UZPILLAIKAS"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.KORTELE TO ZIEMA
//
CREATE TABLE "K_DALYVIS"
(
	"KORT"               Integer    NOT NULL,
	"D_KODAS"               Smallint    NOT NULL,
	"D_VNT"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_DALYVIS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "DALYVIS_K_DALYVIS"	("D_KODAS") REFERENCES "ADMIN"."DALYVIS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KDALYVIS_EILNR_KORTELE" ON "ADMIN"."K_DALYVIS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_DALYVIS TO ZIEMA
//
CREATE TABLE "K_DARBAS"
(
	"KORT"               Integer    NOT NULL,
	"D_KODAS"               Smallint    NOT NULL,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_DARBAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "DARBAS_K_DARBAS"	("D_KODAS") REFERENCES "ADMIN"."DARBAS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KDARBAS_EILNR_KORTELE" ON "ADMIN"."K_DARBAS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_DARBAS TO ZIEMA
//
CREATE TABLE "K_DARBO_LAIKAS_CHEMUA"
(
	"KORT"               Integer    NOT NULL,
	"TRUKME"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_DARBO_LAIKAS_CHEMUA"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KDARBLAIKCH_EILNR_KORTELE" ON "ADMIN"."K_DARBO_LAIKAS_CHEMUA" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_DARBO_LAIKAS_CHEMUA TO ZIEMA
//
CREATE TABLE "K_GYVUNAS"
(
	"KORT"               Integer    NOT NULL,
	"G_KODAS"               Smallint,
	"G_VNT"               Smallint,
	"ID"               Integer    NOT NULL,
	"APLINKYBE"               Smallint,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_GYVUNAS_ISGELBETAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "GYVUNAS_K_GYVUNAS_ISGELBETAS"	("G_KODAS") REFERENCES "ADMIN"."GYVUNAS" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "APLINKYBE_K_GYVUNAS"	("APLINKYBE") REFERENCES "ADMIN"."APLINKYBE" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KGYVUNAS_EILNR" ON "ADMIN"."K_GYVUNAS" ("KORT"  ASC,"APLINKYBE"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_GYVUNAS TO ZIEMA
//
CREATE TABLE "K_IRANGA"
(
	"KORT"               Integer    NOT NULL,
	"I_KODAS"               Smallint    NOT NULL,
	"I_VNT"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_IRANGA"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "NAUDOTA_IRANGA_K_IRANGA"	("I_KODAS") REFERENCES "ADMIN"."NAUDOTA_IRANGA" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KIRANGA_EILNR" ON "ADMIN"."K_IRANGA" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_IRANGA TO ZIEMA
//
CREATE TABLE "K_NARU_DARBO_LAIKAS"
(
	"KORT"               Integer    NOT NULL,
	"TRUKME"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_NARU_DARBO_LAIKAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KNARUDARBLAIK_EILNR" ON "ADMIN"."K_NARU_DARBO_LAIKAS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_NARU_DARBO_LAIKAS TO ZIEMA
//
CREATE TABLE "K_NUKENTEJES"
(
	"KORT"               Integer    NOT NULL,
	"N_LYTIS"               Smallint,
	"N_AMZIUS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_NUKENTEJES"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "LYTIS_K_NUKENTEJES"	("N_LYTIS") REFERENCES "ADMIN"."LYTIS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KNUKENTEJES_EILNR" ON "ADMIN"."K_NUKENTEJES" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_NUKENTEJES TO ZIEMA
//
CREATE TABLE "K_OBJEKTAS"
(
	"KORT"               Integer    NOT NULL,
	"O_OKODAS"               Smallint,
	"O_ILGIS"               Smallint,
	"O_PLOTIS"               Smallint,
	"O_PLOTAS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_OBJEKTAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "OBJEKTAS_K_OBJEKTAS"	("O_OKODAS") REFERENCES "ADMIN"."OBJEKTAS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KOBJEKTAS_EILNR" ON "ADMIN"."K_OBJEKTAS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_OBJEKTAS TO ZIEMA
//
CREATE TABLE "K_PMP_PRIEMONE"
(
	"KORT"               Integer    NOT NULL,
	"P_KODAS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_PMP_PRIEMONE"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "PMP_PRIEMONE_K_PMP_PRIEMONE"	("P_KODAS") REFERENCES "ADMIN"."PMP_PRIEMONE" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KPMPPRIEMONE_EILNR" ON "ADMIN"."K_PMP_PRIEMONE" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_PMP_PRIEMONE TO ZIEMA
//
CREATE TABLE "K_PMP_PRIEZASTIS"
(
	"KORT"               Integer    NOT NULL,
	"P_KODAS"               Varchar (3) UNICODE,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_PMP_PRIEZASTIS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "PMP_PRIEZASTIS_K_PMP_PRIEZASTIS"	("P_KODAS") REFERENCES "ADMIN"."PMP_PRIEZASTIS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KPMPPRIEZASTIS_EILNR" ON "ADMIN"."K_PMP_PRIEZASTIS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_PMP_PRIEZASTIS TO ZIEMA
//
CREATE TABLE "K_VEIKSMAS_PO_PMP"
(
	"KORT"               Integer    NOT NULL,
	"V_KODAS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_PMP_VEIKSMAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "PMP_VEIKSMAS_K_PMP_VEIKSMAS"	("V_KODAS") REFERENCES "ADMIN"."VEIKSMAS_PO_PMP" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KVEIKSMASPOPMP_EILNR" ON "ADMIN"."K_VEIKSMAS_PO_PMP" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_VEIKSMAS_PO_PMP TO ZIEMA
//
CREATE TABLE "K_PRIEMONE"
(
	"KORT"               Integer    NOT NULL,
	"P_KODAS"               Smallint,
	"P_VNT"               Fixed (6,2),
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_PRIEMONE"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "PRIEMONE_K_PRIEMONE"	("P_KODAS") REFERENCES "ADMIN"."PRIEMONE" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KPRIEMONE_EILNR" ON "ADMIN"."K_PRIEMONE" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_PRIEMONE TO ZIEMA
//
CREATE TABLE "K_VANDENS_SALTINIS"
(
	"KORT"               Integer    NOT NULL,
	"S_KODAS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_SALTINIS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "TELKINYS_K_SALTINIS"	("S_KODAS") REFERENCES "ADMIN"."VANDENS_SALTINIS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KVANDENSSALTINIS_EILNR" ON "ADMIN"."K_VANDENS_SALTINIS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_VANDENS_SALTINIS TO ZIEMA
//
CREATE TABLE "K_TECHNIKA"
(
	"KORT"               Integer    NOT NULL,
	"AUTOMOBILIS"               Integer    NOT NULL,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_TECHNIKA"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "AUTOMOBILIS_K_TECHNIKA"	("AUTOMOBILIS") REFERENCES "ADMIN"."AUTOMOBILIS" ("ID") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KTECHNIKA_EILNR" ON "ADMIN"."K_TECHNIKA" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_TECHNIKA TO ZIEMA
//
CREATE TABLE "K_TRANSP_PRIEMONE"
(
	"KORT"               Integer    NOT NULL,
	"T_KODAS"               Varchar (1) UNICODE,
	"T_VNT"               Smallint,
	"ID"               Integer    NOT NULL,
	"APLINKYBE"               Smallint,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_TRANSP_PRIEM_ISGELBETA"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "TRANSP_PRIEMONE_K_TRANSP_PRIEM_I"	("T_KODAS") REFERENCES "ADMIN"."TRANSP_PRIEMONE" ("KODAS") ON DELETE  RESTRICT,
	FOREIGN KEY "APLINKYBE_K_TRANSP_PRIEMONE"	("APLINKYBE") REFERENCES "ADMIN"."APLINKYBE" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KTRANSPPRIEMONE_EILNR" ON "ADMIN"."K_TRANSP_PRIEMONE" ("KORT"  ASC,"APLINKYBE"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_TRANSP_PRIEMONE TO ZIEMA
//
CREATE TABLE "K_VADOVAS"
(
	"KORT"               Integer    NOT NULL,
	"V_KODAS"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_VADOVAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT,
	FOREIGN KEY "VADOVAS_K_VADOVAS"	("V_KODAS") REFERENCES "ADMIN"."VADOVAS" ("KODAS") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KVADOVAS_EILNR" ON "ADMIN"."K_VADOVAS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_VADOVAS TO ZIEMA
//
CREATE TABLE "K_GRANDZIU_DARBO_LAIKAS"
(
	"KORT"               Integer    NOT NULL,
	"TRUKME"               Smallint,
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_GRANDZIU_DARBO_LAIKAS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT
)
//
CREATE UNIQUE INDEX "INDEX_KGRANDDARBLAIK_EILNR_KORT" ON "ADMIN"."K_GRANDZIU_DARBO_LAIKAS" ("KORT"  ASC,"EIL_NR"  ASC )
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_GRANDZIU_DARBO_LAIKAS TO ZIEMA
//
CREATE TABLE "K_ZUVUSYSIS"
(
	"ID"               Integer    NOT NULL,
	"EIL_NR"               Smallint    NOT NULL,
	"KORT"               Integer    NOT NULL,
	"Z_VARDAS"               Varchar (20) UNICODE    NOT NULL,
	"Z_PAVARDE"               Varchar (20) UNICODE    NOT NULL,
	"Z_GIMIMO_METAI"               Smallint,
	PRIMARY KEY ("ID"),
	FOREIGN KEY "KORTELE_K_ZUVUSYSIS"	("KORT") REFERENCES "ADMIN"."KORTELE" ("K_ID") ON DELETE  RESTRICT
)
//
GRANT INDEX,SELECT,REFERENCES ON ADMIN.K_ZUVUSYSIS TO ZIEMA
//
CREATE VIEW V_KORTELE
AS
SELECT
CHAR(K_DATA) AS K_DATA_CHAR,
CHAR(K_PRLAIKASDATA) || ' ' || CHAR(K_PRLAIKASLAIKAS) AS K_PR_DATA_LAIKAS,
CHAR(K_PIRMDATA) || ' ' || CHAR(K_PIRMLAIKAS) AS K_PIRM_DATA_LAIKAS,
CHAR(K_PASKDATA) || ' ' || CHAR(K_PASKLAIKAS) AS K_PASK_DATA_LAIKAS,
CHAR(K_LOKDATA) || ' ' || CHAR(K_LOKLAIKAS) AS K_LOK_DATA_LAIKAS,
CHAR(K_LIKVDATA) || ' ' || CHAR(K_LIKVLAIKAS) AS K_LIKV_DATA_LAIKAS,
CHAR(K_BAIGDATA) || ' ' || CHAR(K_BAIGLAIKAS) AS K_BAIG_DATA_LAIKAS,
KORT.* FROM ADMIN.KORTELE KORT

//
CREATE VIEW V_TECHNIKA_AUTO
AS
SELECT A.*, T.KORT
FROM K_TECHNIKA T, AUTOMOBILIS A
WHERE T.AUTOMOBILIS = A.ID

//
CREATE VIEW V_KORTELE_A AS
SELECT KORTELE.*, ADM_VIENETAS.APSKRITIS, ADM_VIENETAS.APSKRITIS_OP
FROM ADM_VIENETAS RIGHT JOIN KORTELE ON ADM_VIENETAS.KODAS = KORTELE.K_PADALINYS
//
GRANT SELECT ON ADMIN.V_KORTELE_A TO ZIEMA
//
CREATE VIEW V_APSKRITIS AS
SELECT APSKRITIS.KODAS, APSKRITIS.PAVADINIMAS, APSKRITIS.EILNR, SUM(ADM_VIENETAS.GYVSKAICIUS) AS GYVSK
FROM APSKRITIS INNER JOIN ADM_VIENETAS ON APSKRITIS.KODAS = ADM_VIENETAS.APSKRITIS
GROUP BY APSKRITIS.KODAS, APSKRITIS.PAVADINIMAS, APSKRITIS.EILNR

//
GRANT SELECT ON ADMIN.V_APSKRITIS TO ZIEMA
//
CREATE VIEW V_K_DARBAS AS
SELECT K_DARBAS.*, KORTELE.K_UZPILDATA
FROM K_DARBAS JOIN KORTELE ON K_DARBAS.KORT = KORTELE.K_ID









//
CREATE DBPROC DELETEBAD  AS
VAR KID INTEGER;
TRY
SELECT K_ID FROM ADMIN.KORTELE WHERE K_UZPILDE < 13;
    WHILE $RC = 0 DO BEGIN
      FETCH INTO :kid;
      CALL DELETEKORTELE(:kid) WITH COMMIT;
    END;
CATCH
  IF $RC <> 100 THEN STOP ($RC, 'unexpected error');
//
CREATE DBPROC DELETEKORTELE (IN IDAS INTEGER) AS    
TRY    
    DELETE FROM ADMIN.K_DALYVIS WHERE KORT = :idas;              
    DELETE FROM ADMIN.K_DARBAS WHERE KORT = :idas;               
    DELETE FROM ADMIN.K_DARBO_LAIKAS_CHEMUA WHERE KORT = :idas;  
    DELETE FROM ADMIN.K_GYVUNAS WHERE KORT = :idas;              
    DELETE FROM ADMIN.K_IRANGA WHERE KORT = :idas;               
    DELETE FROM ADMIN.K_NARU_DARBO_LAIKAS WHERE KORT = :idas;    
    DELETE FROM ADMIN.K_NUKENTEJES WHERE KORT = :idas;           
    DELETE FROM ADMIN.K_OBJEKTAS WHERE KORT = :idas;             
    DELETE FROM ADMIN.K_PMP_PRIEMONE WHERE KORT = :idas;         
    DELETE FROM ADMIN.K_PMP_PRIEZASTIS WHERE KORT = :idas;       
    DELETE FROM ADMIN.K_VEIKSMAS_PO_PMP WHERE KORT = :idas;      
    DELETE FROM ADMIN.K_PRIEMONE WHERE KORT = :idas;             
    DELETE FROM ADMIN.K_VANDENS_SALTINIS WHERE KORT = :idas;     
    DELETE FROM ADMIN.K_TECHNIKA WHERE KORT = :idas;             
    DELETE FROM ADMIN.K_TRANSP_PRIEMONE WHERE KORT = :idas;      
    DELETE FROM ADMIN.K_VADOVAS WHERE KORT = :idas;              
    DELETE FROM ADMIN.K_ZUVUSYSIS WHERE KORT = :idas;            
    DELETE FROM ADMIN.K_GRANDZIU_DARBO_LAIKAS WHERE KORT = :idas;
    DELETE FROM ADMIN.KORTELE WHERE K_ID = :idas;          
    
CATCH
    IF $RC=100 THEN CONTINUE EXECUTE;
    STOP($RC, $ERRMSG);



//
CREATE DBPROC SELECTKORTELE (IN IDAS INTEGER) AS
TRY
    SELECT * FROM ADMIN.K_DALYVIS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_DARBAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_DARBO_LAIKAS_CHEMUA WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_GYVUNAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_IRANGA WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_NARU_DARBO_LAIKAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_NUKENTEJES WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_OBJEKTAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_PMP_PRIEMONE WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_PMP_PRIEZASTIS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_VEIKSMAS_PO_PMP WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_PRIEMONE WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_VANDENS_SALTINIS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_TECHNIKA WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_TRANSP_PRIEMONE WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_VADOVAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_ZUVUSYSIS WHERE KORT = :idas;
    SELECT * FROM ADMIN.K_GRANDZIU_DARBO_LAIKAS WHERE KORT = :idas;
    SELECT * FROM ADMIN.KORTELE WHERE K_ID = :idas;

CATCH
    IF $RC = 100 THEN CONTINUE EXECUTE;
    STOP($RC, $ERRMSG);

//

