7: c integer;
8: rows_processed integer;
9: statement varchar2(1000);
10: begin
11: c := dbms_sql.open_cursor;
12: statement := 'declare l_c integer; l_rows_processed integer; '||
13: 'begin l_c := dbms_sql.open_cursor; '||
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
9: statement varchar2(1000);
10: begin
11: c := dbms_sql.open_cursor;
12: statement := 'declare l_c integer; l_rows_processed integer; '||
13: 'begin l_c := dbms_sql.open_cursor; '||
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
10: begin
11: c := dbms_sql.open_cursor;
12: statement := 'declare l_c integer; l_rows_processed integer; '||
13: 'begin l_c := dbms_sql.open_cursor; '||
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
12: statement := 'declare l_c integer; l_rows_processed integer; '||
13: 'begin l_c := dbms_sql.open_cursor; '||
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
13: 'begin l_c := dbms_sql.open_cursor; '||
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
14: 'dbms_sql.parse(l_c,apps_array_ddl.glprogtext, '||
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
22: exception
15: to_char(lb)||','||to_char(ub)||', '||
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
22: exception
23: when others then
16: upper(newline_flag)||', dbms_sql.native); '||
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
22: exception
23: when others then
24: dbms_sql.close_cursor(c);
17: 'l_rows_processed := dbms_sql.execute(l_c); '||
18: 'dbms_sql.close_cursor(l_c); end;';
19: dbms_sql.parse(c,statement,dbms_sql.native);
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
22: exception
23: when others then
24: dbms_sql.close_cursor(c);
25: raise;
20: rows_processed := dbms_sql.execute(c);
21: dbms_sql.close_cursor(c);
22: exception
23: when others then
24: dbms_sql.close_cursor(c);
25: raise;
26: end apps_array_ddl;
27: end APPS_ARRAY_DDL;