[Home] [Help]
1521:
1522: /*The below logic does the following:
1523: If MTRL UOM = MMTT txn UOM then
1524: MTRL new qty = MTRL old qty - MMTT txn qty
1525: If its dual UOM Item then MTRL new sec qty = MTRL old sec qty - MMTT sec qty
1526: If any of these lead to qty less than 0 then compute using standard conversion.
1527: Else
1528: for Primary based fulfillment AND If MTRL UOM is primary UOM then
1529: MTRL new qty = MTRL old qty - MMTT primary qty
1537: MTRL new qty = MTRL old qty - (MMTT sec qty converted to txn UOM)
1538: If MTRL new qty goes -ve or 0 then recalculate using UOM convert from calculated MTRL new sec qty
1539: else
1540: MTRL new qty = MTRL old qty - (MMTT txn qty from txn UOM to MTRL UOM)
1541: For dual UOM item calculate the corresponding MTRL new sec qty
1542: */
1543: mdebug('l_trolin_rec.uom_code '||l_trolin_rec.uom_code);
1544: mdebug('l_mmtt_transaction_uom '||l_mmtt_transaction_uom);
1545: mdebug('l_sec_uom_code '||l_sec_uom_code);
1552: mdebug('The new qty detailed for MTRL will be old qty detailed - MMTT txn qty');
1553: mdebug('l_mol_delta_qty '||l_mol_delta_qty);
1554: mdebug('l_new_quantity_detailed '||l_new_quantity_detailed);
1555:
1556: IF (l_sec_uom_code IS NOT NULL) THEN --{dual uom item
1557: l_new_sec_qty_detailed := l_old_sec_qty_detailed - l_secondary_quantity;
1558: mdebug('l_new_sec_qty_detailed '||l_new_sec_qty_detailed);
1559: mdebug('l_old_sec_qty_detailed '||l_old_sec_qty_detailed);
1560: mdebug('The new qty detailed for MTRL will be old qty detailed - MMTT txn qty');
1588: mdebug('Fulfillment base is P');
1589: mdebug('MOL UoM is same as MMTT Primary UoM so set MTRL delta qty as MMTT primary qty');
1590: mdebug('The new qty detailed for MTRL will be old qty detailed - MMTT pri qty');
1591:
1592: IF (l_sec_uom_code IS NOT NULL) THEN --{dual uom item
1593: l_new_sec_qty_detailed := l_old_sec_qty_detailed - l_secondary_quantity;
1594: IF(l_new_sec_qty_detailed <= 0) THEN --Can happen for items with deviations
1595: l_new_sec_qty_detailed := INV_Convert.inv_um_convert
1596: (item_id => l_item_id,
1646: to_name => null);
1647:
1648: l_new_quantity_detailed := l_old_quantity_detailed - l_mol_delta_qty;
1649:
1650: IF (l_sec_uom_code IS NOT NULL) THEN --{dual uom item
1651: l_new_sec_qty_detailed := l_old_sec_qty_detailed - l_secondary_quantity;
1652: IF(l_new_sec_qty_detailed <= 0) THEN--{
1653: l_new_sec_qty_detailed := INV_Convert.inv_um_convert
1654: (item_id => l_item_id,
1763:
1764:
1765: SELECT mtl_material_transactions_s.nextval
1766: INTO v_header_id
1767: FROM dual;
1768:
1769: mdebug('v_header_id: '|| v_header_id);
1770:
1771: mdebug('Before calling: INV_Replenish_Detail_PUB.Line_Details_PUB ');
1963: l_proc_name VARCHAR2(30) := 'Log_exception';
1964: BEGIN
1965:
1966: --Calculate Sequence Number
1967: select wms_exceptions_s.NEXTVAL INTO l_sequence from dual;
1968: g_debug := l_debug;
1969: g_module_name := l_proc_name;
1970: IF (l_debug = 1) THEN
1971: mdebug('Inserting into exceptions');