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.OZF_ADJUSTMENT_EXT_PVT dependencies on OZF_UTILITY_PVT

Line 145: ozf_utility_pvt.write_conc_log (p_text);

141: PROCEDURE write_conc_log ( p_text IN VARCHAR2)
142: IS
143: BEGIN
144: IF g_debug_flag = 'Y' THEN
145: ozf_utility_pvt.write_conc_log (p_text);
146: --ozf_utility_pvt.debug_message(p_text);
147: END IF;
148: END;
149:

Line 146: --ozf_utility_pvt.debug_message(p_text);

142: IS
143: BEGIN
144: IF g_debug_flag = 'Y' THEN
145: ozf_utility_pvt.write_conc_log (p_text);
146: --ozf_utility_pvt.debug_message(p_text);
147: END IF;
148: END;
149:
150: ---------------------------------------------------------------------

Line 648: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (

644: l_act_budgets_rec.budget_source_id := p_list_header_id;
645: l_act_budgets_rec.request_currency := l_offer_info.transaction_currency_code;
646: l_act_budgets_rec.request_date := SYSDATE;
647: l_act_budgets_rec.status_code := 'APPROVED';
648: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
649: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
650: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
651: l_act_budgets_rec.approval_date := SYSDATE;
652: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

Line 652: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

648: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
649: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
650: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
651: l_act_budgets_rec.approval_date := SYSDATE;
652: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
653: l_act_budgets_rec.justification := l_justification;
654: l_act_budgets_rec.transfer_type := 'UTILIZED';
655:
656: l_act_util_rec.utilization_type :='ADJUSTMENT';

Line 732: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_tbl(j).transactional_curr_code);

728:
729: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
730: IF l_offer_info.transaction_currency_code <> l_order_line_tbl(j).transactional_curr_code THEN
731:
732: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_tbl(j).transactional_curr_code);
733: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_info.transaction_currency_code);
734: ozf_utility_pvt.write_conc_log('l_util_amount: ' || l_util_amount);
735:
736:

Line 733: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_info.transaction_currency_code);

729: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
730: IF l_offer_info.transaction_currency_code <> l_order_line_tbl(j).transactional_curr_code THEN
731:
732: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_tbl(j).transactional_curr_code);
733: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_info.transaction_currency_code);
734: ozf_utility_pvt.write_conc_log('l_util_amount: ' || l_util_amount);
735:
736:
737: OPEN c_get_conversion_type(l_act_util_rec.org_id);

Line 734: ozf_utility_pvt.write_conc_log('l_util_amount: ' || l_util_amount);

730: IF l_offer_info.transaction_currency_code <> l_order_line_tbl(j).transactional_curr_code THEN
731:
732: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_tbl(j).transactional_curr_code);
733: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_info.transaction_currency_code);
734: ozf_utility_pvt.write_conc_log('l_util_amount: ' || l_util_amount);
735:
736:
737: OPEN c_get_conversion_type(l_act_util_rec.org_id);
738: FETCH c_get_conversion_type INTO l_exchange_rate_type;

Line 742: ozf_utility_pvt.convert_currency (x_return_status => x_return_status

738: FETCH c_get_conversion_type INTO l_exchange_rate_type;
739: CLOSE c_get_conversion_type;
740:
741:
742: ozf_utility_pvt.convert_currency (x_return_status => x_return_status
743: ,p_from_currency => l_order_line_tbl(j).transactional_curr_code
744: ,p_to_currency => l_offer_info.transaction_currency_code
745: ,p_conv_type => l_exchange_rate_type
746: ,p_from_amount => l_util_amount

Line 751: ozf_utility_pvt.write_conc_log('x_return_status: ' || x_return_status);

747: ,x_to_amount => l_conv_util_amount
748: ,x_rate => l_rate
749: );
750:
751: ozf_utility_pvt.write_conc_log('x_return_status: ' || x_return_status);
752: IF x_return_status <> fnd_api.g_ret_sts_success THEN
753: RETURN;
754: END IF;
755:

Line 1424: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (

1420: l_act_budgets_rec.budget_source_id := p_list_header_id;
1421: l_act_budgets_rec.request_currency := l_offer_info.transaction_currency_code;
1422: l_act_budgets_rec.request_date := SYSDATE;
1423: l_act_budgets_rec.status_code := 'APPROVED';
1424: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
1425: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
1426: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
1427: l_act_budgets_rec.approval_date := SYSDATE;
1428: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

Line 1428: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

1424: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
1425: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
1426: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
1427: l_act_budgets_rec.approval_date := SYSDATE;
1428: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
1429: l_act_budgets_rec.justification := 'Offer adjustment before offer start date';
1430: l_act_budgets_rec.transfer_type := 'UTILIZED';
1431:
1432: l_act_util_rec.utilization_type :='ADJUSTMENT';

Line 1470: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );

1466: FETCH c_get_group INTO l_group_id,l_pbh_line_id,l_included_vol_flag;
1467: CLOSE c_get_group;
1468:
1469: IF G_DEBUG THEN
1470: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
1471: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
1472: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
1473: END IF;
1474: write_conc_log(' l_group_id: '|| l_group_id );

Line 1471: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );

1467: CLOSE c_get_group;
1468:
1469: IF G_DEBUG THEN
1470: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
1471: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
1472: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
1473: END IF;
1474: write_conc_log(' l_group_id: '|| l_group_id );
1475: write_conc_log(' l_pbh_line_id: '|| l_pbh_line_id );

Line 1472: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );

1468:
1469: IF G_DEBUG THEN
1470: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
1471: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
1472: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
1473: END IF;
1474: write_conc_log(' l_group_id: '|| l_group_id );
1475: write_conc_log(' l_pbh_line_id: '|| l_pbh_line_id );
1476: write_conc_log(' l_included_vol_flag: '|| l_included_vol_flag );

Line 1523: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );

1519: FETCH c_get_max_tier INTO l_new_discount;
1520: CLOSE c_get_max_tier;
1521: END IF;
1522: IF G_DEBUG THEN
1523: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );
1524: END IF;
1525: write_conc_log(' l_new_discount: '|| l_new_discount );
1526: END IF;
1527:

Line 1540: ozf_utility_pvt.debug_message('not reach preset tier: ');

1536:
1537: IF l_preset_tier is NOT NULL AND l_preset_tier > l_new_discount THEN
1538: l_new_discount := l_preset_tier;
1539: IF G_DEBUG THEN
1540: ozf_utility_pvt.debug_message('not reach preset tier: ');
1541: END IF;
1542: write_conc_log(' not reach preset tier:');
1543: END IF;
1544:

Line 1587: ozf_utility_pvt.debug_message( ' l_ordered_qty=' || l_ordered_qty);

1583: l_previous_tier_max := l_volume + l_ordered_qty;
1584: END IF;
1585:
1586: IF G_DEBUG THEN
1587: ozf_utility_pvt.debug_message( ' l_ordered_qty=' || l_ordered_qty);
1588: END IF;
1589: write_conc_log( ' l_value=' || l_ordered_qty);
1590: l_preset_tier := NULL;
1591:

Line 1612: ozf_utility_pvt.debug_message('not reach preset tier: ');

1608:
1609: IF l_preset_tier is NOT NULL AND l_preset_tier > l_current_tier_value THEN
1610: l_current_tier_value := l_preset_tier;
1611: IF G_DEBUG THEN
1612: ozf_utility_pvt.debug_message('not reach preset tier: ');
1613: END IF;
1614: write_conc_log(' not reach preset tier:');
1615: END IF;
1616:

Line 1638: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id

1634: --l_previous_tier_max := l_current_min_tier - 1 ;
1635: l_previous_tier_max := l_current_min_tier;
1636:
1637: IF G_DEBUG THEN
1638: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id
1639: || ' y1=' || y1 || ' tier_min=' || l_current_min_tier
1640: || ' tier_max=' || l_current_max_tier || ' l_previous_tier_max: ' || l_previous_tier_max
1641: || ' l_new_utilization: ' || l_utilization_amount);
1642: END IF;

Line 1824: ozf_utility_pvt.write_conc_log ('/****** '

1820:
1821: write_conc_log ( l_full_name || ' : ' || 'Return Status For perform_adjustment ' || l_return_status);
1822:
1823: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1824: ozf_utility_pvt.write_conc_log ('/****** '
1825: || 'Offer Adjustment Failed For Offer'
1826: || l_offer_info.description
1827: || ' SOURCE CODE '
1828: || l_offer_info.NAME

Line 1833: ozf_utility_pvt.write_conc_log;

1829: || '" Offer Adjustment Id "'
1830: || l_offerAdjustmentIdTbl(i)
1831: || ' with the following Errors *******/'
1832: );
1833: ozf_utility_pvt.write_conc_log;
1834: fnd_msg_pub.initialize;
1835: ROLLBACK TO new_adjustment;
1836: GOTO l_endofloop;
1837: END IF;

Line 1842: ozf_utility_pvt.write_conc_log ('adjusted_rec.offer_adjustment_id: ' || l_offerAdjustmentIdTbl(i));

1838: END IF;
1839:
1840: --adjust orders between adjustment effective date and approval date
1841:
1842: ozf_utility_pvt.write_conc_log ('adjusted_rec.offer_adjustment_id: ' || l_offerAdjustmentIdTbl(i));
1843:
1844: OPEN c_adjusted_line_cur (l_offerAdjustmentIdTbl(i));
1845: LOOP
1846: FETCH c_adjusted_line_cur INTO l_adjusted_line_cur;

Line 1849: ozf_utility_pvt.write_conc_log ('l_adjusted_line_cur.original_discount: ' || l_adjusted_line_cur.original_discount);

1845: LOOP
1846: FETCH c_adjusted_line_cur INTO l_adjusted_line_cur;
1847: EXIT WHEN c_adjusted_line_cur%NOTFOUND;
1848:
1849: ozf_utility_pvt.write_conc_log ('l_adjusted_line_cur.original_discount: ' || l_adjusted_line_cur.original_discount);
1850:
1851: l_type := NULL;
1852:
1853: --if new product

Line 1899: ozf_utility_pvt.write_conc_log (' /****** '

1895: );
1896:
1897: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1898: write_conc_log (' /*************************** DEBUG MESSAGE END *************************/');
1899: ozf_utility_pvt.write_conc_log (' /****** '
1900: || 'Backdated Offer Adjustment Failed For Offer'
1901: || l_offer_info.description
1902: || ' SOURCE CODE '
1903: || l_offer_info.NAME

Line 1908: ozf_utility_pvt.write_conc_log;

1904: || '" Offer Adjustment Id "'
1905: || l_offerAdjustmentIdTbl(i)
1906: || ' with the following Errors *******/'
1907: );
1908: ozf_utility_pvt.write_conc_log;
1909: fnd_msg_pub.initialize;
1910: ROLLBACK TO new_adjustment;
1911: --kdass 21-JUN-2006 bug 5337761 - closed cursor on error
1912: CLOSE c_adjusted_line_cur;

Line 1940: ozf_utility_pvt.write_conc_log (' /****** '

1936: ,x_msg_data => l_msg_data
1937: );
1938:
1939: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1940: ozf_utility_pvt.write_conc_log (' /****** '
1941: || 'Backdated Offer Adjustment Failed For Offer'
1942: || l_offer_info.description
1943: || ' SOURCE CODE '
1944: || l_offer_info.NAME

Line 1949: ozf_utility_pvt.write_conc_log;

1945: || '" Offer Adjustment Id "'
1946: || l_offerAdjustmentIdTbl(i)
1947: || ' with the following Errors *******/'
1948: );
1949: ozf_utility_pvt.write_conc_log;
1950: fnd_msg_pub.initialize;
1951: ROLLBACK TO new_adjustment;
1952: GOTO l_endofloop;
1953: END IF;

Line 1963: ozf_utility_pvt.write_conc_log ('volume adjustment Failed'

1959: ,x_msg_data=> l_msg_data
1960: );
1961:
1962: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1963: ozf_utility_pvt.write_conc_log ('volume adjustment Failed'
1964: || l_offer_info.description
1965: || ' SOURCE CODE '
1966: || l_offer_info.NAME
1967: || '" Offer Adjustment Id "'

Line 1971: ozf_utility_pvt.write_conc_log;

1967: || '" Offer Adjustment Id "'
1968: || l_offerAdjustmentIdTbl(i)
1969: || ' with the following Errors /'
1970: );
1971: ozf_utility_pvt.write_conc_log;
1972: fnd_msg_pub.initialize;
1973: ROLLBACK TO new_adjustment;
1974: GOTO l_endofloop;
1975: END IF;

Line 1986: ozf_utility_pvt.write_conc_log ('volume utilization adjustment Failed'

1982: ,x_msg_data=> l_msg_data
1983: );
1984:
1985: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1986: ozf_utility_pvt.write_conc_log ('volume utilization adjustment Failed'
1987: || l_offer_info.description
1988: || ' SOURCE CODE '
1989: || l_offer_info.NAME
1990: || '" Offer Adjustment Id "'

Line 1994: ozf_utility_pvt.write_conc_log;

1990: || '" Offer Adjustment Id "'
1991: || l_offerAdjustmentIdTbl(i)
1992: || ' with the following Errors /'
1993: );
1994: ozf_utility_pvt.write_conc_log;
1995: fnd_msg_pub.initialize;
1996: ROLLBACK TO new_adjustment;
1997: GOTO l_endofloop;
1998: END IF;

Line 2004: ozf_utility_pvt.write_conc_log ('after calling volume_offer_adjustment: ' || l_return_status);

2000:
2001: g_offer_id_tbl(l_index) := l_listHeaderIdTbl(i);
2002: l_index := l_index + 1;
2003:
2004: ozf_utility_pvt.write_conc_log ('after calling volume_offer_adjustment: ' || l_return_status);
2005:
2006: END IF; -- l_offer_info.offer_type = 'VOLUME_OFFER' THEN
2007:
2008: UPDATE ozf_offer_adjustments_b

Line 2035: ozf_utility_pvt.write_conc_log;

2031: WHEN OTHERS THEN
2032: ROLLBACK TO adjust_backdated_offer;
2033: x_retcode := 1;
2034: x_errbuf := l_msg_data;
2035: ozf_utility_pvt.write_conc_log;
2036: ozf_utility_pvt.write_conc_log (x_errbuf);
2037: END adjust_backdated_offer;
2038:
2039:

Line 2036: ozf_utility_pvt.write_conc_log (x_errbuf);

2032: ROLLBACK TO adjust_backdated_offer;
2033: x_retcode := 1;
2034: x_errbuf := l_msg_data;
2035: ozf_utility_pvt.write_conc_log;
2036: ozf_utility_pvt.write_conc_log (x_errbuf);
2037: END adjust_backdated_offer;
2038:
2039:
2040: ---------------------------------------------------------------------

Line 2551: ozf_utility_pvt.debug_message (': begin ');

2547: || l_to_date);
2548: SAVEPOINT perform_adjustment;
2549: x_return_status := fnd_api.g_ret_sts_success;
2550: IF G_DEBUG THEN
2551: ozf_utility_pvt.debug_message (': begin ');
2552: END IF;
2553: IF fnd_api.to_boolean (p_init_msg_list) THEN
2554: fnd_msg_pub.initialize;
2555: END IF;

Line 2626: l_util_amount := ozf_utility_pvt.currround(backdate_adj_rec(i).amount,backdate_adj_rec(i).currency_code); -- in fund currency

2622: OPEN c_org_id(backdate_adj_rec(i).utilization_id);
2623: FETCH c_org_id INTO l_org_id;
2624: CLOSE c_org_id;
2625:
2626: l_util_amount := ozf_utility_pvt.currround(backdate_adj_rec(i).amount,backdate_adj_rec(i).currency_code); -- in fund currency
2627:
2628: -- new utilization amount minus existing utilization amount.
2629: l_util_amount := l_util_amount - NVL(l_adj_amt,0);
2630:

Line 2655: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (

2651: --dbms_output.put_line ( 'offer currency code ' || l_offer_info.transaction_currency_code);
2652: l_act_budgets_rec.request_currency := l_offer_info.transaction_currency_code;
2653: l_act_budgets_rec.request_date := SYSDATE;
2654: l_act_budgets_rec.status_code := 'APPROVED';
2655: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
2656: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
2657: l_act_budgets_rec.transfer_type := 'UTILIZED';
2658: l_act_budgets_rec.approval_date := SYSDATE;
2659: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

Line 2659: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

2655: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
2656: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
2657: l_act_budgets_rec.transfer_type := 'UTILIZED';
2658: l_act_budgets_rec.approval_date := SYSDATE;
2659: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
2660: write_conc_log (l_full_name || ' : '
2661: || 'resourceid '
2662: || l_act_budgets_rec.approver_id);
2663: --dbms_output.put_line ( 'resourceid ' || l_act_budgets_rec.approver_id);

Line 2726: --ozf_utility_pvt.write_conc_log(l_full_name||' : '||i||x_msg_data);

2722: (p_msg_index => FND_MSG_PUB.G_NEXT,
2723: p_encoded => FND_API.G_FALSE,
2724: p_data => x_msg_data,
2725: p_msg_index_out => l_index);
2726: --ozf_utility_pvt.write_conc_log(l_full_name||' : '||i||x_msg_data);
2727: DBMS_OUTPUT.put_line('****(PA):'||x_msg_data);
2728: END LOOP;
2729: fnd_msg_pub.initialize;
2730: END IF;

Line 2813: -- ozf_utility_pvt.debug_message('enter validate_product_budget obj_id=' || p_object_id || ' budget_id=' || p_budget_id);

2809: qppa.product_attr_value
2810: FROM ozf_offer_adjustment_lines adjl, qp_pricing_attributes qppa
2811: WHERE adjl.offer_adjustment_id = p_offer_adjustment_id AND adjl.list_line_id = qppa.list_line_id;
2812: BEGIN
2813: -- ozf_utility_pvt.debug_message('enter validate_product_budget obj_id=' || p_object_id || ' budget_id=' || p_budget_id);
2814:
2815: x_return_status := fnd_api.g_ret_sts_success;
2816: EXECUTE IMMEDIATE 'DELETE FROM ozf_temp_eligibility';
2817: write_conc_log ( l_full_name

Line 2869: --ozf_utility_pvt.debug_message('offer query: '|| l_stmt_denorm);

2865:
2866: l_denorm_csr := DBMS_SQL.open_cursor;
2867: FND_DSQL.set_cursor(l_denorm_csr);
2868: l_stmt_denorm := FND_DSQL.get_text(FALSE);
2869: --ozf_utility_pvt.debug_message('offer query: '|| l_stmt_denorm);
2870: write_conc_log ( l_full_name
2871: || ' : '
2872: || 'Insert Sql'
2873: || l_stmt_denorm);

Line 3012: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed EX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));

3008:
3009: EXCEPTION
3010: WHEN FND_API.G_EXC_ERROR THEN
3011: ROLLBACK TO VOLUME_OFFER;
3012: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed EX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3013: OZF_UTILITY_PVT.write_conc_log;
3014: OZF_UTILITY_PVT.write_conc_log(' ');
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 3013: OZF_UTILITY_PVT.write_conc_log;

3009: EXCEPTION
3010: WHEN FND_API.G_EXC_ERROR THEN
3011: ROLLBACK TO VOLUME_OFFER;
3012: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed EX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3013: OZF_UTILITY_PVT.write_conc_log;
3014: OZF_UTILITY_PVT.write_conc_log(' ');
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: ROLLBACK TO VOLUME_OFFER;

Line 3014: OZF_UTILITY_PVT.write_conc_log(' ');

3010: WHEN FND_API.G_EXC_ERROR THEN
3011: ROLLBACK TO VOLUME_OFFER;
3012: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed EX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3013: OZF_UTILITY_PVT.write_conc_log;
3014: OZF_UTILITY_PVT.write_conc_log(' ');
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: ROLLBACK TO VOLUME_OFFER;
3018: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed UNEX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));

Line 3018: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed UNEX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));

3014: OZF_UTILITY_PVT.write_conc_log(' ');
3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: ROLLBACK TO VOLUME_OFFER;
3018: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed UNEX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3019: OZF_UTILITY_PVT.write_conc_log;
3020: OZF_UTILITY_PVT.write_conc_log(' ');
3021:
3022: WHEN OTHERS THEN

Line 3019: OZF_UTILITY_PVT.write_conc_log;

3015:
3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: ROLLBACK TO VOLUME_OFFER;
3018: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed UNEX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3019: OZF_UTILITY_PVT.write_conc_log;
3020: OZF_UTILITY_PVT.write_conc_log(' ');
3021:
3022: WHEN OTHERS THEN
3023: ROLLBACK TO VOLUME_OFFER;

Line 3020: OZF_UTILITY_PVT.write_conc_log(' ');

3016: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3017: ROLLBACK TO VOLUME_OFFER;
3018: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed UNEX ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3019: OZF_UTILITY_PVT.write_conc_log;
3020: OZF_UTILITY_PVT.write_conc_log(' ');
3021:
3022: WHEN OTHERS THEN
3023: ROLLBACK TO VOLUME_OFFER;
3024: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed OT ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));

Line 3024: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed OT ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));

3020: OZF_UTILITY_PVT.write_conc_log(' ');
3021:
3022: WHEN OTHERS THEN
3023: ROLLBACK TO VOLUME_OFFER;
3024: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed OT ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3025: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3026: OZF_UTILITY_PVT.write_conc_log;
3027: OZF_UTILITY_PVT.write_conc_log(' ');
3028: END;

Line 3026: OZF_UTILITY_PVT.write_conc_log;

3022: WHEN OTHERS THEN
3023: ROLLBACK TO VOLUME_OFFER;
3024: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed OT ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3025: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3026: OZF_UTILITY_PVT.write_conc_log;
3027: OZF_UTILITY_PVT.write_conc_log(' ');
3028: END;
3029:
3030: END LOOP; --FOR i IN NVL(l_qpListHeaderIdTbl.FIRST, 1) .. NVL(l_qpListHeaderIdTbl.LAST, 0) LOOP

Line 3027: OZF_UTILITY_PVT.write_conc_log(' ');

3023: ROLLBACK TO VOLUME_OFFER;
3024: OZF_UTILITY_PVT.write_conc_log(l_full_name ||' Volume Offer Adjustment Failed OT ==>'||'VOLUME OFFER '|| l_qpListHeaderIdTbl(i));
3025: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3026: OZF_UTILITY_PVT.write_conc_log;
3027: OZF_UTILITY_PVT.write_conc_log(' ');
3028: END;
3029:
3030: END LOOP; --FOR i IN NVL(l_qpListHeaderIdTbl.FIRST, 1) .. NVL(l_qpListHeaderIdTbl.LAST, 0) LOOP
3031:

Line 3040: OZF_UTILITY_PVT.write_conc_log;

3036: write_conc_log (' /*************************** DEBUG MESSAGE END *************************/' || l_api_name );
3037: EXCEPTION
3038: WHEN fnd_api.g_exc_error THEN
3039: ROLLBACK TO adjust_volume_offer;
3040: OZF_UTILITY_PVT.write_conc_log;
3041: x_ERRBUF := l_msg_data;
3042: x_RETCODE := 1;
3043:
3044: WHEN fnd_api.g_exc_unexpected_error THEN

Line 3046: OZF_UTILITY_PVT.write_conc_log;

3042: x_RETCODE := 1;
3043:
3044: WHEN fnd_api.g_exc_unexpected_error THEN
3045: ROLLBACK TO adjust_volume_offer;
3046: OZF_UTILITY_PVT.write_conc_log;
3047: x_ERRBUF := l_msg_data;
3048: x_RETCODE := 1;
3049:
3050: WHEN OTHERS THEN

Line 3052: OZF_UTILITY_PVT.write_conc_log;

3048: x_RETCODE := 1;
3049:
3050: WHEN OTHERS THEN
3051: ROLLBACK TO adjust_volume_offer;
3052: OZF_UTILITY_PVT.write_conc_log;
3053: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_unexp_error) THEN
3054: fnd_msg_pub.add_exc_msg (g_pkg_name, l_api_name);
3055: END IF;
3056: x_ERRBUF := l_msg_data;

Line 3146: ozf_utility_pvt.debug_message (' Start'|| g_pkg_name||'.'||l_api_name);

3142: BEGIN
3143: x_return_status := fnd_api.g_ret_sts_success;
3144: SAVEPOINT process_accrual;
3145: IF G_DEBUG THEN
3146: ozf_utility_pvt.debug_message (' Start'|| g_pkg_name||'.'||l_api_name);
3147: END IF;
3148:
3149: IF l_act_util_rec.object_type = 'TP_ORDER' THEN
3150: OPEN c_tp_adj_info (l_act_util_rec.price_adjustment_id,l_act_util_rec.object_type);

Line 3174: ozf_utility_pvt.debug_message (l_full_name ||'Return Status' ||x_return_status);

3170:
3171: --dbms_output.put_line(' cal Status '||x_return_status);
3172: write_conc_log(l_full_name ||'Calculate Accrual Amt Return Status ' ||x_return_status);
3173: IF G_DEBUG THEN
3174: ozf_utility_pvt.debug_message (l_full_name ||'Return Status' ||x_return_status);
3175: END IF;
3176: -- fetch offer info
3177: OPEN c_offer_info ( p_qp_list_header_id);
3178: FETCH c_offer_info INTO l_off_description, l_off_name,l_util_curr ;

Line 3197: ozf_utility_pvt.debug_message ('Begin Processing For Offer Adjustment: '||l_off_name);

3193: END IF;
3194: ELSE
3195: --if some row is returned to adjust then
3196: IF G_DEBUG THEN
3197: ozf_utility_pvt.debug_message ('Begin Processing For Offer Adjustment: '||l_off_name);
3198: END IF;
3199: IF (l_fund_amt_tbl.COUNT > 0) AND x_return_status = fnd_api.g_ret_sts_success THEN
3200: l_adj_amount := 0; -- in offer currency
3201: l_remaining_amt := ozf_utility_pvt.currround (

Line 3201: l_remaining_amt := ozf_utility_pvt.currround (

3197: ozf_utility_pvt.debug_message ('Begin Processing For Offer Adjustment: '||l_off_name);
3198: END IF;
3199: IF (l_fund_amt_tbl.COUNT > 0) AND x_return_status = fnd_api.g_ret_sts_success THEN
3200: l_adj_amount := 0; -- in offer currency
3201: l_remaining_amt := ozf_utility_pvt.currround (
3202: p_earned_amt,
3203: l_util_curr ); -- in offer currency
3204:
3205: <>

Line 3211: ozf_utility_pvt.debug_message (' D: 0 earned amount' );

3207: LOOP
3208: IF g_recal_flag = 'N' THEN
3209: IF l_fund_amt_tbl (j).earned_amount = 0 THEN
3210: IF G_DEBUG THEN
3211: ozf_utility_pvt.debug_message (' D: 0 earned amount' );
3212: END IF;
3213: GOTO l_endofearadjloop;
3214: END IF;
3215: END IF;

Line 3221: l_adj_amount := ozf_utility_pvt.currround (

3217: l_adj_amount := l_fund_amt_tbl (j).earned_amount; -- this is in offer and order currency
3218: ELSE
3219: l_adj_amount := l_remaining_amt;
3220: END IF;
3221: l_adj_amount := ozf_utility_pvt.currround (
3222: l_adj_amount,
3223: l_util_curr ); -- in offer currency
3224:
3225: l_remaining_amt := l_remaining_amt - l_adj_amount;

Line 3232: ozf_utility_pvt.convert_currency (

3228:
3229:
3230:
3231: IF l_util_curr <> l_fund_amt_tbl (j).budget_currency THEN
3232: ozf_utility_pvt.convert_currency (
3233: x_return_status=> x_return_status,
3234: p_from_currency=> l_util_curr,
3235: p_to_currency=> l_fund_amt_tbl (j).budget_currency,
3236: p_conv_type=> l_adj_info.exchange_rate_type, --Added for bug 7030415

Line 3243: ozf_utility_pvt.debug_message( ' Adj amount coverted '|| l_converted_adj_amount

3239: x_rate=> l_rate
3240: );
3241: END IF;
3242: IF G_DEBUG THEN
3243: ozf_utility_pvt.debug_message( ' Adj amount coverted '|| l_converted_adj_amount
3244: || ' l_adj amount' || l_adj_amount);
3245: END IF;
3246:
3247: IF x_return_status <> fnd_api.g_ret_sts_success THEN

Line 3249: -- ozf_utility_pvt.error_message( ' Convert Currency '||x_return_status);

3245: END IF;
3246:
3247: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3248: IF G_DEBUG THEN
3249: -- ozf_utility_pvt.error_message( ' Convert Currency '||x_return_status);
3250: ozf_utility_pvt.debug_message( ' Convert Currency '||x_return_status);
3251: END IF;
3252: IF x_return_status = fnd_api.g_ret_sts_error THEN
3253: RAISE fnd_api.g_exc_error;

Line 3250: ozf_utility_pvt.debug_message( ' Convert Currency '||x_return_status);

3246:
3247: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3248: IF G_DEBUG THEN
3249: -- ozf_utility_pvt.error_message( ' Convert Currency '||x_return_status);
3250: ozf_utility_pvt.debug_message( ' Convert Currency '||x_return_status);
3251: END IF;
3252: IF x_return_status = fnd_api.g_ret_sts_error THEN
3253: RAISE fnd_api.g_exc_error;
3254: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

Line 3261: ozf_utility_pvt.currround (

3257: END IF;
3258: IF x_return_status = fnd_api.g_ret_sts_success THEN
3259: IF l_util_curr = l_fund_amt_tbl (j).budget_currency THEN
3260: l_act_budgets_rec.parent_src_apprvd_amt :=
3261: ozf_utility_pvt.currround (
3262: l_adj_amount,
3263: l_util_curr );
3264: ELSE
3265: IF G_DEBUG THEN

Line 3266: ozf_utility_pvt.debug_message('in not equal currency');

3262: l_adj_amount,
3263: l_util_curr );
3264: ELSE
3265: IF G_DEBUG THEN
3266: ozf_utility_pvt.debug_message('in not equal currency');
3267: END IF;
3268: l_act_budgets_rec.parent_src_apprvd_amt :=
3269: ozf_utility_pvt.currround (
3270: l_converted_adj_amount,

Line 3269: ozf_utility_pvt.currround (

3265: IF G_DEBUG THEN
3266: ozf_utility_pvt.debug_message('in not equal currency');
3267: END IF;
3268: l_act_budgets_rec.parent_src_apprvd_amt :=
3269: ozf_utility_pvt.currround (
3270: l_converted_adj_amount,
3271: l_fund_amt_tbl (j).budget_currency );
3272: END IF;
3273:

Line 3291: ozf_utility_pvt.get_default_user_status (

3287: l_act_budgets_rec.transfer_type := 'UTILIZED';
3288: l_act_budgets_rec.request_date := SYSDATE;
3289: l_act_budgets_rec.status_code := 'APPROVED';
3290: l_act_budgets_rec.user_status_id :=
3291: ozf_utility_pvt.get_default_user_status (
3292: 'OZF_BUDGETSOURCE_STATUS',
3293: l_act_budgets_rec.status_code );
3294: l_act_budgets_rec.budget_source_type := 'OFFR';
3295: l_act_budgets_rec.budget_source_id := p_qp_list_header_id;

Line 3301: ozf_utility_pvt.currround (l_adj_amount, l_util_curr);

3297: l_act_budgets_rec.act_budget_used_by_id := p_qp_list_header_id;
3298: l_act_budgets_rec.parent_src_curr := l_fund_amt_tbl (j).budget_currency;
3299: l_act_budgets_rec.parent_source_id := l_fund_amt_tbl (j).ofr_src_id;
3300: l_act_budgets_rec.request_amount :=
3301: ozf_utility_pvt.currround (l_adj_amount, l_util_curr);
3302: l_act_budgets_rec.request_currency := l_util_curr;
3303: l_act_budgets_rec.approved_amount := l_act_budgets_rec.request_amount;
3304: l_act_budgets_rec.approved_in_currency := l_util_curr;
3305:

Line 3325: ozf_utility_pvt.debug_message('create utlization '|| x_return_status);

3321: x_act_budget_id=> l_act_budget_id
3322: );
3323: write_conc_log(l_full_name ||'Process Act Budget' ||x_return_status);
3324: IF G_DEBUG THEN
3325: ozf_utility_pvt.debug_message('create utlization '|| x_return_status);
3326: END IF;
3327:
3328: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3329: IF x_return_status = fnd_api.g_ret_sts_error THEN

Line 3340: ozf_utility_pvt.debug_message ( 'l_remaining_amt ' || l_remaining_amt

3336: --- quit when the total earned amount is adjusted
3337: END IF;
3338: <>
3339: IF G_DEBUG THEN
3340: ozf_utility_pvt.debug_message ( 'l_remaining_amt ' || l_remaining_amt
3341: || 'l_adj amount' || l_adj_amount || 'fund_id '|| l_fund_amt_tbl (j).ofr_src_id );
3342: END IF;
3343: EXIT WHEN l_remaining_amt = 0;
3344: END LOOP earned_adj_loop;

Line 3604: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_curr);

3600:
3601: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
3602: IF l_offer_curr <> l_order_curr THEN
3603:
3604: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_curr);
3605: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
3606: ozf_utility_pvt.write_conc_log('order amount: ' || x_order_amount_quantity);
3607:
3608: ozf_utility_pvt.convert_currency (x_return_status => x_return_status

Line 3605: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);

3601: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
3602: IF l_offer_curr <> l_order_curr THEN
3603:
3604: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_curr);
3605: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
3606: ozf_utility_pvt.write_conc_log('order amount: ' || x_order_amount_quantity);
3607:
3608: ozf_utility_pvt.convert_currency (x_return_status => x_return_status
3609: ,p_from_currency => l_order_curr

Line 3606: ozf_utility_pvt.write_conc_log('order amount: ' || x_order_amount_quantity);

3602: IF l_offer_curr <> l_order_curr THEN
3603:
3604: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_curr);
3605: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
3606: ozf_utility_pvt.write_conc_log('order amount: ' || x_order_amount_quantity);
3607:
3608: ozf_utility_pvt.convert_currency (x_return_status => x_return_status
3609: ,p_from_currency => l_order_curr
3610: ,p_to_currency => l_offer_curr

Line 3608: ozf_utility_pvt.convert_currency (x_return_status => x_return_status

3604: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_curr);
3605: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
3606: ozf_utility_pvt.write_conc_log('order amount: ' || x_order_amount_quantity);
3607:
3608: ozf_utility_pvt.convert_currency (x_return_status => x_return_status
3609: ,p_from_currency => l_order_curr
3610: ,p_to_currency => l_offer_curr
3611: ,p_from_amount => x_order_amount_quantity
3612: ,x_to_amount => l_conv_amount

Line 3617: ozf_utility_pvt.write_conc_log('x_return_status: ' || x_return_status);

3613: ,x_rate => l_rate
3614: );
3615:
3616: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3617: ozf_utility_pvt.write_conc_log('x_return_status: ' || x_return_status);
3618: RETURN NULL;
3619: END IF;
3620:
3621: x_order_amount_quantity := l_conv_amount;

Line 3978: ozf_utility_pvt.debug_message(' /*** DEBUG MESSAGE START */' || l_api_name);

3974:
3975:
3976: BEGIN
3977: IF G_DEBUG THEN
3978: ozf_utility_pvt.debug_message(' /*************************** DEBUG MESSAGE START *************************/' || l_api_name);
3979: END IF;
3980: write_conc_log(' /*************************** DEBUG MESSAGE START *************************/' || l_api_name);
3981:
3982: SAVEPOINT volume_offer_adjustment;

Line 4021: ozf_utility_pvt.debug_message(' order_line_id: '|| l_orderLineIdTbl(i) );

4017: LIMIT g_bulk_limit;
4018: FOR i IN NVL(l_priceAdjustmentIDTbl.FIRST, 1) .. NVL(l_priceAdjustmentIDTbl.LAST, 0) LOOP
4019: IF l_objectTypeTbl(i) ='ORDER' THEN
4020: IF G_DEBUG THEN
4021: ozf_utility_pvt.debug_message(' order_line_id: '|| l_orderLineIdTbl(i) );
4022: END IF;
4023: write_conc_log(' order_line_id: '|| l_orderLineIdTbl(i) );
4024:
4025: l_source_code := 'OM';

Line 4045: ozf_utility_pvt.debug_message(' resale_line_id: '|| l_objectIdTbl(i) );

4041: write_conc_log(' l_unit_discount: '|| l_unit_discount);
4042:
4043: ELSE
4044: IF G_DEBUG THEN
4045: ozf_utility_pvt.debug_message(' resale_line_id: '|| l_objectIdTbl(i) );
4046: END IF;
4047: write_conc_log(' resale_line_id: '|| l_objectIdTbl(i));
4048:
4049: l_source_code := 'IS';

Line 4079: ozf_utility_pvt.debug_message('not apply discount: ' || l_order_line_info.inventory_item_id);

4075: write_conc_log('l_apply_discount: ' || l_apply_discount);
4076:
4077: IF l_apply_discount ='N' THEN
4078: IF G_DEBUG THEN
4079: ozf_utility_pvt.debug_message('not apply discount: ' || l_order_line_info.inventory_item_id);
4080: END IF;
4081: write_conc_log(' not apply discount:'|| l_order_line_info.inventory_item_id);
4082: GOTO l_endoffloop;
4083: END IF;

Line 4098: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);

4094:
4095: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
4096: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
4097:
4098: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
4099: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
4100: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
4101:
4102:

Line 4099: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);

4095: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
4096: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
4097:
4098: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
4099: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
4100: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
4101:
4102:
4103:

Line 4100: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);

4096: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
4097:
4098: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
4099: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
4100: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
4101:
4102:
4103:
4104: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);

Line 4104: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);

4100: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
4101:
4102:
4103:
4104: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);
4105:
4106:
4107: ozf_utility_pvt.convert_currency (x_return_status => l_return_status
4108: ,p_conv_type => l_conv_type --7030415

Line 4107: ozf_utility_pvt.convert_currency (x_return_status => l_return_status

4103:
4104: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);
4105:
4106:
4107: ozf_utility_pvt.convert_currency (x_return_status => l_return_status
4108: ,p_conv_type => l_conv_type --7030415
4109: ,p_conv_date => l_order_line_info.actual_shipment_date
4110: ,p_from_currency => l_order_line_info.transactional_curr_code
4111: ,p_to_currency => l_offer_curr

Line 4156: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );

4152: FETCH c_get_group INTO l_group_id,l_pbh_line_id,l_included_vol_flag;
4153: CLOSE c_get_group;
4154:
4155: IF G_DEBUG THEN
4156: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
4157: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
4158: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
4159: END IF;
4160: write_conc_log(' l_group_id: '|| l_group_id );

Line 4157: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );

4153: CLOSE c_get_group;
4154:
4155: IF G_DEBUG THEN
4156: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
4157: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
4158: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
4159: END IF;
4160: write_conc_log(' l_group_id: '|| l_group_id );
4161: write_conc_log(' l_pbh_line_id: '|| l_pbh_line_id );

Line 4158: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );

4154:
4155: IF G_DEBUG THEN
4156: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
4157: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
4158: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
4159: END IF;
4160: write_conc_log(' l_group_id: '|| l_group_id );
4161: write_conc_log(' l_pbh_line_id: '|| l_pbh_line_id );
4162: write_conc_log(' l_included_vol_flag: '|| l_included_vol_flag );

Line 4232: ozf_utility_pvt.debug_message(' l_volume: '|| l_volume );

4228: END IF;
4229: -- END IF; --l_retroactive = 'Y'
4230:
4231: IF G_DEBUG THEN
4232: ozf_utility_pvt.debug_message(' l_volume: '|| l_volume );
4233: END IF;
4234: write_conc_log(' l_volume: '|| l_volume );
4235:
4236: -- l_new_discount := 0;

Line 4254: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );

4250: FETCH c_get_max_tier INTO l_new_discount;
4251: CLOSE c_get_max_tier;
4252: END IF;
4253: IF G_DEBUG THEN
4254: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );
4255: END IF;
4256: write_conc_log(' l_new_discount: '|| l_new_discount );
4257: END IF;
4258:

Line 4271: ozf_utility_pvt.debug_message('not reach preset tier: ');

4267:
4268: IF l_preset_tier is NOT NULL AND l_preset_tier > l_new_discount THEN
4269: l_new_discount := l_preset_tier;
4270: IF G_DEBUG THEN
4271: ozf_utility_pvt.debug_message('not reach preset tier: ');
4272: END IF;
4273: write_conc_log(' not reach preset tier:');
4274: END IF;
4275:

Line 4318: ozf_utility_pvt.debug_message(l_full_name ||' retroactive flag is Y. ' || ' l_volume_type=' || l_volume_type

4314:
4315: l_adj_amount := l_new_utilization - l_amountTbl(i);
4316:
4317: IF G_DEBUG THEN
4318: ozf_utility_pvt.debug_message(l_full_name ||' retroactive flag is Y. ' || ' l_volume_type=' || l_volume_type
4319: || ' l_new_discount=' || l_new_discount
4320: || ' l_new_utilization=' || l_new_utilization
4321: || ' l_amountTbl=' || l_amountTbl(i)
4322: || ' l_adj_amount=' || l_adj_amount);

Line 4359: ozf_utility_pvt.debug_message( ' l_value=' || l_value);

4355: 2st loop: l_previous_tier_max = 20, y1= 5 l_value = 0 l_new_utilization = 5 * 2 = 10 l_previous_tier_max = 10
4356: by feliu on 12/14/06. pre_qualify tier is only for retroactive. not for non-retroactive.
4357: */
4358: IF G_DEBUG THEN
4359: ozf_utility_pvt.debug_message( ' l_value=' || l_value);
4360: END IF;
4361:
4362: --fix for bug 6021538
4363: IF l_max_tier IS NULL THEN

Line 4407: ozf_utility_pvt.debug_message('not reach preset tier: ');

4403:
4404: IF l_preset_tier is NOT NULL AND l_preset_tier > l_current_tier_value THEN
4405: l_current_tier_value := l_preset_tier;
4406: IF G_DEBUG THEN
4407: ozf_utility_pvt.debug_message('not reach preset tier: ');
4408: END IF;
4409: write_conc_log(' not reach preset tier:');
4410: END IF;
4411:

Line 4435: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id

4431: --l_previous_tier_max := l_current_min_tier - 1 ;
4432: l_previous_tier_max := l_current_min_tier;
4433:
4434: IF G_DEBUG THEN
4435: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id
4436: || ' y1=' || y1 || ' tier_min=' || l_current_min_tier
4437: || ' tier_max=' || l_current_max_tier || ' l_previous_tier_max: ' || l_previous_tier_max
4438: || ' l_new_utilization: ' || l_new_utilization);
4439: END IF;

Line 4484: ozf_utility_pvt.debug_message(

4480: END IF;
4481: END IF;
4482:
4483: IF G_DEBUG THEN
4484: ozf_utility_pvt.debug_message(
4485: l_full_name ||' Process Accrual Msg count '||l_msg_count||' Msg data'||l_msg_data||' Return status'||l_return_status
4486: );
4487: END IF;
4488: write_conc_log(

Line 4509: ozf_utility_pvt.debug_message(' /*** DEBUG MESSAGE END */' || l_api_name );

4505: <>
4506: NULL;
4507:
4508: IF G_DEBUG THEN
4509: ozf_utility_pvt.debug_message(' /*************************** DEBUG MESSAGE END *************************/' || l_api_name );
4510: END IF;
4511: write_conc_log(' /*************************** DEBUG MESSAGE END *************************/' || l_api_name );
4512:
4513: fnd_msg_pub.count_and_get (p_count => x_msg_count, p_data => x_msg_data, p_encoded => fnd_api.g_false);

Line 4957: ozf_utility_pvt.debug_message(' order_line_id: '|| l_orderLineIdTbl(i) );

4953:
4954:
4955: IF l_objectTypeTbl(i) ='ORDER' THEN
4956: IF G_DEBUG THEN
4957: ozf_utility_pvt.debug_message(' order_line_id: '|| l_orderLineIdTbl(i) );
4958: END IF;
4959: write_conc_log(' order_line_id: '|| l_orderLineIdTbl(i) );
4960:
4961: l_order_line_id:=l_orderLineIdTbl(i);

Line 4969: ozf_utility_pvt.debug_message(' resale_line_id: '|| l_objectIdTbl(i) );

4965: CLOSE c_order_line_info;
4966:
4967: ELSE
4968: IF G_DEBUG THEN
4969: ozf_utility_pvt.debug_message(' resale_line_id: '|| l_objectIdTbl(i) );
4970: END IF;
4971: write_conc_log(' resale_line_id: '|| l_objectIdTbl(i));
4972:
4973: l_order_line_id:=l_objectIdTbl(i);

Line 5010: ozf_utility_pvt.debug_message('not apply discount: ' || l_order_line_info.inventory_item_id);

5006: END IF;
5007:
5008: IF l_apply_discount ='N' THEN
5009: IF G_DEBUG THEN
5010: ozf_utility_pvt.debug_message('not apply discount: ' || l_order_line_info.inventory_item_id);
5011: END IF;
5012: write_conc_log(' not apply discount:'|| l_order_line_info.inventory_item_id);
5013: GOTO l_endoffloop;
5014: END IF;

Line 5020: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);

5016:
5017: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
5018: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
5019:
5020: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
5021: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
5022: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
5023:
5024: -- Added for bug 7030415

Line 5021: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);

5017: --kdass 31-MAR-2006 bug 5101720 convert from order currency to offer currency
5018: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
5019:
5020: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
5021: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
5022: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
5023:
5024: -- Added for bug 7030415
5025: OPEN c_utilization_details(l_utilizationIdTbl(i));

Line 5022: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);

5018: IF l_offer_curr <> l_order_line_info.transactional_curr_code THEN
5019:
5020: ozf_utility_pvt.write_conc_log('order curr: ' || l_order_line_info.transactional_curr_code);
5021: ozf_utility_pvt.write_conc_log('offer curr: ' || l_offer_curr);
5022: ozf_utility_pvt.write_conc_log('selling price: ' || l_selling_price);
5023:
5024: -- Added for bug 7030415
5025: OPEN c_utilization_details(l_utilizationIdTbl(i));
5026: FETCH c_utilization_details INTO l_conv_type, l_org_id;

Line 5030: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);

5026: FETCH c_utilization_details INTO l_conv_type, l_org_id;
5027: CLOSE c_utilization_details;
5028: l_act_util_rec.org_id := l_org_id;
5029:
5030: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);
5031:
5032: ozf_utility_pvt.convert_currency (x_return_status => l_return_status
5033: ,p_conv_type => l_conv_type -- 7030415
5034: ,p_conv_date => l_order_line_info.actual_shipment_date

Line 5032: ozf_utility_pvt.convert_currency (x_return_status => l_return_status

5028: l_act_util_rec.org_id := l_org_id;
5029:
5030: ozf_utility_pvt.write_conc_log('l_conv_type: ' || l_conv_type);
5031:
5032: ozf_utility_pvt.convert_currency (x_return_status => l_return_status
5033: ,p_conv_type => l_conv_type -- 7030415
5034: ,p_conv_date => l_order_line_info.actual_shipment_date
5035: ,p_from_currency => l_order_line_info.transactional_curr_code
5036: ,p_to_currency => l_offer_curr

Line 5052: /*ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));

5048: l_selling_price := NVL(l_conv_price,0);
5049: write_conc_log ('selling price after currency conversion: ' || l_selling_price);
5050:
5051: END IF;
5052: /*ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));
5053: OPEN c_order_line_qty(l_orderLineIdTbl(i));
5054: FETCH c_order_line_qty INTO l_line_ordered_qty;
5055: CLOSE c_order_line_qty;*/
5056:

Line 5059: ozf_utility_pvt.write_conc_log('l_line_ordered_qty: ' || l_line_ordered_qty);

5055: CLOSE c_order_line_qty;*/
5056:
5057: l_line_ordered_qty := l_order_line_info.ordered_quantity;
5058:
5059: ozf_utility_pvt.write_conc_log('l_line_ordered_qty: ' || l_line_ordered_qty);
5060: ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));
5061: ozf_utility_pvt.write_conc_log('p_qp_list_header_id: ' || p_qp_list_header_id);
5062:
5063:

Line 5060: ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));

5056:
5057: l_line_ordered_qty := l_order_line_info.ordered_quantity;
5058:
5059: ozf_utility_pvt.write_conc_log('l_line_ordered_qty: ' || l_line_ordered_qty);
5060: ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));
5061: ozf_utility_pvt.write_conc_log('p_qp_list_header_id: ' || p_qp_list_header_id);
5062:
5063:
5064:

Line 5061: ozf_utility_pvt.write_conc_log('p_qp_list_header_id: ' || p_qp_list_header_id);

5057: l_line_ordered_qty := l_order_line_info.ordered_quantity;
5058:
5059: ozf_utility_pvt.write_conc_log('l_line_ordered_qty: ' || l_line_ordered_qty);
5060: ozf_utility_pvt.write_conc_log('l_orderLineIdTbl(i): ' || l_orderLineIdTbl(i));
5061: ozf_utility_pvt.write_conc_log('p_qp_list_header_id: ' || p_qp_list_header_id);
5062:
5063:
5064:
5065:

Line 5071: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );

5067: FETCH c_get_group INTO l_group_id,l_pbh_line_id,l_included_vol_flag;
5068: CLOSE c_get_group;
5069:
5070: IF G_DEBUG THEN
5071: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
5072: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
5073: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
5074: END IF;
5075:

Line 5072: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );

5068: CLOSE c_get_group;
5069:
5070: IF G_DEBUG THEN
5071: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
5072: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
5073: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
5074: END IF;
5075:
5076: write_conc_log(' l_group_id: '|| l_group_id );

Line 5073: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );

5069:
5070: IF G_DEBUG THEN
5071: ozf_utility_pvt.debug_message(' l_group_id: '|| l_group_id );
5072: ozf_utility_pvt.debug_message(' l_pbh_line_id: '|| l_pbh_line_id );
5073: ozf_utility_pvt.debug_message(' l_included_vol_flag: '|| l_included_vol_flag );
5074: END IF;
5075:
5076: write_conc_log(' l_group_id: '|| l_group_id );
5077: write_conc_log(' l_pbh_line_id: '|| l_pbh_line_id );

Line 5156: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );

5152: CLOSE c_get_max_tier;
5153:
5154: END IF;
5155: IF G_DEBUG THEN
5156: ozf_utility_pvt.debug_message(' l_new_discount: '|| l_new_discount );
5157: END IF;
5158: write_conc_log(' l_new_discount: '|| l_new_discount );
5159: END IF;
5160:

Line 5188: ozf_utility_pvt.debug_message('not reach preset tier: ');

5184:
5185: IF l_preset_tier is NOT NULL AND l_preset_tier > l_new_discount THEN
5186: l_new_discount := l_preset_tier;
5187: IF G_DEBUG THEN
5188: ozf_utility_pvt.debug_message('not reach preset tier: ');
5189: END IF;
5190: write_conc_log(' not reach preset tier:');
5191: END IF;
5192:

Line 5228: ozf_utility_pvt.debug_message( ' l_line_ordered_qty=' || l_line_ordered_qty);

5224: l_previous_tier_max :=l_line_ordered_qty + l_volume ;
5225: END IF;
5226:
5227: IF G_DEBUG THEN
5228: ozf_utility_pvt.debug_message( ' l_line_ordered_qty=' || l_line_ordered_qty);
5229: END IF;
5230: write_conc_log( ' l_line_ordered_qty=' || l_line_ordered_qty);
5231: --fix for bug 6021538
5232:

Line 5276: ozf_utility_pvt.debug_message('not reach preset tier: ');

5272:
5273: IF l_preset_tier is NOT NULL AND l_preset_tier > l_current_tier_value THEN
5274: l_current_tier_value := l_preset_tier;
5275: IF G_DEBUG THEN
5276: ozf_utility_pvt.debug_message('not reach preset tier: ');
5277: END IF;
5278: write_conc_log(' not reach preset tier:');
5279: END IF;
5280:

Line 5303: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id

5299: --l_previous_tier_max := l_current_min_tier - 1 ;
5300: l_previous_tier_max := l_current_min_tier;
5301:
5302: IF G_DEBUG THEN
5303: ozf_utility_pvt.debug_message(' retroactive flag is N, computing for prior tier id=' || l_current_offer_tier_id
5304: || ' y1=' || y1 || ' tier_min=' || l_current_min_tier
5305: || ' tier_max=' || l_current_max_tier || ' l_previous_tier_max: ' || l_previous_tier_max
5306: || ' l_new_utilization: ' || l_utilization_amount);
5307: END IF;

Line 5351: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (

5347: l_act_budgets_rec.budget_source_id := p_qp_list_header_id;
5348: l_act_budgets_rec.request_currency := l_offer_info.transaction_currency_code;
5349: l_act_budgets_rec.request_date := SYSDATE;
5350: l_act_budgets_rec.status_code := 'APPROVED';
5351: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
5352: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
5353: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
5354: l_act_budgets_rec.approval_date := SYSDATE;
5355: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

Line 5355: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);

5351: l_act_budgets_rec.user_status_id := ozf_Utility_Pvt.get_default_user_status (
5352: 'OZF_BUDGETSOURCE_STATUS', l_act_budgets_rec.status_code);
5353: l_act_budgets_rec.approved_in_currency := l_offer_info.transaction_currency_code;
5354: l_act_budgets_rec.approval_date := SYSDATE;
5355: l_act_budgets_rec.approver_id := ozf_utility_pvt.get_resource_id (fnd_global.user_id);
5356: l_act_budgets_rec.justification := 'Offer adjustment before offer start date';
5357: l_act_budgets_rec.transfer_type := 'UTILIZED';
5358:
5359: l_act_util_rec.utilization_type :='ADJUSTMENT';