--Procedure end_campaign(ctitle in campaign.title%Type--
CREATE OR REPLACE PROCEDURE end_campaign
	(ctitle IN campaign.title%Type)
IS
	CURSOR end_campaign_cur IS
		SELECT campaigntitle, SUM(actualcost)
		FROM advert
		group by campaigntitle;
BEGIN
	IF ctitle = end_campaign_cur.campaigntitle THEN
		INSERT INTO invoice (invoiceno, campaigntitle, dateissued, datepaid, status)
			VALUES (invoice_invoiceno_seq.nextval, ctitle, SYSDATE, NULL, ' ');
	END IF;
EXCEPTION
	WHEN NO_DATA_FOND THEN
		DBMS_OUTPUT.PUT_LINE('NO SUCH TITLE FOUND');
COMMIT;
END;
/

------------------ CREATE SEQUENCE FOR INVOICENO --------------------
CREATE SEQUENCE invoice_invoiceno_seq
INCREMENT BY 1
START WITH 1
MAXVALUE 99999
NOCACHE;
----------------- END OF SCRIPT --------------