Advertisement
HenX

DAIS_COMPLET_2

Feb 28th, 2012
170
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 0.81 KB | None | 0 0
  1. ALTER TABLE Reservation ADD (confirm INT NULL);
  2. ALTER TABLE Reservation ADD CONSTRAINT Relation_confirm FOREIGN KEY (confirm) REFERENCES Staff (idstaff);
  3.  
  4. CREATE OR REPLACE
  5. FUNCTION CheckStaff(
  6.               p_idUser "User".idUser%TYPE,
  7.               p_idTrainRide TrainRide.idTrainRide%TYPE
  8.               ) RETURN BOOLEAN AS
  9. help INT;
  10. CURSOR boolcurs IS SELECT * FROM Reservation WHERE idUser = p_idUser AND idTrainRide = p_idTrainRide;
  11. BEGIN
  12.   FOR cur IN boolcurs LOOP
  13.     IF (cur.confirm != NULL) THEN
  14.       help := 1;
  15.     ELSE
  16.       help := 0;
  17.     END IF;
  18.   END LOOP;
  19.  
  20.   IF (help = 0) THEN
  21.     RETURN FALSE;
  22.   ELSE
  23.     RETURN TRUE;
  24.   END IF;
  25. END;
  26.  
  27. SET SERVEROUTPUT ON
  28. BEGIN
  29. IF(checkStaff(1,1) = FALSE) THEN
  30.   DBMS_OUTPUT.PUT_LINE('FALSE');
  31. ELSE
  32.   DBMS_OUTPUT.PUT_LINE('TRUE');
  33. END IF;
  34. END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement