Yurttas/PL/DBL/oracle/F/02/ABC/abc-def.sp

From ZCubes Wiki
Jump to navigation Jump to search
 1DECLARE
 2
 3  cursor_handle INTEGER;
 4
 5BEGIN
 6
 7  cursor_handle := DBMS_SQL.OPEN_CURSOR;
 8
 9  DBMS_SQL.PARSE(cursor_handle,
10                'CREATE TABLE TABC(A VARCHAR2(2) NOT NULL,
11                                   B VARCHAR2(4),
12                                   C VARCHAR2(8),
13                       PRIMARY KEY(A))',
14                DBMS_SQL.V7);
15
16  DBMS_SQL.CLOSE_CURSOR(cursor_handle);
17
18END;
19/