Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CREATE OR REPLACE PROCEDURE pr_generowanie_faktury (v_date DATE) AS
- v_id_klienta INTEGER;
- v_id_komiksu INTEGER;
- v_pozycja INTEGER;
- v_liczba INTEGER;
- v_id_faktury INTEGER;
- BEGIN
- ---losowanie klienta i stworzenie faktury_naglowka---
- SELECT fn_losuj_klienta INTO v_id_klienta FROM dual;
- INSERT INTO FAKTURA_NAGLOWEK (id_klienta,data_wystawienia) VALUES (v_id_klienta,v_date);
- SELECT MAX(id_faktury) INTO v_id_faktury FROM FAKTURA_NAGLOWEK;
- ---losowanie ilosci pozycji faktury---
- SELECT fn_losuj_wartosc(1,10) INTO v_pozycja FROM dual;
- FOR i IN 1..v_pozycja LOOP
- SELECT fn_losuj_produkt INTO v_id_komiksu FROM dual;
- SELECT fn_losuj_wartosc(1,5) INTO v_liczba FROM dual;
- ---dodanie pozycji do faktury---
- INSERT INTO FAKTURA_DETALE (id_faktury, pozycja, id_komiksu, liczba)
- VALUES (v_id_faktury, i, v_id_komiksu, v_liczba);
- END LOOP;
- END;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement