1384: * Jeff Baird 15-Sep-2004 Bug #3890191 Added l_scale_out_tab.
1385: *
1386: **********************************************************************/
1387: PROCEDURE scale
1388: ( p_fm_matl_dtl_tab IN fm_matl_dtl_tab
1389: , p_orgn_id IN NUMBER
1390: , p_scale_factor IN NUMBER
1391: , p_primaries IN VARCHAR2
1392: , x_fm_matl_dtl_tab OUT NOCOPY fm_matl_dtl_tab
1388: ( p_fm_matl_dtl_tab IN fm_matl_dtl_tab
1389: , p_orgn_id IN NUMBER
1390: , p_scale_factor IN NUMBER
1391: , p_primaries IN VARCHAR2
1392: , x_fm_matl_dtl_tab OUT NOCOPY fm_matl_dtl_tab
1393: , x_return_status OUT NOCOPY VARCHAR2
1394: )
1395: IS
1396: l_row_count NUMBER;
1398: l_scale_tab scale_tab;
1399: l_scale_out_tab scale_tab;
1400: -- Bug #3890191 (JKB) Added l_scale_out_tab above.
1401: BEGIN
1402: l_row_count := p_fm_matl_dtl_tab.count;
1403: FOR l_row_number IN 1 .. l_row_count
1404: LOOP
1405: -- NPD Conv. Use inventory_item_id and detail_uom instead of item_id and item_um
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1402: l_row_count := p_fm_matl_dtl_tab.count;
1403: FOR l_row_number IN 1 .. l_row_count
1404: LOOP
1405: -- NPD Conv. Use inventory_item_id and detail_uom instead of item_id and item_um
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1403: FOR l_row_number IN 1 .. l_row_count
1404: LOOP
1405: -- NPD Conv. Use inventory_item_id and detail_uom instead of item_id and item_um
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1404: LOOP
1405: -- NPD Conv. Use inventory_item_id and detail_uom instead of item_id and item_um
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1405: -- NPD Conv. Use inventory_item_id and detail_uom instead of item_id and item_um
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1406: l_scale_tab(l_row_number).inventory_item_id := p_fm_matl_dtl_tab(l_row_number).inventory_item_id;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1414: l_scale_tab(l_row_number).contribute_yield_ind := p_fm_matl_dtl_tab(l_row_number).contribute_yield_ind;
1407: l_scale_tab(l_row_number).detail_uom := p_fm_matl_dtl_tab(l_row_number).detail_uom;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1414: l_scale_tab(l_row_number).contribute_yield_ind := p_fm_matl_dtl_tab(l_row_number).contribute_yield_ind;
1415: END LOOP;
1408: l_scale_tab(l_row_number).qty := p_fm_matl_dtl_tab(l_row_number).qty;
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1414: l_scale_tab(l_row_number).contribute_yield_ind := p_fm_matl_dtl_tab(l_row_number).contribute_yield_ind;
1415: END LOOP;
1416: scale( l_scale_tab
1409: l_scale_tab(l_row_number).line_type := p_fm_matl_dtl_tab(l_row_number).line_type;
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1414: l_scale_tab(l_row_number).contribute_yield_ind := p_fm_matl_dtl_tab(l_row_number).contribute_yield_ind;
1415: END LOOP;
1416: scale( l_scale_tab
1417: , p_orgn_id -- NPD Conv.
1410: l_scale_tab(l_row_number).line_no := p_fm_matl_dtl_tab(l_row_number).line_no;
1411: l_scale_tab(l_row_number).scale_type := p_fm_matl_dtl_tab(l_row_number).scale_type;
1412: l_scale_tab(l_row_number).scale_rounding_variance := p_fm_matl_dtl_tab(l_row_number).scale_rounding_variance;
1413: l_scale_tab(l_row_number).scale_multiple := p_fm_matl_dtl_tab(l_row_number).scale_multiple;
1414: l_scale_tab(l_row_number).contribute_yield_ind := p_fm_matl_dtl_tab(l_row_number).contribute_yield_ind;
1415: END LOOP;
1416: scale( l_scale_tab
1417: , p_orgn_id -- NPD Conv.
1418: , p_scale_factor
1422: );
1423: -- Bug #3890191 (JKB) Added l_scale_out_tab above.
1424: IF x_return_status = FND_API.G_RET_STS_SUCCESS
1425: THEN
1426: x_fm_matl_dtl_tab := p_fm_matl_dtl_tab;
1427: FOR l_row_number in 1 .. l_row_count
1428: LOOP
1429: x_fm_matl_dtl_tab(l_row_number).qty := l_scale_out_tab(l_row_number).qty;
1430: -- Bug #3890191 (JKB) Added l_scale_out_tab above.
1425: THEN
1426: x_fm_matl_dtl_tab := p_fm_matl_dtl_tab;
1427: FOR l_row_number in 1 .. l_row_count
1428: LOOP
1429: x_fm_matl_dtl_tab(l_row_number).qty := l_scale_out_tab(l_row_number).qty;
1430: -- Bug #3890191 (JKB) Added l_scale_out_tab above.
1431: END LOOP;
1432: END IF;
1433: END scale;