Yurttas/PL/DBL/oracle/F/02/Movie/d-all.sql

 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/