4: -- Variable declarations
5: --
6: TYPE mt_table IS TABLE OF VARCHAR2(256) INDEX BY BINARY_INTEGER;
7: l_dummy NUMBER;
8: l_header DBMS_SQL.VARCHAR2S;
9: l_body DBMS_SQL.VARCHAR2S;
10: l_header_line NUMBER:=0;
11: l_body_line NUMBER:=0;
12: l_package_name VARCHAR2(255);
5: --
6: TYPE mt_table IS TABLE OF VARCHAR2(256) INDEX BY BINARY_INTEGER;
7: l_dummy NUMBER;
8: l_header DBMS_SQL.VARCHAR2S;
9: l_body DBMS_SQL.VARCHAR2S;
10: l_header_line NUMBER:=0;
11: l_body_line NUMBER:=0;
12: l_package_name VARCHAR2(255);
13: l_csr_sql NUMBER;
235: --
236: -- Execute the dynamic code.
237: --
238:
239: l_csr_sql := dbms_sql.open_cursor;
240: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
241: l_rows := dbms_sql.EXECUTE( l_csr_sql );
242: dbms_sql.close_cursor( l_csr_sql );
243:
236: -- Execute the dynamic code.
237: --
238:
239: l_csr_sql := dbms_sql.open_cursor;
240: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
241: l_rows := dbms_sql.EXECUTE( l_csr_sql );
242: dbms_sql.close_cursor( l_csr_sql );
243:
244: --
237: --
238:
239: l_csr_sql := dbms_sql.open_cursor;
240: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
241: l_rows := dbms_sql.EXECUTE( l_csr_sql );
242: dbms_sql.close_cursor( l_csr_sql );
243:
244: --
245: -- Reinitialize the variables.
238:
239: l_csr_sql := dbms_sql.open_cursor;
240: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
241: l_rows := dbms_sql.EXECUTE( l_csr_sql );
242: dbms_sql.close_cursor( l_csr_sql );
243:
244: --
245: -- Reinitialize the variables.
246: --
1373: add_body_line('');
1374: add_body_line('END '||l_package_name ||';');
1375: add_header_line('END ' ||l_package_name||';');
1376:
1377: l_csr_sql := dbms_sql.open_cursor;
1378: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1374: add_body_line('END '||l_package_name ||';');
1375: add_header_line('END ' ||l_package_name||';');
1376:
1377: l_csr_sql := dbms_sql.open_cursor;
1378: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1375: add_header_line('END ' ||l_package_name||';');
1376:
1377: l_csr_sql := dbms_sql.open_cursor;
1378: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1376:
1377: l_csr_sql := dbms_sql.open_cursor;
1378: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1384: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1378: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1384: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1385: dbms_sql.close_cursor( l_csr_sql );
1386:
1379: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1384: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1385: dbms_sql.close_cursor( l_csr_sql );
1386:
1387: l_header_line :=0;
1380: dbms_sql.close_cursor( l_csr_sql );
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1384: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1385: dbms_sql.close_cursor( l_csr_sql );
1386:
1387: l_header_line :=0;
1388: l_body_line :=0;
1381:
1382: l_csr_sql := dbms_sql.open_cursor;
1383: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
1384: l_rows := dbms_sql.EXECUTE( l_csr_sql );
1385: dbms_sql.close_cursor( l_csr_sql );
1386:
1387: l_header_line :=0;
1388: l_body_line :=0;
1389:
1484: add_body_line('--');
1485: add_body_line('-- Variable declarations');
1486: add_body_line('--');
1487: add_body_line(' l_body_line NUMBER:=0;');
1488: add_body_line(' l_body DBMS_SQL.VARCHAR2S;');
1489: add_body_line(' l_csr_sql NUMBER;');
1490: add_body_line(' l_rows NUMBER;');
1491: add_body_line('');
1492: add_body_line('-----------------------------------------------------------------------');
2584: add_body_line('');
2585: add_body_line('END '||l_package_name ||';');
2586: add_header_line('END ' ||l_package_name||';');
2587:
2588: l_csr_sql := dbms_sql.open_cursor;
2589: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2585: add_body_line('END '||l_package_name ||';');
2586: add_header_line('END ' ||l_package_name||';');
2587:
2588: l_csr_sql := dbms_sql.open_cursor;
2589: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2586: add_header_line('END ' ||l_package_name||';');
2587:
2588: l_csr_sql := dbms_sql.open_cursor;
2589: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2587:
2588: l_csr_sql := dbms_sql.open_cursor;
2589: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2595: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2589: dbms_sql.parse( l_csr_sql, l_header,0,l_header_line-1,FALSE, dbms_sql.v7 );
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2595: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2596: dbms_sql.close_cursor( l_csr_sql );
2597:
2590: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2595: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2596: dbms_sql.close_cursor( l_csr_sql );
2597:
2598: EXCEPTION
2591: dbms_sql.close_cursor( l_csr_sql );
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2595: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2596: dbms_sql.close_cursor( l_csr_sql );
2597:
2598: EXCEPTION
2599: WHEN OTHERS THEN
2592:
2593: l_csr_sql := dbms_sql.open_cursor;
2594: dbms_sql.parse( l_csr_sql, l_body,0,l_body_line-1,FALSE, dbms_sql.v7 );
2595: l_rows := dbms_sql.EXECUTE( l_csr_sql );
2596: dbms_sql.close_cursor( l_csr_sql );
2597:
2598: EXCEPTION
2599: WHEN OTHERS THEN
2600: fnd_file.put_line(fnd_file.output,'Error occured in installation of HR Multi tenancy '|| sqlerrm);