Yurttas/PL/DBL/oracle/F/02/Movie/MovieStar-def.sql

From ZCubes Wiki
Jump to navigation Jump to search
 1/*
 2REM
 3REM
 4REM MovieStar-def.sql
 5REM
 6REM
 7*/
 8
 9DECLARE
10
11  cursor_handle INTEGER;
12
13BEGIN
14
15  cursor_handle := DBMS_SQL.OPEN_CURSOR;
16
17  DBMS_SQL.PARSE(cursor_handle,
18                 'CREATE TABLE MovieStar(name VARCHAR2(24) NOT NULL, 
19                                         address VARCHAR2(24), 
20                                         gender CHAR, 
21                                         birthdate CHAR(4),
22                             PRIMARY KEY(name))',
23                 DBMS_SQL.V7);  
24
25  DBMS_SQL.CLOSE_CURSOR(cursor_handle);
26
27END;
28/