Yurttas/PL/DBL/oracle/F/02/PC/q12.sp
Revision as of 23:29, 4 November 2013 by MassBot1 (talk | contribs) (Created page with "<syntaxhighlight lang="text" line start="1" enclose="div"> →REM REM q12.sp REM REM Delete PC's with hard drives less than 2GB REM REM: CREATE OR REPLACE PROCEDURE q12 IS ...")
1/*
2REM
3REM q12.sp
4REM
5REM Delete PC's with hard drives less than 2GB
6REM
7REM
8*/
9
10CREATE OR REPLACE
11PROCEDURE q12 IS
12
13 del_shp NUMBER;
14
15BEGIN
16
17 DBMS_OUTPUT.PUT_LINE('Delete all PCs with a hard drive less than 2GB');
18 DBMS_OUTPUT.PUT_LINE('----------------------------------------------');
19
20 DELETE FROM PC
21 WHERE hd<2;
22
23 del_shp := SQL%ROWCOUNT;
24
25 DBMS_OUTPUT.PUT_LINE(del_shp||''||' rows deleted from PC');
26
27END q12;
28/