Yurttas/PL/DBL/oracle/F/02/Movie/d-all.sql
Revision as of 23:26, 4 November 2013 by MassBot1 (talk | contribs) (Created page with "<syntaxhighlight lang="sql" line start="1" enclose="div"> →REM REM REM d-all.sql REM REM: DECLARE cursor_handle INTEGER; BEGIN cursor_handle := DBMS_SQL.OPEN_CURS...")
1/*
2REM
3REM
4REM d-all.sql
5REM
6REM
7*/
8
9DECLARE
10
11 cursor_handle INTEGER;
12
13BEGIN
14
15 cursor_handle := DBMS_SQL.OPEN_CURSOR;
16 DBMS_SQL.PARSE(cursor_handle,
17 'DROP TABLE'||' StarsIn',
18 DBMS_SQL.V7);
19 DBMS_SQL.CLOSE_CURSOR(cursor_handle);
20
21 cursor_handle := DBMS_SQL.OPEN_CURSOR;
22 DBMS_SQL.PARSE(cursor_handle,
23 'DROP TABLE'||' Movie',
24 DBMS_SQL.V7);
25 DBMS_SQL.CLOSE_CURSOR(cursor_handle);
26
27 cursor_handle := DBMS_SQL.OPEN_CURSOR;
28 DBMS_SQL.PARSE(cursor_handle,
29 'DROP TABLE'||' MovieStar',
30 DBMS_SQL.V7);
31 DBMS_SQL.CLOSE_CURSOR(cursor_handle);
32
33 cursor_handle := DBMS_SQL.OPEN_CURSOR;
34 DBMS_SQL.PARSE(cursor_handle,
35 'DROP TABLE'||' Studio',
36 DBMS_SQL.V7);
37 DBMS_SQL.CLOSE_CURSOR(cursor_handle);
38
39 cursor_handle := DBMS_SQL.OPEN_CURSOR;
40 DBMS_SQL.PARSE(cursor_handle,
41 'DROP TABLE'||' MovieExec',
42 DBMS_SQL.V7);
43 DBMS_SQL.CLOSE_CURSOR(cursor_handle);
44
45END;
46/