Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- create procedure Zadanie3v11
- @mImie varchar(30)
- As
- BEGIN
- DECLARE
- @mDataWypozyczenia varchar(30),
- @mTytul varchar(30)
- set @mDataWypozyczenia=(SELECT min(dataWypozyczenia)
- from Ksiazka k join Wypozyczenia w on k.idKsiazki=w.idKsiazki join Klient kl on kl.idKlienta=w.idKlienta
- where kl.imie=@mImie)
- set @mTytul=(SELECT Tytul
- from Ksiazka k join Wypozyczenia w on k.idKsiazki=w.idKsiazki join Klient kl on kl.idKlienta=w.idKlienta
- where kl.imie=@mImie and dataWypozyczenia=@mDataWypozyczenia)
- if(@mImie<>'')
- BEGIN
- PRINT 'Klient o imieniu '+@mImie+ ' ostatnio wypożyczył - '+@mTytul+' - '+@mDataWypozyczenia
- if(@mTytul is null)
- PRINT 'Klient o imieniu '+@mImie+ ' nie wypożyczył jeszcze książki'
- END
- if(@mImie='')
- Begin
- DECLARE kursor CURSOR FOR
- select Imie from Klient
- OPEN kursor
- fetch next from kursor into @mImie
- WHILE @@FETCH_STATUS=0
- BEgin
- set @mDataWypozyczenia=(SELECT min(dataWypozyczenia)
- from Ksiazka k join Wypozyczenia w on k.idKsiazki=w.idKsiazki
- join Klient kl on kl.idKlienta=w.idKlienta
- where kl.imie=@mImie)
- set @mTytul=(SELECT Tytul
- from Ksiazka k join Wypozyczenia w on k.idKsiazki=w.idKsiazki
- join Klient kl on kl.idKlienta=w.idKlienta
- where kl.imie=@mImie and dataWypozyczenia=@mDataWypozyczenia)
- if(@mTytul is null)
- PRINT 'Klient o imieniu '+@mImie+ ' nie wypożyczył jeszcze książki'
- else
- PRINT 'Klient o imieniu '+@mImie+ ' ostatnio wypożyczył - '
- +@mTytul+' - '+@mDataWypozyczenia
- FETCH NEXT from kursor into @mImie
- END
- CLOSE kursor
- DEALLOCATE kursor
- END
- END
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement