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 463: fa_debug_pkg.add(

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

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

596:
597: BEGIN -- Check_Split_Distribution
598:
599: if (g_log_level_rec.statement_level) then
600: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
601: 'Starting',
602: '', p_log_level_rec => g_log_level_rec);
603: end if;
604:

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

611: l_units_assigned;
612: While c_cc%FOUND loop
613:
614: if (g_log_level_rec.statement_level) then
615: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
616: 'Starting while loop turn:',
617: i, p_log_level_rec => g_log_level_rec);
618: end if;
619:

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

624: l_asset_dist_tbl(i).assigned_to := l_assigned_to;
625:
626:
627: if (g_log_level_rec.statement_level) then
628: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
629: 'asset_id',
630: x_asset_id, p_log_level_rec => g_log_level_rec);
631: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
632: 'ccid',

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

627: if (g_log_level_rec.statement_level) then
628: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
629: 'asset_id',
630: x_asset_id, p_log_level_rec => g_log_level_rec);
631: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
632: 'ccid',
633: l_code_combination_id, p_log_level_rec => g_log_level_rec);
634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
635: 'location_id',

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

630: x_asset_id, p_log_level_rec => g_log_level_rec);
631: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
632: 'ccid',
633: l_code_combination_id, p_log_level_rec => g_log_level_rec);
634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
635: 'location_id',
636: l_location_id, p_log_level_rec => g_log_level_rec);
637: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
638: 'assigned_to',

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

633: l_code_combination_id, p_log_level_rec => g_log_level_rec);
634: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
635: 'location_id',
636: l_location_id, p_log_level_rec => g_log_level_rec);
637: fa_debug_pkg.add('FA_MASS_RET_PKG.check_split...',
638: 'assigned_to',
639: l_assigned_to, p_log_level_rec => g_log_level_rec);
640: end if;
641:

Line 909: fa_debug_pkg.add('check_add_ret', 'inside', 'validation', p_log_level_rec => g_log_level_rec);

905:
906: BEGIN -- Check_Addition_Retirement
907:
908: if (g_log_level_rec.statement_level) then
909: fa_debug_pkg.add('check_add_ret', 'inside', 'validation', p_log_level_rec => g_log_level_rec);
910: end if;
911:
912: OPEN check_processed_retirement;
913: FETCH check_processed_retirement into x_Reason_Code;

Line 943: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE', p_log_level_rec => g_log_level_rec);

939: CLOSE check_processed_retirement;
940:
941: if (g_log_level_rec.statement_level) then
942: if (status) then
943: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE', p_log_level_rec => g_log_level_rec);
944: else
945: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE', p_log_level_rec => g_log_level_rec);
946: end if;
947: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code, p_log_level_rec => g_log_level_rec);

Line 945: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE', p_log_level_rec => g_log_level_rec);

941: if (g_log_level_rec.statement_level) then
942: if (status) then
943: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE', p_log_level_rec => g_log_level_rec);
944: else
945: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE', p_log_level_rec => g_log_level_rec);
946: end if;
947: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code, p_log_level_rec => g_log_level_rec);
948: end if;
949:

Line 947: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code, p_log_level_rec => g_log_level_rec);

943: fa_debug_pkg.add('check_add_ret', 'status', 'TRUE', p_log_level_rec => g_log_level_rec);
944: else
945: fa_debug_pkg.add('check_add_ret', 'status', 'FALSE', p_log_level_rec => g_log_level_rec);
946: end if;
947: fa_debug_pkg.add('check_add_ret', 'mesg', x_reason_code, p_log_level_rec => g_log_level_rec);
948: end if;
949:
950: RETURN Status;
951:

Line 1308: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units , p_log_level_rec => g_log_level_rec);

1304: Begin
1305:
1306:
1307: if (g_log_level_rec.statement_level) then
1308: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units , p_log_level_rec => g_log_level_rec);
1309: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search , p_log_level_rec => g_log_level_rec);
1310: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis, p_log_level_rec => g_log_level_rec);
1311: end if;
1312:

Line 1309: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search , p_log_level_rec => g_log_level_rec);

1305:
1306:
1307: if (g_log_level_rec.statement_level) then
1308: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units , p_log_level_rec => g_log_level_rec);
1309: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search , p_log_level_rec => g_log_level_rec);
1310: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis, p_log_level_rec => g_log_level_rec);
1311: end if;
1312:
1313: If (g_extend_search = 'YES'

Line 1310: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis, p_log_level_rec => g_log_level_rec);

1306:
1307: if (g_log_level_rec.statement_level) then
1308: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:units',g_units , p_log_level_rec => g_log_level_rec);
1309: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:extend',g_extend_search , p_log_level_rec => g_log_level_rec);
1310: fa_debug_pkg.add(l_calling_fn, 'In unit allocation:from_dpis',g_from_dpis, p_log_level_rec => g_log_level_rec);
1311: end if;
1312:
1313: If (g_extend_search = 'YES'
1314: and (g_from_dpis is not null and g_to_dpis is not null)

Line 1339: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units , p_log_level_rec => g_log_level_rec);

1335: While (c_asset_assignments%FOUND and l_remaining_units > 0) loop
1336:
1337:
1338: if (g_log_level_rec.statement_level) then
1339: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units , p_log_level_rec => g_log_level_rec);
1340: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id , p_log_level_rec => g_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units, p_log_level_rec => g_log_level_rec);
1342: end if;
1343:

Line 1340: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id , p_log_level_rec => g_log_level_rec);

1336:
1337:
1338: if (g_log_level_rec.statement_level) then
1339: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units , p_log_level_rec => g_log_level_rec);
1340: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id , p_log_level_rec => g_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units, p_log_level_rec => g_log_level_rec);
1342: end if;
1343:
1344: -- this solution assumes that units are entered in fa_mass_ext_retirements records.(verified ok).

Line 1341: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units, p_log_level_rec => g_log_level_rec);

1337:
1338: if (g_log_level_rec.statement_level) then
1339: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: remaining units',l_remaining_units , p_log_level_rec => g_log_level_rec);
1340: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: asset_id',aurec.asset_Id , p_log_level_rec => g_log_level_rec);
1341: fa_debug_pkg.add(l_calling_fn, 'In aurec-loop: mer_units',aurec.mer_units, p_log_level_rec => g_log_level_rec);
1342: end if;
1343:
1344: -- this solution assumes that units are entered in fa_mass_ext_retirements records.(verified ok).
1345:

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

1355: end if;
1356:
1357: if nvl(aurec.mer_units,0) <= l_remaining_units then
1358: if (g_log_level_rec.statement_level) then
1359: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units <= rem.units',
1360: aurec.mer_units , p_log_level_rec => g_log_level_rec);
1361: end if;
1362:
1363: if l_post_units = 0 then

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

1361: end if;
1362:
1363: if l_post_units = 0 then
1364: if (g_log_level_rec.statement_level) then
1365: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units = 0',
1366: l_post_units , p_log_level_rec => g_log_level_rec);
1367: end if;
1368:
1369: l_remaining_units := l_remaining_units - aurec.mer_units;

Line 1380: fa_debug_pkg.add(l_calling_fn, 'mer_units >0, units',l_remaining_units , p_log_level_rec => g_log_level_rec);

1376:
1377: message_tbl(aurec.asset_number, num_msg, msg_tbl);
1378:
1379: if (g_log_level_rec.statement_level) then
1380: fa_debug_pkg.add(l_calling_fn, 'mer_units >0, units',l_remaining_units , p_log_level_rec => g_log_level_rec);
1381: end if;
1382:
1383:
1384: else -- l_post_units > 0

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

1392: and review_status = 'POST'
1393: and batch_name <> g_batch_name;
1394:
1395: if (g_log_level_rec.statement_level) then
1396: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units > 0',
1397: l_asset_post_units , p_log_level_rec => g_log_level_rec);
1398: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null, current_units',
1399: aurec.current_units, p_log_level_rec => g_log_level_rec);
1400: end if;

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

1394:
1395: if (g_log_level_rec.statement_level) then
1396: fa_debug_pkg.add(l_calling_fn, 'aurec, post_units > 0',
1397: l_asset_post_units , p_log_level_rec => g_log_level_rec);
1398: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null, current_units',
1399: aurec.current_units, p_log_level_rec => g_log_level_rec);
1400: end if;
1401:
1402:

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

1401:
1402:
1403: if aurec.code_combination_id is null then
1404: if (g_log_level_rec.statement_level) then
1405: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',
1406: '', p_log_level_rec => g_log_level_rec);
1407: end if;
1408:
1409: if aurec.current_units > l_asset_post_units then

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

1443: raise dml_error;
1444:
1445: end if;
1446: if (g_log_level_rec.statement_level) then
1447: fa_debug_pkg.add(l_calling_fn,'insert details A',
1448: l_dist_diff, p_log_level_rec => g_log_level_rec);
1449: end if;
1450:
1451: message_tbl(aurec.asset_number, num_msg, msg_tbl);

Line 1464: fa_debug_pkg.add(l_calling_fn, 'check all dists,continue with no dist info rows', l_diff, p_log_level_rec => g_log_level_rec);

1460: END LOOP;
1461: close c_dh;
1462:
1463: if (g_log_level_rec.statement_level) then
1464: fa_debug_pkg.add(l_calling_fn, 'check all dists,continue with no dist info rows', l_diff, p_log_level_rec => g_log_level_rec);
1465: end if;
1466:
1467:
1468: -- We've checked all distributions, now there are only occurences with

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

1472: fetch c_dh into dhrec;
1473: While (c_dh%FOUND and l_diff > 0) loop
1474:
1475: if (g_log_level_rec.statement_level) then
1476: fa_debug_pkg.add(l_calling_fn, 'while loop,diff > 0',
1477: l_diff, p_log_level_rec => g_log_level_rec);
1478: end if;
1479:
1480: if dhrec.units_assigned > l_asset_post_units then

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

1480: if dhrec.units_assigned > l_asset_post_units then
1481: l_dist_diff := dhrec.units_assigned - l_asset_post_units;
1482:
1483: if (g_log_level_rec.statement_level) then
1484: fa_debug_pkg.add(l_calling_fn, 'while loop,dist_diff ',
1485: l_dist_diff, p_log_level_rec => g_log_level_rec);
1486: end if;
1487:
1488: if l_dist_diff <= l_diff then

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

1497: aurec.current_units) then
1498: raise dml_error;
1499: end if;
1500: if (g_log_level_rec.statement_level) then
1501: fa_debug_pkg.add(l_calling_fn,'insert details B',
1502: l_dist_diff, p_log_level_rec => g_log_level_rec);
1503: end if;
1504:
1505: message_tbl(aurec.asset_number, num_msg, msg_tbl);

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

1523:
1524: else -- code_combination_id is not null
1525: -- bug 3161864
1526: if (g_log_level_rec.statement_level) then
1527: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1528: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1529:
1530: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1531: aurec.mer_units, p_log_level_rec => g_log_level_rec);

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

1526: if (g_log_level_rec.statement_level) then
1527: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1528: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1529:
1530: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1531: aurec.mer_units, p_log_level_rec => g_log_level_rec);
1532:
1533: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1534: aurec.current_units, p_log_level_rec => g_log_level_rec);

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

1529:
1530: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1531: aurec.mer_units, p_log_level_rec => g_log_level_rec);
1532:
1533: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1534: aurec.current_units, p_log_level_rec => g_log_level_rec);
1535:
1536: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
1537: l_asset_post_units, p_log_level_rec => g_log_level_rec);

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

1532:
1533: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1534: aurec.current_units, p_log_level_rec => g_log_level_rec);
1535:
1536: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
1537: l_asset_post_units, p_log_level_rec => g_log_level_rec);
1538:
1539: end if;
1540:

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

1554: and nvl(assigned_to,-99) =
1555: nvl(aurec.assigned_to,-99);
1556:
1557: if (g_log_level_rec.statement_level) then
1558: fa_debug_pkg.add(l_calling_fn, 'l_dist_post_units',
1559: l_dist_post_units, p_log_level_rec => g_log_level_rec);
1560:
1561: end if;
1562:

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

1594: end if;
1595:
1596: if (g_log_level_rec.statement_level) then
1597: l_slask := aurec.mer_units - l_dist_post_units;
1598: fa_debug_pkg.add(l_calling_fn,'insert details C',
1599: l_slask, p_log_level_rec => g_log_level_rec);
1600: end if;
1601:
1602: message_tbl(aurec.asset_number, num_msg, msg_tbl);

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

1613:
1614: else -- aurec.mer_units > l_remaining_units...
1615:
1616: if (g_log_level_rec.statement_level) then
1617: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units',
1618: l_remaining_units, p_log_level_rec => g_log_level_rec);
1619: end if;
1620:
1621: if l_post_units = 0 then

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

1620:
1621: if l_post_units = 0 then
1622:
1623: if (g_log_level_rec.statement_level) then
1624: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',
1625: l_post_units, p_log_level_rec => g_log_level_rec);
1626: fa_debug_pkg.add(l_calling_fn, 'location_id',
1627: aurec.location_id, p_log_level_rec => g_log_level_rec);
1628: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',

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

1622:
1623: if (g_log_level_rec.statement_level) then
1624: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',
1625: l_post_units, p_log_level_rec => g_log_level_rec);
1626: fa_debug_pkg.add(l_calling_fn, 'location_id',
1627: aurec.location_id, p_log_level_rec => g_log_level_rec);
1628: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1629: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1630: fa_debug_pkg.add(l_calling_fn, 'assigned_to',

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

1624: fa_debug_pkg.add(l_calling_fn, 'post_units = 0',
1625: l_post_units, p_log_level_rec => g_log_level_rec);
1626: fa_debug_pkg.add(l_calling_fn, 'location_id',
1627: aurec.location_id, p_log_level_rec => g_log_level_rec);
1628: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1629: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1630: fa_debug_pkg.add(l_calling_fn, 'assigned_to',
1631: aurec.assigned_to, p_log_level_rec => g_log_level_rec);
1632: end if;

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

1626: fa_debug_pkg.add(l_calling_fn, 'location_id',
1627: aurec.location_id, p_log_level_rec => g_log_level_rec);
1628: fa_debug_pkg.add(l_calling_fn, 'code_combination_id',
1629: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1630: fa_debug_pkg.add(l_calling_fn, 'assigned_to',
1631: aurec.assigned_to, p_log_level_rec => g_log_level_rec);
1632: end if;
1633: -- bug 3163661 - in this branch.
1634: -- obtain distributions to partially retire from

Line 1642: fa_debug_pkg.add(l_calling_fn,

1638:
1639: if dhrec.units_assigned >= l_remaining_units then
1640:
1641: if (g_log_level_rec.statement_level) then
1642: fa_debug_pkg.add(l_calling_fn,
1643: 'Before Insert details B, units_assigned',
1644: dhrec.units_assigned, p_log_level_rec => g_log_level_rec);
1645: end if;
1646:

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

1657: raise dml_error;
1658:
1659: end if;
1660: if (g_log_level_rec.statement_level) then
1661: fa_debug_pkg.add(l_calling_fn,'insert details D',
1662: l_remaining_units, p_log_level_rec => g_log_level_rec);
1663: end if;
1664:
1665: message_tbl(aurec.asset_number, num_msg, msg_tbl);

Line 1668: fa_debug_pkg.add(l_calling_fn, '

1664:
1665: message_tbl(aurec.asset_number, num_msg, msg_tbl);
1666:
1667: if (g_log_level_rec.statement_level) then
1668: fa_debug_pkg.add(l_calling_fn, '
1669: aurec.., remaining units',
1670: 0 , p_log_level_rec => g_log_level_rec);
1671: end if;
1672:

Line 1678: fa_debug_pkg.add(l_calling_fn,

1674: else -- units_assigned
1675:
1676: -- insert partial unit retirement
1677: if (g_log_level_rec.statement_level) then
1678: fa_debug_pkg.add(l_calling_fn,
1679: 'Before Insert details C, units_assigned',
1680: dhrec.units_assigned, p_log_level_rec => g_log_level_rec);
1681: end if;
1682:

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

1693:
1694: end if;
1695:
1696: if (g_log_level_rec.statement_level) then
1697: fa_debug_pkg.add(l_calling_fn,'insert details E',
1698: dhrec.units_assigned, p_log_level_rec => g_log_level_rec);
1699:
1700: end if;
1701:

Line 1706: fa_debug_pkg.add(l_calling_fn,

1702: message_tbl(aurec.asset_number, num_msg, msg_tbl);
1703:
1704: l_remaining_units := l_remaining_units - dhrec.units_assigned;
1705: if (g_log_level_rec.statement_level) then
1706: fa_debug_pkg.add(l_calling_fn,
1707: 'aurec2.., remaining units',
1708: l_remaining_units , p_log_level_rec => g_log_level_rec);
1709: end if;
1710:

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

1717: -- dfbug here...
1718:
1719: -- units have been already been put in fa_mer for this asset_id.
1720: if (g_log_level_rec.statement_level) then
1721: fa_debug_pkg.add(l_calling_fn, 'post_units >0 ',
1722: l_post_units, p_log_level_rec => g_log_level_rec);
1723: end if;
1724:
1725: select nvl(sum(units),0)

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

1736: if aurec.code_combination_id is null then
1737:
1738:
1739: if (g_log_level_rec.statement_level) then
1740: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is null',
1741: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1742: end if;
1743: if aurec.mer_units > l_asset_post_units then
1744: if (g_log_level_rec.statement_level) then

Line 1745: fa_debug_pkg.add(l_calling_fn,

1741: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1742: end if;
1743: if aurec.mer_units > l_asset_post_units then
1744: if (g_log_level_rec.statement_level) then
1745: fa_debug_pkg.add(l_calling_fn,
1746: 'mer_units > l_asset_post_units',
1747: l_asset_post_units, p_log_level_rec => g_log_level_rec);
1748: end if;
1749:

Line 1768: fa_debug_pkg.add(l_calling_fn,

1764: and location_id = dhrec.location_id
1765: and nvl(assigned_to,-99) = nvl(dhrec.assigned_to,-99);
1766:
1767: if (g_log_level_rec.statement_level) then
1768: fa_debug_pkg.add(l_calling_fn,
1769: 'In while loop, post_units',
1770: l_dist_post_units, p_log_level_rec => g_log_level_rec);
1771: end if;
1772: if dhrec.units_assigned > l_dist_post_units then

Line 1778: fa_debug_pkg.add(l_calling_fn,

1774:
1775: l_dist_diff := dhrec.units_assigned - l_dist_post_units;
1776:
1777: if (g_log_level_rec.statement_level) then
1778: fa_debug_pkg.add(l_calling_fn,
1779: 'units_assign > post_units',
1780: l_dist_diff , p_log_level_rec => g_log_level_rec);
1781: end if;
1782:

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

1793:
1794: raise dml_error;
1795: end if;
1796: if (g_log_level_rec.statement_level) then
1797: fa_debug_pkg.add(l_calling_fn,'insert details F',
1798: l_dist_diff, p_log_level_rec => g_log_level_rec);
1799: end if;
1800:
1801: message_tbl(aurec.asset_number, num_msg, msg_tbl);

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

1816:
1817: raise dml_error;
1818: end if;
1819: if (g_log_level_rec.statement_level) then
1820: fa_debug_pkg.add(l_calling_fn,'insert details FF',
1821: l_remaining_units, p_log_level_rec => g_log_level_rec);
1822: end if;
1823:
1824: message_tbl(aurec.asset_number, num_msg, msg_tbl);

Line 1837: fa_debug_pkg.add(l_calling_fn, 'Check occurences with no dist info', l_remaining_units, p_log_level_rec => g_log_level_rec);

1833: END LOOP;
1834: close c_dh;
1835:
1836: if (g_log_level_rec.statement_level) then
1837: fa_debug_pkg.add(l_calling_fn, 'Check occurences with no dist info', l_remaining_units, p_log_level_rec => g_log_level_rec);
1838: end if;
1839: --
1840: -- We've checked all distributions, now there are only occurences with
1841: -- no distribution info left.

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

1851:
1852: While (c_dh%FOUND and l_diff > 0) loop
1853:
1854: if (g_log_level_rec.statement_level) then
1855: fa_debug_pkg.add(l_calling_fn, 'In while loop, post_units',
1856: l_asset_post_units , p_log_level_rec => g_log_level_rec);
1857: end if;
1858: if dhrec.units_assigned > l_asset_post_units then
1859: l_dist_diff := dhrec.units_assigned - l_asset_post_units;

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

1857: end if;
1858: if dhrec.units_assigned > l_asset_post_units then
1859: l_dist_diff := dhrec.units_assigned - l_asset_post_units;
1860: if (g_log_level_rec.statement_level) then
1861: fa_debug_pkg.add(l_calling_fn, 'units_assign > post_units',
1862: l_dist_diff , p_log_level_rec => g_log_level_rec);
1863: end if;
1864:
1865: if l_dist_diff <= l_remaining_units then

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

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 G',
1880: l_dist_diff, p_log_level_rec => g_log_level_rec);
1881: end if;
1882:
1883: message_tbl(aurec.asset_number, num_msg, msg_tbl);

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

1898:
1899: raise dml_error;
1900: end if;
1901: if (g_log_level_rec.statement_level) then
1902: fa_debug_pkg.add(l_calling_fn,'insert details GG',
1903: l_remaining_units, p_log_level_rec => g_log_level_rec);
1904: end if;
1905:
1906: message_tbl(aurec.asset_number, num_msg, msg_tbl);

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

1922:
1923: else -- code_combination_id is not null
1924: -- bug 3161864
1925: if (g_log_level_rec.statement_level) then
1926: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1927: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1928: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1929: aurec.mer_units, p_log_level_rec => g_log_level_rec);
1930:

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

1924: -- bug 3161864
1925: if (g_log_level_rec.statement_level) then
1926: fa_debug_pkg.add(l_calling_fn, 'aurec.ccid is not null',
1927: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1928: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1929: aurec.mer_units, p_log_level_rec => g_log_level_rec);
1930:
1931: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1932: aurec.current_units, p_log_level_rec => g_log_level_rec);

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

1927: aurec.code_combination_id, p_log_level_rec => g_log_level_rec);
1928: fa_debug_pkg.add(l_calling_fn, 'aurec.mer_units',
1929: aurec.mer_units, p_log_level_rec => g_log_level_rec);
1930:
1931: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1932: aurec.current_units, p_log_level_rec => g_log_level_rec);
1933:
1934: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
1935: l_asset_post_units, p_log_level_rec => g_log_level_rec);

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

1930:
1931: fa_debug_pkg.add(l_calling_fn, 'aurec.current_units',
1932: aurec.current_units, p_log_level_rec => g_log_level_rec);
1933:
1934: fa_debug_pkg.add(l_calling_fn, 'l_asset_post_units',
1935: l_asset_post_units, p_log_level_rec => g_log_level_rec);
1936:
1937: end if;
1938: --

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

1990: end if;
1991:
1992: if (g_log_level_rec.statement_level) then
1993: l_slask := aurec.mer_units - l_dist_post_units;
1994: fa_debug_pkg.add(l_calling_fn,'insert details H',
1995: l_slask, p_log_level_rec => g_log_level_rec);
1996: end if;
1997:
1998: message_tbl(aurec.asset_number, num_msg, msg_tbl);

Line 2022: fa_debug_pkg.add(l_calling_fn, 'Before 2nd round of allocation',l_remaining_units , p_log_level_rec => g_log_level_rec);

2018: close c_asset_assignments;
2019:
2020:
2021: if (g_log_level_rec.statement_level) then
2022: fa_debug_pkg.add(l_calling_fn, 'Before 2nd round of allocation',l_remaining_units , p_log_level_rec => g_log_level_rec);
2023: end if;
2024:
2025: -- SECOND ROUND OF ALLOCATION IF EXTENDED SEARCH BEYOND DATES USING FIFO
2026: -- This is the condition to search for additional quantities outside dpis range.

Line 2033: fa_debug_pkg.add(l_calling_fn,

2029: and (temp_from_dpis is not null and temp_to_dpis is not null)
2030: and l_remaining_units > 0) then
2031:
2032: if (g_log_level_rec.statement_level) then
2033: fa_debug_pkg.add(l_calling_fn,
2034: '2ND ROUND OF ALLOCATION, temp_from_dpis',
2035: temp_from_dpis, p_log_level_rec => g_log_level_rec);
2036: fa_debug_pkg.add(l_calling_fn,
2037: '2ND ROUND OF ALLOCATION,temp_to_dpis',

Line 2036: fa_debug_pkg.add(l_calling_fn,

2032: if (g_log_level_rec.statement_level) then
2033: fa_debug_pkg.add(l_calling_fn,
2034: '2ND ROUND OF ALLOCATION, temp_from_dpis',
2035: temp_from_dpis, p_log_level_rec => g_log_level_rec);
2036: fa_debug_pkg.add(l_calling_fn,
2037: '2ND ROUND OF ALLOCATION,temp_to_dpis',
2038: temp_to_dpis , p_log_level_rec => g_log_level_rec);
2039: end if;
2040:

Line 2059: fa_debug_pkg.add(l_calling_fn,

2055:
2056: l_asset_dist_tbl.delete;
2057:
2058: if (g_log_level_rec.statement_level) then
2059: fa_debug_pkg.add(l_calling_fn,
2060: 'In qual loop, remaining units',
2061: l_remaining_units , p_log_level_rec => g_log_level_rec);
2062: fa_debug_pkg.add(l_calling_fn, 'In qual loop, asset_id:',
2063: l_2nd_asset_id, p_log_level_rec => g_log_level_rec);

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

2058: if (g_log_level_rec.statement_level) then
2059: fa_debug_pkg.add(l_calling_fn,
2060: 'In qual loop, remaining units',
2061: l_remaining_units , p_log_level_rec => g_log_level_rec);
2062: fa_debug_pkg.add(l_calling_fn, 'In qual loop, asset_id:',
2063: l_2nd_asset_id, p_log_level_rec => g_log_level_rec);
2064: end if;
2065:
2066: IF not (Check_Addition_Retirement(l_2nd_asset_id, l_Reason_Code)) THEN

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

2073: l_null_segment_flag = 'N') then
2074:
2075:
2076: if (g_log_level_rec.statement_level) then
2077: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',
2078: '', p_log_level_rec => g_log_level_rec);
2079: end if;
2080:
2081: IF not Check_Split_Distribution(l_2nd_asset_id,

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

2086:
2087: end if; -- g_location...
2088:
2089: if (g_log_level_rec.statement_level) then
2090: fa_debug_pkg.add(l_calling_fn, 'In qual loop 2 ',
2091: l_2nd_asset_id, p_log_level_rec => g_log_level_rec);
2092: end if;
2093:
2094: if l_asset_dist_tbl.count = 0 then

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

2092: end if;
2093:
2094: if l_asset_dist_tbl.count = 0 then
2095: if (g_log_level_rec.statement_level) then
2096: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', '' , p_log_level_rec => g_log_level_rec);
2097: end if;
2098:
2099: l_asset_dist_tbl(1).expense_ccid := '';
2100: l_asset_dist_tbl(1).location_ccid := '';

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

2102: l_asset_dist_tbl(1).units_assigned := l_2nd_current_units;
2103: end if;
2104:
2105: if (g_log_level_rec.statement_level) then
2106: fa_debug_pkg.add(l_calling_fn, 'Before l_asset_dist_tbl loop',
2107: '', p_log_level_rec => g_log_level_rec);
2108: end if;
2109:
2110:

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

2113:
2114: -- ALLOCATE 2ND ROUND
2115:
2116: if (g_log_level_rec.statement_level) then
2117: fa_debug_pkg.add(l_calling_fn, 'In l_asset_dist_tbl loop',
2118: '', p_log_level_rec => g_log_level_rec);
2119: end if;
2120:
2121: if l_asset_id <> l_2nd_asset_id then

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

2133:
2134: if l_asset_dist_tbl(l_dist_count).units_assigned <= l_remaining_units then
2135:
2136: if (g_log_level_rec.statement_level) then
2137: fa_debug_pkg.add(l_calling_fn, 'If units_assigned <= rem.',
2138: l_remaining_units, p_log_level_rec => g_log_level_rec);
2139: end if;
2140:
2141: if (l_post_units = 0) then

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

2140:
2141: if (l_post_units = 0) then
2142:
2143: if (g_log_level_rec.statement_level) then
2144: fa_debug_pkg.add(l_calling_fn, 'l_post_units = 0',
2145: '', p_log_level_rec => g_log_level_rec);
2146: end if;
2147:
2148: l_remaining_units := l_remaining_units - l_asset_dist_tbl(l_dist_count).units_assigned;

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

2147:
2148: l_remaining_units := l_remaining_units - l_asset_dist_tbl(l_dist_count).units_assigned;
2149:
2150: if (g_log_level_rec.statement_level) then
2151: fa_debug_pkg.add(l_calling_fn, 'Before Insert details A, units',
2152: l_asset_dist_tbl(l_dist_count).units_assigned);
2153: end if;
2154:
2155: if not insert_details(

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

2164: raise dml_error;
2165:
2166: end if;
2167: if (g_log_level_rec.statement_level) then
2168: fa_debug_pkg.add(l_calling_fn,'insert details I',
2169: l_asset_dist_tbl(l_dist_count).units_assigned);
2170: end if;
2171:
2172: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);

Line 2175: fa_debug_pkg.add(l_calling_fn,

2171:
2172: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2173:
2174: if (g_log_level_rec.statement_level) then
2175: fa_debug_pkg.add(l_calling_fn,
2176: 'Outside.., remaining units',
2177: l_remaining_units , p_log_level_rec => g_log_level_rec);
2178: end if;
2179:

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

2191: and batch_name <> g_batch_name;
2192:
2193:
2194: if (g_log_level_rec.statement_level) then
2195: fa_debug_pkg.add(l_calling_fn, 'Before expense_ccid is null',
2196: '', p_log_level_rec => g_log_level_rec);
2197: end if;
2198:
2199: if l_asset_dist_tbl(l_dist_count).expense_ccid is null then

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

2198:
2199: if l_asset_dist_tbl(l_dist_count).expense_ccid is null then
2200:
2201: if (g_log_level_rec.statement_level) then
2202: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is null',
2203: '', p_log_level_rec => g_log_level_rec);
2204: end if;
2205:
2206:

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

2206:
2207: if l_2nd_current_units > l_asset_post_units then
2208:
2209: if (g_log_level_rec.statement_level) then
2210: fa_debug_pkg.add(l_calling_fn, 'l_2nd_current_units > l_post_units',
2211: l_asset_post_units, p_log_level_rec => g_log_level_rec);
2212: end if;
2213:
2214: l_diff := l_2nd_current_units - l_asset_post_units;

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

2216: fetch c_dh into dhrec;
2217: While (c_dh%FOUND and l_diff > 0) loop
2218:
2219: if (g_log_level_rec.statement_level) then
2220: fa_debug_pkg.add(l_calling_fn, 'In dh loop, l_diff',
2221: l_diff, p_log_level_rec => g_log_level_rec);
2222: end if;
2223:
2224: select nvl(sum(units),0)

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

2234:
2235: if dhrec.units_assigned > l_dist_post_units then
2236:
2237: if (g_log_level_rec.statement_level) then
2238: fa_debug_pkg.add(l_calling_fn, 'units_assign > dist_post_units',
2239: l_dist_post_units, p_log_level_rec => g_log_level_rec);
2240: end if;
2241:
2242: l_dist_diff := dhrec.units_assigned - l_dist_post_units;

Line 2258: fa_debug_pkg.add(l_calling_fn,'insert details J',l_dist_diff, p_log_level_rec => g_log_level_rec);

2254: raise dml_error;
2255:
2256: end if;
2257: if (g_log_level_rec.statement_level) then
2258: fa_debug_pkg.add(l_calling_fn,'insert details J',l_dist_diff, p_log_level_rec => g_log_level_rec);
2259: end if;
2260:
2261: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2262:

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

2269: END LOOP;
2270: close c_dh;
2271:
2272: if (g_log_level_rec.statement_level) then
2273: fa_debug_pkg.add(l_calling_fn, 'Occurences with no dist info, l_diff ',
2274: l_diff, p_log_level_rec => g_log_level_rec);
2275: end if;
2276:
2277: -- We've checked all distributions, now there are only occurences with

Line 2301: fa_debug_pkg.add(l_calling_fn,'insert details K',l_dist_diff, p_log_level_rec => g_log_level_rec);

2297: raise dml_error;
2298:
2299: end if;
2300: if (g_log_level_rec.statement_level) then
2301: fa_debug_pkg.add(l_calling_fn,'insert details K',l_dist_diff, p_log_level_rec => g_log_level_rec);
2302: end if;
2303:
2304: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2305: l_remaining_units := l_remaining_units - (dhrec.units_assigned - l_asset_post_units);

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

2317: else -- expense_ccid is not null
2318: -- bug 3161864
2319:
2320: if (g_log_level_rec.statement_level) then
2321: fa_debug_pkg.add(l_calling_fn, 'expense_ccid is not null',
2322: '', p_log_level_rec => g_log_level_rec);
2323: end if;
2324:
2325: if l_2nd_current_units > l_asset_post_units then

Line 2374: fa_debug_pkg.add(l_calling_fn,'insert details KK',l_slask, p_log_level_rec => g_log_level_rec);

2370: raise dml_error;
2371: end if;
2372: if (g_log_level_rec.statement_level) then
2373: l_slask := l_asset_dist_tbl(l_dist_count).units_assigned - l_dist_post_units;
2374: fa_debug_pkg.add(l_calling_fn,'insert details KK',l_slask, p_log_level_rec => g_log_level_rec);
2375: end if;
2376:
2377: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2378:

Line 2396: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units', l_remaining_units, p_log_level_rec => g_log_level_rec);

2392:
2393: else -- units_assigned > l_remaining_units
2394:
2395: if (g_log_level_rec.statement_level) then
2396: fa_debug_pkg.add(l_calling_fn, 'units_assigned > l_remain_units', l_remaining_units, p_log_level_rec => g_log_level_rec);
2397: end if;
2398:
2399: if l_post_units = 0 then
2400:

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

2402:
2403:
2404: -- obtain distributions to partially retire from
2405: if (g_log_level_rec.statement_level) then
2406: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2407: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id, p_log_level_rec => g_log_level_rec);
2408: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id, p_log_level_rec => g_log_level_rec);
2409: end if;
2410:

Line 2407: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id, p_log_level_rec => g_log_level_rec);

2403:
2404: -- obtain distributions to partially retire from
2405: if (g_log_level_rec.statement_level) then
2406: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2407: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id, p_log_level_rec => g_log_level_rec);
2408: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id, p_log_level_rec => g_log_level_rec);
2409: end if;
2410:
2411: open c_dh;

Line 2408: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id, p_log_level_rec => g_log_level_rec);

2404: -- obtain distributions to partially retire from
2405: if (g_log_level_rec.statement_level) then
2406: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11:units_assigned ', l_asset_dist_tbl(l_dist_count).units_assigned );
2407: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_asset_id, p_log_level_rec => g_log_level_rec);
2408: fa_debug_pkg.add(l_calling_fn, 'outside...else, 11: asset ', l_2nd_asset_id, p_log_level_rec => g_log_level_rec);
2409: end if;
2410:
2411: open c_dh;
2412: fetch c_dh into dhrec;

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

2415:
2416: if dhrec.units_assigned >= l_remaining_units then
2417:
2418: if (g_log_level_rec.statement_level) then
2419: fa_debug_pkg.add(l_calling_fn, 'Before Insert details B, units',
2420: l_asset_dist_tbl(l_dist_count).units_assigned);
2421: end if;
2422:
2423: -- insert partial unit retirement

Line 2438: fa_debug_pkg.add(l_calling_fn,'insert details L',l_remaining_units, p_log_level_rec => g_log_level_rec);

2434: raise dml_error;
2435:
2436: end if;
2437: if (g_log_level_rec.statement_level) then
2438: fa_debug_pkg.add(l_calling_fn,'insert details L',l_remaining_units, p_log_level_rec => g_log_level_rec);
2439: end if;
2440:
2441: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2442:

Line 2444: fa_debug_pkg.add(l_calling_fn,

2440:
2441: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2442:
2443: if (g_log_level_rec.statement_level) then
2444: fa_debug_pkg.add(l_calling_fn,
2445: 'Outside.., remaining units',
2446: 0 , p_log_level_rec => g_log_level_rec);
2447: end if;
2448:

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

2452:
2453: -- insert partial unit retirement
2454:
2455: if (g_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, 'Before Insert details C, units',
2457: l_asset_dist_tbl(l_dist_count).units_assigned);
2458: end if;
2459:
2460: if not insert_details(

Line 2473: fa_debug_pkg.add(l_calling_fn,'insert details M', dhrec.units_assigned, p_log_level_rec => g_log_level_rec);

2469: raise dml_error;
2470:
2471: end if;
2472: if (g_log_level_rec.statement_level) then
2473: fa_debug_pkg.add(l_calling_fn,'insert details M', dhrec.units_assigned, p_log_level_rec => g_log_level_rec);
2474: end if;
2475: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2476:
2477: l_remaining_units := l_remaining_units - dhrec.units_assigned;

Line 2479: fa_debug_pkg.add(l_calling_fn,

2475: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2476:
2477: l_remaining_units := l_remaining_units - dhrec.units_assigned;
2478: if (g_log_level_rec.statement_level) then
2479: fa_debug_pkg.add(l_calling_fn,
2480: 'Outside.., remaining units',
2481: l_remaining_units , p_log_level_rec => g_log_level_rec);
2482: end if;
2483:

Line 2541: fa_debug_pkg.add(l_calling_fn,'insert details M',l_dist_diff, p_log_level_rec => g_log_level_rec);

2537: raise dml_error;
2538:
2539: end if;
2540: if (g_log_level_rec.statement_level) then
2541: fa_debug_pkg.add(l_calling_fn,'insert details M',l_dist_diff, p_log_level_rec => g_log_level_rec);
2542: end if;
2543:
2544: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2545: l_remaining_units := l_remaining_units - (dhrec.units_assigned - l_dist_post_units);

Line 2564: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);

2560: raise dml_error;
2561:
2562: end if;
2563: if (g_log_level_rec.statement_level) then
2564: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);
2565: end if;
2566: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2567:
2568: l_remaining_units := 0;

Line 2609: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);

2605: raise dml_error;
2606:
2607: end if;
2608: if (g_log_level_rec.statement_level) then
2609: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);
2610: end if;
2611:
2612: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2613:

Line 2635: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);

2631: raise dml_error;
2632:
2633: end if;
2634: if (g_log_level_rec.statement_level) then
2635: fa_debug_pkg.add(l_calling_fn,'insert details O',l_dist_diff, p_log_level_rec => g_log_level_rec);
2636: end if;
2637:
2638:
2639: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);

Line 2712: fa_debug_pkg.add(l_calling_fn,'insert details P',l_slask, p_log_level_rec => g_log_level_rec);

2708: if (g_log_level_rec.statement_level) then
2709:
2710: l_slask :=
2711: l_asset_dist_tbl(l_dist_count).units_assigned - l_dist_post_units;
2712: fa_debug_pkg.add(l_calling_fn,'insert details P',l_slask, p_log_level_rec => g_log_level_rec);
2713: end if;
2714:
2715: message_tbl(l_2nd_asset_number, num_msg, msg_tbl);
2716:

Line 2753: fa_debug_pkg.add(l_calling_fn,

2749: End if; -- p_extend_search = yes
2750: -- Done allocating units.
2751:
2752: if (g_log_level_rec.statement_level) then
2753: fa_debug_pkg.add(l_calling_fn,
2754: 'Done allocating units, remaining units',
2755: l_remaining_units , p_log_level_rec => g_log_level_rec);
2756: end if;
2757:

Line 2762: fa_debug_pkg.add(l_calling_fn, 'Update status',l_remaining_units , p_log_level_rec => g_log_level_rec);

2758:
2759: -- Now Update status to the mass retirements batch
2760: If l_remaining_units > 0 then -- not all units have been prorated. Abort.
2761: if (g_log_level_rec.statement_level) then
2762: fa_debug_pkg.add(l_calling_fn, 'Update status',l_remaining_units , p_log_level_rec => g_log_level_rec);
2763: end if;
2764:
2765: Delete from fa_mass_ext_retirements
2766: Where batch_name = g_batch_name;

Line 2790: fa_debug_pkg.add(l_calling_fn, 'Update status <= 0 ',l_remaining_units , p_log_level_rec => g_log_level_rec);

2786: -- Not enough units provided, assets have been
2787: -- inserted into fa_mass_ext_retirements
2788: -- but will not get any units assigned for certain of these rows.
2789: if (g_log_level_rec.statement_level) then
2790: fa_debug_pkg.add(l_calling_fn, 'Update status <= 0 ',l_remaining_units , p_log_level_rec => g_log_level_rec);
2791: end if;
2792:
2793:
2794: -- rn Delete review_status have been set in initial insert.

Line 2822: fa_debug_pkg.add(

2818:
2819: Exception
2820: when dml_error then
2821: error := substrb(sqlerrm,1,80);
2822: fa_debug_pkg.add(
2823: 'Allocate_Units',
2824: error,
2825: '', p_log_level_rec => g_log_level_rec);
2826: return false;

Line 2829: fa_debug_pkg.add(

2825: '', p_log_level_rec => g_log_level_rec);
2826: return false;
2827: when others then
2828: error := substrb(sqlerrm,1,80);
2829: fa_debug_pkg.add(
2830: 'Allocate_Units',
2831: error,
2832: '', p_log_level_rec => g_log_level_rec);
2833: return false;

Line 3355: FA_DEBUG_PKG.Initialize;

3351:
3352: G_release := fa_cache_pkg.fazarel_release;
3353:
3354: FA_SRVR_MSG.Init_Server_Message;
3355: FA_DEBUG_PKG.Initialize;
3356:
3357: if p_mode <> 'BATCH' then
3358:
3359:

Line 3509: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec);

3505:
3506: l_batch_size := nvl(fa_cache_pkg.fa_batch_size, 200);
3507:
3508: if (g_log_level_rec.statement_level) then
3509: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec);
3510: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec);
3511: end if;
3512:
3513: -- if (G_status <> 'RUNNING_CRE') then

Line 3510: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec);

3506: l_batch_size := nvl(fa_cache_pkg.fa_batch_size, 200);
3507:
3508: if (g_log_level_rec.statement_level) then
3509: fa_debug_pkg.add(l_calling_fn, 'g_batch_name', g_batch_name, p_log_level_rec => g_log_level_rec);
3510: fa_debug_pkg.add(l_calling_fn, 'g_retirement_date', g_retirement_date, p_log_level_rec => g_log_level_rec);
3511: end if;
3512:
3513: -- if (G_status <> 'RUNNING_CRE') then
3514: if (G_status not in ('RUNNING_CRE','PENDING')) then

Line 3516: fa_debug_pkg.add(l_calling_fn, 'g_status', g_status, p_log_level_rec => g_log_level_rec);

3512:
3513: -- if (G_status <> 'RUNNING_CRE') then
3514: if (G_status not in ('RUNNING_CRE','PENDING')) then
3515: if (g_log_level_rec.statement_level) then
3516: fa_debug_pkg.add(l_calling_fn, 'g_status', g_status, p_log_level_rec => g_log_level_rec);
3517: end if;
3518: fa_srvr_msg.add_message(name => 'FA_MASSRET_INVALID_STATUS',
3519: calling_fn => l_calling_fn, p_log_level_rec => g_log_level_rec);
3520: raise error_found;

Line 3528: 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);

3524: commit;
3525: end if;
3526:
3527: if (g_log_level_rec.statement_level) then
3528: 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);
3529: end if;
3530:
3531: SELECT Precision, Extended_precision, MINIMUM_ACCOUNTABLE_UNIT
3532: INTO G_Precision, G_Ext_Precision, G_Min_Acct_Unit

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

3546: l_current_units
3547: LIMIT l_batch_size;
3548:
3549: if (g_log_level_rec.statement_level) then
3550: fa_debug_pkg.add(l_calling_fn, 'After bulk fetch','' , p_log_level_rec => g_log_level_rec);
3551: end if;
3552:
3553:
3554: if (l_asset_id.count = 0) then

Line 3562: fa_debug_pkg.add(l_calling_fn, 'In main asset loop',l_asset_id(l_loop_count) );

3558:
3559: for l_loop_count in 1..l_asset_id.count loop
3560:
3561: if (g_log_level_rec.statement_level) then
3562: fa_debug_pkg.add(l_calling_fn, 'In main asset loop',l_asset_id(l_loop_count) );
3563: end if;
3564:
3565:
3566: IF G_Retire_Subcomponents = 'YES' THEN

Line 3601: fa_debug_pkg.add( l_calling_fn,

3597:
3598:
3599: If l_parent_asset_id is not null then
3600: if (g_log_level_rec.statement_level) then
3601: fa_debug_pkg.add( l_calling_fn,
3602: 'Subcomponent asset exist ',
3603: l_sc_asset_id(l_loop_count_sub) );
3604: end if;
3605: ----

Line 3615: fa_debug_pkg.add(l_calling_fn,

3611: l_Loc_Split);
3612:
3613: l_Null_Segment_Flag := Check_Account_Null;
3614: if (g_log_level_rec.statement_level) then
3615: fa_debug_pkg.add(l_calling_fn,
3616: 'After check_tax_split - subcomp',
3617: l_sc_asset_id(l_loop_count_sub));
3618: fa_debug_pkg.add(l_calling_fn,
3619: 'After check_tax_split - subcomp',

Line 3618: fa_debug_pkg.add(l_calling_fn,

3614: if (g_log_level_rec.statement_level) then
3615: fa_debug_pkg.add(l_calling_fn,
3616: 'After check_tax_split - subcomp',
3617: l_sc_asset_id(l_loop_count_sub));
3618: fa_debug_pkg.add(l_calling_fn,
3619: 'After check_tax_split - subcomp',
3620: l_loc_split, p_log_level_rec => g_log_level_rec);
3621: end if;
3622: End if;

Line 3664: fa_debug_pkg.add(l_calling_fn,

3660:
3661:
3662: ELSE
3663: if (g_log_level_rec.statement_level) then
3664: fa_debug_pkg.add(l_calling_fn,
3665: 'Else 1 - subcomp',
3666: '', p_log_level_rec => g_log_level_rec);
3667: end if;
3668: l_candidate_asset_id(l_candidate_asset_id.count + 1) := l_SC_Asset_Id(l_loop_count_sub);

Line 3672: fa_debug_pkg.add(l_calling_fn,

3668: l_candidate_asset_id(l_candidate_asset_id.count + 1) := l_SC_Asset_Id(l_loop_count_sub);
3669:
3670:
3671: if (g_log_level_rec.statement_level) then
3672: fa_debug_pkg.add(l_calling_fn,
3673: 'Else 1 - subcomp l_sc_cost_retired',
3674: l_sc_cost_retired, p_log_level_rec => g_log_level_rec);
3675:
3676: fa_debug_pkg.add(l_calling_fn,

Line 3676: fa_debug_pkg.add(l_calling_fn,

3672: fa_debug_pkg.add(l_calling_fn,
3673: 'Else 1 - subcomp l_sc_cost_retired',
3674: l_sc_cost_retired, p_log_level_rec => g_log_level_rec);
3675:
3676: fa_debug_pkg.add(l_calling_fn,
3677: 'Else 1 - subcomp l_cost_retired',
3678: l_cost_retired(l_loop_count) );
3679:
3680: fa_debug_pkg.add(l_calling_fn,

Line 3680: fa_debug_pkg.add(l_calling_fn,

3676: fa_debug_pkg.add(l_calling_fn,
3677: 'Else 1 - subcomp l_cost_retired',
3678: l_cost_retired(l_loop_count) );
3679:
3680: fa_debug_pkg.add(l_calling_fn,
3681: 'Else 1 - subcomp l_total_cost_retired',
3682: l_total_cost_retired , p_log_level_rec => g_log_level_rec);
3683: fa_debug_pkg.add(l_calling_fn,
3684: 'Else 1 - subcomp l_to l_sc_units ',

Line 3683: fa_debug_pkg.add(l_calling_fn,

3679:
3680: fa_debug_pkg.add(l_calling_fn,
3681: 'Else 1 - subcomp l_total_cost_retired',
3682: l_total_cost_retired , p_log_level_rec => g_log_level_rec);
3683: fa_debug_pkg.add(l_calling_fn,
3684: 'Else 1 - subcomp l_to l_sc_units ',
3685: l_sc_units(l_loop_count_sub) );
3686:
3687: end if;

Line 3698: fa_debug_pkg.add(l_calling_fn,

3694: l_candidate_units(l_candidate_units.count + 1) := l_sc_units(l_loop_count_sub);
3695:
3696: if (g_log_level_rec.statement_level) then
3697:
3698: fa_debug_pkg.add(l_calling_fn,
3699: 'Else 1 - subcomp l_total_cost_retired',
3700: l_total_cost_retired , p_log_level_rec => g_log_level_rec);
3701:
3702:

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

3714: END LOOP; -- subcomponents
3715:
3716: END IF; -- l_Retire_Subcomponents ...
3717: if (g_log_level_rec.statement_level) then
3718: fa_debug_pkg.add(l_calling_fn, 'End subcomponent loop','' , p_log_level_rec => g_log_level_rec);
3719: end if;
3720:
3721: --
3722: -- RN Assets in taxbook cannot be partially unit retired.

Line 3731: fa_debug_pkg.add(l_calling_fn,

3727: l_Loc_Split);
3728:
3729: l_Null_Segment_Flag := Check_Account_Null;
3730: if (g_log_level_rec.statement_level) then
3731: fa_debug_pkg.add(l_calling_fn,
3732: 'After check_tax_split ',
3733: l_asset_id(l_loop_count));
3734: fa_debug_pkg.add(l_calling_fn,
3735: 'After check_tax_split ',

Line 3734: fa_debug_pkg.add(l_calling_fn,

3730: if (g_log_level_rec.statement_level) then
3731: fa_debug_pkg.add(l_calling_fn,
3732: 'After check_tax_split ',
3733: l_asset_id(l_loop_count));
3734: fa_debug_pkg.add(l_calling_fn,
3735: 'After check_tax_split ',
3736: l_loc_split, p_log_level_rec => g_log_level_rec);
3737: end if;
3738: End if;

Line 3771: fa_debug_pkg.add(l_calling_fn,

3767: 'FA_MASSRET_MULTIPLE_LOC','','');
3768: --
3769: ELSE
3770: if (g_log_level_rec.statement_level) then
3771: fa_debug_pkg.add(l_calling_fn,
3772: 'Not subcomponent branch',
3773: l_asset_id(l_loop_count) );
3774: end if;
3775:

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

3797: CLOSE c_recognize_gain_loss;
3798: /*Bug 8647381 - End*/
3799:
3800: if (g_log_level_rec.statement_level) then
3801: fa_debug_pkg.add(l_calling_fn, 'Starting candidate loop', l_count , p_log_level_rec => g_log_level_rec);
3802: end if;
3803:
3804: l_Null_Segment_Flag := Check_Account_Null;
3805:

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

3803:
3804: l_Null_Segment_Flag := Check_Account_Null;
3805:
3806: if (g_log_level_rec.statement_level) then
3807: fa_debug_pkg.add(l_calling_fn, 'check_account_null', l_null_segment_flag , p_log_level_rec => g_log_level_rec);
3808: end if;
3809:
3810: if (g_location_id is not null or
3811: g_employee_id is not null or

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

3812: l_null_segment_flag = 'N') then
3813:
3814:
3815: if (g_log_level_rec.statement_level) then
3816: fa_debug_pkg.add(l_calling_fn, 'Before check_split call',
3817: l_count, p_log_level_rec => g_log_level_rec);
3818: end if;
3819:
3820: if not Check_Split_Distribution(l_candidate_Asset_Id(l_count),

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

3831: if l_asset_dist_tbl.count = 0 OR G_Book_Class = 'TAX' then
3832:
3833:
3834: if (g_log_level_rec.statement_level) then
3835: fa_debug_pkg.add(l_calling_fn, 'After check_split dist.', '' , p_log_level_rec => g_log_level_rec);
3836: end if;
3837: -- bug 3749651
3838: l_asset_dist_tbl.delete;
3839:

Line 3870: fa_debug_pkg.add(l_calling_fn,

3866:
3867: end if;
3868:
3869: if (g_log_level_rec.statement_level) then
3870: fa_debug_pkg.add(l_calling_fn,
3871: 'Before insert into fa_mass_ext_ret ccid',
3872: l_asset_dist_tbl(l_dist_count).expense_ccid );
3873: end if;
3874:

Line 3989: fa_debug_pkg.add(l_calling_fn,

3985: l_recognize_gain_loss
3986: );
3987:
3988: if (g_log_level_rec.statement_level) then
3989: fa_debug_pkg.add(l_calling_fn,
3990: 'After insert into FA_MASS_EXT_RETIREMENTS table, asset_id',
3991: l_candidate_asset_id(l_count));
3992: fa_debug_pkg.add(l_calling_fn,
3993: 'After insert into FA_MASS_EXT_RETIREMENTS table, units_assigned',

Line 3992: fa_debug_pkg.add(l_calling_fn,

3988: if (g_log_level_rec.statement_level) then
3989: fa_debug_pkg.add(l_calling_fn,
3990: 'After insert into FA_MASS_EXT_RETIREMENTS table, asset_id',
3991: l_candidate_asset_id(l_count));
3992: fa_debug_pkg.add(l_calling_fn,
3993: 'After insert into FA_MASS_EXT_RETIREMENTS table, units_assigned',
3994: l_asset_dist_tbl(l_dist_count).units_assigned );
3995: fa_debug_pkg.add(l_calling_fn,
3996: 'After insert into FA_MASS_EXT_RETIREMENTS table, cost_retired',

Line 3995: fa_debug_pkg.add(l_calling_fn,

3991: l_candidate_asset_id(l_count));
3992: fa_debug_pkg.add(l_calling_fn,
3993: 'After insert into FA_MASS_EXT_RETIREMENTS table, units_assigned',
3994: l_asset_dist_tbl(l_dist_count).units_assigned );
3995: fa_debug_pkg.add(l_calling_fn,
3996: 'After insert into FA_MASS_EXT_RETIREMENTS table, cost_retired',
3997: l_candidate_cost_retired(l_count));
3998:
3999: fa_debug_pkg.add(l_calling_fn,

Line 3999: fa_debug_pkg.add(l_calling_fn,

3995: fa_debug_pkg.add(l_calling_fn,
3996: 'After insert into FA_MASS_EXT_RETIREMENTS table, cost_retired',
3997: l_candidate_cost_retired(l_count));
3998:
3999: fa_debug_pkg.add(l_calling_fn,
4000: 'After insert into FA_MASS_EXT_RETIREMENTS table',
4001: l_candidate_units(l_count) );
4002:
4003: end if;

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

4004:
4005: end loop;
4006:
4007: if (g_log_level_rec.statement_level) then
4008: fa_debug_pkg.add(l_calling_fn, 'After dh-insert loop', '' , p_log_level_rec => g_log_level_rec);
4009: end if;
4010: l_asset_dist_tbl.delete;
4011: end loop;
4012:

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

4010: l_asset_dist_tbl.delete;
4011: end loop;
4012:
4013: if (g_log_level_rec.statement_level) then
4014: fa_debug_pkg.add(l_calling_fn, 'After candidate loop', '' , p_log_level_rec => g_log_level_rec);
4015: end if;
4016:
4017:
4018: l_asset_id.delete;

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

4033:
4034: -- Allocating units section
4035: If nvl(G_UNITS,0) > 0 and g_book_class <> 'TAX' then
4036: if (g_log_level_rec.statement_level) then
4037: fa_debug_pkg.add(l_calling_fn, 'Calling unit allocation',g_units , p_log_level_rec => g_log_level_rec);
4038: end if;
4039:
4040: -- return success_count and failure_count
4041:

Line 4068: fa_debug_pkg.add(l_calling_fn,

4064: from fa_mass_ext_retirements
4065: where batch_name = g_batch_name;
4066:
4067: if (g_log_level_rec.statement_level) then
4068: fa_debug_pkg.add(l_calling_fn,
4069: 'G_proceeds_of_sale',
4070: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4071: fa_debug_pkg.add(l_calling_fn,
4072: 'G_cost_of_removal',

Line 4071: fa_debug_pkg.add(l_calling_fn,

4067: if (g_log_level_rec.statement_level) then
4068: fa_debug_pkg.add(l_calling_fn,
4069: 'G_proceeds_of_sale',
4070: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4071: fa_debug_pkg.add(l_calling_fn,
4072: 'G_cost_of_removal',
4073: G_cost_of_removal, p_log_level_rec => g_log_level_rec);
4074: fa_debug_pkg.add(l_calling_fn,
4075: 'l_total_cost_retired',

Line 4074: fa_debug_pkg.add(l_calling_fn,

4070: G_proceeds_of_sale, p_log_level_rec => g_log_level_rec);
4071: fa_debug_pkg.add(l_calling_fn,
4072: 'G_cost_of_removal',
4073: G_cost_of_removal, p_log_level_rec => g_log_level_rec);
4074: fa_debug_pkg.add(l_calling_fn,
4075: 'l_total_cost_retired',
4076: l_total_cost_retired, p_log_level_rec => g_log_level_rec);
4077: end if;
4078:

Line 4082: fa_debug_pkg.add(l_calling_fn,

4078:
4079: IF (((G_Cost_Of_Removal = 0) AND (G_Proceeds_Of_Sale=0)) OR
4080: (l_Total_Cost_Retired = 0)) THEN
4081: if (g_log_level_rec.statement_level) then
4082: fa_debug_pkg.add(l_calling_fn,
4083: 'not allocating any POS / COR amounts',
4084: '', p_log_level_rec => g_log_level_rec);
4085: end if;
4086: ELSE

Line 4103: fa_debug_pkg.add(l_calling_fn,

4099: from fa_mass_ext_retirements
4100: where batch_name = g_batch_name;
4101:
4102: if (g_log_level_rec.statement_level) then
4103: fa_debug_pkg.add(l_calling_fn,
4104: 'count of records in mass_ext_ret',
4105: l_msg_count, p_log_level_rec => g_log_level_rec);
4106: end if;
4107:

Line 4110: fa_debug_pkg.add(l_calling_fn,

4106: end if;
4107:
4108: if (l_asset_id.count = 0) then
4109: if (g_log_level_rec.statement_level) then
4110: fa_debug_pkg.add(l_calling_fn,
4111: 'no assets found in the cursor',
4112: 'mass_ret_assets', p_log_level_rec => g_log_level_rec);
4113: end if;
4114: exit;

Line 4143: fa_debug_pkg.add(l_calling_fn,

4139: l_Prorated_Cost_Of_Removal(l_loop_count);
4140: l_Running_Count_Retired := l_Running_Count_Retired + 1;
4141:
4142: if (g_log_level_rec.statement_level) then
4143: fa_debug_pkg.add(l_calling_fn,
4144: 'l_Cost_Retired',
4145: l_Cost_Retired(l_loop_count));
4146: fa_debug_pkg.add(l_calling_fn,
4147: 'l_Running_Prorated_POS',

Line 4146: fa_debug_pkg.add(l_calling_fn,

4142: if (g_log_level_rec.statement_level) then
4143: fa_debug_pkg.add(l_calling_fn,
4144: 'l_Cost_Retired',
4145: l_Cost_Retired(l_loop_count));
4146: fa_debug_pkg.add(l_calling_fn,
4147: 'l_Running_Prorated_POS',
4148: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4149: fa_debug_pkg.add(l_calling_fn,
4150: 'l_Prorated_Proceeds_Of_Sale',

Line 4149: fa_debug_pkg.add(l_calling_fn,

4145: l_Cost_Retired(l_loop_count));
4146: fa_debug_pkg.add(l_calling_fn,
4147: 'l_Running_Prorated_POS',
4148: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4149: fa_debug_pkg.add(l_calling_fn,
4150: 'l_Prorated_Proceeds_Of_Sale',
4151: l_Prorated_Proceeds_Of_Sale(l_loop_count));
4152: fa_debug_pkg.add(l_calling_fn,
4153: 'l_Running_Prorated_Cost',

Line 4152: fa_debug_pkg.add(l_calling_fn,

4148: l_Running_Prorated_POS, p_log_level_rec => g_log_level_rec);
4149: fa_debug_pkg.add(l_calling_fn,
4150: 'l_Prorated_Proceeds_Of_Sale',
4151: l_Prorated_Proceeds_Of_Sale(l_loop_count));
4152: fa_debug_pkg.add(l_calling_fn,
4153: 'l_Running_Prorated_Cost',
4154: l_Running_Prorated_Cost, p_log_level_rec => g_log_level_rec);
4155: fa_debug_pkg.add(l_calling_fn,
4156: 'l_Prorated_Cost_Of_Removal',

Line 4155: fa_debug_pkg.add(l_calling_fn,

4151: l_Prorated_Proceeds_Of_Sale(l_loop_count));
4152: fa_debug_pkg.add(l_calling_fn,
4153: 'l_Running_Prorated_Cost',
4154: l_Running_Prorated_Cost, p_log_level_rec => g_log_level_rec);
4155: fa_debug_pkg.add(l_calling_fn,
4156: 'l_Prorated_Cost_Of_Removal',
4157: l_Prorated_Cost_Of_Removal(l_loop_count));
4158: fa_debug_pkg.add(l_calling_fn,
4159: 'l_Running_Count_Retired',

Line 4158: fa_debug_pkg.add(l_calling_fn,

4154: l_Running_Prorated_Cost, p_log_level_rec => g_log_level_rec);
4155: fa_debug_pkg.add(l_calling_fn,
4156: 'l_Prorated_Cost_Of_Removal',
4157: l_Prorated_Cost_Of_Removal(l_loop_count));
4158: fa_debug_pkg.add(l_calling_fn,
4159: 'l_Running_Count_Retired',
4160: l_Running_Count_Retired, p_log_level_rec => g_log_level_rec);
4161: end if;
4162: END LOOP;

Line 4237: FA_DEBUG_PKG.Write_Debug_Log;

4233: end if;
4234:
4235: -- Dump Debug messages when run in debug mode to log file
4236: if (l_debug) then
4237: FA_DEBUG_PKG.Write_Debug_Log;
4238: end if;
4239:
4240: -- write messages to log file
4241: FND_MSG_PUB.Count_And_Get(

Line 4267: FA_DEBUG_PKG.Write_Debug_Log;

4263: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => g_log_level_rec);
4264:
4265: -- Dump Debug messages when run in debug mode to log file
4266: if (l_debug) then
4267: FA_DEBUG_PKG.Write_Debug_Log;
4268: end if;
4269:
4270: -- write messages to log file
4271: FND_MSG_PUB.Count_And_Get(

Line 4288: FA_DEBUG_PKG.Write_Debug_Log;

4284: fa_srvr_msg.add_sql_error (calling_fn => l_calling_fn, p_log_level_rec => g_log_level_rec);
4285:
4286: -- Dump Debug messages when run in debug mode to log file
4287: if (l_debug) then
4288: FA_DEBUG_PKG.Write_Debug_Log;
4289: end if;
4290:
4291: -- write messages to log file
4292: FND_MSG_PUB.Count_And_Get(