5: l_select_col_stmt VARCHAR2(4000);
6: l_select_val_stmt VARCHAR2(4000);
7: l_cursorID INTEGER;
8: l_cursorID2 INTEGER;
9: l_column_name DBA_TAB_COLUMNS.column_name%TYPE;
10: l_data_type DBA_TAB_COLUMNS.data_type%TYPE;
11: l_dummy INTEGER;
12: l_index NUMBER;
13:
6: l_select_val_stmt VARCHAR2(4000);
7: l_cursorID INTEGER;
8: l_cursorID2 INTEGER;
9: l_column_name DBA_TAB_COLUMNS.column_name%TYPE;
10: l_data_type DBA_TAB_COLUMNS.data_type%TYPE;
11: l_dummy INTEGER;
12: l_index NUMBER;
13:
14: BEGIN
13:
14: BEGIN
15: l_cursorID := DBMS_SQL.OPEN_CURSOR;
16:
17: l_select_col_stmt := 'select column_name, data_type from dba_tab_columns' || ' where table_name = :tab_name and owner = ''LNS'' order by column_id';
18:
19: l_select_val_stmt := 'select';
20:
21: DBMS_SQL.PARSE(l_cursorID, l_select_col_stmt, DBMS_SQL.V7);