create orreplace procedurę DODAJ_GOSCLAl(
IM VARCKAR2, NAZW VARCHAR2, DAT AUR DATĘ, ADR VARCHAR2, DOWOS VARCHAR2, CZYVIP NUMBER) as
NUMG DITEGER; b integer;
gosc_juz_jest exception;
BE GM
select count(*) into numg from goście where nazwisko= nazw and dow_os=dowo s;
if numg>0 thenraise gosc_juz_jest; else
SELECT NVL(lvIAX( id_GOSCIA)+l,l) into NUMG from goście; dblvIs_OUTPUT.PUT_LENE ('numer gościa to '||NUlvlG); insert into goście
values (numg, IM, NAZW, DATAUR, ADR, DOWOS , CZYVIP );
dblvIs_OUTPUT.PUT_LENE ('dodany gosc: '||NUlvlG||' nazwisko =' ||NAZW); commit; end if; exception
when gosc_juz_jest then
select id_goscia into b from goście where dow_os = dowos; dbMs_OUTPUT.PUT_LINE ('goscjuzbyl o id= '||b||', nazwisko =' ||NAZW);
END;
SHOW ERRORS
exec DOD AJ_GOSCLAl('HvflE2','NAZWISK02', '66-5-5', 'ADEES2','DOW_OS2', O ) exec DODAJ_GOSCLAl('IMIE3','NAZWISK03', '67-5-5', 'ADEES3','DOW_OS3', O ) execute D0D^_G0SCL^('IlvnE4','NAZ_VIPl', '68-5-5', ADRES4','DOW_OS4', 1)
insert into rezerwacje values (1,1 ,'98-l-2','9S-2-3') insert into r_przydzielona values (1,1);