1382: --Wms_re_common_pvt.ShowSQL(l_stmt);
1383: inv_sql_binding_pvt.ShowBindVars;
1384:
1385: -- 2nd step: get a cursor and parse the SQL statement
1386: l_cursor := dbms_sql.open_cursor;
1387: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.native );
1388:
1389: -- 3rd step: bind input variables
1390: inv_sql_binding_pvt.BindVars(l_cursor);
1383: inv_sql_binding_pvt.ShowBindVars;
1384:
1385: -- 2nd step: get a cursor and parse the SQL statement
1386: l_cursor := dbms_sql.open_cursor;
1387: dbms_sql.parse( l_cursor, l_stmt, dbms_sql.native );
1388:
1389: -- 3rd step: bind input variables
1390: inv_sql_binding_pvt.BindVars(l_cursor);
1391:
1389: -- 3rd step: bind input variables
1390: inv_sql_binding_pvt.BindVars(l_cursor);
1391:
1392: -- 4th step: define output column
1393: dbms_sql.define_column(l_cursor, 1, l_strategy_id);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1390: inv_sql_binding_pvt.BindVars(l_cursor);
1391:
1392: -- 4th step: define output column
1393: dbms_sql.define_column(l_cursor, 1, l_strategy_id);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1391:
1392: -- 4th step: define output column
1393: dbms_sql.define_column(l_cursor, 1, l_strategy_id);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1399:
1392: -- 4th step: define output column
1393: dbms_sql.define_column(l_cursor, 1, l_strategy_id);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1399:
1400: -- 5th step: execute the SQL statement and fetch one record
1393: dbms_sql.define_column(l_cursor, 1, l_strategy_id);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1399:
1400: -- 5th step: execute the SQL statement and fetch one record
1401: l_rows := dbms_sql.execute_and_fetch(l_cursor, false);
1394: dbms_sql.define_column(l_cursor, 2, l_pk1_value,150);
1395: dbms_sql.define_column(l_cursor, 3, l_pk2_value,150);
1396: dbms_sql.define_column(l_cursor, 4, l_pk3_value,150);
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1399:
1400: -- 5th step: execute the SQL statement and fetch one record
1401: l_rows := dbms_sql.execute_and_fetch(l_cursor, false);
1402: if l_rows = 0 then
1397: dbms_sql.define_column(l_cursor, 5, l_pk4_value,150);
1398: dbms_sql.define_column(l_cursor, 6, l_pk5_value,150);
1399:
1400: -- 5th step: execute the SQL statement and fetch one record
1401: l_rows := dbms_sql.execute_and_fetch(l_cursor, false);
1402: if l_rows = 0 then
1403: l_strategy_id := null;
1404: else
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1401: l_rows := dbms_sql.execute_and_fetch(l_cursor, false);
1402: if l_rows = 0 then
1403: l_strategy_id := null;
1404: else
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1402: if l_rows = 0 then
1403: l_strategy_id := null;
1404: else
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1403: l_strategy_id := null;
1404: else
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1411: end if;
1404: else
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1411: end if;
1412:
1405: dbms_sql.column_value(l_cursor, 1, l_strategy_id);
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1411: end if;
1412:
1413: -- 6th step: finally, close dynamic cursor
1406: dbms_sql.column_value(l_cursor, 2, l_pk1_value);
1407: dbms_sql.column_value(l_cursor, 3, l_pk2_value);
1408: dbms_sql.column_value(l_cursor, 4, l_pk3_value);
1409: dbms_sql.column_value(l_cursor, 5, l_pk4_value);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1411: end if;
1412:
1413: -- 6th step: finally, close dynamic cursor
1414: dbms_sql.close_cursor(l_cursor);
1410: dbms_sql.column_value(l_cursor, 6, l_pk5_value);
1411: end if;
1412:
1413: -- 6th step: finally, close dynamic cursor
1414: dbms_sql.close_cursor(l_cursor);
1415:
1416: -- interrupt the search, if a strategy was found
1417: exit when l_strategy_id is not null;
1418: If (g_debug = 1) then
1519: IF inv_pp_debug.is_debug_mode THEN
1520: -- Note: in debug mode, later call to fnd_msg_pub.get will not get
1521: -- the message retrieved here since it is no longer on the stack
1522: inv_pp_debug.set_last_error_message(Sqlerrm);
1523: inv_pp_debug.set_last_error_position(dbms_sql.last_error_position);
1524: --changed by jcearley on 11/22/99 because call was causing error
1525: -- inv_pp_debug.set_last_dynamic_sql(l_stmt);
1526: inv_pp_debug.send_message_to_pipe('exception in '||l_api_name);
1527: inv_pp_debug.send_last_error_message;
1547: IF inv_pp_debug.is_debug_mode THEN
1548: -- Note: in debug mode, later call to fnd_msg_pub.get will not get
1549: -- the message retrieved here since it is no longer on the stack
1550: inv_pp_debug.set_last_error_message(Sqlerrm);
1551: inv_pp_debug.set_last_error_position(dbms_sql.last_error_position);
1552: -- inv_pp_debug.set_last_dynamic_sql(l_stmt);
1553: inv_pp_debug.send_message_to_pipe('exception in '||l_api_name);
1554: inv_pp_debug.send_last_error_message;
1555: -- inv_pp_debug.send_last_dynamic_sql;
1574: IF inv_pp_debug.is_debug_mode THEN
1575: -- Note: in debug mode, later call to fnd_msg_pub.get will not get
1576: -- the message retrieved here since it is no longer on the stack
1577: inv_pp_debug.set_last_error_message(Sqlerrm);
1578: inv_pp_debug.set_last_error_position(dbms_sql.last_error_position);
1579: -- inv_pp_debug.set_last_dynamic_sql(l_stmt);
1580: inv_pp_debug.send_message_to_pipe('exception in '||l_api_name);
1581: inv_pp_debug.send_last_error_message;
1582: -- inv_pp_debug.send_last_dynamic_sql;