Advertisement
HenX

DAIS_COMPLET_2_BETTER_VERSION

Feb 28th, 2012
133
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PL/SQL 0.71 KB | None | 0 0
  1. CREATE OR REPLACE
  2. FUNCTION CheckStaff(
  3.               p_idUser "User".idUser%TYPE,
  4.               p_idTrainRide TrainRide.idTrainRide%TYPE
  5.               ) RETURN BOOLEAN AS
  6. help INT;
  7. CURSOR boolcurs IS SELECT * FROM Reservation WHERE idUser = p_idUser AND idTrainRide = p_idTrainRide;
  8. CURSOR crewcurs IS SELECT * FROM TrainCrew WHERE idTrainRide = p_idTrainRide;
  9. BEGIN
  10.   FOR cur IN boolcurs LOOP
  11.     FOR crew IN crewcurs LOOP  
  12.       IF (cur.confirm = crew.idStaff) THEN
  13.         help := 1;
  14.         EXIT;
  15.        ELSE
  16.         help := 0;
  17.       END IF;
  18.     END LOOP;
  19.     IF (help=0) THEN
  20.       EXIT;
  21.     END IF;
  22.   END LOOP;
  23.  
  24.   IF (help = 0) THEN
  25.     RETURN FALSE;
  26.   ELSE
  27.     RETURN TRUE;
  28.   END IF;
  29. END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement