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.OKS_REPRICE_PVT dependencies on OKS_RENEW_PVT

Line 2089: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2085: l_api_name
2086: );
2087: END IF;
2088:
2089: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2090: p_perf_msg => 'Inside Reprice Api');
2091: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2092: p_perf_msg => 'Contract Id: ' ||
2093: p_reprice_rec.contract_id);

Line 2091: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2087: END IF;
2088:
2089: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2090: p_perf_msg => 'Inside Reprice Api');
2091: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2092: p_perf_msg => 'Contract Id: ' ||
2093: p_reprice_rec.contract_id);
2094: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2095: p_perf_msg => 'Price List Id: ' ||

Line 2094: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2090: p_perf_msg => 'Inside Reprice Api');
2091: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2092: p_perf_msg => 'Contract Id: ' ||
2093: p_reprice_rec.contract_id);
2094: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2095: p_perf_msg => 'Price List Id: ' ||
2096: p_reprice_rec.price_list_id);
2097: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2098: p_perf_msg => 'Price Type: ' ||

Line 2097: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2093: p_reprice_rec.contract_id);
2094: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2095: p_perf_msg => 'Price List Id: ' ||
2096: p_reprice_rec.price_list_id);
2097: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2098: p_perf_msg => 'Price Type: ' ||
2099: p_reprice_rec.price_type);
2100: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2101: p_perf_msg => 'Markup Percent: ' ||

Line 2100: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2096: p_reprice_rec.price_list_id);
2097: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2098: p_perf_msg => 'Price Type: ' ||
2099: p_reprice_rec.price_type);
2100: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2101: p_perf_msg => 'Markup Percent: ' ||
2102: p_reprice_rec.markup_percent);
2103: -- Make a save point, in case of error rollback
2104: DBMS_TRANSACTION.SAVEPOINT ('REPRICE_OKS');

Line 2208: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2204: RAISE g_error;
2205: END IF;
2206:
2207: --End new logic for Partial Periods
2208: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2209: p_perf_msg => 'Derived PriceList Id: ' ||
2210: l_pricelist_id);
2211:
2212: -- Bug 4628808

Line 2226: oks_renew_pvt.debug_log

2222: p_restricted_update => 'N',
2223: p_chrv_rec => l_chr_rec_in,
2224: x_chrv_rec => l_chr_rec_out
2225: );
2226: oks_renew_pvt.debug_log
2227: (p_program_name => 'Reprice',
2228: p_perf_msg => 'Status After Price List Update: ' ||
2229: l_return_status);
2230:

Line 2238: oks_renew_pvt.debug_log

2234: END IF;
2235:
2236: l_detail_rec.chr_id := p_reprice_rec.contract_id;
2237: l_detail_rec.intent := 'HP';
2238: oks_renew_pvt.debug_log
2239: (p_program_name => 'Reprice',
2240: p_perf_msg => 'Calling Pricing Api with intent ' ||
2241: l_detail_rec.intent);
2242: --This api will take care about updating the amounts of the contract.

Line 2254: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2250: x_return_status => l_return_status,
2251: x_msg_count => l_msg_count,
2252: x_msg_data => l_msg_data
2253: );
2254: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2255: p_perf_msg => 'Status After Compute Price: ' ||
2256: l_return_status);
2257:
2258: IF l_return_status <> g_ret_sts_success THEN

Line 2347: oks_renew_pvt.debug_log

2343: oks_extwar_util_pvt.round_currency_amt
2344: (p_amount => l_prorated_price_neg,
2345: p_currency_code => l_currency);
2346: */
2347: oks_renew_pvt.debug_log
2348: (p_program_name => 'Reprice',
2349: p_perf_msg => 'Prorated Negotiated Price: ' ||
2350: l_prorated_price_neg);
2351: --Update Manually priced Lines With the Prorated Amounts(Price Negotiated and Unit Price)

Line 2357: oks_renew_pvt.debug_log

2353: l_clev_rec.price_negotiated := l_prorated_price_neg;
2354: -- Update line's price negotiated only, unit price remains same.
2355: update_line (p_clev_rec => l_clev_rec,
2356: x_return_status => l_return_status);
2357: oks_renew_pvt.debug_log
2358: (p_program_name => 'Reprice',
2359: p_perf_msg => 'Status after line updation: ' ||
2360: l_return_status);
2361:

Line 2371: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2367: p_cle_id => l_man_priced_line_rec.ID,
2368: p_amount => l_prorated_price_neg,
2369: x_return_status => l_return_status
2370: );
2371: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2372: p_perf_msg => 'Status after Tax: ' ||
2373: l_return_status);
2374:
2375: IF l_return_status <> g_ret_sts_success THEN

Line 2457: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2453: p_opn_code => 'RENEWAL',
2454: x_old_start_date => l_old_start_date,
2455: x_old_end_date => l_old_end_date
2456: );
2457: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2458: p_perf_msg => 'Old Start Date: ' ||
2459: l_old_start_date ||
2460: ' Old End Date: ' ||
2461: l_old_end_date);

Line 2497: oks_renew_pvt.debug_log

2493: oks_extwar_util_pvt.round_currency_amt
2494: (p_amount => l_prorated_price_neg,
2495: p_currency_code => l_currency);
2496: */
2497: oks_renew_pvt.debug_log
2498: (p_program_name => 'Reprice',
2499: p_perf_msg => 'Prorated Negotiated Price: ' ||
2500: l_prorated_price_neg);
2501:

Line 2509: oks_renew_pvt.debug_log

2505: l_clev_rec.price_negotiated := l_prorated_price_neg;
2506: -- Update line's price negotiated only, unit price remains same.
2507: update_line (p_clev_rec => l_clev_rec,
2508: x_return_status => l_return_status);
2509: oks_renew_pvt.debug_log
2510: (p_program_name => 'Reprice',
2511: p_perf_msg => 'Status after line updation: ' ||
2512: l_return_status);
2513:

Line 2523: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2519: p_cle_id => l_line_rec.ID,
2520: p_amount => l_prorated_price_neg,
2521: x_return_status => l_return_status
2522: );
2523: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2524: p_perf_msg => 'Status after Tax: ' ||
2525: l_return_status);
2526:
2527: IF l_return_status <> g_ret_sts_success THEN

Line 2561: oks_renew_pvt.debug_log

2557: p_price_type => p_reprice_rec.price_type,
2558: p_price_details => l_price_details,
2559: x_return_status => l_return_status
2560: );
2561: oks_renew_pvt.debug_log
2562: (p_program_name => 'Reprice',
2563: p_perf_msg => 'Status after updating pricing info: ' ||
2564: l_return_status);
2565:

Line 2630: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2626: --Update Line With the Prorated Amounts(Price Negotiated and Unit Price)
2627: l_clev_rec.ID := l_line_rec.ID;
2628: l_clev_rec.price_negotiated := l_prorated_price_neg;
2629: l_clev_rec.price_unit := l_prorated_unit_price;
2630: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2631: p_perf_msg => 'Prorated unit price: ' ||
2632: l_clev_rec.price_negotiated);
2633: update_line (p_clev_rec => l_clev_rec,
2634: x_return_status => l_return_status);

Line 2635: oks_renew_pvt.debug_log

2631: p_perf_msg => 'Prorated unit price: ' ||
2632: l_clev_rec.price_negotiated);
2633: update_line (p_clev_rec => l_clev_rec,
2634: x_return_status => l_return_status);
2635: oks_renew_pvt.debug_log
2636: (p_program_name => 'Reprice',
2637: p_perf_msg => 'Status after updating line: ' ||
2638: l_return_status);
2639:

Line 2660: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2656: oks_extwar_util_pvt.round_currency_amt
2657: (p_amount => l_prorated_price_neg,
2658: p_currency_code => l_currency);
2659: */
2660: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2661: p_perf_msg => 'Prorated price: ' ||
2662: l_prorated_price_neg);
2663:
2664: IF p_reprice_rec.price_list_id IS NOT NULL THEN

Line 2681: oks_renew_pvt.debug_log

2677: p_price_list => p_reprice_rec.price_list_id,
2678: p_amount => l_prorated_price_neg,
2679: x_return_status => l_return_status
2680: );
2681: oks_renew_pvt.debug_log
2682: (p_program_name => 'Reprice',
2683: p_perf_msg => 'Status after calculate_price: ' ||
2684: l_return_status);
2685:

Line 2695: oks_renew_pvt.debug_log

2691: l_clev_rec.ID := l_line_rec.ID;
2692: l_clev_rec.price_negotiated := l_prorated_price_neg;
2693: update_line (p_clev_rec => l_clev_rec,
2694: x_return_status => l_return_status);
2695: oks_renew_pvt.debug_log
2696: (p_program_name => 'Reprice',
2697: p_perf_msg => 'Status after updating line: ' ||
2698: l_return_status);
2699:

Line 2733: oks_renew_pvt.debug_log

2729: p_price_type => p_reprice_rec.price_type,
2730: p_price_details => l_price_details,
2731: x_return_status => l_return_status
2732: );
2733: oks_renew_pvt.debug_log
2734: (p_program_name => 'Reprice',
2735: p_perf_msg => 'Status in CP2 API in PCT where PL is NULL: ' ||
2736: l_return_status);
2737:

Line 2762: oks_renew_pvt.debug_log

2758: x_msg_data => l_msg_data,
2759: p_scev_rec => l_scev_rec_in,
2760: x_scev_rec => l_scev_rec_out
2761: );
2762: oks_renew_pvt.debug_log
2763: (p_program_name => 'Reprice',
2764: p_perf_msg => 'Status after updating Subscription elements: ' ||
2765: l_return_status);
2766:

Line 2780: oks_renew_pvt.debug_log

2776: p_cle_id => l_line_rec.ID,
2777: p_amount => l_prorated_price_neg,
2778: x_return_status => l_return_status
2779: );
2780: oks_renew_pvt.debug_log
2781: (p_program_name => 'Reprice',
2782: p_perf_msg => 'Status after Tax - ' ||
2783: l_return_status);
2784:

Line 2795: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2791: p_cle_id => l_line_rec.ID,
2792: p_amount => l_prorated_price_neg,
2793: x_return_status => l_return_status
2794: );
2795: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2796: p_perf_msg => 'Status after Tax = ' ||
2797: l_return_status);
2798:
2799: IF l_return_status <> g_ret_sts_success THEN

Line 2840: oks_renew_pvt.debug_log

2836: --FOR MAN and PCT the simple api is called and it will not update the amounts of the contract
2837: --Because of this update_amounts need to be called....
2838: update_amounts (p_chr_id => p_reprice_rec.contract_id,
2839: x_return_status => l_return_status);
2840: oks_renew_pvt.debug_log
2841: (p_program_name => 'Reprice',
2842: p_perf_msg => 'Status after updating amounts: ' ||
2843: l_return_status);
2844:

Line 2851: oks_renew_pvt.debug_log (p_program_name => 'Reprice',

2847: END IF;
2848: END IF; --For Price List(LST)
2849:
2850: x_return_status := l_return_status;
2851: oks_renew_pvt.debug_log (p_program_name => 'Reprice',
2852: p_perf_msg => 'Final Status: ' ||
2853: l_return_status);
2854:
2855: -- end debug log

Line 3071: oks_renew_pvt.debug_log

3067: fnd_file.put_line(FND_FILE.LOG,'l_srv_k_details_rec.renewal_pricing_type : '||l_srv_k_details_rec.renewal_pricing_type);
3068: fnd_file.put_line(FND_FILE.LOG,'l_srv_k_details_rec.renewal_price_list : '||l_srv_k_details_rec.renewal_price_list);
3069: fnd_file.put_line(FND_FILE.LOG,'l_srv_k_details_rec.renewal_markup_percent : '||l_srv_k_details_rec.renewal_markup_percent);
3070:
3071: oks_renew_pvt.debug_log
3072: (p_program_name => 'Renewal Consolidation Reprice::',
3073: p_perf_msg => 'PRICING TYPE = ' ||
3074: l_srv_k_details_rec.renewal_pricing_type);
3075: oks_renew_pvt.debug_log

Line 3075: oks_renew_pvt.debug_log

3071: oks_renew_pvt.debug_log
3072: (p_program_name => 'Renewal Consolidation Reprice::',
3073: p_perf_msg => 'PRICING TYPE = ' ||
3074: l_srv_k_details_rec.renewal_pricing_type);
3075: oks_renew_pvt.debug_log
3076: (p_program_name => 'Renewal Consolidation Reprice::',
3077: p_perf_msg => 'PRICE LIST = ' ||
3078: l_srv_k_details_rec.renewal_price_list);
3079: oks_renew_pvt.debug_log

Line 3079: oks_renew_pvt.debug_log

3075: oks_renew_pvt.debug_log
3076: (p_program_name => 'Renewal Consolidation Reprice::',
3077: p_perf_msg => 'PRICE LIST = ' ||
3078: l_srv_k_details_rec.renewal_price_list);
3079: oks_renew_pvt.debug_log
3080: (p_program_name => 'Renewal Consolidation Reprice::',
3081: p_perf_msg => 'MARKUP = ' ||
3082: l_srv_k_details_rec.renewal_markup_percent);
3083:

Line 3088: oks_renew_pvt.debug_log

3084: IF l_srv_k_details_rec.renewal_pricing_type = 'LST' THEN
3085: l_chr_rec_in.ID := p_subject_chr_id;
3086: l_chr_rec_in.price_list_id := l_k_details_rec.price_list_id;
3087: l_currency := l_k_details_rec.currency_code;
3088: oks_renew_pvt.debug_log
3089: (p_program_name => 'Renewal Consolidation Reprice::',
3090: p_perf_msg => 'Pricing type - Price List - Header Pricing');
3091:
3092: fnd_file.put_line(FND_FILE.LOG,'renewal_pricing_type = LST, Calling okc_contract_pub.update_contract_header');

Line 3107: oks_renew_pvt.debug_log

3103: );
3104:
3105: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling okc_contract_pub.update_contract_header x_return_status= '||l_return_status);
3106:
3107: oks_renew_pvt.debug_log
3108: (p_program_name => 'Renewal Consolidation Reprice::',
3109: p_perf_msg => 'UPDATE CONTRACT HDR - RETURN = ' ||
3110: l_return_status);
3111:

Line 3127: oks_renew_pvt.debug_log

3123: -- l_detail_rec.line_id := p_subject_top_line_id;
3124: -- l_detail_rec.intent := 'LP';
3125: -- end added bug 6016714
3126:
3127: oks_renew_pvt.debug_log
3128: (p_program_name => 'Renewal Consolidation Reprice::',
3129: p_perf_msg => 'HDR PRICING - CONTRACT ID= ' ||
3130: l_detail_rec.chr_id);
3131:

Line 3149: oks_renew_pvt.debug_log

3145: );
3146:
3147: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling oks_qp_int_pvt.compute_price x_return_status= '||l_return_status);
3148:
3149: oks_renew_pvt.debug_log
3150: (p_program_name => 'Renewal Consolidation Reprice::',
3151: p_perf_msg => 'HDR REPRICE - RETURN = ' ||
3152: l_return_status);
3153:

Line 3161: oks_renew_pvt.debug_log

3157: ELSE
3158: -- Renewal Price type is Manual or Markup. Each line has price to be updated individually.
3159: fnd_file.put_line(FND_FILE.LOG,'Renewal Price type is Manual or Markup');
3160:
3161: oks_renew_pvt.debug_log
3162: (p_program_name => 'Renewal Consolidation Reprice::',
3163: p_perf_msg => 'NON PRICE LIST REPRICE - LINE/SUBLINE COUNT = ' ||
3164: p_subject_sub_line_tbl.COUNT);
3165: --begin new logic for Partial Periods

Line 3218: oks_renew_pvt.debug_log

3214: fnd_file.put_line(FND_FILE.LOG,'l_line_rec.dnz_chr_id : '||l_line_rec.dnz_chr_id);
3215: fnd_file.put_line(FND_FILE.LOG,'---------------------------------------------------------- ');
3216: fnd_file.put_line(FND_FILE.LOG,' ');
3217:
3218: oks_renew_pvt.debug_log
3219: (p_program_name => 'Renewal Consolidation Reprice::',
3220: p_perf_msg => 'NON PRICE LIST REPRICE - LINE/SUBLINE ID = ' ||
3221: l_line_rec.ID);
3222: oks_renew_pvt.debug_log

Line 3222: oks_renew_pvt.debug_log

3218: oks_renew_pvt.debug_log
3219: (p_program_name => 'Renewal Consolidation Reprice::',
3220: p_perf_msg => 'NON PRICE LIST REPRICE - LINE/SUBLINE ID = ' ||
3221: l_line_rec.ID);
3222: oks_renew_pvt.debug_log
3223: (p_program_name => 'Renewal Consolidation Reprice::',
3224: p_perf_msg => 'NON PRICE LIST REPRICE - LINE/SUBLINE LSE ID = ' ||
3225: l_line_rec.lse_id);
3226: --added by mchoudha for bug#5191528

Line 3270: oks_renew_pvt.debug_log

3266: CLOSE l_usage_type_csr;
3267:
3268: -- Prorate only if it is negotaietd price
3269: IF NVL (l_usage_type, '-99') <> 'NPR' THEN
3270: oks_renew_pvt.debug_log
3271: (p_program_name => 'Renewal Consolidation Reprice::',
3272: p_perf_msg => 'Usage Line of type non negotiated - so no proration');
3273: RAISE g_skip_proration;
3274: END IF;

Line 3287: oks_renew_pvt.debug_log

3283:
3284: fnd_file.put_line(FND_FILE.LOG,'l_old_start_date= '||l_old_start_date);
3285: fnd_file.put_line(FND_FILE.LOG,'l_old_end_date= '||l_old_end_date);
3286:
3287: oks_renew_pvt.debug_log
3288: (p_program_name => 'Renewal Consolidation Reprice::',
3289: p_perf_msg => 'LINE OLD START DATE = ' ||
3290: l_old_start_date);
3291: oks_renew_pvt.debug_log

Line 3291: oks_renew_pvt.debug_log

3287: oks_renew_pvt.debug_log
3288: (p_program_name => 'Renewal Consolidation Reprice::',
3289: p_perf_msg => 'LINE OLD START DATE = ' ||
3290: l_old_start_date);
3291: oks_renew_pvt.debug_log
3292: (p_program_name => 'Renewal Consolidation Reprice::',
3293: p_perf_msg => 'LINE OLD END DATE = ' ||
3294: l_old_end_date);
3295: oks_renew_pvt.debug_log

Line 3295: oks_renew_pvt.debug_log

3291: oks_renew_pvt.debug_log
3292: (p_program_name => 'Renewal Consolidation Reprice::',
3293: p_perf_msg => 'LINE OLD END DATE = ' ||
3294: l_old_end_date);
3295: oks_renew_pvt.debug_log
3296: (p_program_name => 'Renewal Consolidation Reprice::',
3297: p_perf_msg => 'LINE START DATE = ' ||
3298: l_line_rec.start_date);
3299: oks_renew_pvt.debug_log

Line 3299: oks_renew_pvt.debug_log

3295: oks_renew_pvt.debug_log
3296: (p_program_name => 'Renewal Consolidation Reprice::',
3297: p_perf_msg => 'LINE START DATE = ' ||
3298: l_line_rec.start_date);
3299: oks_renew_pvt.debug_log
3300: (p_program_name => 'Renewal Consolidation Reprice::',
3301: p_perf_msg => 'LINE END DATE = ' ||
3302: l_line_rec.end_date);
3303:

Line 3339: oks_renew_pvt.debug_log

3335: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling do_prorating l_prorated_price_neg = '||l_prorated_price_neg);
3336: END IF;
3337:
3338: -- end new logic for partial periods
3339: oks_renew_pvt.debug_log
3340: (p_program_name => 'Renewal Consolidation Reprice::',
3341: p_perf_msg => 'PRORATED AMOUNT = ' ||
3342: l_prorated_price_neg);
3343: oks_renew_pvt.debug_log

Line 3343: oks_renew_pvt.debug_log

3339: oks_renew_pvt.debug_log
3340: (p_program_name => 'Renewal Consolidation Reprice::',
3341: p_perf_msg => 'PRORATED AMOUNT = ' ||
3342: l_prorated_price_neg);
3343: oks_renew_pvt.debug_log
3344: (p_program_name => 'Renewal Consolidation Reprice::',
3345: p_perf_msg => 'MULTI CURRENCY CODE = ' ||
3346: l_currency);
3347: l_prorated_price_neg := ROUND(l_prorated_price_neg,29); -- bug 5018782

Line 3356: oks_renew_pvt.debug_log

3352: oks_extwar_util_pvt.round_currency_amt
3353: (p_amount => l_prorated_price_neg,
3354: p_currency_code => l_currency);
3355: */
3356: oks_renew_pvt.debug_log
3357: (p_program_name => 'Renewal Consolidation Reprice::',
3358: p_perf_msg => 'PRORATED AMOUNT FOR MULTI CURRENCY CURRENCY = ' ||
3359: l_prorated_price_neg);
3360:

Line 3363: oks_renew_pvt.debug_log

3359: l_prorated_price_neg);
3360:
3361: IF l_srv_k_details_rec.renewal_pricing_type = 'MAN' THEN
3362: fnd_file.put_line(FND_FILE.LOG,'l_srv_k_details_rec.renewal_pricing_type = MANUAL');
3363: oks_renew_pvt.debug_log
3364: (p_program_name => 'Renewal Consolidation Reprice::',
3365: p_perf_msg => 'Pricing type is manual');
3366: --Update Line With the Prorated Amounts(Price Negotiated and Unit Price)
3367: l_clev_rec.ID := l_line_rec.ID;

Line 3375: oks_renew_pvt.debug_log

3371: x_return_status => l_return_status);
3372:
3373: fnd_file.put_line(FND_FILE.LOG,'After update_line l_return_status = '||l_return_status);
3374:
3375: oks_renew_pvt.debug_log
3376: (p_program_name => 'Renewal Consolidation Reprice::',
3377: p_perf_msg => 'UPDATE LINE (MAN) - RETURN = ' ||
3378: l_return_status);
3379:

Line 3389: oks_renew_pvt.debug_log

3385: p_cle_id => l_line_rec.ID,
3386: p_amount => l_prorated_price_neg,
3387: x_return_status => l_return_status
3388: );
3389: oks_renew_pvt.debug_log
3390: (p_program_name => 'Renewal Consolidation Reprice::',
3391: p_perf_msg => 'CALCUALTE TAX - RETURN = ' ||
3392: l_return_status);
3393:

Line 3401: oks_renew_pvt.debug_log

3397: RAISE g_error;
3398: END IF;
3399:
3400: IF l_line_rec.lse_id IN (7, 9, 25, 46) THEN
3401: oks_renew_pvt.debug_log
3402: (p_program_name => 'Renewal Consolidation Reprice::',
3403: p_perf_msg => 'Covered Item, Product or Subscription (man)');
3404: l_price_details.serv_ext_amount := l_prorated_price_neg;
3405: l_price_details.status_text :=

Line 3415: oks_renew_pvt.debug_log

3411: p_price_type => l_srv_k_details_rec.renewal_pricing_type,
3412: p_price_details => l_price_details,
3413: x_return_status => l_return_status
3414: );
3415: oks_renew_pvt.debug_log
3416: (p_program_name => 'Renewal Consolidation Reprice::',
3417: p_perf_msg => 'UPDATE PRICE INFO - RETURN = ' ||
3418: l_return_status);
3419:

Line 3428: oks_renew_pvt.debug_log

3424: END IF;
3425: END IF;
3426: ELSE -- Process PCT - Markup percentage
3427: fnd_file.put_line(FND_FILE.LOG,'Renewal Process PCT - Markup percentage');
3428: oks_renew_pvt.debug_log
3429: (p_program_name => 'Renewal Consolidation Reprice::',
3430: p_perf_msg => 'Pricing type is manual');
3431:
3432: --begin new logic for Partial Periods

Line 3459: oks_renew_pvt.debug_log

3455: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling do_prorating l_prorated_unit_price = '||l_prorated_unit_price);
3456: END IF;
3457:
3458: --End new logic for partial periods
3459: oks_renew_pvt.debug_log
3460: (p_program_name => 'Renewal Consolidation Reprice::',
3461: p_perf_msg => 'PRORATED UNIT PRICE = ' ||
3462: l_prorated_unit_price);
3463: --Update Line With the Prorated Amounts(Price Negotiated and Unit Price)

Line 3470: oks_renew_pvt.debug_log

3466: l_clev_rec.price_unit := l_prorated_unit_price;
3467: update_line (p_clev_rec => l_clev_rec,
3468: x_return_status => l_return_status);
3469: fnd_file.put_line(FND_FILE.LOG,'After update_line l_return_status = '||l_return_status);
3470: oks_renew_pvt.debug_log
3471: (p_program_name => 'Renewal Consolidation Reprice::',
3472: p_perf_msg => 'UPDATE LINE (PCT) - RETURN = ' ||
3473: l_return_status);
3474:

Line 3481: oks_renew_pvt.debug_log

3477: END IF;
3478:
3479: IF l_line_rec.lse_id IN (7, 9, 25, 46) THEN
3480: -- if covered item is item, product, suscription
3481: oks_renew_pvt.debug_log
3482: (p_program_name => 'Renewal Consolidation Reprice::',
3483: p_perf_msg => 'Covered Item, Product or Subscription (pct)');
3484: --Prorated Amout should markedup/down then pass to find the actual
3485: --price negotiated

Line 3493: oks_renew_pvt.debug_log

3489: NVL (l_srv_k_details_rec.renewal_markup_percent, 0)
3490: ) /
3491: 100
3492: );
3493: oks_renew_pvt.debug_log
3494: (p_program_name => 'Renewal Consolidation Reprice::',
3495: p_perf_msg => 'MARKED UP PRICE = ' ||
3496: l_prorated_price_neg);
3497: l_prorated_price_neg := ROUND(l_prorated_price_neg,29); -- bug 5018782

Line 3505: oks_renew_pvt.debug_log

3501: oks_extwar_util_pvt.round_currency_amt
3502: (p_amount => l_prorated_price_neg,
3503: p_currency_code => l_currency);
3504: */
3505: oks_renew_pvt.debug_log
3506: (p_program_name => 'Renewal Consolidation Reprice::',
3507: p_perf_msg => 'MARKED UP PRICE MULTI CURRENCY CODE = ' ||
3508: l_currency);
3509:

Line 3512: oks_renew_pvt.debug_log

3508: l_currency);
3509:
3510: IF l_srv_k_details_rec.renewal_price_list IS NOT NULL THEN
3511: fnd_file.put_line(FND_FILE.LOG,'l_srv_k_details_rec.renewal_price_list IS NOT NULL');
3512: oks_renew_pvt.debug_log
3513: (p_program_name => 'Renewal Consolidation Reprice::',
3514: p_perf_msg => 'Renewal PL is null (pct)');
3515:
3516: IF l_line_rec.lse_id = 46 THEN

Line 3537: oks_renew_pvt.debug_log

3533: );
3534:
3535: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling calculate_price l_return_status = '||l_return_status);
3536:
3537: oks_renew_pvt.debug_log
3538: (p_program_name => 'Renewal Consolidation Reprice::',
3539: p_perf_msg => 'CALC PRICE FOR MARKUP WITH PL - RETURN = ' ||
3540: l_return_status);
3541: oks_renew_pvt.debug_log

Line 3541: oks_renew_pvt.debug_log

3537: oks_renew_pvt.debug_log
3538: (p_program_name => 'Renewal Consolidation Reprice::',
3539: p_perf_msg => 'CALC PRICE FOR MARKUP WITH PL - RETURN = ' ||
3540: l_return_status);
3541: oks_renew_pvt.debug_log
3542: (p_program_name => 'Renewal Consolidation Reprice::',
3543: p_perf_msg => 'CALC PRICE FOR MARKUP WITH PL - AMOUNT = ' ||
3544: l_prorated_price_neg);
3545:

Line 3556: oks_renew_pvt.debug_log

3552: l_clev_rec.price_negotiated := l_prorated_price_neg;
3553: update_line (p_clev_rec => l_clev_rec,
3554: x_return_status => l_return_status);
3555: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling update_line l_return_status = '||l_return_status);
3556: oks_renew_pvt.debug_log
3557: (p_program_name => 'Renewal Consolidation Reprice::',
3558: p_perf_msg => 'UPDATE LINE (PCT) WITH NULL PL - RETURN = ' ||
3559: l_return_status);
3560:

Line 3578: oks_renew_pvt.debug_log

3574: x_return_status => l_return_status
3575: );
3576:
3577: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling update_price_info l_return_status = '||l_return_status);
3578: oks_renew_pvt.debug_log
3579: (p_program_name => 'Renewal Consolidation Reprice::',
3580: p_perf_msg => 'UPDATE PRICE INFO (PCT) WITH NULL PL - RETURN = ' ||
3581: l_return_status);
3582:

Line 3589: oks_renew_pvt.debug_log

3585: END IF;
3586:
3587: -- Update Subsciption elements
3588: IF l_line_rec.lse_id = 46 THEN
3589: oks_renew_pvt.debug_log
3590: (p_program_name => 'Renewal Consolidation Reprice::',
3591: p_perf_msg => 'Subscription line for pct with null PL');
3592:
3593: FOR l_subs_elements_rec IN

Line 3602: oks_renew_pvt.debug_log

3598: l_subs_elements_rec.quantity *
3599: l_prorated_unit_price;
3600: l_scev_rec_in.object_version_number :=
3601: l_subs_elements_rec.object_version_number;
3602: oks_renew_pvt.debug_log
3603: (p_program_name => 'Renewal Consolidation Reprice::',
3604: p_perf_msg => 'SUBSCR ELE ID = ' ||
3605: l_scev_rec_in.ID);
3606: oks_renew_pvt.debug_log

Line 3606: oks_renew_pvt.debug_log

3602: oks_renew_pvt.debug_log
3603: (p_program_name => 'Renewal Consolidation Reprice::',
3604: p_perf_msg => 'SUBSCR ELE ID = ' ||
3605: l_scev_rec_in.ID);
3606: oks_renew_pvt.debug_log
3607: (p_program_name => 'Renewal Consolidation Reprice::',
3608: p_perf_msg => 'SUBSCR ELE AMOUNT = ' ||
3609: l_scev_rec_in.amount);
3610: oks_subscr_elems_pub.update_row

Line 3620: oks_renew_pvt.debug_log

3616: p_scev_rec => l_scev_rec_in,
3617: x_scev_rec => l_scev_rec_out
3618: );
3619: fnd_file.put_line(FND_FILE.LOG,'AFTER Calling oks_subscr_elems_pub.update_row l_return_status = '||l_return_status);
3620: oks_renew_pvt.debug_log
3621: (p_program_name => 'Renewal Consolidation Reprice::',
3622: p_perf_msg => 'UPDATE SUBSCR ELE - AMOUNT = ' ||
3623: l_return_status);
3624:

Line 3639: oks_renew_pvt.debug_log

3635: p_amount => l_prorated_price_neg,
3636: x_return_status => l_return_status
3637: );
3638: fnd_file.put_line(FND_FILE.LOG,' 1 AFTER Calling calculate_tax l_return_status = '||l_return_status);
3639: oks_renew_pvt.debug_log
3640: (p_program_name => 'Renewal Consolidation Reprice::',
3641: p_perf_msg => 'CALC TAX (PCT) WITH NULL PL - RETURN = ' ||
3642: l_return_status);
3643: oks_renew_pvt.debug_log

Line 3643: oks_renew_pvt.debug_log

3639: oks_renew_pvt.debug_log
3640: (p_program_name => 'Renewal Consolidation Reprice::',
3641: p_perf_msg => 'CALC TAX (PCT) WITH NULL PL - RETURN = ' ||
3642: l_return_status);
3643: oks_renew_pvt.debug_log
3644: (p_program_name => 'Renewal Consolidation Reprice::',
3645: p_perf_msg => 'CALC TAX (PCT) WITH NULL PL - AMOUNT = ' ||
3646: l_prorated_price_neg);
3647:

Line 3659: oks_renew_pvt.debug_log

3655: p_amount => l_prorated_price_neg,
3656: x_return_status => l_return_status
3657: );
3658: fnd_file.put_line(FND_FILE.LOG,' 2 AFTER Calling calculate_tax l_return_status = '||l_return_status);
3659: oks_renew_pvt.debug_log
3660: (p_program_name => 'Renewal Consolidation Reprice::',
3661: p_perf_msg => 'CALC TAX (PCT) FOR PARTY - RETURN = ' ||
3662: l_return_status);
3663: oks_renew_pvt.debug_log

Line 3663: oks_renew_pvt.debug_log

3659: oks_renew_pvt.debug_log
3660: (p_program_name => 'Renewal Consolidation Reprice::',
3661: p_perf_msg => 'CALC TAX (PCT) FOR PARTY - RETURN = ' ||
3662: l_return_status);
3663: oks_renew_pvt.debug_log
3664: (p_program_name => 'Renewal Consolidation Reprice::',
3665: p_perf_msg => 'CALC TAX (PCT) FOR PARTY - AMOUNT = ' ||
3666: l_prorated_price_neg);
3667:

Line 3714: oks_renew_pvt.debug_log

3710: --FOR MAN and PCT the simple api is called and it will not update the amounts of the contract
3711: --Because of this update_amounts need to be called....
3712: update_amounts (p_chr_id => p_subject_chr_id,
3713: x_return_status => l_return_status);
3714: oks_renew_pvt.debug_log
3715: (p_program_name => 'Renewal Consolidation Reprice::',
3716: p_perf_msg => 'UPDATE CONTRACT AMOUNT = ' ||
3717: l_return_status);
3718: