--Skript pro otestovani jednotlivych triggeru a procedur.
---------------------------------------------------------
---------------------------------------------------------

--Pridani objednavky zakaznikem, ktery ma zaplacene vsechny faktury a na sklade je CD s pozadovanym albem.
----------------------------------------------------------------------------------------------------------
select * from Objednavka;
INSERT INTO Objednavka (ID_OBJ, VYRIZENA, POCET,RC_ZAK, NAZEV_A ) 
       VALUES ( 50, 'A', 1, 2,'Album1' );
--Kontrola, ze byl zaznam pridan
select * from Objednavka;

--Pokus o vytvoreni objednavky zakaznikem, ktery ma nejakou nezaplacenou fakturu
INSERT INTO Objednavka (ID_OBJ, VYRIZENA, POCET,RC_ZAK, NAZEV_A ) 
       VALUES ( 51, 'A', 1, 1,'Album1' );
--Kontrola, ze nebyl zaznam pridan
select * from Objednavka;
       
      
--Pridani objednavky na album, ktere neni na sklade.
----------------------------------------------------
--Pridani noveho alba, ktere neni na sklade
INSERT INTO ALBUM ( NAZEV_A, ROK, CENA ) 
 VALUES ('Album50', 2003, 200.0);
--Pokus o pridani tothoto alba na objednavku 
INSERT INTO Objednavka (ID_OBJ, VYRIZENA, POCET,RC_ZAK, NAZEV_A ) 
       VALUES ( 52, 'A', 1, 2,'Album50' );
--Kontrola, ze nebyl zaznam pridan
select * from Objednavka;


--Pridani CD na fakturu, ktera obsahuje objednavku na dane album.
-----------------------------------------------------------------
select * from NA;
INSERT INTO NA (CIS_F, ID_CD ) 
 VALUES ( 2, 98);
--Kontrola, ze byl zaznam pridan
select * from NA;
 

--Pridani CD na fakturu, ktera neobsahuje objednavku na dane album.
-------------------------------------------------------------------
INSERT INTO NA (CIS_F, ID_CD ) 
 VALUES ( 1, 7);
--Kontrola, ze nebyl zaznam pridan
select * from NA;
 
--Napleni tabulky Upominka a odvozene tabulky NovaUpominka
----------------------------------------------------------
delete from Upominka;
select * from Upominka;
select * from NovaUpominka;
execute obchod_pkg.kontrola_upominek;
--Kontrola, ze byly tyto tabulky naplneny daty
select * from Upominka;
select * from NovaUpominka;