DBA Data[Home] [Help]

APPS.AMS_CELL_PVT dependencies on DBMS_SQL

Line 1868: x_sql_tbl OUT NOCOPY DBMS_SQL.VARCHAR2S

1864: x_msg_data OUT NOCOPY VARCHAR2,
1865:
1866: p_cell_id IN NUMBER,
1867: p_party_id_only IN VARCHAR2 := FND_API.g_false,
1868: x_sql_tbl OUT NOCOPY DBMS_SQL.VARCHAR2S
1869: )
1870: IS
1871:
1872: l_api_version CONSTANT NUMBER := 1.0;

Line 2040: IF (DBMS_SQL.IS_Open(l_sql_cur) = FALSE ) THEN

2036: end if;
2037:
2038:
2039:
2040: IF (DBMS_SQL.IS_Open(l_sql_cur) = FALSE ) THEN
2041: l_sql_cur := DBMS_SQL.Open_Cursor;
2042: END IF;
2043: DBMS_SQL.Parse(l_sql_cur,
2044: x_sql_tbl,

Line 2041: l_sql_cur := DBMS_SQL.Open_Cursor;

2037:
2038:
2039:
2040: IF (DBMS_SQL.IS_Open(l_sql_cur) = FALSE ) THEN
2041: l_sql_cur := DBMS_SQL.Open_Cursor;
2042: END IF;
2043: DBMS_SQL.Parse(l_sql_cur,
2044: x_sql_tbl,
2045: x_sql_tbl.first,

Line 2043: DBMS_SQL.Parse(l_sql_cur,

2039:
2040: IF (DBMS_SQL.IS_Open(l_sql_cur) = FALSE ) THEN
2041: l_sql_cur := DBMS_SQL.Open_Cursor;
2042: END IF;
2043: DBMS_SQL.Parse(l_sql_cur,
2044: x_sql_tbl,
2045: x_sql_tbl.first,
2046: x_sql_tbl.last,
2047: FALSE,

Line 2048: DBMS_SQL.Native);

2044: x_sql_tbl,
2045: x_sql_tbl.first,
2046: x_sql_tbl.last,
2047: FALSE,
2048: DBMS_SQL.Native);
2049:
2050:
2051: ------------------------- finish -------------------------------
2052: AMS_Utility_PVT.debug_message(l_full_name ||': end');

Line 2411: l_party_cur := DBMS_SQL.OPEN_CURSOR;

2407: ------------------- get segment size ---------------------
2408:
2409: AMS_Utility_PVT.debug_message(l_full_name ||': get segment size');
2410:
2411: l_party_cur := DBMS_SQL.OPEN_CURSOR;
2412: l_sql_string := 'SELECT COUNT(*) FROM (' || l_sql_string || ')';
2413:
2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);
2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);

Line 2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);

2410:
2411: l_party_cur := DBMS_SQL.OPEN_CURSOR;
2412: l_sql_string := 'SELECT COUNT(*) FROM (' || l_sql_string || ')';
2413:
2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);
2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);
2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);
2417: LOOP
2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then

Line 2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);

2411: l_party_cur := DBMS_SQL.OPEN_CURSOR;
2412: l_sql_string := 'SELECT COUNT(*) FROM (' || l_sql_string || ')';
2413:
2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);
2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);
2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);
2417: LOOP
2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then
2419: DBMS_SQL.COLUMN_VALUE(l_party_cur, 1, l_size);

Line 2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);

2412: l_sql_string := 'SELECT COUNT(*) FROM (' || l_sql_string || ')';
2413:
2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);
2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);
2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);
2417: LOOP
2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then
2419: DBMS_SQL.COLUMN_VALUE(l_party_cur, 1, l_size);
2420: x_segment_size := l_size;

Line 2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then

2414: DBMS_SQL.PARSE(l_party_cur, l_sql_string, DBMS_SQL.Native);
2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);
2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);
2417: LOOP
2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then
2419: DBMS_SQL.COLUMN_VALUE(l_party_cur, 1, l_size);
2420: x_segment_size := l_size;
2421: ELSE
2422: EXIT;

Line 2419: DBMS_SQL.COLUMN_VALUE(l_party_cur, 1, l_size);

2415: DBMS_SQL.DEFINE_COLUMN(l_party_cur, 1, l_size);
2416: l_dummy := DBMS_SQL.EXECUTE(l_party_cur);
2417: LOOP
2418: IF DBMS_SQL.FETCH_ROWS(l_party_cur) > 0 then
2419: DBMS_SQL.COLUMN_VALUE(l_party_cur, 1, l_size);
2420: x_segment_size := l_size;
2421: ELSE
2422: EXIT;
2423: END IF;

Line 2426: DBMS_SQL.CLOSE_CURSOR(l_party_cur);

2422: EXIT;
2423: END IF;
2424: END LOOP;
2425:
2426: DBMS_SQL.CLOSE_CURSOR(l_party_cur);
2427:
2428: ------------------------- finish -------------------------------
2429:
2430: FND_MSG_PUB.count_and_get(

Line 2522: l_sql_tbl DBMS_SQL.varchar2s ;

2518:
2519: l_return_status VARCHAR2(1);
2520:
2521: l_cell_id NUMBER := p_cell_id;
2522: l_sql_tbl DBMS_SQL.varchar2s ;
2523: l_sql_tbl_new DBMS_SQL.varchar2s;
2524: l_segment_size NUMBER;
2525:
2526: l_temp NUMBER ;

Line 2523: l_sql_tbl_new DBMS_SQL.varchar2s;

2519: l_return_status VARCHAR2(1);
2520:
2521: l_cell_id NUMBER := p_cell_id;
2522: l_sql_tbl DBMS_SQL.varchar2s ;
2523: l_sql_tbl_new DBMS_SQL.varchar2s;
2524: l_segment_size NUMBER;
2525:
2526: l_temp NUMBER ;
2527: l_party_cur NUMBER ;

Line 2588: IF (DBMS_SQL.Is_Open(l_party_cur) = FALSE) THEN

2584: l_sql_tbl_new(l_count+1) := ' ) ';
2585:
2586: -- Open the cursor and parse it
2587: AMS_Utility_PVT.Debug_Message(l_api_name||': Parse the new sql ');
2588: IF (DBMS_SQL.Is_Open(l_party_cur) = FALSE) THEN
2589: l_party_cur := DBMS_SQL.Open_Cursor ;
2590: END IF;
2591: DBMS_SQL.Parse(l_party_cur ,
2592: l_sql_tbl_new,

Line 2589: l_party_cur := DBMS_SQL.Open_Cursor ;

2585:
2586: -- Open the cursor and parse it
2587: AMS_Utility_PVT.Debug_Message(l_api_name||': Parse the new sql ');
2588: IF (DBMS_SQL.Is_Open(l_party_cur) = FALSE) THEN
2589: l_party_cur := DBMS_SQL.Open_Cursor ;
2590: END IF;
2591: DBMS_SQL.Parse(l_party_cur ,
2592: l_sql_tbl_new,
2593: l_sql_tbl_new.first,

Line 2591: DBMS_SQL.Parse(l_party_cur ,

2587: AMS_Utility_PVT.Debug_Message(l_api_name||': Parse the new sql ');
2588: IF (DBMS_SQL.Is_Open(l_party_cur) = FALSE) THEN
2589: l_party_cur := DBMS_SQL.Open_Cursor ;
2590: END IF;
2591: DBMS_SQL.Parse(l_party_cur ,
2592: l_sql_tbl_new,
2593: l_sql_tbl_new.first,
2594: l_sql_tbl_new.last,
2595: FALSE,

Line 2596: DBMS_SQL.Native) ;

2592: l_sql_tbl_new,
2593: l_sql_tbl_new.first,
2594: l_sql_tbl_new.last,
2595: FALSE,
2596: DBMS_SQL.Native) ;
2597:
2598: -- l_dummy := DBMS_SQL.Execute(l_party_cur);
2599: DBMS_SQL.DEFINE_COLUMN(l_party_cur,1,l_temp);
2600: l_dummy := DBMS_SQL.Execute(l_party_cur);

Line 2598: -- l_dummy := DBMS_SQL.Execute(l_party_cur);

2594: l_sql_tbl_new.last,
2595: FALSE,
2596: DBMS_SQL.Native) ;
2597:
2598: -- l_dummy := DBMS_SQL.Execute(l_party_cur);
2599: DBMS_SQL.DEFINE_COLUMN(l_party_cur,1,l_temp);
2600: l_dummy := DBMS_SQL.Execute(l_party_cur);
2601: AMS_Utility_PVT.Debug_Message(l_api_name||': Executed the new sql ');
2602:

Line 2599: DBMS_SQL.DEFINE_COLUMN(l_party_cur,1,l_temp);

2595: FALSE,
2596: DBMS_SQL.Native) ;
2597:
2598: -- l_dummy := DBMS_SQL.Execute(l_party_cur);
2599: DBMS_SQL.DEFINE_COLUMN(l_party_cur,1,l_temp);
2600: l_dummy := DBMS_SQL.Execute(l_party_cur);
2601: AMS_Utility_PVT.Debug_Message(l_api_name||': Executed the new sql ');
2602:
2603: LOOP

Line 2600: l_dummy := DBMS_SQL.Execute(l_party_cur);

2596: DBMS_SQL.Native) ;
2597:
2598: -- l_dummy := DBMS_SQL.Execute(l_party_cur);
2599: DBMS_SQL.DEFINE_COLUMN(l_party_cur,1,l_temp);
2600: l_dummy := DBMS_SQL.Execute(l_party_cur);
2601: AMS_Utility_PVT.Debug_Message(l_api_name||': Executed the new sql ');
2602:
2603: LOOP
2604: IF DBMS_SQL.FETCH_ROWS(l_party_cur)>0 THEN

Line 2604: IF DBMS_SQL.FETCH_ROWS(l_party_cur)>0 THEN

2600: l_dummy := DBMS_SQL.Execute(l_party_cur);
2601: AMS_Utility_PVT.Debug_Message(l_api_name||': Executed the new sql ');
2602:
2603: LOOP
2604: IF DBMS_SQL.FETCH_ROWS(l_party_cur)>0 THEN
2605: -- get column values of the row
2606: DBMS_SQL.COLUMN_VALUE(l_party_cur,1, l_temp);
2607: ELSE
2608: EXIT;

Line 2606: DBMS_SQL.COLUMN_VALUE(l_party_cur,1, l_temp);

2602:
2603: LOOP
2604: IF DBMS_SQL.FETCH_ROWS(l_party_cur)>0 THEN
2605: -- get column values of the row
2606: DBMS_SQL.COLUMN_VALUE(l_party_cur,1, l_temp);
2607: ELSE
2608: EXIT;
2609: END IF;
2610: END LOOP;

Line 2614: DBMS_SQL.CLOSE_CURSOR(l_party_cur);

2610: END LOOP;
2611: l_segment_size := l_temp;
2612: -- dbms_output.put_line('l_segment_size: ' || l_segment_size);
2613:
2614: DBMS_SQL.CLOSE_CURSOR(l_party_cur);
2615:
2616: ------------------------- finish -------------------------------
2617: -- x_segment_size := l_count;
2618: x_segment_size := l_segment_size;

Line 2633: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN

2629:
2630: EXCEPTION
2631:
2632: WHEN FND_API.g_exc_error THEN
2633: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2634: DBMS_SQL.Close_Cursor(l_party_cur) ;
2635: END IF;
2636: x_return_status := FND_API.g_ret_sts_error;
2637: FND_MSG_PUB.count_and_get(

Line 2634: DBMS_SQL.Close_Cursor(l_party_cur) ;

2630: EXCEPTION
2631:
2632: WHEN FND_API.g_exc_error THEN
2633: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2634: DBMS_SQL.Close_Cursor(l_party_cur) ;
2635: END IF;
2636: x_return_status := FND_API.g_ret_sts_error;
2637: FND_MSG_PUB.count_and_get(
2638: p_encoded => FND_API.g_false,

Line 2644: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN

2640: p_data => x_msg_data
2641: );
2642:
2643: WHEN FND_API.g_exc_unexpected_error THEN
2644: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2645: DBMS_SQL.Close_Cursor(l_party_cur) ;
2646: END IF;
2647: x_return_status := FND_API.g_ret_sts_unexp_error ;
2648: FND_MSG_PUB.count_and_get(

Line 2645: DBMS_SQL.Close_Cursor(l_party_cur) ;

2641: );
2642:
2643: WHEN FND_API.g_exc_unexpected_error THEN
2644: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2645: DBMS_SQL.Close_Cursor(l_party_cur) ;
2646: END IF;
2647: x_return_status := FND_API.g_ret_sts_unexp_error ;
2648: FND_MSG_PUB.count_and_get(
2649: p_encoded => FND_API.g_false,

Line 2655: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN

2651: p_data => x_msg_data
2652: );
2653:
2654: WHEN OTHERS THEN
2655: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2656: DBMS_SQL.Close_Cursor(l_party_cur) ;
2657: END IF;
2658: x_return_status := FND_API.g_ret_sts_unexp_error ;
2659:

Line 2656: DBMS_SQL.Close_Cursor(l_party_cur) ;

2652: );
2653:
2654: WHEN OTHERS THEN
2655: IF (DBMS_SQL.Is_Open(l_party_cur) = TRUE) THEN
2656: DBMS_SQL.Close_Cursor(l_party_cur) ;
2657: END IF;
2658: x_return_status := FND_API.g_ret_sts_unexp_error ;
2659:
2660: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)