CREATE DATABASE kancelaria
GO

/* przejscie do bazy o zadanej nazwie */
USE kancelaria
GO

/* definicja nowego typu danych */
sp_addtype string, 'varchar(150)'
GO

/* dodanie tabel */

/* tabeli klient */
CREATE TABLE klient(
zleceniodawca string NOT NULL PRIMARY KEY,
ulica string NOT NULL,
nr_domu string NOT NULL,
nr_mieszkania string,
kod_pocztowy string NOT NULL,
miejscowosc string NOT NULL,
nip string,
telefon string,
email string
)
GO


/* tabeli sprawa */

CREATE TABLE sprawa(
nr_sprawy INT IDENTITY NOT NULL PRIMARY KEY,
data_wplywu datetime NOT NULL,
zleceniodawca string FOREIGN KEY REFERENCES klient(zleceniodawca),
opis string NOT NULL,
przebieg_sadowy string NOT NULL,
stan string NOT NULL,
wyrok string,
egzekucja string,
uwagi string

)
GO

/* tabeli korespondencja */
CREATE TABLE korespondencja(
lp INT IDENTITY NOT NULL PRIMARY KEY,
data_wplywu datetime NOT NULL,
nadawca string NOT NULL,
sygn_akt string NOT NULL,
tresc string NOT NULL,
sygn_kan INT  NOT NULL FOREIGN KEY REFERENCES  sprawa(nr_sprawy),
)
GO
/* tabeli archiwum */
CREATE TABLE archiwum(
lp INT IDENTITY NOT NULL PRIMARY KEY,
data_archiwizacji datetime NOT NULL,
sygn_kan INT NOT NULL FOREIGN KEY REFERENCES sprawa(nr_sprawy),
miejsce string NOT NULL,
)
GO

/*wypelnienie tabel*/

/*tabeli klient*/
INSERT INTO klient VALUES ('Spółdzielnia Mieszkaniowa', 'Dębiecka', '234' , NULL, '62-030', 'Luboń', '7835672356', '508997456', 'sm@wp.pl')
INSERT INTO klient VALUES ('Aleksandra Przybył', 'Topolowa', '3', NULL, '61-030', 'Poznań', '8769345526', '505997456', 'przybyl@wp.pl')
INSERT INTO klient VALUES ('TESCO S.A.', 'Krańcowa', '4', NULL, '62-031', 'Luboń', '4567892324', '506997456', 'tesco@wp.pl')
INSERT INTO klient VALUES ('Paweł Kowalski', 'Czajcza', '8' , NULL,'61-300', 'Poznań', '4273689964', '504997456', 'kowlaski@wp.pl')
INSERT INTO klient VALUES ('Halina Kos', 'Podgórna', '2', NULL, '61-546', 'Poznań', '9876542635', '518997456', 'kos@wp.pl')
GO

/*tabeli sprawa*/
INSERT INTO sprawa VALUES (CONVERT(smalldatetime,getdate(),104),'Spółdzielnia Mieszkaniowa', 'Pozew o należności z tytułu najmu o zapłatę kwoty 7.262,00 zł', 'Sąd Rejonowy Poznań Nowe Miasto i Wilda' ,'-', '-','-', '-')
INSERT INTO sprawa VALUES (CONVERT(smalldatetime,getdate(),104),'Aleksandra Przybył', 'Aleksandra Przybył c/a Justyna Maik o zapłatę 18.764,39 zł', 'Sąd Rejonowy Poznań Nowe Miasto i Wilda' ,'-', '-','-', '-')
INSERT INTO sprawa VALUES (CONVERT(smalldatetime,getdate(),104),'TESCO S.A.', 'TESCO S.A. c/a Izabela Podolska o zapłatę 929,88 zł', 'Sąd Rejonowy Poznań Nowe Miasto i Wilda' ,'-', '-','-', '-')
INSERT INTO sprawa VALUES (CONVERT(smalldatetime,getdate(),104),'Paweł Kowalski', 'SKOK c/a Paweł Kowalski', 'Sąd Rejonowy Poznań Nowe Miasto i Wilda' ,'-', '-','-', '-')
INSERT INTO sprawa VALUES (CONVERT(smalldatetime,getdate(),104),'Halina Kos', 'Halina Kos c/a Maria Konieczna o eksmisję', 'Sąd Rejonowy Poznań Stare Miasto' ,'-', '-','-', '-')

/*tabeli korespondencja*/
INSERT INTO korespondencja VALUES (CONVERT(smalldatetime,getdate(),104), 'Sąd Rejonowy Poznań Nowe Miasto i Wilda', 'KW 5289/11','Sprzeciw od nakazu zapłaty z dnia 02 marca 2012 wraz ze zobowiązaniem do wszelkich twierdzeń',1)
INSERT INTO korespondencja VALUES (CONVERT(smalldatetime,getdate(),104), 'Sąd Rejonowy Poznań Nowe Miasto i Wilda', 'KM 9876/11','Odpis postanowienia z dnia 29 lutego 2012r. Wraz z klauzulą wykonalnosci',2)
INSERT INTO korespondencja VALUES (CONVERT(smalldatetime,getdate(),104), 'Sąd Rejonowy Poznań Nowe Miasto i Wilda', 'KS 4563/11','Wyrok z dnia 21 lutego 2012 wraz z uzasadnieniem - PIF c/a Opala',3)
INSERT INTO korespondencja VALUES (CONVERT(smalldatetime,getdate(),104), 'Sąd Rejonowy Poznań Nowe Miasto i Wilda', 'KM 987/11','Pismo procesowe z dnia 21 grudnia 2011',4)
INSERT INTO korespondencja VALUES (CONVERT(smalldatetime,getdate(),104), 'Sąd Rejonowy Poznań Stare Miasto', 'KM 527/11','Zawiadomienie o terminie rozprawy 24 kwietnia 2012 godzina 12:30 sala G + odpowiedź na skarge',5)
GO
/*tabeli archiwum*/
INSERT INTO archiwum VALUES(CONVERT(smalldatetime,getdate(),104),1, 'Archiwum kancelarii')
GO


CREATE PROCEDURE ins_klient
@zleceniodawca string,
@ulica string,
@nr_domu string,
@nr_mieszkania string,
@kod_pocztowy string,
@miejscowosc string,
@nip string,
@telefon string,
@email string
AS
BEGIN
        IF (SELECT COUNT(klient.zleceniodawca) AS tmp FROM klient WHERE zleceniodawca LIKE @zleceniodawca ) >0
        BEGIN

            IF (SELECT COUNT(klient.zleceniodawca) AS tmp FROM klient WHERE zleceniodawca LIKE @zleceniodawca AND ulica LIKE @ulica AND nr_domu LIKE @nr_domu AND kod_pocztowy LIKE @kod_pocztowy AND miejscowosc LIKE @miejscowosc ) >0
            BEGIN
              print 'Klient istnieje juz w bazie danych'
            END
            ELSE
            BEGIN
                print 'Nazwa klienta nie jest unikalna'
            END
            END
        ELSE
       BEGIN
              INSERT INTO klient VALUES(@zleceniodawca,@ulica,@nr_domu,@nr_mieszkania,@kod_pocztowy,@miejscowosc,@nip,@telefon,@email)
              print 'Klient dodany'
       END
END

GO


/*Edytowanie klienta*/
CREATE PROCEDURE ed_klient
@zleceniodawca string,
@ulica string,
@nr_domu string,
@nr_mieszkania string,
@kod_pocztowy string,
@miejscowosc string,
@nip string,
@telefon string,
@email string
AS
BEGIN
       UPDATE klient
       SET
       klient.zleceniodawca = @zleceniodawca,
       klient.ulica = @ulica,
       klient.nr_domu = @nr_domu,
       klient.nr_mieszkania = @nr_mieszkania,
       klient.kod_pocztowy = @kod_pocztowy,
       klient.miejscowosc =@miejscowosc,
       klient.nip =@nip,
       klient.telefon = @telefon,
       klient.email = @email
       WHERE klient.zleceniodawca LIKE @zleceniodawca
END
GO


CREATE PROCEDURE ins_sprawa
@zleceniodawca string,
@opis string,
@przebieg_sadowy string,
@stan string,
@wyrok string,
@egzekucja string,
@uwagi string
AS
INSERT INTO sprawa VALUES(GETDATE(),@zleceniodawca,@opis,@przebieg_sadowy,@stan,@wyrok,@egzekucja,@uwagi)
GO



CREATE PROCEDURE ed_sprawa
@nr_sprawy INT ,
@zleceniodawca string,
@opis string,
@przebieg_sadowy string,
@stan string,
@wyrok string,
@egzekucja string,
@uwagi string
AS
BEGIN
       UPDATE sprawa
       SET
        sprawa.zleceniodawca = @zleceniodawca ,
        sprawa.opis = @opis ,
        sprawa.przebieg_sadowy = @przebieg_sadowy  ,
        sprawa.stan = @stan ,
        sprawa.wyrok = @wyrok ,
        sprawa.egzekucja = @egzekucja ,
        sprawa.uwagi = @uwagi
       WHERE sprawa.nr_sprawy LIKE @nr_sprawy
END
GO


CREATE PROCEDURE ins_korespondencja
@nadawca string,
@sygn_akt string,
@tresc string,
@sygn_kan INT
AS
INSERT INTO korespondencja VALUES(GETDATE(),@nadawca,@sygn_akt,@tresc,@sygn_kan)
GO


CREATE PROCEDURE ed_korespondencja
@lp INT,
@nadawca string,
@sygn_akt string,
@tresc string,
@sygn_kan INT
AS
BEGIN
       UPDATE korespondencja
       SET
        korespondencja.nadawca = @nadawca ,
        korespondencja.sygn_akt = @sygn_akt ,
        korespondencja.tresc = @tresc ,
        korespondencja.sygn_kan =@sygn_kan,
       WHERE korespondencja.lp LIKE @lp
END
GO

CREATE PROCEDURE ins_archiwum
@sygn_kan INT,
@miejsce string
AS
BEGIN
IF(SELECT COUNT(nr_sprawy) FROM sprawa WHERE nr_sprawy LIKE @sygn_kan) !=0
BEGIN
INSERT INTO archiwum VALUES(GETDATE(),@sygn_kan,@miejsce)
print 'Sprawa przeniesiona do archiwum'
UPDATE sprawa
SET sprawa.stan = 'Archiwum'
WHERE
sprawa.nr_sprawy LIKE @sygn_kan
END
ELSE
BEGIN
print 'Brak sprawy o takim numerze'
END

END
GO