Use procedure to delete departments : Delete Data « PL SQL « Oracle PL / SQL

Oracle PL / SQL
1. Aggregate Functions
2. Analytical Functions
3. Char Functions
4. Constraints
5. Conversion Functions
6. Cursor
7. Data Type
8. Date Timezone
9. Hierarchical Query
10. Index
11. Insert Delete Update
12. Large Objects
13. Numeric Math Functions
14. Object Oriented Database
15. PL SQL
16. Regular Expressions
17. Report Column Page
18. Result Set
19. Select Query
20. Sequence
21. SQL Plus
22. Stored Procedure Function
23. Subquery
24. System Packages
25. System Tables Views
26. Table
27. Table Joins
28. Trigger
29. User Previliege
30. View
31. XML
Java
Java Tutorial
Java Source Code / Java Documentation
Java Open Source
Jar File Download
Java Articles
Java Products
Java by API
Photoshop Tutorials
Maya Tutorials
Flash Tutorials
3ds-Max Tutorials
Illustrator Tutorials
GIMP Tutorials
C# / C Sharp
C# / CSharp Tutorial
C# / CSharp Open Source
ASP.Net
ASP.NET Tutorial
JavaScript DHTML
JavaScript Tutorial
JavaScript Reference
HTML / CSS
HTML CSS Reference
C / ANSI-C
C Tutorial
C++
C++ Tutorial
Ruby
PHP
Python
Python Tutorial
Python Open Source
SQL Server / T-SQL
SQL Server / T-SQL Tutorial
Oracle PL/SQL Tutorial
PostgreSQL
SQL / MySQL
MySQL Tutorial
VB.Net
VB.Net Tutorial
Flash / Flex / ActionScript
VBA / Excel / Access / Word
XML
XML Tutorial
Microsoft Office PowerPoint 2007 Tutorial
Microsoft Office Excel 2007 Tutorial
Microsoft Office Word 2007 Tutorial
Oracle PL / SQL » PL SQL » Delete Data 
Use procedure to delete departments
    

SQL> CREATE TABLE Department (
  2  DepartmentID INT NOT NULL PRIMARY KEY,
  3  Name VARCHAR(50NOT NULL,
  4  Description VARCHAR(200NULL);
SQL>
SQL> CREATE SEQUENCE DepartmentIDSeq;
SQL>
SQL> CREATE OR REPLACE TRIGGER DepartmentAutonumberTrigger
  2  BEFORE INSERT ON Department
  3  FOR EACH ROW
  4  BEGIN
  5    SELECT DepartmentIDSeq.NEXTVAL
  6    INTO :NEW.DepartmentID FROM DUAL;
  7  END;
  8  /
SQL>
SQL> INSERT INTO Department (Name, DescriptionVALUES ('Software', 'Coding');
SQL> INSERT INTO Department (Name, DescriptionVALUES ('Hardware', 'Building');
SQL> INSERT INTO Department (Name, DescriptionVALUES ('QA', 'Testing');
SQL>
SQL> CREATE TABLE Category (
  2  CategoryID INT NOT NULL PRIMARY KEY,
  3  DepartmentID INT NOT NULL,
  4  Name VARCHAR(50NOT NULL,
  5  Description VARCHAR (200NULL);
SQL>
SQL> CREATE SEQUENCE CategoryIDSeq;
SQL>
SQL> CREATE OR REPLACE TRIGGER CategoryAutonumberTrigger
  2  BEFORE INSERT ON Category
  3  FOR EACH ROW
  4  BEGIN
  5     SELECT CategoryIDSeq.NEXTVAL
  6     INTO :NEW.CategoryID FROM DUAL;
  7  END;
  8  /
SQL> INSERT INTO Category (DepartmentID, Name, DescriptionVALUES (1'Local', 'In town');
SQL> INSERT INTO Category (DepartmentID, Name, DescriptionVALUES (1'Remote', 'Telecommute');
SQL> INSERT INTO Category (DepartmentID, Name, DescriptionVALUES (2'Masks', 'By bits');
SQL> INSERT INTO Category (DepartmentID, Name, DescriptionVALUES (3'Wireless', 'Not connected');
SQL> INSERT INTO Category (DepartmentID, Name, DescriptionVALUES (3'Wired', 'Connected');
SQL>
SQL>
SQL>
SQL>
SQL>
SQL> CREATE TABLE Product (
  2  ProductID INT NOT NULL PRIMARY KEY,
  3  Name VARCHAR(50NOT NULL,
  4  Description VARCHAR(1000NOT NULL,
  5  Price NUMBER NULL,
  6  ImagePath VARCHAR(50NULL,
  7  soldout NUMBER(1,0NULL,
  8  Promotion NUMBER(1,0NULL);
SQL>
SQL> CREATE SEQUENCE ProductIDSeq;
SQL>
SQL> CREATE OR REPLACE TRIGGER ProductAutonumberTrigger
  2  BEFORE INSERT ON Product
  3  FOR EACH ROW
  4  BEGIN
  5     SELECT ProductIDSeq.NEXTVAL
  6     INTO :NEW.ProductID FROM DUAL;
  7  END;
  8  /
SQL>
SQL> INSERT INTO Product (Name, Description, Price, ImagePath,soldout, PromotionVALUES ('Pen', 'Ball Pen',5.99'pen.jpg', 10);
SQL> INSERT INTO Product (Name, Description, Price, ImagePath, soldout, PromotionVALUES ('Ruler','Long',14.99'ruler.jpg', 00);
SQL> INSERT INTO Product (Name, Description, Price, ImagePath, soldout, PromotionVALUES ('Desk', 'Computer Desk',5.99'desk.jpg', 01);
SQL> INSERT INTO Product (Name, Description, Price, ImagePath, soldout, PromotionVALUES ('PC', 'Notebook',49.99'pc.jpg', 01);
SQL> INSERT INTO Product (Name, Description, Price, ImagePath, soldout, PromotionVALUES ('Mouse', 'Wireless',9.99'mouse.jpg',  10);
SQL> INSERT INTO Product (Name, Description, Price, ImagePath, soldout, PromotionVALUES ('Keyboard','keyboard',3.75'keyboard.jpg', 00);
SQL>
SQL>
SQL> CREATE TABLE ProductCategory (
  2  ProductID INT NOT NULL,
  3  CategoryID INT NOT NULL,
  4  PRIMARY KEY (ProductID, CategoryID)
  5  );
SQL>
SQL>
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (1,3);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (2,1);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (2,3);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (3,3);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (4,1);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (5,2);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (6,3);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (6,4);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (7,4);
SQL> INSERT INTO ProductCategory (ProductID, CategoryIDVALUES (8,5);
SQL>
SQL> CREATE PROCEDURE DeleteDepartment
  2  (DeptID IN integer)
  3  AS
  4    BEGIN
  5      DELETE FROM Department
  6      WHERE DepartmentID = DeptID
  7      AND NOT EXISTS (SELECT Name FROM Category WHERE DepartmentID = DeptID);
  8    END;
  9  /


SQL>
SQL> drop table department;
SQL> drop sequence DepartmentIDSeq;
SQL> drop table Product;
SQL> drop table ProductCategory;
SQL> drop table Category;
SQL> drop sequence CategoryIDSeq;
SQL> drop sequence ProductIDSeq;

   
    
    
    
  
Related examples in the same category
1. DELETE statement can be used within PL/SQL programs to delete a row or a set of rows
2. DELETE statement in PL/SQL block
3. Delete data statement with WHERE clauses.
4. Delete statement with variable
5. Delete a row and output referenced value
6. Delete employee with stored procedure
7. Create dynamic delete from command
www.java2java.com | Contact Us
Copyright 2009 - 12 Demo Source and Support. All rights reserved.
All other trademarks are property of their respective owners.