eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.FA_MASS_RET_PKG dependencies on FA_DEBUG_PKG

Line 465: fa_debug_pkg.add(

461:
462: EXCEPTION
463: WHEN others THEN
464: error := substrb(sqlerrm,1,80);
465: fa_debug_pkg.add(
466: 'Insert_Details',
467: error,
468: ''
469: ,p_log_level_rec => p_log_level_rec);

Line 604: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

600:
601: BEGIN -- Check_Split_Distribution
602:
603: if (g_log_level_rec.statement_level) then
604: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
605: 'Starting',
606: ''
607: ,p_log_level_rec => p_log_level_rec);
608: end if;

Line 620: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

616: l_units_assigned;
617: While c_cc%FOUND loop
618:
619: if (g_log_level_rec.statement_level) then
620: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
621: 'Starting while loop turn:',
622: i
623: ,p_log_level_rec => p_log_level_rec);
624: end if;

Line 634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

630: l_asset_dist_tbl(i).assigned_to := l_assigned_to;
631:
632:
633: if (g_log_level_rec.statement_level) then
634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
635: 'asset_id',
636: x_asset_id
637: ,p_log_level_rec => p_log_level_rec);
638: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

Line 638: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
635: 'asset_id',
636: x_asset_id
637: ,p_log_level_rec => p_log_level_rec);
638: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
639: 'ccid',
640: l_code_combination_id
641: ,p_log_level_rec => p_log_level_rec);
642: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

Line 642: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

638: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
639: 'ccid',
640: l_code_combination_id
641: ,p_log_level_rec => p_log_level_rec);
642: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
643: 'location_id',
644: l_location_id
645: ,p_log_level_rec => p_log_level_rec);
646: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

Line 646: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',

642: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
643: 'location_id',
644: l_location_id
645: ,p_log_level_rec => p_log_level_rec);
646: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
647: 'assigned_to',
648: l_assigned_to
649: ,p_log_level_rec => p_log_level_rec);
650: end if;

Line 939: fa_debug_pkg.add('check_add_ret', 'inside', 'validation'

935:
936: BEGIN -- Check_Addition_Retirement
937:
938: if (g_log_level_rec.statement_level) then
939: fa_debug_pkg.add('check_add_ret', 'inside', 'validation'
940: ,p_log_level_rec => p_log_level_rec);
941: end if;
942:
943: OPEN check_processed_retirement;

Line 966: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE'

962: CLOSE check_processed_retirement;
963:
964: if (g_log_level_rec.statement_level) then
965: if (status) then
966: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE'
967: ,p_log_level_rec => p_log_level_rec);
968: else
969: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE'
970: ,p_log_level_rec => p_log_level_rec);

Line 969: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE'

965: if (status) then
966: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE'
967: ,p_log_level_rec => p_log_level_rec);
968: else
969: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE'
970: ,p_log_level_rec => p_log_level_rec);
971: end if;
972: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code
973: ,p_log_level_rec => p_log_level_rec);

Line 972: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code

968: else
969: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE'
970: ,p_log_level_rec => p_log_level_rec);
971: end if;
972: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code
973: ,p_log_level_rec => p_log_level_rec);
974: end if;
975:
976: RETURN Status;

Line 1337: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units

1333: Begin
1334:
1335:
1336: if (g_log_level_rec.statement_level) then
1337: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units
1338: ,p_log_level_rec => p_log_level_rec);
1339: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search
1340: ,p_log_level_rec => p_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis

Line 1339: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search

1335:
1336: if (g_log_level_rec.statement_level) then
1337: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units
1338: ,p_log_level_rec => p_log_level_rec);
1339: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search
1340: ,p_log_level_rec => p_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis
1342: ,p_log_level_rec => p_log_level_rec);
1343: end if;

Line 1341: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis

1337: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units
1338: ,p_log_level_rec => p_log_level_rec);
1339: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search
1340: ,p_log_level_rec => p_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis
1342: ,p_log_level_rec => p_log_level_rec);
1343: end if;
1344:
1345: If (g_extend_search = 'YES'

Line 1371: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units

1367: While (c_asset_assignments%FOUND and l_remaining_units > 0) loop
1368:
1369:
1370: if (g_log_level_rec.statement_level) then
1371: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units
1372: ,p_log_level_rec => p_log_level_rec);
1373: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id
1374: ,p_log_level_rec => p_log_level_rec);
1375: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units

Line 1373: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id

1369:
1370: if (g_log_level_rec.statement_level) then
1371: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units
1372: ,p_log_level_rec => p_log_level_rec);
1373: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id
1374: ,p_log_level_rec => p_log_level_rec);
1375: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units
1376: ,p_log_level_rec => p_log_level_rec);
1377: end if;

Line 1375: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units

1371: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units
1372: ,p_log_level_rec => p_log_level_rec);
1373: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id
1374: ,p_log_level_rec => p_log_level_rec);
1375: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units
1376: ,p_log_level_rec => p_log_level_rec);
1377: end if;
1378:
1379: -- this solution assumes that units are entered in fa_mass_ext_retirements records.(verified ok).

Line 1394: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units <= rem.units',

1390: end if;
1391:
1392: if nvl(aurec.mer_units,0) <= l_remaining_units then
1393: if (g_log_level_rec.statement_level) then
1394: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units <= rem.units',
1395: aurec.mer_units
1396: ,p_log_level_rec => p_log_level_rec);
1397: end if;
1398:

Line 1401: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units = 0',

1397: end if;
1398:
1399: if l_post_units = 0 then
1400: if (g_log_level_rec.statement_level) then
1401: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units = 0',
1402: l_post_units
1403: ,p_log_level_rec => p_log_level_rec);
1404: end if;
1405:

Line 1418: fa_debug_pkg.add(l_calling_fn, 'mer_units >0, units',l_remaining_units

1414: message_tbl(aurec.asset_number, num_msg, msg_tbl
1415: ,p_log_level_rec => p_log_level_rec);
1416:
1417: if (g_log_level_rec.statement_level) then
1418: fa_debug_pkg.add(l_calling_fn, 'mer_units >0, units',l_remaining_units
1419: ,p_log_level_rec => p_log_level_rec);
1420: end if;
1421:
1422:

Line 1435: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units > 0',

1431: and review_status = 'POST'
1432: and batch_name <> g_batch_name;
1433:
1434: if (g_log_level_rec.statement_level) then
1435: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units > 0',
1436: l_asset_post_units
1437: ,p_log_level_rec => p_log_level_rec);
1438: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null, current_units',
1439: aurec.current_units

Line 1438: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null, current_units',

1434: if (g_log_level_rec.statement_level) then
1435: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units > 0',
1436: l_asset_post_units
1437: ,p_log_level_rec => p_log_level_rec);
1438: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null, current_units',
1439: aurec.current_units
1440: ,p_log_level_rec => p_log_level_rec);
1441: end if;
1442:

Line 1446: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',

1442:
1443:
1444: if aurec.code_combination_id is null then
1445: if (g_log_level_rec.statement_level) then
1446: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',
1447: ''
1448: ,p_log_level_rec => p_log_level_rec);
1449: end if;
1450:

Line 1490: fa_debug_pkg.add(l_calling_fn,'insert details A',

1486: raise dml_error;
1487:
1488: end if;
1489: if (g_log_level_rec.statement_level) then
1490: fa_debug_pkg.add(l_calling_fn,'insert details A',
1491: l_dist_diff
1492: ,p_log_level_rec => p_log_level_rec);
1493: end if;
1494:

Line 1509: fa_debug_pkg.add(l_calling_fn, 'check all dists,continue with no dist info rows', l_diff

1505: END LOOP;
1506: close c_dh;
1507:
1508: if (g_log_level_rec.statement_level) then
1509: fa_debug_pkg.add(l_calling_fn, 'check all dists,continue with no dist info rows', l_diff
1510: ,p_log_level_rec => p_log_level_rec);
1511: end if;
1512:
1513:

Line 1522: fa_debug_pkg.add(l_calling_fn, 'while loop,diff > 0',

1518: fetch c_dh into dhrec;
1519: While (c_dh%FOUND and l_diff > 0) loop
1520:
1521: if (g_log_level_rec.statement_level) then
1522: fa_debug_pkg.add(l_calling_fn, 'while loop,diff > 0',
1523: l_diff
1524: ,p_log_level_rec => p_log_level_rec);
1525: end if;
1526:

Line 1531: fa_debug_pkg.add(l_calling_fn, 'while loop,dist_diff ',

1527: if dhrec.units_assigned > l_asset_post_units then
1528: l_dist_diff := dhrec.units_assigned - l_asset_post_units;
1529:
1530: if (g_log_level_rec.statement_level) then
1531: fa_debug_pkg.add(l_calling_fn, 'while loop,dist_diff ',
1532: l_dist_diff
1533: ,p_log_level_rec => p_log_level_rec);
1534: end if;
1535:

Line 1550: fa_debug_pkg.add(l_calling_fn,'insert details B',

1546: ,p_log_level_rec => p_log_level_rec) then
1547: raise dml_error;
1548: end if;
1549: if (g_log_level_rec.statement_level) then
1550: fa_debug_pkg.add(l_calling_fn,'insert details B',
1551: l_dist_diff
1552: ,p_log_level_rec => p_log_level_rec);
1553: end if;
1554:

Line 1578: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',

1574:
1575: else -- code_combination_id is not null
1576: -- bug 3161864
1577: if (g_log_level_rec.statement_level) then
1578: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1579: aurec.code_combination_id
1580: ,p_log_level_rec => p_log_level_rec);
1581:
1582: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',

Line 1582: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',

1578: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1579: aurec.code_combination_id
1580: ,p_log_level_rec => p_log_level_rec);
1581:
1582: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1583: aurec.mer_units
1584: ,p_log_level_rec => p_log_level_rec);
1585:
1586: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',

Line 1586: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',

1582: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1583: aurec.mer_units
1584: ,p_log_level_rec => p_log_level_rec);
1585:
1586: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1587: aurec.current_units
1588: ,p_log_level_rec => p_log_level_rec);
1589:
1590: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',

Line 1590: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',

1586: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1587: aurec.current_units
1588: ,p_log_level_rec => p_log_level_rec);
1589:
1590: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
1591: l_asset_post_units
1592: ,p_log_level_rec => p_log_level_rec);
1593:
1594: end if;

Line 1613: fa_debug_pkg.add(l_calling_fn, 'l_dist_post_units',

1609: and nvl(assigned_to,-99) =
1610: nvl(aurec.assigned_to,-99);
1611:
1612: if (g_log_level_rec.statement_level) then
1613: fa_debug_pkg.add(l_calling_fn, 'l_dist_post_units',
1614: l_dist_post_units
1615: ,p_log_level_rec => p_log_level_rec);
1616:
1617: end if;

Line 1657: fa_debug_pkg.add(l_calling_fn,'insert details C',

1653: end if;
1654:
1655: if (g_log_level_rec.statement_level) then
1656: l_slask := aurec.mer_units - l_dist_post_units;
1657: fa_debug_pkg.add(l_calling_fn,'insert details C',
1658: l_slask
1659: ,p_log_level_rec => p_log_level_rec);
1660: end if;
1661:

Line 1678: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units',

1674:
1675: else -- aurec.mer_units > l_remaining_units...
1676:
1677: if (g_log_level_rec.statement_level) then
1678: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units',
1679: l_remaining_units
1680: ,p_log_level_rec => p_log_level_rec);
1681: end if;
1682:

Line 1686: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',

1682:
1683: if l_post_units = 0 then
1684:
1685: if (g_log_level_rec.statement_level) then
1686: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',
1687: l_post_units
1688: ,p_log_level_rec => p_log_level_rec);
1689: fa_debug_pkg.add(l_calling_fn, 'location_id',
1690: aurec.location_id

Line 1689: fa_debug_pkg.add(l_calling_fn, 'location_id',

1685: if (g_log_level_rec.statement_level) then
1686: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',
1687: l_post_units
1688: ,p_log_level_rec => p_log_level_rec);
1689: fa_debug_pkg.add(l_calling_fn, 'location_id',
1690: aurec.location_id
1691: ,p_log_level_rec => p_log_level_rec);
1692: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1693: aurec.code_combination_id

Line 1692: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',

1688: ,p_log_level_rec => p_log_level_rec);
1689: fa_debug_pkg.add(l_calling_fn, 'location_id',
1690: aurec.location_id
1691: ,p_log_level_rec => p_log_level_rec);
1692: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1693: aurec.code_combination_id
1694: ,p_log_level_rec => p_log_level_rec);
1695: fa_debug_pkg.add(l_calling_fn, 'assigned_to',
1696: aurec.assigned_to

Line 1695: fa_debug_pkg.add(l_calling_fn, 'assigned_to',

1691: ,p_log_level_rec => p_log_level_rec);
1692: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1693: aurec.code_combination_id
1694: ,p_log_level_rec => p_log_level_rec);
1695: fa_debug_pkg.add(l_calling_fn, 'assigned_to',
1696: aurec.assigned_to
1697: ,p_log_level_rec => p_log_level_rec);
1698: end if;
1699: -- bug 3163661 - in this branch.

Line 1708: fa_debug_pkg.add(l_calling_fn,

1704:
1705: if dhrec.units_assigned >= l_remaining_units then
1706:
1707: if (g_log_level_rec.statement_level) then
1708: fa_debug_pkg.add(l_calling_fn,
1709: 'Before Insert details B, units_assigned',
1710: dhrec.units_assigned
1711: ,p_log_level_rec => p_log_level_rec);
1712: end if;

Line 1729: fa_debug_pkg.add(l_calling_fn,'insert details D',

1725: raise dml_error;
1726:
1727: end if;
1728: if (g_log_level_rec.statement_level) then
1729: fa_debug_pkg.add(l_calling_fn,'insert details D',
1730: l_remaining_units
1731: ,p_log_level_rec => p_log_level_rec);
1732: end if;
1733:

Line 1738: fa_debug_pkg.add(l_calling_fn, '

1734: message_tbl(aurec.asset_number, num_msg, msg_tbl
1735: ,p_log_level_rec => p_log_level_rec);
1736:
1737: if (g_log_level_rec.statement_level) then
1738: fa_debug_pkg.add(l_calling_fn, '
1739: aurec.., remaining units',
1740: 0
1741: ,p_log_level_rec => p_log_level_rec);
1742: end if;

Line 1749: fa_debug_pkg.add(l_calling_fn,

1745: else -- units_assigned
1746:
1747: -- insert partial unit retirement
1748: if (g_log_level_rec.statement_level) then
1749: fa_debug_pkg.add(l_calling_fn,
1750: 'Before Insert details C, units_assigned',
1751: dhrec.units_assigned
1752: ,p_log_level_rec => p_log_level_rec);
1753: end if;

Line 1770: fa_debug_pkg.add(l_calling_fn,'insert details E',

1766:
1767: end if;
1768:
1769: if (g_log_level_rec.statement_level) then
1770: fa_debug_pkg.add(l_calling_fn,'insert details E',
1771: dhrec.units_assigned
1772: ,p_log_level_rec => p_log_level_rec);
1773:
1774: end if;

Line 1781: fa_debug_pkg.add(l_calling_fn,

1777: ,p_log_level_rec => p_log_level_rec);
1778:
1779: l_remaining_units := l_remaining_units - dhrec.units_assigned;
1780: if (g_log_level_rec.statement_level) then
1781: fa_debug_pkg.add(l_calling_fn,
1782: 'aurec2.., remaining units',
1783: l_remaining_units
1784: ,p_log_level_rec => p_log_level_rec);
1785: end if;

Line 1797: fa_debug_pkg.add(l_calling_fn, 'post_units >0 ',

1793: -- dfbug here...
1794:
1795: -- units have been already been put in fa_mer for this asset_id.
1796: if (g_log_level_rec.statement_level) then
1797: fa_debug_pkg.add(l_calling_fn, 'post_units >0 ',
1798: l_post_units
1799: ,p_log_level_rec => p_log_level_rec);
1800: end if;
1801:

Line 1817: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',

1813: if aurec.code_combination_id is null then
1814:
1815:
1816: if (g_log_level_rec.statement_level) then
1817: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',
1818: aurec.code_combination_id
1819: ,p_log_level_rec => p_log_level_rec);
1820: end if;
1821: if aurec.mer_units > l_asset_post_units then

Line 1823: fa_debug_pkg.add(l_calling_fn,

1819: ,p_log_level_rec => p_log_level_rec);
1820: end if;
1821: if aurec.mer_units > l_asset_post_units then
1822: if (g_log_level_rec.statement_level) then
1823: fa_debug_pkg.add(l_calling_fn,
1824: 'mer_units > l_asset_post_units',
1825: l_asset_post_units
1826: ,p_log_level_rec => p_log_level_rec);
1827: end if;

Line 1847: fa_debug_pkg.add(l_calling_fn,

1843: and location_id = dhrec.location_id
1844: and nvl(assigned_to,-99) = nvl(dhrec.assigned_to,-99);
1845:
1846: if (g_log_level_rec.statement_level) then
1847: fa_debug_pkg.add(l_calling_fn,
1848: 'In while loop, post_units',
1849: l_dist_post_units
1850: ,p_log_level_rec => p_log_level_rec);
1851: end if;

Line 1858: fa_debug_pkg.add(l_calling_fn,

1854:
1855: l_dist_diff := dhrec.units_assigned - l_dist_post_units;
1856:
1857: if (g_log_level_rec.statement_level) then
1858: fa_debug_pkg.add(l_calling_fn,
1859: 'units_assign > post_units',
1860: l_dist_diff
1861: ,p_log_level_rec => p_log_level_rec);
1862: end if;

Line 1879: fa_debug_pkg.add(l_calling_fn,'insert details F',

1875:
1876: raise dml_error;
1877: end if;
1878: if (g_log_level_rec.statement_level) then
1879: fa_debug_pkg.add(l_calling_fn,'insert details F',
1880: l_dist_diff
1881: ,p_log_level_rec => p_log_level_rec);
1882: end if;
1883:

Line 1905: fa_debug_pkg.add(l_calling_fn,'insert details FF',

1901:
1902: raise dml_error;
1903: end if;
1904: if (g_log_level_rec.statement_level) then
1905: fa_debug_pkg.add(l_calling_fn,'insert details FF',
1906: l_remaining_units
1907: ,p_log_level_rec => p_log_level_rec);
1908: end if;
1909:

Line 1924: fa_debug_pkg.add(l_calling_fn, 'Check occurences with no dist info', l_remaining_units

1920: END LOOP;
1921: close c_dh;
1922:
1923: if (g_log_level_rec.statement_level) then
1924: fa_debug_pkg.add(l_calling_fn, 'Check occurences with no dist info', l_remaining_units
1925: ,p_log_level_rec => p_log_level_rec);
1926: end if;
1927: --
1928: -- We've checked all distributions, now there are only occurences with

Line 1943: fa_debug_pkg.add(l_calling_fn, 'In while loop, post_units',

1939:
1940: While (c_dh%FOUND and l_diff > 0) loop
1941:
1942: if (g_log_level_rec.statement_level) then
1943: fa_debug_pkg.add(l_calling_fn, 'In while loop, post_units',
1944: l_asset_post_units
1945: ,p_log_level_rec => p_log_level_rec);
1946: end if;
1947: if dhrec.units_assigned > l_asset_post_units then

Line 1950: fa_debug_pkg.add(l_calling_fn, 'units_assign > post_units',

1946: end if;
1947: if dhrec.units_assigned > l_asset_post_units then
1948: l_dist_diff := dhrec.units_assigned - l_asset_post_units;
1949: if (g_log_level_rec.statement_level) then
1950: fa_debug_pkg.add(l_calling_fn, 'units_assign > post_units',
1951: l_dist_diff
1952: ,p_log_level_rec => p_log_level_rec);
1953: end if;
1954:

Line 1970: fa_debug_pkg.add(l_calling_fn,'insert details G',

1966:
1967: raise dml_error;
1968: end if;
1969: if (g_log_level_rec.statement_level) then
1970: fa_debug_pkg.add(l_calling_fn,'insert details G',
1971: l_dist_diff
1972: ,p_log_level_rec => p_log_level_rec);
1973: end if;
1974:

Line 1996: fa_debug_pkg.add(l_calling_fn,'insert details GG',

1992:
1993: raise dml_error;
1994: end if;
1995: if (g_log_level_rec.statement_level) then
1996: fa_debug_pkg.add(l_calling_fn,'insert details GG',
1997: l_remaining_units
1998: ,p_log_level_rec => p_log_level_rec);
1999: end if;
2000:

Line 2022: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',

2018:
2019: else -- code_combination_id is not null
2020: -- bug 3161864
2021: if (g_log_level_rec.statement_level) then
2022: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
2023: aurec.code_combination_id
2024: ,p_log_level_rec => p_log_level_rec);
2025: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
2026: aurec.mer_units

Line 2025: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',

2021: if (g_log_level_rec.statement_level) then
2022: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
2023: aurec.code_combination_id
2024: ,p_log_level_rec => p_log_level_rec);
2025: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
2026: aurec.mer_units
2027: ,p_log_level_rec => p_log_level_rec);
2028:
2029: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',

Line 2029: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',

2025: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
2026: aurec.mer_units
2027: ,p_log_level_rec => p_log_level_rec);
2028:
2029: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
2030: aurec.current_units
2031: ,p_log_level_rec => p_log_level_rec);
2032:
2033: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',

Line 2033: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',

2029: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
2030: aurec.current_units
2031: ,p_log_level_rec => p_log_level_rec);
2032:
2033: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
2034: l_asset_post_units
2035: ,p_log_level_rec => p_log_level_rec);
2036:
2037: end if;

Line 2097: fa_debug_pkg.add(l_calling_fn,'insert details H',

2093: end if;
2094:
2095: if (g_log_level_rec.statement_level) then
2096: l_slask := aurec.mer_units - l_dist_post_units;
2097: fa_debug_pkg.add(l_calling_fn,'insert details H',
2098: l_slask
2099: ,p_log_level_rec => p_log_level_rec);
2100: end if;
2101:

Line 2127: fa_debug_pkg.add(l_calling_fn, 'Before 2nd round of allocation',l_remaining_units

2123: close c_asset_assignments;
2124:
2125:
2126: if (g_log_level_rec.statement_level) then
2127: fa_debug_pkg.add(l_calling_fn, 'Before 2nd round of allocation',l_remaining_units
2128: ,p_log_level_rec => p_log_level_rec);
2129: end if;
2130:
2131: -- SECOND ROUND OF ALLOCATION IF EXTENDED SEARCH BEYOND DATES USING FIFO

Line 2139: fa_debug_pkg.add(l_calling_fn,

2135: and (temp_from_dpis is not null and temp_to_dpis is not null)
2136: and l_remaining_units > 0) then
2137:
2138: if (g_log_level_rec.statement_level) then
2139: fa_debug_pkg.add(l_calling_fn,
2140: '2ND ROUND OF ALLOCATION, temp_from_dpis',
2141: temp_from_dpis
2142: ,p_log_level_rec => p_log_level_rec);
2143: fa_debug_pkg.add(l_calling_fn,

Line 2143: fa_debug_pkg.add(l_calling_fn,

2139: fa_debug_pkg.add(l_calling_fn,
2140: '2ND ROUND OF ALLOCATION, temp_from_dpis',
2141: temp_from_dpis
2142: ,p_log_level_rec => p_log_level_rec);
2143: fa_debug_pkg.add(l_calling_fn,
2144: '2ND ROUND OF ALLOCATION,temp_to_dpis',
2145: temp_to_dpis
2146: ,p_log_level_rec => p_log_level_rec);
2147: end if;

Line 2167: fa_debug_pkg.add(l_calling_fn,

2163:
2164: l_asset_dist_tbl.delete;
2165:
2166: if (g_log_level_rec.statement_level) then
2167: fa_debug_pkg.add(l_calling_fn,
2168: 'In qual loop, remaining units',
2169: l_remaining_units
2170: ,p_log_level_rec => p_log_level_rec);
2171: fa_debug_pkg.add(l_calling_fn, 'In qual loop, asset_id:',

Line 2171: fa_debug_pkg.add(l_calling_fn, 'In qual loop, asset_id:',

2167: fa_debug_pkg.add(l_calling_fn,
2168: 'In qual loop, remaining units',
2169: l_remaining_units
2170: ,p_log_level_rec => p_log_level_rec);
2171: fa_debug_pkg.add(l_calling_fn, 'In qual loop, asset_id:',
2172: l_2nd_asset_id
2173: ,p_log_level_rec => p_log_level_rec);
2174: end if;
2175:

Line 2189: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',

2185: l_null_segment_flag = 'N') then
2186:
2187:
2188: if (g_log_level_rec.statement_level) then
2189: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',
2190: ''
2191: ,p_log_level_rec => p_log_level_rec);
2192: end if;
2193:

Line 2203: fa_debug_pkg.add(l_calling_fn, 'In qual loop 2 ',

2199:
2200: end if; -- g_location...
2201:
2202: if (g_log_level_rec.statement_level) then
2203: fa_debug_pkg.add(l_calling_fn, 'In qual loop 2 ',
2204: l_2nd_asset_id
2205: ,p_log_level_rec => p_log_level_rec);
2206: end if;
2207:

Line 2210: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', ''

2206: end if;
2207:
2208: if l_asset_dist_tbl.count = 0 then
2209: if (g_log_level_rec.statement_level) then
2210: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', ''
2211: ,p_log_level_rec => p_log_level_rec);
2212: end if;
2213:
2214: l_asset_dist_tbl(1).expense_ccid := '';

Line 2221: fa_debug_pkg.add(l_calling_fn, 'Before l_asset_dist_tbl loop',

2217: l_asset_dist_tbl(1).units_assigned := l_2nd_current_units;
2218: end if;
2219:
2220: if (g_log_level_rec.statement_level) then
2221: fa_debug_pkg.add(l_calling_fn, 'Before l_asset_dist_tbl loop',
2222: ''
2223: ,p_log_level_rec => p_log_level_rec);
2224: end if;
2225:

Line 2233: fa_debug_pkg.add(l_calling_fn, 'In l_asset_dist_tbl loop',

2229:
2230: -- ALLOCATE 2ND ROUND
2231:
2232: if (g_log_level_rec.statement_level) then
2233: fa_debug_pkg.add(l_calling_fn, 'In l_asset_dist_tbl loop',
2234: ''
2235: ,p_log_level_rec => p_log_level_rec);
2236: end if;
2237:

Line 2254: fa_debug_pkg.add(l_calling_fn, 'If units_assigned <= rem.',

2250:
2251: if l_asset_dist_tbl(l_dist_count).units_assigned <= l_remaining_units then
2252:
2253: if (g_log_level_rec.statement_level) then
2254: fa_debug_pkg.add(l_calling_fn, 'If units_assigned <= rem.',
2255: l_remaining_units
2256: ,p_log_level_rec => p_log_level_rec);
2257: end if;
2258:

Line 2262: fa_debug_pkg.add(l_calling_fn, 'l_post_units = 0',

2258:
2259: if (l_post_units = 0) then
2260:
2261: if (g_log_level_rec.statement_level) then
2262: fa_debug_pkg.add(l_calling_fn, 'l_post_units = 0',
2263: ''
2264: ,p_log_level_rec => p_log_level_rec);
2265: end if;
2266:

Line 2270: fa_debug_pkg.add(l_calling_fn, 'Before Insert details A, units',

2266:
2267: l_remaining_units := l_remaining_units - l_asset_dist_tbl(l_dist_count).units_assigned;
2268:
2269: if (g_log_level_rec.statement_level) then
2270: fa_debug_pkg.add(l_calling_fn, 'Before Insert details A, units',
2271: l_asset_dist_tbl(l_dist_count).units_assigned);
2272: end if;
2273:
2274: if not insert_details(

Line 2287: fa_debug_pkg.add(l_calling_fn,'insert details I',

2283: raise dml_error;
2284:
2285: end if;
2286: if (g_log_level_rec.statement_level) then
2287: fa_debug_pkg.add(l_calling_fn,'insert details I',
2288: l_asset_dist_tbl(l_dist_count).units_assigned);
2289: end if;
2290:
2291: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2295: fa_debug_pkg.add(l_calling_fn,

2291: message_tbl(l_2nd_asset_number, num_msg, msg_tbl
2292: ,p_log_level_rec => p_log_level_rec);
2293:
2294: if (g_log_level_rec.statement_level) then
2295: fa_debug_pkg.add(l_calling_fn,
2296: 'Outside.., remaining units',
2297: l_remaining_units
2298: ,p_log_level_rec => p_log_level_rec);
2299: end if;

Line 2316: fa_debug_pkg.add(l_calling_fn, 'Before expense_ccid is null',

2312: and batch_name <> g_batch_name;
2313:
2314:
2315: if (g_log_level_rec.statement_level) then
2316: fa_debug_pkg.add(l_calling_fn, 'Before expense_ccid is null',
2317: ''
2318: ,p_log_level_rec => p_log_level_rec);
2319: end if;
2320:

Line 2324: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is null',

2320:
2321: if l_asset_dist_tbl(l_dist_count).expense_ccid is null then
2322:
2323: if (g_log_level_rec.statement_level) then
2324: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is null',
2325: ''
2326: ,p_log_level_rec => p_log_level_rec);
2327: end if;
2328:

Line 2333: fa_debug_pkg.add(l_calling_fn, 'l_2nd_current_units > l_post_units',

2329:
2330: if l_2nd_current_units > l_asset_post_units then
2331:
2332: if (g_log_level_rec.statement_level) then
2333: fa_debug_pkg.add(l_calling_fn, 'l_2nd_current_units > l_post_units',
2334: l_asset_post_units
2335: ,p_log_level_rec => p_log_level_rec);
2336: end if;
2337:

Line 2344: fa_debug_pkg.add(l_calling_fn, 'In dh loop, l_diff',

2340: fetch c_dh into dhrec;
2341: While (c_dh%FOUND and l_diff > 0) loop
2342:
2343: if (g_log_level_rec.statement_level) then
2344: fa_debug_pkg.add(l_calling_fn, 'In dh loop, l_diff',
2345: l_diff
2346: ,p_log_level_rec => p_log_level_rec);
2347: end if;
2348:

Line 2363: fa_debug_pkg.add(l_calling_fn, 'units_assign > dist_post_units',

2359:
2360: if dhrec.units_assigned > l_dist_post_units then
2361:
2362: if (g_log_level_rec.statement_level) then
2363: fa_debug_pkg.add(l_calling_fn, 'units_assign > dist_post_units',
2364: l_dist_post_units
2365: ,p_log_level_rec => p_log_level_rec);
2366: end if;
2367:

Line 2385: fa_debug_pkg.add(l_calling_fn,'insert details J',l_dist_diff

2381: raise dml_error;
2382:
2383: end if;
2384: if (g_log_level_rec.statement_level) then
2385: fa_debug_pkg.add(l_calling_fn,'insert details J',l_dist_diff
2386: ,p_log_level_rec => p_log_level_rec);
2387: end if;
2388:
2389: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2402: fa_debug_pkg.add(l_calling_fn, 'Occurences with no dist info, l_diff ',

2398: END LOOP;
2399: close c_dh;
2400:
2401: if (g_log_level_rec.statement_level) then
2402: fa_debug_pkg.add(l_calling_fn, 'Occurences with no dist info, l_diff ',
2403: l_diff
2404: ,p_log_level_rec => p_log_level_rec);
2405: end if;
2406:

Line 2432: fa_debug_pkg.add(l_calling_fn,'insert details K',l_dist_diff

2428: raise dml_error;
2429:
2430: end if;
2431: if (g_log_level_rec.statement_level) then
2432: fa_debug_pkg.add(l_calling_fn,'insert details K',l_dist_diff
2433: ,p_log_level_rec => p_log_level_rec);
2434: end if;
2435:
2436: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2454: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is not null',

2450: else -- expense_ccid is not null
2451: -- bug 3161864
2452:
2453: if (g_log_level_rec.statement_level) then
2454: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is not null',
2455: ''
2456: ,p_log_level_rec => p_log_level_rec);
2457: end if;
2458:

Line 2509: fa_debug_pkg.add(l_calling_fn,'insert details KK',l_slask

2505: raise dml_error;
2506: end if;
2507: if (g_log_level_rec.statement_level) then
2508: l_slask := l_asset_dist_tbl(l_dist_count).units_assigned - l_dist_post_units;
2509: fa_debug_pkg.add(l_calling_fn,'insert details KK',l_slask
2510: ,p_log_level_rec => p_log_level_rec);
2511: end if;
2512:
2513: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2533: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units', l_remaining_units

2529:
2530: else -- units_assigned > l_remaining_units
2531:
2532: if (g_log_level_rec.statement_level) then
2533: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units', l_remaining_units
2534: ,p_log_level_rec => p_log_level_rec);
2535: end if;
2536:
2537: if l_post_units = 0 then

Line 2544: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );

2540:
2541:
2542: -- obtain distributions to partially retire from
2543: if (g_log_level_rec.statement_level) then
2544: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2545: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id
2546: ,p_log_level_rec => p_log_level_rec);
2547: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id
2548: ,p_log_level_rec => p_log_level_rec);

Line 2545: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id

2541:
2542: -- obtain distributions to partially retire from
2543: if (g_log_level_rec.statement_level) then
2544: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2545: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id
2546: ,p_log_level_rec => p_log_level_rec);
2547: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id
2548: ,p_log_level_rec => p_log_level_rec);
2549: end if;

Line 2547: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id

2543: if (g_log_level_rec.statement_level) then
2544: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2545: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id
2546: ,p_log_level_rec => p_log_level_rec);
2547: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id
2548: ,p_log_level_rec => p_log_level_rec);
2549: end if;
2550:
2551: open c_dh;

Line 2559: fa_debug_pkg.add(l_calling_fn, 'Before Insert details B, units',

2555:
2556: if dhrec.units_assigned >= l_remaining_units then
2557:
2558: if (g_log_level_rec.statement_level) then
2559: fa_debug_pkg.add(l_calling_fn, 'Before Insert details B, units',
2560: l_asset_dist_tbl(l_dist_count).units_assigned);
2561: end if;
2562:
2563: -- insert partial unit retirement

Line 2579: fa_debug_pkg.add(l_calling_fn,'insert details L',l_remaining_units

2575: raise dml_error;
2576:
2577: end if;
2578: if (g_log_level_rec.statement_level) then
2579: fa_debug_pkg.add(l_calling_fn,'insert details L',l_remaining_units
2580: ,p_log_level_rec => p_log_level_rec);
2581: end if;
2582:
2583: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2587: fa_debug_pkg.add(l_calling_fn,

2583: message_tbl(l_2nd_asset_number, num_msg, msg_tbl
2584: ,p_log_level_rec => p_log_level_rec);
2585:
2586: if (g_log_level_rec.statement_level) then
2587: fa_debug_pkg.add(l_calling_fn,
2588: 'Outside.., remaining units',
2589: 0
2590: ,p_log_level_rec => p_log_level_rec);
2591: end if;

Line 2600: fa_debug_pkg.add(l_calling_fn, 'Before Insert details C, units',

2596:
2597: -- insert partial unit retirement
2598:
2599: if (g_log_level_rec.statement_level) then
2600: fa_debug_pkg.add(l_calling_fn, 'Before Insert details C, units',
2601: l_asset_dist_tbl(l_dist_count).units_assigned);
2602: end if;
2603:
2604: if not insert_details(

Line 2618: fa_debug_pkg.add(l_calling_fn,'insert details M', dhrec.units_assigned

2614: raise dml_error;
2615:
2616: end if;
2617: if (g_log_level_rec.statement_level) then
2618: fa_debug_pkg.add(l_calling_fn,'insert details M', dhrec.units_assigned
2619: ,p_log_level_rec => p_log_level_rec);
2620: end if;
2621: message_tbl(l_2nd_asset_number, num_msg, msg_tbl
2622: ,p_log_level_rec => p_log_level_rec);

Line 2626: fa_debug_pkg.add(l_calling_fn,

2622: ,p_log_level_rec => p_log_level_rec);
2623:
2624: l_remaining_units := l_remaining_units - dhrec.units_assigned;
2625: if (g_log_level_rec.statement_level) then
2626: fa_debug_pkg.add(l_calling_fn,
2627: 'Outside.., remaining units',
2628: l_remaining_units
2629: ,p_log_level_rec => p_log_level_rec);
2630: end if;

Line 2690: fa_debug_pkg.add(l_calling_fn,'insert details M',l_dist_diff

2686: raise dml_error;
2687:
2688: end if;
2689: if (g_log_level_rec.statement_level) then
2690: fa_debug_pkg.add(l_calling_fn,'insert details M',l_dist_diff
2691: ,p_log_level_rec => p_log_level_rec);
2692: end if;
2693:
2694: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2716: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff

2712: raise dml_error;
2713:
2714: end if;
2715: if (g_log_level_rec.statement_level) then
2716: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff
2717: ,p_log_level_rec => p_log_level_rec);
2718: end if;
2719: message_tbl(l_2nd_asset_number, num_msg, msg_tbl
2720: ,p_log_level_rec => p_log_level_rec);

Line 2764: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff

2760: raise dml_error;
2761:
2762: end if;
2763: if (g_log_level_rec.statement_level) then
2764: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff
2765: ,p_log_level_rec => p_log_level_rec);
2766: end if;
2767:
2768: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2793: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff

2789: raise dml_error;
2790:
2791: end if;
2792: if (g_log_level_rec.statement_level) then
2793: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff
2794: ,p_log_level_rec => p_log_level_rec);
2795: end if;
2796:
2797:

Line 2873: fa_debug_pkg.add(l_calling_fn,'insert details P',l_slask

2869: if (g_log_level_rec.statement_level) then
2870:
2871: l_slask :=
2872: l_asset_dist_tbl(l_dist_count).units_assigned - l_dist_post_units;
2873: fa_debug_pkg.add(l_calling_fn,'insert details P',l_slask
2874: ,p_log_level_rec => p_log_level_rec);
2875: end if;
2876:
2877: message_tbl(l_2nd_asset_number, num_msg, msg_tbl

Line 2916: fa_debug_pkg.add(l_calling_fn,

2912: End if; -- p_extend_search = yes
2913: -- Done allocating units.
2914:
2915: if (g_log_level_rec.statement_level) then
2916: fa_debug_pkg.add(l_calling_fn,
2917: 'Done allocating units, remaining units',
2918: l_remaining_units
2919: ,p_log_level_rec => p_log_level_rec);
2920: end if;

Line 2926: fa_debug_pkg.add(l_calling_fn, 'Update status',l_remaining_units

2922:
2923: -- Now Update status to the mass retirements batch
2924: If l_remaining_units > 0 then -- not all units have been prorated. Abort.
2925: if (g_log_level_rec.statement_level) then
2926: fa_debug_pkg.add(l_calling_fn, 'Update status',l_remaining_units
2927: ,p_log_level_rec => p_log_level_rec);
2928: end if;
2929:
2930: Delete from fa_mass_ext_retirements

Line 2956: fa_debug_pkg.add(l_calling_fn, 'Update status <= 0 ',l_remaining_units

2952: -- Not enough units provided, assets have been
2953: -- inserted into fa_mass_ext_retirements
2954: -- but will not get any units assigned for certain of these rows.
2955: if (g_log_level_rec.statement_level) then
2956: fa_debug_pkg.add(l_calling_fn, 'Update status <= 0 ',l_remaining_units
2957: ,p_log_level_rec => p_log_level_rec);
2958: end if;
2959:
2960:

Line 2989: fa_debug_pkg.add(

2985:
2986: Exception
2987: when dml_error then
2988: error := substrb(sqlerrm,1,80);
2989: fa_debug_pkg.add(
2990: 'Allocate_Units',
2991: error,
2992: ''
2993: ,p_log_level_rec => p_log_level_rec);

Line 2997: fa_debug_pkg.add(

2993: ,p_log_level_rec => p_log_level_rec);
2994: return false;
2995: when others then
2996: error := substrb(sqlerrm,1,80);
2997: fa_debug_pkg.add(
2998: 'Allocate_Units',
2999: error,
3000: ''
3001: ,p_log_level_rec => p_log_level_rec);

Line 3506: FA_DEBUG_PKG.Initialize;

3502: end if;
3503:
3504:
3505: FA_SRVR_MSG.Init_Server_Message;
3506: FA_DEBUG_PKG.Initialize;
3507:
3508: if p_mode <> 'BATCH' then
3509:
3510:

Line 3661: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec

3657:
3658: l_batch_size := nvl(fa_cache_pkg.fa_batch_size, 200);
3659:
3660: if (g_log_level_rec.statement_level) then
3661: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec
3662: );
3663: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec
3664: );
3665: end if;

Line 3663: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec

3659:
3660: if (g_log_level_rec.statement_level) then
3661: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec
3662: );
3663: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec
3664: );
3665: end if;
3666:
3667: -- if (G_status <> 'RUNNING_CRE') then

Line 3670: fa_debug_pkg.add(l_calling_fn, 'g_status', g_status, p_log_level_rec => g_log_level_rec

3666:
3667: -- if (G_status <> 'RUNNING_CRE') then
3668: if (G_status not in ('RUNNING_CRE','PENDING')) then
3669: if (g_log_level_rec.statement_level) then
3670: fa_debug_pkg.add(l_calling_fn, 'g_status', g_status, p_log_level_rec => g_log_level_rec
3671: );
3672: end if;
3673: fa_srvr_msg.add_message(name => 'FA_MASSRET_INVALID_STATUS',
3674: calling_fn => l_calling_fn

Line 3684: fa_debug_pkg.add(l_calling_fn, 'after deleting from mass_ext_ret', g_from_asset_number, p_log_level_rec => g_log_level_rec

3680: commit;
3681: end if;
3682:
3683: if (g_log_level_rec.statement_level) then
3684: fa_debug_pkg.add(l_calling_fn, 'after deleting from mass_ext_ret', g_from_asset_number, p_log_level_rec => g_log_level_rec
3685: );
3686: end if;
3687:
3688: SELECT Precision, Extended_precision, MINIMUM_ACCOUNTABLE_UNIT

Line 3707: fa_debug_pkg.add(l_calling_fn, 'After bulk fetch','',p_log_level_rec => g_log_level_rec

3703: l_current_units
3704: LIMIT l_batch_size;
3705:
3706: if (g_log_level_rec.statement_level) then
3707: fa_debug_pkg.add(l_calling_fn, 'After bulk fetch','',p_log_level_rec => g_log_level_rec
3708: );
3709: end if;
3710:
3711:

Line 3720: fa_debug_pkg.add(l_calling_fn, 'In main asset loop',l_asset_id(l_loop_count),p_log_level_rec => g_log_level_rec );

3716:
3717: for l_loop_count in 1..l_asset_id.count loop
3718:
3719: if (g_log_level_rec.statement_level) then
3720: fa_debug_pkg.add(l_calling_fn, 'In main asset loop',l_asset_id(l_loop_count),p_log_level_rec => g_log_level_rec );
3721: end if;
3722:
3723:
3724: IF G_Retire_Subcomponents = 'YES' THEN

Line 3761: fa_debug_pkg.add( l_calling_fn,

3757:
3758:
3759: If l_parent_asset_id is not null then
3760: if (g_log_level_rec.statement_level) then
3761: fa_debug_pkg.add( l_calling_fn,
3762: 'Subcomponent asset exist ',
3763: l_sc_asset_id(l_loop_count_sub), p_log_level_rec => g_log_level_rec );
3764: end if;
3765: ----

Line 3775: fa_debug_pkg.add(l_calling_fn,

3771: l_Loc_Split);
3772:
3773: l_Null_Segment_Flag := Check_Account_Null;
3774: if (g_log_level_rec.statement_level) then
3775: fa_debug_pkg.add(l_calling_fn,
3776: 'After check_tax_split - subcomp',
3777: l_sc_asset_id(l_loop_count_sub), p_log_level_rec => g_log_level_rec);
3778: fa_debug_pkg.add(l_calling_fn,
3779: 'After check_tax_split - subcomp',

Line 3778: fa_debug_pkg.add(l_calling_fn,

3774: if (g_log_level_rec.statement_level) then
3775: fa_debug_pkg.add(l_calling_fn,
3776: 'After check_tax_split - subcomp',
3777: l_sc_asset_id(l_loop_count_sub), p_log_level_rec => g_log_level_rec);
3778: fa_debug_pkg.add(l_calling_fn,
3779: 'After check_tax_split - subcomp',
3780: l_loc_split, p_log_level_rec => g_log_level_rec);
3781: end if;
3782: End if;

Line 3822: fa_debug_pkg.add(l_calling_fn,

3818: 'FA_MASSRET_EXTENDED_LIFE','','');
3819:
3820: ELSE
3821: if (g_log_level_rec.statement_level) then
3822: fa_debug_pkg.add(l_calling_fn,
3823: 'Else 1 - subcomp',
3824: '', p_log_level_rec => g_log_level_rec);
3825: end if;
3826: l_candidate_asset_id(l_candidate_asset_id.count + 1) := l_SC_Asset_Id(l_loop_count_sub);

Line 3828: fa_debug_pkg.add(l_calling_fn,

3824: '', p_log_level_rec => g_log_level_rec);
3825: end if;
3826: l_candidate_asset_id(l_candidate_asset_id.count + 1) := l_SC_Asset_Id(l_loop_count_sub);
3827: if (g_log_level_rec.statement_level) then
3828: fa_debug_pkg.add(l_calling_fn,
3829: 'Else 1 - subcomp',
3830: '', p_log_level_rec => g_log_level_rec);
3831: end if;
3832: l_candidate_cost_retired(l_candidate_cost_retired.count + 1) := l_sc_cost_retired;

Line 3854: fa_debug_pkg.add(l_calling_fn, 'End subcomponent loop','', p_log_level_rec => g_log_level_rec);

3850: END LOOP; -- subcomponents
3851:
3852: END IF; -- l_Retire_Subcomponents ...
3853: if (g_log_level_rec.statement_level) then
3854: fa_debug_pkg.add(l_calling_fn, 'End subcomponent loop','', p_log_level_rec => g_log_level_rec);
3855: end if;
3856:
3857: --
3858: -- RN Assets in taxbook cannot be partially unit retired.

Line 3867: fa_debug_pkg.add(l_calling_fn,

3863: l_Loc_Split);
3864:
3865: l_Null_Segment_Flag := Check_Account_Null;
3866: if (g_log_level_rec.statement_level) then
3867: fa_debug_pkg.add(l_calling_fn,
3868: 'After check_tax_split ',
3869: l_asset_id(l_loop_count),
3870: p_log_level_rec => g_log_level_rec);
3871: fa_debug_pkg.add(l_calling_fn,

Line 3871: fa_debug_pkg.add(l_calling_fn,

3867: fa_debug_pkg.add(l_calling_fn,
3868: 'After check_tax_split ',
3869: l_asset_id(l_loop_count),
3870: p_log_level_rec => g_log_level_rec);
3871: fa_debug_pkg.add(l_calling_fn,
3872: 'After check_tax_split ',
3873: l_loc_split, p_log_level_rec => g_log_level_rec);
3874: end if;
3875: End if;

Line 3908: fa_debug_pkg.add(l_calling_fn,

3904: 'FA_MASSRET_MULTIPLE_LOC','','');
3905: --
3906: ELSE
3907: if (g_log_level_rec.statement_level) then
3908: fa_debug_pkg.add(l_calling_fn,
3909: 'Not subcomponent branch',
3910: l_asset_id(l_loop_count), p_log_level_rec => g_log_level_rec );
3911: end if;
3912:

Line 3930: fa_debug_pkg.add(l_calling_fn, 'Starting candidate loop', l_count, p_log_level_rec => g_log_level_rec);

3926: For l_count in 1..l_candidate_asset_id.count loop
3927:
3928:
3929: if (g_log_level_rec.statement_level) then
3930: fa_debug_pkg.add(l_calling_fn, 'Starting candidate loop', l_count, p_log_level_rec => g_log_level_rec);
3931: end if;
3932:
3933: l_Null_Segment_Flag := Check_Account_Null;
3934:

Line 3936: fa_debug_pkg.add(l_calling_fn, 'check_account_null', l_null_segment_flag, p_log_level_rec => g_log_level_rec);

3932:
3933: l_Null_Segment_Flag := Check_Account_Null;
3934:
3935: if (g_log_level_rec.statement_level) then
3936: fa_debug_pkg.add(l_calling_fn, 'check_account_null', l_null_segment_flag, p_log_level_rec => g_log_level_rec);
3937: end if;
3938:
3939: if (g_location_id is not null or
3940: g_employee_id is not null or

Line 3945: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',

3941: l_null_segment_flag = 'N') then
3942:
3943:
3944: if (g_log_level_rec.statement_level) then
3945: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',
3946: l_count, p_log_level_rec => g_log_level_rec);
3947: end if;
3948:
3949: if not Check_Split_Distribution(l_candidate_Asset_Id(l_count),

Line 3963: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', '', p_log_level_rec => g_log_level_rec);

3959: if l_asset_dist_tbl.count = 0 OR G_Book_Class = 'TAX' then
3960:
3961:
3962: if (g_log_level_rec.statement_level) then
3963: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', '', p_log_level_rec => g_log_level_rec);
3964: end if;
3965: -- bug 3749651
3966: l_asset_dist_tbl.delete;
3967:

Line 3998: fa_debug_pkg.add(l_calling_fn,

3994:
3995: end if;
3996:
3997: if (g_log_level_rec.statement_level) then
3998: fa_debug_pkg.add(l_calling_fn,
3999: 'Before insert into fa_mass_ext_ret ccid',
4000: l_asset_dist_tbl(l_dist_count).expense_ccid, p_log_level_rec => g_log_level_rec );
4001: end if;
4002:

Line 4115: fa_debug_pkg.add(l_calling_fn,

4111: g_attribute15);
4112:
4113:
4114: if (g_log_level_rec.statement_level) then
4115: fa_debug_pkg.add(l_calling_fn,
4116: 'After insert into FA_MASS_EXT_RETIREMENTS table',
4117: l_asset_dist_tbl(l_dist_count).units_assigned,p_log_level_rec => g_log_level_rec );
4118: fa_debug_pkg.add(l_calling_fn,
4119: 'After insert into FA_MASS_EXT_RETIREMENTS table',

Line 4118: fa_debug_pkg.add(l_calling_fn,

4114: if (g_log_level_rec.statement_level) then
4115: fa_debug_pkg.add(l_calling_fn,
4116: 'After insert into FA_MASS_EXT_RETIREMENTS table',
4117: l_asset_dist_tbl(l_dist_count).units_assigned,p_log_level_rec => g_log_level_rec );
4118: fa_debug_pkg.add(l_calling_fn,
4119: 'After insert into FA_MASS_EXT_RETIREMENTS table',
4120: l_candidate_units(l_count), p_log_level_rec => g_log_level_rec );
4121:
4122: end if;

Line 4127: fa_debug_pkg.add(l_calling_fn, 'After dh-insert loop', '', p_log_level_rec => g_log_level_rec);

4123:
4124: end loop;
4125:
4126: if (g_log_level_rec.statement_level) then
4127: fa_debug_pkg.add(l_calling_fn, 'After dh-insert loop', '', p_log_level_rec => g_log_level_rec);
4128: end if;
4129: l_asset_dist_tbl.delete;
4130: end loop;
4131:

Line 4133: fa_debug_pkg.add(l_calling_fn, 'After candidate loop', '',p_log_level_rec => g_log_level_rec);

4129: l_asset_dist_tbl.delete;
4130: end loop;
4131:
4132: if (g_log_level_rec.statement_level) then
4133: fa_debug_pkg.add(l_calling_fn, 'After candidate loop', '',p_log_level_rec => g_log_level_rec);
4134: end if;
4135:
4136:
4137: l_asset_id.delete;

Line 4155: fa_debug_pkg.add(l_calling_fn, 'Calling unit allocation',g_units,p_log_level_rec => g_log_level_rec);

4151:
4152: -- Allocating units section
4153: If nvl(G_UNITS,0) > 0 and g_book_class <> 'TAX' then
4154: if (g_log_level_rec.statement_level) then
4155: fa_debug_pkg.add(l_calling_fn, 'Calling unit allocation',g_units,p_log_level_rec => g_log_level_rec);
4156: end if;
4157:
4158: -- return success_count and failure_count
4159:

Line 4186: fa_debug_pkg.add(l_calling_fn,

4182: from fa_mass_ext_retirements
4183: where batch_name = g_batch_name;
4184:
4185: if (g_log_level_rec.statement_level) then
4186: fa_debug_pkg.add(l_calling_fn,
4187: 'G_proceeds_of_sale',
4188: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4189: fa_debug_pkg.add(l_calling_fn,
4190: 'G_cost_of_removal',

Line 4189: fa_debug_pkg.add(l_calling_fn,

4185: if (g_log_level_rec.statement_level) then
4186: fa_debug_pkg.add(l_calling_fn,
4187: 'G_proceeds_of_sale',
4188: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4189: fa_debug_pkg.add(l_calling_fn,
4190: 'G_cost_of_removal',
4191: G_cost_of_removal, p_log_level_rec => g_log_level_rec);
4192: fa_debug_pkg.add(l_calling_fn,
4193: 'l_total_cost_retired',

Line 4192: fa_debug_pkg.add(l_calling_fn,

4188: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4189: fa_debug_pkg.add(l_calling_fn,
4190: 'G_cost_of_removal',
4191: G_cost_of_removal, p_log_level_rec => g_log_level_rec);
4192: fa_debug_pkg.add(l_calling_fn,
4193: 'l_total_cost_retired',
4194: l_total_cost_retired, p_log_level_rec => g_log_level_rec);
4195: end if;
4196:

Line 4200: fa_debug_pkg.add(l_calling_fn,

4196:
4197: IF (((G_Cost_Of_Removal = 0) AND (G_Proceeds_Of_Sale=0)) OR
4198: (l_Total_Cost_Retired = 0)) THEN
4199: if (g_log_level_rec.statement_level) then
4200: fa_debug_pkg.add(l_calling_fn,
4201: 'not allocating any POS / COR amounts',
4202: '', p_log_level_rec => g_log_level_rec);
4203: end if;
4204: ELSE

Line 4221: fa_debug_pkg.add(l_calling_fn,

4217: from fa_mass_ext_retirements
4218: where batch_name = g_batch_name;
4219:
4220: if (g_log_level_rec.statement_level) then
4221: fa_debug_pkg.add(l_calling_fn,
4222: 'count of records in mass_ext_ret',
4223: l_msg_count, p_log_level_rec => g_log_level_rec);
4224: end if;
4225:

Line 4228: fa_debug_pkg.add(l_calling_fn,

4224: end if;
4225:
4226: if (l_asset_id.count = 0) then
4227: if (g_log_level_rec.statement_level) then
4228: fa_debug_pkg.add(l_calling_fn,
4229: 'no assets found in the cursor',
4230: 'mass_ret_assets', p_log_level_rec => g_log_level_rec);
4231: end if;
4232: exit;

Line 4261: fa_debug_pkg.add(l_calling_fn,

4257: l_Prorated_Cost_Of_Removal(l_loop_count);
4258: l_Running_Count_Retired := l_Running_Count_Retired + 1;
4259:
4260: if (g_log_level_rec.statement_level) then
4261: fa_debug_pkg.add(l_calling_fn,
4262: 'l_Cost_Retired',
4263: l_Cost_Retired(l_loop_count), p_log_level_rec => g_log_level_rec);
4264: fa_debug_pkg.add(l_calling_fn,
4265: 'l_Running_Prorated_POS',

Line 4264: fa_debug_pkg.add(l_calling_fn,

4260: if (g_log_level_rec.statement_level) then
4261: fa_debug_pkg.add(l_calling_fn,
4262: 'l_Cost_Retired',
4263: l_Cost_Retired(l_loop_count), p_log_level_rec => g_log_level_rec);
4264: fa_debug_pkg.add(l_calling_fn,
4265: 'l_Running_Prorated_POS',
4266: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4267: fa_debug_pkg.add(l_calling_fn,
4268: 'l_Prorated_Proceeds_Of_Sale',

Line 4267: fa_debug_pkg.add(l_calling_fn,

4263: l_Cost_Retired(l_loop_count), p_log_level_rec => g_log_level_rec);
4264: fa_debug_pkg.add(l_calling_fn,
4265: 'l_Running_Prorated_POS',
4266: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4267: fa_debug_pkg.add(l_calling_fn,
4268: 'l_Prorated_Proceeds_Of_Sale',
4269: l_Prorated_Proceeds_Of_Sale(l_loop_count), p_log_level_rec => g_log_level_rec);
4270: fa_debug_pkg.add(l_calling_fn,
4271: 'l_Running_Prorated_Cost',

Line 4270: fa_debug_pkg.add(l_calling_fn,

4266: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4267: fa_debug_pkg.add(l_calling_fn,
4268: 'l_Prorated_Proceeds_Of_Sale',
4269: l_Prorated_Proceeds_Of_Sale(l_loop_count), p_log_level_rec => g_log_level_rec);
4270: fa_debug_pkg.add(l_calling_fn,
4271: 'l_Running_Prorated_Cost',
4272: l_Running_Prorated_Cost,p_log_level_rec => g_log_level_rec);
4273: fa_debug_pkg.add(l_calling_fn,
4274: 'l_Prorated_Cost_Of_Removal',

Line 4273: fa_debug_pkg.add(l_calling_fn,

4269: l_Prorated_Proceeds_Of_Sale(l_loop_count), p_log_level_rec => g_log_level_rec);
4270: fa_debug_pkg.add(l_calling_fn,
4271: 'l_Running_Prorated_Cost',
4272: l_Running_Prorated_Cost,p_log_level_rec => g_log_level_rec);
4273: fa_debug_pkg.add(l_calling_fn,
4274: 'l_Prorated_Cost_Of_Removal',
4275: l_Prorated_Cost_Of_Removal(l_loop_count),p_log_level_rec => g_log_level_rec);
4276: fa_debug_pkg.add(l_calling_fn,
4277: 'l_Running_Count_Retired',

Line 4276: fa_debug_pkg.add(l_calling_fn,

4272: l_Running_Prorated_Cost,p_log_level_rec => g_log_level_rec);
4273: fa_debug_pkg.add(l_calling_fn,
4274: 'l_Prorated_Cost_Of_Removal',
4275: l_Prorated_Cost_Of_Removal(l_loop_count),p_log_level_rec => g_log_level_rec);
4276: fa_debug_pkg.add(l_calling_fn,
4277: 'l_Running_Count_Retired',
4278: l_Running_Count_Retired, p_log_level_rec => g_log_level_rec);
4279: end if;
4280: END LOOP;

Line 4358: FA_DEBUG_PKG.Write_Debug_Log;

4354: end if;
4355:
4356: -- Dump Debug messages when run in debug mode to log file
4357: -- if (l_debug) then
4358: FA_DEBUG_PKG.Write_Debug_Log;
4359: -- end if;
4360:
4361: -- write messages to log file
4362: FND_MSG_PUB.Count_And_Get(

Line 4389: FA_DEBUG_PKG.Write_Debug_Log;

4385: ,p_log_level_rec => g_log_level_rec);
4386:
4387: -- Dump Debug messages when run in debug mode to log file
4388: -- if (l_debug) then
4389: FA_DEBUG_PKG.Write_Debug_Log;
4390: -- end if;
4391:
4392: -- write messages to log file
4393: FND_MSG_PUB.Count_And_Get(

Line 4411: FA_DEBUG_PKG.Write_Debug_Log;

4407: ,p_log_level_rec => g_log_level_rec);
4408:
4409: -- Dump Debug messages when run in debug mode to log file
4410: -- if (l_debug) then
4411: FA_DEBUG_PKG.Write_Debug_Log;
4412: -- end if;
4413:
4414: -- write messages to log file
4415: FND_MSG_PUB.Count_And_Get(