Facebook
From Testoviron, 4 Years ago, written in SQL.
Embed
Download Paste or View Raw
Hits: 205
  1. -- Create or replace function FahrToCels(temperatura REAL)
  2. --
  3. -- RETURNS REAL AS $$
  4. --
  5. -- BEGIN
  6. --      RETURN ((temperatura-32)*5/9);
  7. -- END;
  8. -- $$ LANGUAGE PLPGSQL;
  9. --
  10. -- select FahrToCels(100);
  11.  
  12.  
  13. -- Create or replace function NEWFILM(id_filmu INTEGER, tytul VARCHAR(20), rok_produkcji INTEGER, cena REAL)
  14. --
  15. -- RETURNS      VARCHAR AS $$
  16. -- BEGIN
  17. --      INSERT INTO FILMY (id_filmu, tytul, rok_produkcji, cena)
  18. --      VALUES (id_filmu, tytul, rok_produkcji, cena);
  19. --
  20. --      RETURN ('OK');
  21. --
  22. --      EXCEPTION WHEN unique_violation THEN RETURN 'BLEDNY ID';
  23. -- END;
  24. -- $$ LANGUAGE PLPGSQL;
  25. --
  26. --
  27. --
  28. -- select NEWFILM(33, 'Ida', 2013, 10);
  29.  
  30.  
  31.  
  32. -- CREATE OR REPLACE FUNCTION UPPER_NAMES_FUN() RETURNS TRIGGER AS $$
  33. --
  34. -- BEGIN
  35. -- NEW.imie := UPPER(NEW.imie);
  36. -- NEW.nazwisko := UPPER(NEW.nazwisko);
  37. -- RETURN NEW;
  38. -- END;
  39. -- $$ LANGUAGE PLPGSQL;
  40. --
  41. -- CREATE TRIGGER UPPER_NAMES BEFORE INSERT on PRACOWNICY
  42. -- FOR EACH ROW EXECUTE PROCEDURE UPPER_NAMES_FUN();
  43. --
  44. -- insert into pracownicy values(10, 'Jan', 'Kowalski', 'Poznan', 100);
  45. -- select * from pracownicy where id_pracownika=10;
  46.  
  47. --MY ŻYDZI MAMY DAR OD SZATANA POZWALAJĄCY ROZWIĄZYWAĆ ZADANIA Z SQL