APPS.ENG_IMPL_ITEM_CHANGES_PKG dependencies on DBMS_SQL

Line 1580: l_desc_table DBMS_SQL.Desc_Tab;

1576: l_utility_dynamic_sql VARCHAR2(32767); --the largest a VARCHAR2 can be
1577: l_cursor_id NUMBER;
1578: l_column_count NUMBER;
1579: l_dummy NUMBER;
1580: l_desc_table DBMS_SQL.Desc_Tab;
1581: l_retrieved_value VARCHAR2(1000);
1582: l_current_column_index NUMBER;
1583:
1584: l_inventory_item_id NUMBER ;

Line 1863: l_cursor_id := DBMS_SQL.Open_Cursor;

1859:
1860: Write_Debug('SQL:' || l_dynamic_sql );
1861:
1862:
1863: l_cursor_id := DBMS_SQL.Open_Cursor;
1864: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
1865: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
1866: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
1867:

Line 1864: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);

1860: Write_Debug('SQL:' || l_dynamic_sql );
1861:
1862:
1863: l_cursor_id := DBMS_SQL.Open_Cursor;
1864: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
1865: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
1866: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
1867:
1868:

Line 1865: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);

1861:
1862:
1863: l_cursor_id := DBMS_SQL.Open_Cursor;
1864: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
1865: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
1866: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
1867:
1868:
1869: FOR i IN 1 .. l_column_count

Line 1866: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);

1862:
1863: l_cursor_id := DBMS_SQL.Open_Cursor;
1864: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
1865: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
1866: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
1867:
1868:
1869: FOR i IN 1 .. l_column_count
1870: LOOP

Line 1878: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);

1874: --
1875: -------------------------------------------------------------
1876: -- We define all columns as VARCHAR2(1000) for convenience --
1877: -------------------------------------------------------------
1878: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);
1879: END LOOP;
1880:
1881:
1882: Write_Debug('Execute our dynamic query . . .' );

Line 1888: l_dummy := DBMS_SQL.Execute(l_cursor_id);

1884:
1885: ----------------------------------
1886: -- Execute our dynamic query... --
1887: ----------------------------------
1888: l_dummy := DBMS_SQL.Execute(l_cursor_id);
1889:
1890:
1891: Write_Debug('After Executing our dynamic query . . .' );
1892:

Line 1897: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)

1893: ----------------------------------------------------
1894: -- ...then loop through the result set, gathering
1895: -- the column values
1896: ----------------------------------------------------
1897: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)
1898: LOOP
1899:
1900:
1901: Write_Debug('loop through the result set, gathering the column values . . .' );

Line 1910: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

1906: ------------------------------------
1907: -- Get the PK values for this row --
1908: ------------------------------------
1909: -- Item Id
1910: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
1911: l_current_column_index := l_current_column_index + 1;
1912: -- l_pk_column_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
1913: l_inventory_item_id := TO_NUMBER(l_retrieved_value) ;
1914:

Line 1920: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

1916:
1917: Write_Debug('Got Item Id ' || to_char(l_inventory_item_id));
1918:
1919: -- Org Id
1920: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
1921: l_current_column_index := l_current_column_index + 1;
1922: -- l_pk_column_name_value_pairs(2).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
1923: l_organization_id := TO_NUMBER(l_retrieved_value) ;
1924:

Line 1931: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

1927:
1928: ----------------------------
1929: -- Determine the ACD Type --
1930: ----------------------------
1931: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
1932: l_current_column_index := l_current_column_index + 1;
1933: l_current_acd_type := l_retrieved_value;
1934:
1935: Write_Debug('Got Acd Id ' || l_current_acd_type);

Line 1940: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

1936:
1937: ----------------------------
1938: -- Determine the generated Item Number
1939: ----------------------------
1940: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
1941: l_current_column_index := l_current_column_index + 1;
1942: l_item_number := l_retrieved_value;
1943:
1944: Write_Debug('Got Item Number ' || l_item_number);

Line 1949: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

1945:
1946: ----------------------------
1947: -- Determine the generated Item Number
1948: ----------------------------
1949: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
1950: l_current_column_index := l_current_column_index + 1;
1951: l_item_desc := l_retrieved_value;
1952:
1953: Write_Debug('Got Item desc ' || l_item_desc);

Line 1968: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);

1964: -----------------------------------------------
1965: -- Get the current column name and its value --
1966: -----------------------------------------------
1967: l_current_column_name := l_desc_table(i).COL_NAME;
1968: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);
1969:
1970: ------------------------------------------------------------------------
1971: -- See whether the current column belongs to a User-Defined Attribute --
1972: ------------------------------------------------------------------------

Line 2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;

2334: Write_Debug('l_item_number: ' || l_item_number);
2335: Write_Debug('---------------------------------- ' );
2336: BEGIN
2337:
2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;
2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);

Line 2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);

2335: Write_Debug('---------------------------------- ' );
2336: BEGIN
2337:
2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;
2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);

Line 2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);

2336: BEGIN
2337:
2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;
2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);

Line 2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);

2337:
2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;
2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);

Line 2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);

2338: l_dummy_c := DBMS_SQL.OPEN_CURSOR;
2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);
2346: if l_item_desc is not null

Line 2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);

2339: DBMS_SQL.PARSE(l_dummy_c, l_dynamic_sql, 2);
2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);
2346: if l_item_desc is not null
2347: then

Line 2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);

2340: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_mode_for_current_row', l_mode_for_current_row);
2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);
2346: if l_item_desc is not null
2347: then
2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);

Line 2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);

2341: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_inventory_item_id', l_inventory_item_id);
2342: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_item_number', l_item_number);
2343: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_organization_id', l_organization_id);
2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);
2346: if l_item_desc is not null
2347: then
2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);
2349: end if;

Line 2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);

2344: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_inventory_item_id', l_out_inventory_item_id);
2345: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_out_organization_id', l_out_organization_id);
2346: if l_item_desc is not null
2347: then
2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);
2349: end if;
2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);

Line 2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);

2346: if l_item_desc is not null
2347: then
2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);
2349: end if;
2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);

Line 2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);

2347: then
2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);
2349: end if;
2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);

Line 2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);

2348: DBMS_SQL.BIND_VARIABLE(l_dummy_c, 'l_item_desc', l_item_desc);
2349: end if;
2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);
2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);

Line 2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);

2349: end if;
2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);
2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);
2357:

Line 2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);

2350: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_return_status', l_return_status, 1);
2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);
2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);
2357:
2358:

Line 2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);

2351: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_count', l_msg_count);
2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);
2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);
2357:
2358:
2359: Write_Debug('After calling EGO_ITEM_PUB.Process_Item' );

Line 2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);

2352: DBMS_SQL.BIND_VARIABLE (l_dummy_c, 'l_msg_data', l_msg_data, 2000);
2353: l_dummy_r := DBMS_SQL.EXECUTE(l_dummy_c);
2354: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_return_status', l_return_status);
2355: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_count', l_msg_count);
2356: DBMS_SQL.VARIABLE_VALUE(l_dummy_c, 'l_msg_data', l_msg_data);
2357:
2358:
2359: Write_Debug('After calling EGO_ITEM_PUB.Process_Item' );
2360: Write_Debug('---------------------------------- ' );

Line 2441: END LOOP; -- DBMS_SQL.Fetch_Rows Loop

2437:
2438: END IF; -- l_mode_for_current_row <> 'SKIP'
2439:
2440:
2441: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
2442: DBMS_SQL.Close_Cursor(l_cursor_id);
2443:
2444:
2445: ---------------------------------------------------------------------------

Line 2442: DBMS_SQL.Close_Cursor(l_cursor_id);

2438: END IF; -- l_mode_for_current_row <> 'SKIP'
2439:
2440:
2441: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
2442: DBMS_SQL.Close_Cursor(l_cursor_id);
2443:
2444:
2445: ---------------------------------------------------------------------------
2446: -- Finally, set the IMPLEMENTATION_DATE for all rows we just implemented --

Line 3002: l_desc_table DBMS_SQL.Desc_Tab;

2998: l_utility_dynamic_sql VARCHAR2(32767); --the largest a VARCHAR2 can be
2999: l_cursor_id NUMBER;
3000: l_column_count NUMBER;
3001: l_dummy NUMBER;
3002: l_desc_table DBMS_SQL.Desc_Tab;
3003: l_retrieved_value VARCHAR2(1000);
3004: l_current_column_index NUMBER;
3005:
3006: l_prod_b_table_name CONSTANT VARCHAR2(30) := 'EGO_ITEM_GTN_ATTRS_B' ;

Line 3311: l_cursor_id := DBMS_SQL.Open_Cursor;

3307:
3308:
3309: Write_Debug('Item GDSN Single Change Query:' || l_dynamic_sql );
3310:
3311: l_cursor_id := DBMS_SQL.Open_Cursor;
3312: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
3313: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3314: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3315:

Line 3312: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);

3308:
3309: Write_Debug('Item GDSN Single Change Query:' || l_dynamic_sql );
3310:
3311: l_cursor_id := DBMS_SQL.Open_Cursor;
3312: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
3313: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3314: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3315:
3316: FOR i IN 1 .. l_column_count

Line 3313: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);

3309: Write_Debug('Item GDSN Single Change Query:' || l_dynamic_sql );
3310:
3311: l_cursor_id := DBMS_SQL.Open_Cursor;
3312: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
3313: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3314: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3315:
3316: FOR i IN 1 .. l_column_count
3317: LOOP

Line 3314: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);

3310:
3311: l_cursor_id := DBMS_SQL.Open_Cursor;
3312: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
3313: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3314: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3315:
3316: FOR i IN 1 .. l_column_count
3317: LOOP
3318: --

Line 3324: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);

3320: --
3321: -------------------------------------------------------------
3322: -- We define all columns as VARCHAR2(1000) for convenience --
3323: -------------------------------------------------------------
3324: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);
3325: END LOOP;
3326:
3327: ----------------------------------
3328: -- Execute our dynamic query... --

Line 3330: l_dummy := DBMS_SQL.Execute(l_cursor_id);

3326:
3327: ----------------------------------
3328: -- Execute our dynamic query... --
3329: ----------------------------------
3330: l_dummy := DBMS_SQL.Execute(l_cursor_id);
3331:
3332: ----------------------------------------------------
3333: -- ...then loop through the result set, gathering --
3334: -- the column values and then calling Process_Row --

Line 3336: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)

3332: ----------------------------------------------------
3333: -- ...then loop through the result set, gathering --
3334: -- the column values and then calling Process_Row --
3335: ----------------------------------------------------
3336: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)
3337: LOOP
3338: l_current_column_index := 1;
3339: l_attr_name_value_pairs.DELETE();
3340: ------------------------------------

Line 3344: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3340: ------------------------------------
3341: -- Get the PK values for this row --
3342: ------------------------------------
3343: -- Item Id
3344: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3345: l_current_column_index := l_current_column_index + 1;
3346: -- l_pk_column_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
3347: l_inventory_item_id := TO_NUMBER(l_retrieved_value) ;
3348:

Line 3352: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3348:
3349: Write_Debug('Item GDSN Single Change Item Id: ' || to_char(l_inventory_item_id));
3350:
3351: -- Org Id
3352: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3353: l_current_column_index := l_current_column_index + 1;
3354: -- l_pk_column_name_value_pairs(2).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
3355: l_organization_id := TO_NUMBER(l_retrieved_value) ;
3356: Write_Debug('Item GDSN Single Change Org Id: ' || to_char(l_organization_id));

Line 3361: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3357:
3358: ----------------------------
3359: -- Determine the ACD Type --
3360: ----------------------------
3361: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3362: l_current_column_index := l_current_column_index + 1;
3363: l_current_acd_type := l_retrieved_value;
3364:
3365: Write_Debug('Item GDSN Single Change ACD Type: ' || l_current_acd_type);

Line 3369: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3365: Write_Debug('Item GDSN Single Change ACD Type: ' || l_current_acd_type);
3366: --------------------------
3367: -- Get the extension ID --
3368: --------------------------
3369: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3370: l_current_column_index := l_current_column_index + 1;
3371: l_current_pending_ext_id := TO_NUMBER(l_retrieved_value);
3372:
3373: Write_Debug('Item GDSN Single Change Extension Id: ' || to_char(l_current_pending_ext_id));

Line 3387: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);

3383: -----------------------------------------------
3384: -- Get the current column name and its value --
3385: -----------------------------------------------
3386: l_current_column_name := l_desc_table(i).COL_NAME;
3387: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);
3388:
3389:
3390: ------------------------------------------------------------------------
3391: -- See whether the current column belongs to a User-Defined Attribute --

Line 3720: END LOOP; -- DBMS_SQL.Fetch_Rows Loop

3716:
3717: END IF; -- l_mode_for_current_row <> 'SKIP'
3718:
3719:
3720: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
3721: DBMS_SQL.Close_Cursor(l_cursor_id);
3722:
3723:
3724: Write_Debug('After Processing Item GDSN Single Change . . . ' );

Line 3721: DBMS_SQL.Close_Cursor(l_cursor_id);

3717: END IF; -- l_mode_for_current_row <> 'SKIP'
3718:
3719:
3720: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
3721: DBMS_SQL.Close_Cursor(l_cursor_id);
3722:
3723:
3724: Write_Debug('After Processing Item GDSN Single Change . . . ' );
3725:

Line 3751: l_cursor_id := DBMS_SQL.Open_Cursor;

3747:
3748:
3749: -- Write_Debug('Item GDSN Multi-Row Change Query:' || l_mul_dynamic_sql );
3750:
3751: l_cursor_id := DBMS_SQL.Open_Cursor;
3752: DBMS_SQL.Parse(l_cursor_id, l_mul_dynamic_sql, DBMS_SQL.Native);
3753: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3754: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3755:

Line 3752: DBMS_SQL.Parse(l_cursor_id, l_mul_dynamic_sql, DBMS_SQL.Native);

3748:
3749: -- Write_Debug('Item GDSN Multi-Row Change Query:' || l_mul_dynamic_sql );
3750:
3751: l_cursor_id := DBMS_SQL.Open_Cursor;
3752: DBMS_SQL.Parse(l_cursor_id, l_mul_dynamic_sql, DBMS_SQL.Native);
3753: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3754: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3755:
3756: FOR i IN 1 .. l_column_count

Line 3753: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);

3749: -- Write_Debug('Item GDSN Multi-Row Change Query:' || l_mul_dynamic_sql );
3750:
3751: l_cursor_id := DBMS_SQL.Open_Cursor;
3752: DBMS_SQL.Parse(l_cursor_id, l_mul_dynamic_sql, DBMS_SQL.Native);
3753: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3754: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3755:
3756: FOR i IN 1 .. l_column_count
3757: LOOP

Line 3754: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);

3750:
3751: l_cursor_id := DBMS_SQL.Open_Cursor;
3752: DBMS_SQL.Parse(l_cursor_id, l_mul_dynamic_sql, DBMS_SQL.Native);
3753: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', l_change_line_id);
3754: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
3755:
3756: FOR i IN 1 .. l_column_count
3757: LOOP
3758: --

Line 3764: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);

3760: --
3761: -------------------------------------------------------------
3762: -- We define all columns as VARCHAR2(1000) for convenience --
3763: -------------------------------------------------------------
3764: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);
3765: END LOOP;
3766:
3767: ----------------------------------
3768: -- Execute our dynamic query... --

Line 3770: l_dummy := DBMS_SQL.Execute(l_cursor_id);

3766:
3767: ----------------------------------
3768: -- Execute our dynamic query... --
3769: ----------------------------------
3770: l_dummy := DBMS_SQL.Execute(l_cursor_id);
3771:
3772: ----------------------------------------------------
3773: -- ...then loop through the result set, gathering --
3774: -- the column values and then calling Process_Row --

Line 3789: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)

3785: -- l_ext_table_metadata_obj
3786: -- := EGO_USER_ATTRS_COMMON_PVT.Get_Ext_Table_Metadata(l_object_id);
3787:
3788:
3789: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)
3790: LOOP
3791:
3792: Write_Debug('----------- Fetch Mutl-Row Attr Change Rercord ---------- ' );
3793:

Line 3800: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3796: ------------------------------------
3797: -- Get the PK values for this row --
3798: ------------------------------------
3799: -- Item Id
3800: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3801: l_current_column_index := l_current_column_index + 1;
3802: l_pk_column_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
3803: l_inventory_item_id := TO_NUMBER(l_retrieved_value) ;
3804:

Line 3809: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3805: Write_Debug('Item GDSN Multi-Row Change Item Id: ' || to_char(l_inventory_item_id));
3806:
3807:
3808: -- Org Id
3809: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3810: l_current_column_index := l_current_column_index + 1;
3811: l_pk_column_name_value_pairs(2).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
3812: l_organization_id := TO_NUMBER(l_retrieved_value) ;
3813:

Line 3821: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3817:
3818: ----------------------------
3819: -- Determine the ACD Type --
3820: ----------------------------
3821: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3822: l_current_column_index := l_current_column_index + 1;
3823: l_current_acd_type := l_retrieved_value;
3824:
3825: Write_Debug('Item GDSN Multi-Row Change ACD Type: ' || l_current_acd_type);

Line 3830: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3826:
3827: --------------------------
3828: -- Get the extension ID --
3829: --------------------------
3830: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3831: l_current_column_index := l_current_column_index + 1;
3832: l_current_pending_ext_id := TO_NUMBER(l_retrieved_value);
3833:
3834:

Line 3841: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

3837: ---------------------------------------------------------
3838: -- Find the Attr Group metadata from the Attr Group ID --
3839: ---------------------------------------------------------
3840:
3841: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
3842: l_current_column_index := l_current_column_index + 1;
3843: l_attr_group_id := TO_NUMBER(l_retrieved_value) ;
3844:
3845: Write_Debug('EGO_USER_ATTRS_COMMON_PVT.Get_Attr_Group_Metadata for ' || to_char(l_attr_group_id));

Line 3865: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);

3861: -----------------------------------------------
3862: -- Get the current column name and its value --
3863: -----------------------------------------------
3864: l_current_column_name := l_desc_table(i).COL_NAME;
3865: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);
3866:
3867: ------------------------------------------------------------------------
3868: -- See whether the current column belongs to a User-Defined Attribute --
3869: ------------------------------------------------------------------------

Line 4190: END LOOP; -- DBMS_SQL.Fetch_Rows Loop

4186:
4187: END IF; -- l_mode_for_current_row <> 'SKIP'
4188:
4189:
4190: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
4191: DBMS_SQL.Close_Cursor(l_cursor_id);
4192:
4193: Write_Debug('--------------------------------------------------' );
4194: Write_Debug('After Processing Item GDSN Mult-Row Changes . . . ' );

Line 4191: DBMS_SQL.Close_Cursor(l_cursor_id);

4187: END IF; -- l_mode_for_current_row <> 'SKIP'
4188:
4189:
4190: END LOOP; -- DBMS_SQL.Fetch_Rows Loop
4191: DBMS_SQL.Close_Cursor(l_cursor_id);
4192:
4193: Write_Debug('--------------------------------------------------' );
4194: Write_Debug('After Processing Item GDSN Mult-Row Changes . . . ' );
4195:

Line 4525: l_desc_table DBMS_SQL.Desc_Tab;

4521: l_history_tl_prod_cols_list VARCHAR2(10000);
4522: l_dynamic_sql VARCHAR2(32767); --the largest a VARCHAR2 can be
4523: l_cursor_id NUMBER;
4524: l_column_count NUMBER;
4525: l_desc_table DBMS_SQL.Desc_Tab;
4526: l_retrieved_value VARCHAR2(1000);
4527: l_dummy NUMBER;
4528: l_current_column_index NUMBER;
4529: l_current_row_language VARCHAR2(30);

Line 4879: l_cursor_id := DBMS_SQL.Open_Cursor;

4875: instr(UPPER(l_dynamic_sql),'SOURCE_LANG') > 0 THEN
4876: l_dynamic_sql := l_dynamic_sql || ', DECODE(LANGUAGE,SOURCE_LANG,0,1)';
4877: END IF;
4878:
4879: l_cursor_id := DBMS_SQL.Open_Cursor;
4880: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
4881: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', p_change_line_id);
4882: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
4883: write_debug('Sql formed for the attr changes : ' || l_dynamic_sql);

Line 4880: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);

4876: l_dynamic_sql := l_dynamic_sql || ', DECODE(LANGUAGE,SOURCE_LANG,0,1)';
4877: END IF;
4878:
4879: l_cursor_id := DBMS_SQL.Open_Cursor;
4880: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
4881: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', p_change_line_id);
4882: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
4883: write_debug('Sql formed for the attr changes : ' || l_dynamic_sql);
4884: FOR i IN 1 .. l_column_count

Line 4881: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', p_change_line_id);

4877: END IF;
4878:
4879: l_cursor_id := DBMS_SQL.Open_Cursor;
4880: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
4881: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', p_change_line_id);
4882: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
4883: write_debug('Sql formed for the attr changes : ' || l_dynamic_sql);
4884: FOR i IN 1 .. l_column_count
4885: LOOP

Line 4882: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);

4878:
4879: l_cursor_id := DBMS_SQL.Open_Cursor;
4880: DBMS_SQL.Parse(l_cursor_id, l_dynamic_sql, DBMS_SQL.Native);
4881: DBMS_SQL.Bind_Variable(l_cursor_id, ':1', p_change_line_id);
4882: DBMS_SQL.Describe_Columns(l_cursor_id, l_column_count, l_desc_table);
4883: write_debug('Sql formed for the attr changes : ' || l_dynamic_sql);
4884: FOR i IN 1 .. l_column_count
4885: LOOP
4886:

Line 4893: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);

4889: --
4890: -------------------------------------------------------------
4891: -- We define all columns as VARCHAR2(1000) for convenience --
4892: -------------------------------------------------------------
4893: DBMS_SQL.Define_Column(l_cursor_id, i, l_retrieved_value, 1000);
4894: END LOOP;
4895:
4896: ----------------------------------
4897: -- Execute our dynamic query... --

Line 4899: l_dummy := DBMS_SQL.Execute(l_cursor_id);

4895:
4896: ----------------------------------
4897: -- Execute our dynamic query... --
4898: ----------------------------------
4899: l_dummy := DBMS_SQL.Execute(l_cursor_id);
4900:
4901: ----------------------------------------------------
4902: -- ...then loop through the result set, gathering --
4903: -- the column values and then calling Process_Row --

Line 4905: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)

4901: ----------------------------------------------------
4902: -- ...then loop through the result set, gathering --
4903: -- the column values and then calling Process_Row --
4904: ----------------------------------------------------
4905: WHILE (DBMS_SQL.Fetch_Rows(l_cursor_id) > 0)
4906: LOOP
4907:
4908: l_current_column_index := 1;
4909: l_attr_name_value_pairs.DELETE();

Line 4915: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4911: ------------------------------------
4912: -- Get the PK values for this row --
4913: ------------------------------------
4914: IF (l_pk_column_name_value_pairs.COUNT > 0) THEN
4915: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4916: l_current_column_index := l_current_column_index + 1;
4917: l_pk_column_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4918: END IF;
4919: IF (l_pk_column_name_value_pairs.COUNT > 1) THEN

Line 4920: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4916: l_current_column_index := l_current_column_index + 1;
4917: l_pk_column_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4918: END IF;
4919: IF (l_pk_column_name_value_pairs.COUNT > 1) THEN
4920: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4921: l_current_column_index := l_current_column_index + 1;
4922: l_pk_column_name_value_pairs(2).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4923: END IF;
4924: IF (l_pk_column_name_value_pairs.COUNT > 2) THEN

Line 4925: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4921: l_current_column_index := l_current_column_index + 1;
4922: l_pk_column_name_value_pairs(2).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4923: END IF;
4924: IF (l_pk_column_name_value_pairs.COUNT > 2) THEN
4925: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4926: l_current_column_index := l_current_column_index + 1;
4927: l_pk_column_name_value_pairs(3).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4928: END IF;
4929: IF (l_pk_column_name_value_pairs.COUNT > 3) THEN

Line 4930: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4926: l_current_column_index := l_current_column_index + 1;
4927: l_pk_column_name_value_pairs(3).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4928: END IF;
4929: IF (l_pk_column_name_value_pairs.COUNT > 3) THEN
4930: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4931: l_current_column_index := l_current_column_index + 1;
4932: l_pk_column_name_value_pairs(4).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4933: END IF;
4934: IF (l_pk_column_name_value_pairs.COUNT > 4) THEN

Line 4935: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4931: l_current_column_index := l_current_column_index + 1;
4932: l_pk_column_name_value_pairs(4).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4933: END IF;
4934: IF (l_pk_column_name_value_pairs.COUNT > 4) THEN
4935: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4936: l_current_column_index := l_current_column_index + 1;
4937: l_pk_column_name_value_pairs(5).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4938: END IF;
4939:

Line 4946: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4942: -- and try to get related Class Codes as well --
4943: ------------------------------------------------
4944: IF (l_class_code_name_value_pairs IS NOT NULL AND
4945: l_class_code_name_value_pairs.COUNT > 0) THEN
4946: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4947: l_current_column_index := l_current_column_index + 1;
4948: l_class_code_name_value_pairs(1).VALUE := SUBSTRB(l_retrieved_value, 1, 150);
4949:
4950: Write_Debug('Current Item catalog category id in : ' || TO_CHAR(l_class_code_name_value_pairs(1).VALUE));

Line 4963: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4959:
4960: ----------------------------
4961: -- Determine the ACD Type --
4962: ----------------------------
4963: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4964: l_current_column_index := l_current_column_index + 1;
4965: l_current_acd_type := l_retrieved_value;
4966:
4967: ---------------------------------------------------------

Line 4970: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4966:
4967: ---------------------------------------------------------
4968: -- Find the Attr Group metadata from the Attr Group ID --
4969: ---------------------------------------------------------
4970: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4971: l_current_column_index := l_current_column_index + 1;
4972: L_ATTR_GROUP_ID := TO_NUMBER(l_retrieved_value);
4973: l_attr_group_metadata_obj :=
4974: EGO_USER_ATTRS_COMMON_PVT.Get_Attr_Group_Metadata(

Line 4981: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4977:
4978: --------------------------
4979: -- Get the extension ID --
4980: --------------------------
4981: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4982: l_current_column_index := l_current_column_index + 1;
4983: l_current_pending_ext_id := TO_NUMBER(l_retrieved_value);
4984:
4985: Write_Debug('Current Pending Ext Id : ' || TO_CHAR(l_current_pending_ext_id));

Line 4991: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4987:
4988: ---------------------------------------------------------
4989: -- Find the Attr Data Level and Data Level Pks
4990: ---------------------------------------------------------
4991: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
4992: l_current_column_index := l_current_column_index + 1;
4993: L_DATA_LEVEL_ID := TO_NUMBER(l_retrieved_value);
4994: Write_Debug('Current data level Id : ' || TO_CHAR(L_DATA_LEVEL_ID));
4995: if L_DATA_LEVEL_ID is not NULL

Line 5003: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

4999: Write_Debug('Current data level name : ' || TO_CHAR(L_DATA_LEVEL_NAME));
5000:
5001: IF L_DATA_LEVEL_NAME='ITEM_REVISION_LEVEL'
5002: THEN
5003: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5004: l_current_column_index := l_current_column_index + 5;
5005: l_data_level_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ(
5006: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME1,
5007: l_retrieved_value));

Line 5017: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

5013: null));
5014: l_current_column_index := l_current_column_index + 1;
5015: if L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME1 IS NOT NULL
5016: THEN
5017: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5018:
5019: --l_current_column_index := l_current_column_index + 1;
5020: l_data_level_name_value_pairs := EGO_COL_NAME_VALUE_PAIR_ARRAY(EGO_COL_NAME_VALUE_PAIR_OBJ(
5021: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME1,

Line 5031: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

5027: l_current_column_index := l_current_column_index + 1;
5028: if L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME2 IS NOT NULL
5029: THEN
5030:
5031: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5032: --l_current_column_index := l_current_column_index + 1;
5033: l_data_level_name_value_pairs.EXTEND;
5034: l_data_level_name_value_pairs(l_data_level_name_value_pairs.LAST):= EGO_COL_NAME_VALUE_PAIR_OBJ(
5035: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME2,

Line 5045: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

5041: l_current_column_index := l_current_column_index + 1;
5042: if L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME3 IS NOT NULL
5043: THEN
5044:
5045: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5046: -- l_current_column_index := l_current_column_index + 1;
5047: l_data_level_name_value_pairs.EXTEND;
5048: l_data_level_name_value_pairs(l_data_level_name_value_pairs.LAST):= EGO_COL_NAME_VALUE_PAIR_OBJ(
5049: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME3,

Line 5059: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

5055: l_current_column_index := l_current_column_index + 1;
5056: if L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME4 IS NOT NULL
5057: THEN
5058:
5059: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5060: --l_current_column_index := l_current_column_index + 1;
5061: l_data_level_name_value_pairs.EXTEND;
5062: l_data_level_name_value_pairs(l_data_level_name_value_pairs.LAST):= EGO_COL_NAME_VALUE_PAIR_OBJ(
5063: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME4,

Line 5073: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);

5069: l_current_column_index := l_current_column_index + 1;
5070: if L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME5 IS NOT NULL
5071: THEN
5072:
5073: DBMS_SQL.Column_Value(l_cursor_id, l_current_column_index, l_retrieved_value);
5074: --l_current_column_index := l_current_column_index + 1;
5075: l_data_level_name_value_pairs.EXTEND;
5076: l_data_level_name_value_pairs(l_data_level_name_value_pairs.LAST):= EGO_COL_NAME_VALUE_PAIR_OBJ(
5077: L_DATA_LEVEL_META_DATA.PK_COLUMN_NAME5,

Line 5133: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);

5129: -- Get the current column name and its value --
5130: -----------------------------------------------
5131:
5132: l_current_column_name := l_desc_table(i).COL_NAME;
5133: DBMS_SQL.Column_Value(l_cursor_id, i, l_retrieved_value);
5134: -- write_debug(l_current_column_name||' : ' || l_retrieved_value);
5135: ------------------------------------------------------------------------
5136: -- See whether the current column belongs to a User-Defined Attribute --
5137: ------------------------------------------------------------------------

Line 5711: DBMS_SQL.Close_Cursor(l_cursor_id);

5707: RAISE FND_API.G_EXC_ERROR;
5708: END IF;
5709: END IF;
5710: END LOOP;
5711: DBMS_SQL.Close_Cursor(l_cursor_id);
5712:
5713: ---------------------------------------------------------------------------
5714: -- Finally, set the IMPLEMENTATION_DATE for all rows we just implemented --
5715: ---------------------------------------------------------------------------