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_SETTLEMENT_DOC_PVT dependencies on OZF_UTILITY_PVT

Line 273: OZF_Utility_PVT.debug_message(l_full_name||': start');

269:
270: BEGIN
271: -------------------- initialize -----------------------
272: IF OZF_DEBUG_HIGH_ON THEN
273: OZF_Utility_PVT.debug_message(l_full_name||': start');
274: END IF;
275:
276: x_return_status := FND_API.g_ret_sts_success;
277:

Line 286: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_credit');

282: IF p_payment_method = 'REG_CREDIT_MEMO' THEN
283: IF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED', 'CLAIM') THEN
284: IF p_customer_trx_id IS NOT NULL THEN
285: IF OZF_DEBUG_HIGH_ON THEN
286: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_credit');
287: END IF;
288: OPEN csr_invoice_credit(p_customer_trx_id);
289: LOOP
290: FETCH csr_invoice_credit INTO l_settlement_doc_tbl(l_counter).settlement_id

Line 340: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');

336: ELSIF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED') THEN
337: IF p_cash_receipt_id IS NOT NULL AND
338: p_customer_trx_id IS NOT NULL THEN
339: IF OZF_DEBUG_HIGH_ON THEN
340: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');
341: END IF;
342: OPEN csr_receipt_apply(p_cash_receipt_id, p_customer_trx_id);
343: FETCH csr_receipt_apply INTO l_settlement_doc_tbl(1).settlement_id
344: , l_settlement_doc_tbl(1).settlement_type_id

Line 383: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_account_credit');

379: ELSIF p_payment_method = 'ON_ACCT_CREDIT' THEN
380: IF p_deduction_type = 'RECEIPT_OPM' THEN
381: IF p_cash_receipt_id IS NOT NULL THEN
382: IF OZF_DEBUG_HIGH_ON THEN
383: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_account_credit');
384: END IF;
385: OPEN csr_on_account_credit(p_cash_receipt_id);
386: FETCH csr_on_account_credit INTO l_settlement_doc_tbl(1).settlement_id
387: , l_settlement_doc_tbl(1).settlement_type_id

Line 420: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_acct_only');

416: -- ---------------
417: ELSIF p_payment_method = 'ACCOUNTING_ONLY' THEN
418: IF p_deduction_type = 'CLAIM' THEN
419: IF OZF_DEBUG_HIGH_ON THEN
420: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_acct_only');
421: END IF;
422: OPEN csr_on_acct_only(p_claim_id);
423: FETCH csr_on_acct_only INTO l_settlement_doc_tbl(1).payment_method
424: ,l_settlement_doc_tbl(1).settlement_amount;

Line 448: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_chargeback');

444: ELSIF p_payment_method = 'CHARGEBACK' THEN
445: IF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED') THEN
446: IF p_customer_trx_id IS NOT NULL THEN
447: IF OZF_DEBUG_HIGH_ON THEN
448: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_chargeback');
449: END IF;
450: OPEN csr_chargeback(p_customer_trx_id);
451: FETCH csr_chargeback INTO l_settlement_doc_tbl(1).settlement_id
452: , l_settlement_doc_tbl(1).settlement_type_id

Line 485: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_writeoff');

481: ELSIF p_payment_method = 'WRITE_OFF' THEN
482: IF p_deduction_type = 'SOURCE_DED' THEN
483: IF p_adjust_id IS NOT NULL THEN
484: IF OZF_DEBUG_HIGH_ON THEN
485: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_writeoff');
486: END IF;
487: OPEN csr_invoice_writeoff(p_adjust_id);
488: FETCH csr_invoice_writeoff INTO l_settlement_doc_tbl(1).settlement_id
489: , l_settlement_doc_tbl(1).settlement_type_id

Line 511: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_writeoff');

507: END IF;
508: ELSIF p_deduction_type IN ('RECEIPT_OPM', 'RECEIPT_DED') THEN
509: IF p_cash_receipt_id IS NOT NULL THEN
510: IF OZF_DEBUG_HIGH_ON THEN
511: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_writeoff');
512: END IF;
513: OPEN csr_receipt_writeoff(p_cash_receipt_id);
514: FETCH csr_receipt_writeoff INTO l_settlement_doc_tbl(1).settlement_id
515: , l_settlement_doc_tbl(1).settlement_type_id

Line 562: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');

558: ELSIF p_deduction_type = 'RECEIPT_OPM' THEN
559: IF p_cash_receipt_id IS NOT NULL AND
560: p_customer_trx_id IS NOT NULL THEN
561: IF OZF_DEBUG_HIGH_ON THEN
562: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');
563: END IF;
564: OPEN csr_receipt_apply(p_cash_receipt_id, p_customer_trx_id);
565: FETCH csr_receipt_apply INTO l_settlement_doc_tbl(1).settlement_id
566: , l_settlement_doc_tbl(1).settlement_type_id

Line 668: OZF_Utility_PVT.debug_message(l_full_name||': end');

664: END IF;
665: END IF; -- end if l_settlement_doc_tbl.count > 0
666:
667: IF OZF_DEBUG_HIGH_ON THEN
668: OZF_Utility_PVT.debug_message(l_full_name||': end');
669: END IF;
670: EXCEPTION
671: WHEN FND_API.g_exc_error THEN
672: x_return_status := FND_API.g_ret_sts_error;

Line 726: OZF_Utility_PVT.debug_message(l_full_name||': start');

722:
723: BEGIN
724: -------------------- initialize -----------------------
725: IF OZF_DEBUG_HIGH_ON THEN
726: OZF_Utility_PVT.debug_message(l_full_name||': start');
727: END IF;
728:
729: x_return_status := FND_API.g_ret_sts_success;
730:

Line 740: OZF_UTILITY_PVT.Convert_Currency(

736:
737: IF l_function_currency = p_claim_rec.currency_code THEN
738: l_acctd_amount_settled := p_claim_rec.amount_settled;
739: ELSE
740: OZF_UTILITY_PVT.Convert_Currency(
741: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
742: P_FROM_CURRENCY => p_claim_rec.currency_code,
743: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
744: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

Line 774: OZF_UTILITY_PVT.Convert_Currency(

770:
771: IF l_function_currency = p_claim_rec.currency_code THEN
772: l_acctd_amount_remaining := l_amount_remaining;
773: ELSE
774: OZF_UTILITY_PVT.Convert_Currency(
775: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
776: P_FROM_CURRENCY => p_claim_rec.currency_code,
777: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
778: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

Line 796: OZF_UTILITY_PVT.Convert_Currency(

792: -- Bug3805485: Tax Accounted Amount Calculation
793: IF l_function_currency = p_claim_rec.currency_code THEN
794: l_acctd_tax_amount := NVL(p_claim_rec.tax_amount,0);
795: ELSE
796: OZF_UTILITY_PVT.Convert_Currency(
797: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
798: P_FROM_CURRENCY => p_claim_rec.currency_code,
799: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
800: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

Line 815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);

811: END IF;
812: END IF;
813:
814: IF OZF_DEBUG_HIGH_ON THEN
815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);

Line 816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);

812: END IF;
813:
814: IF OZF_DEBUG_HIGH_ON THEN
815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);

Line 817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);

813:
814: IF OZF_DEBUG_HIGH_ON THEN
815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
821: END IF;

Line 818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);

814: IF OZF_DEBUG_HIGH_ON THEN
815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
821: END IF;
822:

Line 819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);

815: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
821: END IF;
822:
823: BEGIN

Line 820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);

816: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
817: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
818: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
819: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
820: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
821: END IF;
822:
823: BEGIN
824: UPDATE ozf_claims_all

Line 848: OZF_Utility_PVT.debug_message(l_full_name||': end');

844: END;
845:
846:
847: IF OZF_DEBUG_HIGH_ON THEN
848: OZF_Utility_PVT.debug_message(l_full_name||': end');
849: END IF;
850: EXCEPTION
851: WHEN FND_API.g_exc_error THEN
852: x_return_status := FND_API.g_ret_sts_error;

Line 891: OZF_Utility_PVT.debug_message(l_full_name||': start');

887:
888: BEGIN
889: -------------------- initialize -----------------------
890: IF OZF_DEBUG_HIGH_ON THEN
891: OZF_Utility_PVT.debug_message(l_full_name||': start');
892: END IF;
893:
894: x_return_status := FND_API.g_ret_sts_success;
895:

Line 912: OZF_Utility_PVT.debug_message(l_full_name||': end');

908: RAISE FND_API.g_exc_unexpected_error;
909: END;
910:
911: IF OZF_DEBUG_HIGH_ON THEN
912: OZF_Utility_PVT.debug_message(l_full_name||': end');
913: END IF;
914: EXCEPTION
915: WHEN FND_API.g_exc_error THEN
916: x_return_status := FND_API.g_ret_sts_error;

Line 976: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');

972:
973: x_return_status := FND_API.g_ret_sts_success;
974:
975: IF OZF_DEBUG_HIGH_ON THEN
976: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
977: END IF;
978:
979: -- 1. Change Claim Status to Open.
980: -- Note: payment_reference_number is not set to null since this information is used to build

Line 986: user_status_id = ozf_utility_pvt.get_default_user_status( 'OZF_CLAIM_STATUS', 'OPEN'),

982: -- information is not displayed.
983:
984: UPDATE ozf_claims
985: SET status_code = 'OPEN',
986: user_status_id = ozf_utility_pvt.get_default_user_status( 'OZF_CLAIM_STATUS', 'OPEN'),
987: amount_remaining = NVL(amount_remaining,0) + amount_settled,
988: acctd_amount_remaining = NVL(acctd_amount_remaining,0)+acctd_amount_settled,
989: amount_settled = 0,
990: acctd_amount_settled = 0,

Line 1073: ozf_utility_pvt.send_wf_standalone_message(

1069: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1070: l_notif_body := substrb(fnd_message.get, 1, 4000);
1071:
1072:
1073: ozf_utility_pvt.send_wf_standalone_message(
1074: p_subject => l_notif_subject
1075: , p_body => l_notif_body
1076: , p_send_to_res_id => l_claim_rec.owner_id
1077: , x_notif_id => l_notif_id

Line 1129: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');

1125: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Reopened. ');
1126: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
1127:
1128: IF OZF_DEBUG_HIGH_ON THEN
1129: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
1130: END IF;
1131:
1132: EXCEPTION
1133: WHEN FND_API.G_EXC_ERROR THEN

Line 1243: OZF_Utility_PVT.debug_message(l_full_name||': start');

1239: BEGIN
1240: x_return_status := FND_API.g_ret_sts_success;
1241:
1242: IF OZF_DEBUG_HIGH_ON THEN
1243: OZF_Utility_PVT.debug_message(l_full_name||': start');
1244: END IF;
1245:
1246: OPEN csr_get_claim_details(p_claim_id);
1247: FETCH csr_get_claim_details INTO l_payment_method;

Line 1298: OZF_Utility_PVT.debug_message(l_full_name||': end');

1294: x_settlement_doc_tbl.DELETE(l_counter); -- Last Record has junk
1295: END IF;
1296:
1297: IF OZF_DEBUG_HIGH_ON THEN
1298: OZF_Utility_PVT.debug_message(l_full_name||': end');
1299: END IF;
1300:
1301:
1302: EXCEPTION

Line 1731: OZF_Utility_PVT.debug_message(l_full_name||': start');

1727: x_return_status := FND_API.g_ret_sts_success;
1728:
1729: --------------------- start -----------------------
1730: IF OZF_DEBUG_HIGH_ON THEN
1731: OZF_Utility_PVT.debug_message(l_full_name||': start');
1732: END IF;
1733:
1734:
1735: l_claim_rec.claim_id := p_claim_id;

Line 1817: OZF_Utility_PVT.debug_message('Original Fund Paid Amount = '||l_fund_rec.paid_amt);

1813: , l_exc_date;
1814: CLOSE csr_fund_rec;
1815:
1816: IF OZF_DEBUG_HIGH_ON THEN
1817: OZF_Utility_PVT.debug_message('Original Fund Paid Amount = '||l_fund_rec.paid_amt);
1818: END IF;
1819:
1820:
1821: IF l_fund_currency = l_function_currency THEN

Line 1825: OZF_UTILITY_PVT.Convert_Currency(

1821: IF l_fund_currency = l_function_currency THEN
1822: l_fund_curr_paid_amt := l_acctd_paid_amt;
1823: ELSE
1824: -- Currency Conversion: Utilized Acctd Amount --> Fund Paid Amount
1825: OZF_UTILITY_PVT.Convert_Currency(
1826: x_return_status => l_return_status
1827: ,p_from_currency => l_function_currency
1828: ,p_to_currency => l_fund_currency
1829: ,p_conv_date => SYSDATE

Line 1845: OZF_Utility_PVT.debug_message('Updated Fund Paid Amount = '||l_fund_rec.paid_amt);

1841: l_fund_rec.paid_amt := NVL(l_fund_rec.paid_amt, 0) + l_fund_curr_paid_amt;
1842: END IF;
1843:
1844: IF OZF_DEBUG_HIGH_ON THEN
1845: OZF_Utility_PVT.debug_message('Updated Fund Paid Amount = '||l_fund_rec.paid_amt);
1846: END IF;
1847:
1848: -- Update Fund with paid_amt
1849: OZF_Funds_PVT.Update_Fund(

Line 2048: OZF_Utility_PVT.debug_message(l_full_name||': end');

2044: p_data => x_msg_data
2045: );
2046:
2047: IF OZF_DEBUG_HIGH_ON THEN
2048: OZF_Utility_PVT.debug_message(l_full_name||': end');
2049: END IF;
2050:
2051: EXCEPTION
2052: WHEN FND_API.G_EXC_ERROR THEN

Line 2113: OZF_Utility_PVT.debug_message(l_full_name||' : start');

2109: l_claim_rec OZF_CLAIM_PVT.claim_rec_type ;
2110:
2111: BEGIN
2112: IF OZF_DEBUG_HIGH_ON THEN
2113: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2114: END IF;
2115:
2116: x_return_status := FND_API.g_ret_sts_success;
2117:

Line 2122: OZF_Utility_PVT.debug_message(l_full_name||' : Create Split Claim');

2118: /*----------------------------*
2119: | Create Split
2120: *----------------------------*/
2121: IF OZF_DEBUG_HIGH_ON THEN
2122: OZF_Utility_PVT.debug_message(l_full_name||' : Create Split Claim');
2123: END IF;
2124:
2125: l_child_claim_tbl(1).claim_type_id := p_claim_rec.claim_type_id;
2126: l_child_claim_tbl(1).amount := p_difference_amount;

Line 2176: OZF_Utility_PVT.debug_message(l_full_name||' : end');

2172:
2173:
2174:
2175: IF OZF_DEBUG_HIGH_ON THEN
2176: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2177: END IF;
2178: EXCEPTION
2179: WHEN FND_API.G_EXC_ERROR THEN
2180: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2246: OZF_Utility_PVT.debug_message(l_full_name||' : start');

2242: AND adj.adjustment_id = cv_adjust_id;
2243:
2244: BEGIN
2245: IF OZF_DEBUG_HIGH_ON THEN
2246: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2247: END IF;
2248:
2249: x_return_status := FND_API.g_ret_sts_success;
2250:

Line 2268: OZF_Utility_PVT.debug_message(l_full_name||' : Create Claim Line :: claim_currency_amount='||p_difference_amount);

2264: /*----------------------------*
2265: | Create Claim Line with write_off amount
2266: *----------------------------*/
2267: IF OZF_DEBUG_HIGH_ON THEN
2268: OZF_Utility_PVT.debug_message(l_full_name||' : Create Claim Line :: claim_currency_amount='||p_difference_amount);
2269: END IF;
2270: l_claim_line_rec.claim_id := p_claim_rec.claim_id;
2271: l_claim_line_rec.claim_currency_amount := p_difference_amount;
2272: l_claim_line_rec.item_description := 'Write Off';

Line 2298: OZF_Utility_PVT.debug_message(l_full_name||' : Create AR Write Off');

2294: | 1. Create Write off
2295: | 2. Update Invoice Dispute Amount if source deduction
2296: *----------------------------*/
2297: IF OZF_DEBUG_HIGH_ON THEN
2298: OZF_Utility_PVT.debug_message(l_full_name||' : Create AR Write Off');
2299: END IF;
2300: OZF_AR_PAYMENT_PVT.Create_AR_Write_Off(
2301: p_claim_rec => p_claim_rec
2302: ,p_deduction_type => p_deduction_type

Line 2337: OZF_Utility_PVT.debug_message(l_full_name||' : end');

2333:
2334: x_claim_object_version := l_claim_object_version;
2335:
2336: IF OZF_DEBUG_HIGH_ON THEN
2337: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2338: END IF;
2339: EXCEPTION
2340: WHEN FND_API.G_EXC_ERROR THEN
2341: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2428: OZF_Utility_PVT.debug_message(l_full_name||' : start');

2424:
2425:
2426: BEGIN
2427: IF OZF_DEBUG_HIGH_ON THEN
2428: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2429: END IF;
2430: -- Initialize API return status to sucess
2431: x_return_status := FND_API.g_ret_sts_success;
2432:

Line 2668: OZF_UTILITY_PVT.write_conc_log;

2664: ,x_return_status => l_return_status
2665: );
2666: IF l_return_status = FND_API.g_ret_sts_error THEN
2667: l_inv_bal_error := TRUE;
2668: OZF_UTILITY_PVT.write_conc_log;
2669:
2670: --Raise exception to allow for rollback of split
2671: RAISE FND_API.g_exc_error;
2672: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

Line 2719: OZF_Utility_PVT.debug_message(l_full_name||' : end');

2715: FND_FILE.PUT_LINE(FND_FILE.LOG, p_claim_setl_rec.claim_number||' --> Success.');
2716: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||p_claim_setl_rec.claim_number||' -------------*/');
2717:
2718: IF OZF_DEBUG_HIGH_ON THEN
2719: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2720: END IF;
2721: EXCEPTION
2722: WHEN FND_API.G_EXC_ERROR THEN
2723: x_return_status := FND_API.G_RET_STS_ERROR;

Line 2935: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');

2931: x_return_status := FND_API.g_ret_sts_success;
2932:
2933: --------------------- start -----------------------
2934: IF OZF_DEBUG_HIGH_ON THEN
2935: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
2936: END IF;
2937:
2938: IF p_payment_method = 'RMA' OR
2939: p_payment_method IS NULL THEN

Line 3134: OZF_UTILITY_PVT.write_conc_log;

3130: EXCEPTION
3131: WHEN FND_API.G_EXC_ERROR THEN
3132: ROLLBACK TO RMA_CR_FETCH;
3133: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3134: OZF_UTILITY_PVT.write_conc_log;
3135: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3136:
3137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3138: ROLLBACK TO RMA_CR_FETCH;

Line 3140: OZF_UTILITY_PVT.write_conc_log;

3136:
3137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3138: ROLLBACK TO RMA_CR_FETCH;
3139: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3140: OZF_UTILITY_PVT.write_conc_log;
3141: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3142:
3143: WHEN OTHERS THEN
3144: ROLLBACK TO RMA_CR_FETCH;

Line 3146: OZF_UTILITY_PVT.write_conc_log;

3142:
3143: WHEN OTHERS THEN
3144: ROLLBACK TO RMA_CR_FETCH;
3145: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3146: OZF_UTILITY_PVT.write_conc_log;
3147: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3148:
3149: END;
3150: END LOOP;

Line 3284: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');

3280: EXCEPTION
3281: WHEN FND_API.G_EXC_ERROR THEN
3282: ROLLBACK TO RMA_SETL;
3283: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3284: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3285: OZF_UTILITY_PVT.write_conc_log;
3286: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3288: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3285: OZF_UTILITY_PVT.write_conc_log;

3281: WHEN FND_API.G_EXC_ERROR THEN
3282: ROLLBACK TO RMA_SETL;
3283: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3284: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3285: OZF_UTILITY_PVT.write_conc_log;
3286: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3287: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3288: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
3289: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 3295: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');

3291:
3292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3293: ROLLBACK TO RMA_SETL;
3294: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3295: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3296: OZF_UTILITY_PVT.write_conc_log;
3297: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3298: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3299: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3296: OZF_UTILITY_PVT.write_conc_log;

3292: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3293: ROLLBACK TO RMA_SETL;
3294: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3295: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3296: OZF_UTILITY_PVT.write_conc_log;
3297: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3298: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3299: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
3300: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 3306: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');

3302:
3303: WHEN OTHERS THEN
3304: ROLLBACK TO RMA_SETL;
3305: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3306: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3307: OZF_UTILITY_PVT.write_conc_log;
3308: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3309: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3310: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);

Line 3307: OZF_UTILITY_PVT.write_conc_log;

3303: WHEN OTHERS THEN
3304: ROLLBACK TO RMA_SETL;
3305: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3306: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3307: OZF_UTILITY_PVT.write_conc_log;
3308: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3309: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3310: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);
3311: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 3325: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');

3321: IF FND_API.to_boolean(p_commit) THEN
3322: COMMIT;
3323: END IF;
3324: IF OZF_DEBUG_HIGH_ON THEN
3325: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
3326: END IF;
3327: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for RMA Settlement : ' || l_successful_claims);
3328: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for RMA Settlement : ' || l_failed_claims);
3329: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims reopened for RMA Settlement : ' || l_reopened_claims);

Line 3458: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');

3454: x_return_status := FND_API.g_ret_sts_success;
3455:
3456: --------------------- start -----------------------
3457: IF OZF_DEBUG_HIGH_ON THEN
3458: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
3459: END IF;
3460:
3461: IF p_payment_method IS NULL THEN
3462: l_payment_method_tbl(1) := 'CREDIT_MEMO';

Line 3596: OZF_Utility_PVT.debug_message('Non-Invoice Deduction');

3592: IF l_claim_rec.source_object_class IS NULL AND
3593: l_claim_rec.source_object_id IS NULL THEN
3594: l_deduction_type := 'RECEIPT_DED';
3595: IF OZF_DEBUG_HIGH_ON THEN
3596: OZF_Utility_PVT.debug_message('Non-Invoice Deduction');
3597: END IF;
3598: ELSE
3599: l_deduction_type := 'SOURCE_DED';
3600: IF OZF_DEBUG_HIGH_ON THEN

Line 3601: OZF_Utility_PVT.debug_message('Invoice Deduction : invoice_id ='||l_claim_id_ver(i).source_object_id);

3597: END IF;
3598: ELSE
3599: l_deduction_type := 'SOURCE_DED';
3600: IF OZF_DEBUG_HIGH_ON THEN
3601: OZF_Utility_PVT.debug_message('Invoice Deduction : invoice_id ='||l_claim_id_ver(i).source_object_id);
3602: END IF;
3603: END IF;
3604: ELSIF l_claim_rec.claim_class = 'OVERPAYMENT' THEN
3605: IF l_claim_rec.source_object_class IS NULL AND

Line 3609: OZF_Utility_PVT.debug_message('Overpayment');

3605: IF l_claim_rec.source_object_class IS NULL AND
3606: l_claim_rec.source_object_id IS NULL THEN
3607: l_deduction_type := 'RECEIPT_OPM';
3608: IF OZF_DEBUG_HIGH_ON THEN
3609: OZF_Utility_PVT.debug_message('Overpayment');
3610: END IF;
3611: ELSE
3612: l_deduction_type := 'SOURCE_OPM';
3613: END IF;

Line 3804: OZF_UTILITY_PVT.write_conc_log;

3800: ,x_return_status => l_return_status
3801: );
3802: IF l_return_status = FND_API.g_ret_sts_error THEN
3803: l_inv_bal_error := TRUE;
3804: OZF_UTILITY_PVT.write_conc_log;
3805: --Raise exception to allow for rollback of split
3806: RAISE FND_API.g_exc_error;
3807: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3808: RAISE FND_API.g_exc_error;

Line 3919: OZF_UTILITY_PVT.write_conc_log;

3915: EXCEPTION
3916: WHEN FND_API.G_EXC_ERROR THEN
3917: ROLLBACK TO AR_SETTLEMENT;
3918: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
3919: OZF_UTILITY_PVT.write_conc_log;
3920: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
3921:
3922: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3923: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3931: OZF_UTILITY_PVT.write_conc_log;

3927:
3928: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3929: ROLLBACK TO AR_SETTLEMENT;
3930: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
3931: OZF_UTILITY_PVT.write_conc_log;
3932: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
3933:
3934: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3935: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3953: OZF_UTILITY_PVT.write_conc_log;

3949:
3950: WHEN OTHERS THEN
3951: ROLLBACK TO AR_SETTLEMENT;
3952: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
3953: OZF_UTILITY_PVT.write_conc_log;
3954: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
3955:
3956: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3957: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);

Line 3972: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');

3968: COMMIT;
3969: END IF;
3970:
3971: IF OZF_DEBUG_HIGH_ON THEN
3972: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
3973: END IF;
3974:
3975: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for AR Settlement : ' || l_successful_claims);
3976: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for AR Settlement : ' || l_failed_claims);

Line 4116: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');

4112: x_return_status := FND_API.g_ret_sts_success;
4113:
4114: --------------------- start -----------------------
4115: IF OZF_DEBUG_HIGH_ON THEN
4116: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
4117: END IF;
4118:
4119: IF p_payment_method IN ( 'CHECK','EFT','WIRE','AP_DEFAULT','AP_DEBIT') THEN
4120: l_payment_method_tbl(1) := p_payment_method;

Line 4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );

4316: IF l_settle_amount <> l_settlement_doc_tbl(j).settlement_amount OR
4317: l_settle_status <> l_settlement_doc_tbl(j).status_code
4318: THEN
4319: IF OZF_DEBUG_HIGH_ON THEN
4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');

Line 4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );

4317: l_settle_status <> l_settlement_doc_tbl(j).status_code
4318: THEN
4319: IF OZF_DEBUG_HIGH_ON THEN
4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4325: END IF;

Line 4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );

4318: THEN
4319: IF OZF_DEBUG_HIGH_ON THEN
4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4325: END IF;
4326: Update_Settlement_Doc(

Line 4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );

4319: IF OZF_DEBUG_HIGH_ON THEN
4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4325: END IF;
4326: Update_Settlement_Doc(
4327: p_api_version_number => 1.0,

Line 4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');

4320: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4321: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4322: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4323: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4324: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4325: END IF;
4326: Update_Settlement_Doc(
4327: p_api_version_number => 1.0,
4328: p_init_msg_list => FND_API.g_false,

Line 4487: OZF_UTILITY_PVT.write_conc_log;

4483: EXCEPTION
4484: WHEN FND_API.G_EXC_ERROR THEN
4485: ROLLBACK TO AP_SETTLEMENT;
4486: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4487: OZF_UTILITY_PVT.write_conc_log;
4488: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_id_ver(i).claim_number||' --------------*/');
4489: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4490: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
4491: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 4497: OZF_UTILITY_PVT.write_conc_log;

4493:
4494: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4495: ROLLBACK TO AP_SETTLEMENT;
4496: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4497: OZF_UTILITY_PVT.write_conc_log;
4498: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_id_ver(i).claim_number||' --------------*/');
4499: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4500: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
4501: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 4507: OZF_UTILITY_PVT.write_conc_log;

4503:
4504: WHEN OTHERS THEN
4505: ROLLBACK TO AP_SETTLEMENT;
4506: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4507: OZF_UTILITY_PVT.write_conc_log;
4508: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4509: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);
4510: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
4511: l_failed_claims := l_failed_claims + 1;

Line 4528: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');

4524: p_data => x_msg_data
4525: );
4526:
4527: IF OZF_DEBUG_HIGH_ON THEN
4528: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
4529: END IF;
4530: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for AP Settlement : ' || l_successful_claims);
4531: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for AP Settlement : ' || l_failed_claims);
4532: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims reopened for AP Settlement : ' || l_reopened_claims);

Line 4642: l_org_id OZF_UTILITY_PVT.operating_units_tbl;

4638: FROM hr_operating_units ou
4639: WHERE mo_global.check_access(ou.organization_id) = 'Y';
4640:
4641: m NUMBER := 0;
4642: l_org_id OZF_UTILITY_PVT.operating_units_tbl;
4643:
4644: BEGIN
4645: SAVEPOINT Populate_Settlement_Data;
4646:

Line 4744: --OZF_UTILITY_PVT.debug_message('== START: fetching AP settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS'));

4740: FND_FILE.PUT_LINE(FND_FILE.LOG, '===== END: fetching AR settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS')||' =======');
4741: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
4742: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Fetching for Account Payable Settlement : ');
4743: FND_FILE.PUT_LINE(FND_FILE.LOG, '===== START: fetching AP settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS')||' =====');
4744: --OZF_UTILITY_PVT.debug_message('== START: fetching AP settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS'));
4745: END IF;
4746:
4747: IF p_payment_method IS NULL OR p_payment_method IN ( 'CHECK','EFT','WIRE','AP_DEFAULT','AP_DEBIT') THEN
4748: Get_Payable_Settlement(

Line 4819: --OZF_UTILITY_PVT.write_conc_log;

4815: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
4816: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
4817: END IF;
4818:
4819: --OZF_UTILITY_PVT.write_conc_log;
4820: END LOOP;
4821: END IF;
4822:
4823: EXCEPTION

Line 4826: OZF_UTILITY_PVT.write_conc_log;

4822:
4823: EXCEPTION
4824: WHEN FND_API.g_exc_error THEN
4825: ROLLBACK TO Populate_Settlement_Data;
4826: OZF_UTILITY_PVT.write_conc_log;
4827: ERRBUF := l_msg_data;
4828: RETCODE := 2;
4829: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' || l_msg_data ||')');
4830: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

Line 4835: OZF_UTILITY_PVT.write_conc_log;

4831: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
4832:
4833: WHEN FND_API.g_exc_unexpected_error THEN
4834: ROLLBACK TO Populate_Settlement_Data;
4835: OZF_UTILITY_PVT.write_conc_log;
4836: ERRBUF := l_msg_data;
4837: RETCODE := 2;
4838: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' || l_msg_data ||')');
4839: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

Line 4844: OZF_UTILITY_PVT.write_conc_log;

4840: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
4841:
4842: WHEN OTHERS THEN
4843: ROLLBACK TO Populate_Settlement_Data;
4844: OZF_UTILITY_PVT.write_conc_log;
4845: ERRBUF := substr(sqlerrm, 1, 80);
4846: RETCODE := 2;
4847: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
4848: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

Line 4915: OZF_Utility_PVT.debug_message(l_full_name||': start');

4911: --------------------- initialize -----------------------
4912: SAVEPOINT Create_Settlement_Doc;
4913:
4914: IF OZF_DEBUG_HIGH_ON THEN
4915: OZF_Utility_PVT.debug_message(l_full_name||': start');
4916: END IF;
4917:
4918: IF FND_API.to_boolean(p_init_msg_list) THEN
4919: FND_MSG_PUB.initialize;

Line 4941: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_USER_PROFILE_MISSING');

4937:
4938: --------------------- validate -----------------------
4939: -- Validate Environment
4940: IF FND_GLOBAL.user_Id IS NULL THEN
4941: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_USER_PROFILE_MISSING');
4942: RAISE FND_API.G_EXC_ERROR;
4943: END IF;
4944:
4945: IF ( P_validation_level >= FND_API.g_valid_level_full) THEN

Line 4966: l_settlement_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_settlement_doc_rec.settlement_amount, l_claim_rec.currency_code);

4962: CLOSE csr_claim_currency;
4963:
4964: -------------------- Amount Rounding -----------------------
4965: IF l_settlement_doc_rec.settlement_amount IS NOT NULL THEN
4966: l_settlement_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_settlement_doc_rec.settlement_amount, l_claim_rec.currency_code);
4967: -- Calculate Accounted Amount
4968: OZF_UTILITY_PVT.Convert_Currency(
4969: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
4970: P_FROM_CURRENCY => l_claim_rec.currency_code,

Line 4968: OZF_UTILITY_PVT.Convert_Currency(

4964: -------------------- Amount Rounding -----------------------
4965: IF l_settlement_doc_rec.settlement_amount IS NOT NULL THEN
4966: l_settlement_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_settlement_doc_rec.settlement_amount, l_claim_rec.currency_code);
4967: -- Calculate Accounted Amount
4968: OZF_UTILITY_PVT.Convert_Currency(
4969: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
4970: P_FROM_CURRENCY => l_claim_rec.currency_code,
4971: P_CONVERSION_DATE => l_claim_rec.exchange_rate_date,
4972: P_CONVERSION_TYPE => l_claim_rec.exchange_rate_type,

Line 5086: OZF_Utility_PVT.debug_message(l_full_name ||': end');

5082: p_data => x_msg_data
5083: );
5084:
5085: IF OZF_DEBUG_HIGH_ON THEN
5086: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5087: END IF;
5088:
5089: EXCEPTION
5090: WHEN FND_API.g_exc_error THEN

Line 5180: OZF_Utility_PVT.debug_message(l_full_name||': start');

5176: -------------------- initialize -------------------------
5177: SAVEPOINT Update_Settlement_Doc;
5178:
5179: IF OZF_DEBUG_HIGH_ON THEN
5180: OZF_Utility_PVT.debug_message(l_full_name||': start');
5181: END IF;
5182:
5183: IF FND_API.to_boolean(p_init_msg_list) THEN
5184: FND_MSG_PUB.initialize;

Line 5269: l_complete_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_complete_doc_rec.settlement_amount, l_claim_rec.currency_code);

5265: CLOSE csr_claim_currency;
5266:
5267: -------------------- Amount Rounding -----------------------
5268: IF l_complete_doc_rec.settlement_amount IS NOT NULL THEN
5269: l_complete_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_complete_doc_rec.settlement_amount, l_claim_rec.currency_code);
5270: -- Calculate Accounted Amount
5271: OZF_UTILITY_PVT.Convert_Currency(
5272: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5273: P_FROM_CURRENCY => l_claim_rec.currency_code,

Line 5271: OZF_UTILITY_PVT.Convert_Currency(

5267: -------------------- Amount Rounding -----------------------
5268: IF l_complete_doc_rec.settlement_amount IS NOT NULL THEN
5269: l_complete_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_complete_doc_rec.settlement_amount, l_claim_rec.currency_code);
5270: -- Calculate Accounted Amount
5271: OZF_UTILITY_PVT.Convert_Currency(
5272: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5273: P_FROM_CURRENCY => l_claim_rec.currency_code,
5274: P_CONVERSION_DATE => l_claim_rec.exchange_rate_date,
5275: P_CONVERSION_TYPE => l_claim_rec.exchange_rate_type,

Line 5406: OZF_Utility_PVT.debug_message(l_full_name ||': end');

5402: p_data => x_msg_data
5403: );
5404:
5405: IF OZF_DEBUG_HIGH_ON THEN
5406: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5407: END IF;
5408:
5409: EXCEPTION
5410: WHEN FND_API.g_exc_error THEN

Line 5479: OZF_Utility_PVT.debug_message(l_full_name||': start');

5475: --------------------- initialize -----------------------
5476: SAVEPOINT Delete_Settlement_Doc;
5477:
5478: IF OZF_DEBUG_HIGH_ON THEN
5479: OZF_Utility_PVT.debug_message(l_full_name||': start');
5480: END IF;
5481:
5482: IF FND_API.to_boolean(p_init_msg_list) THEN
5483: FND_MSG_PUB.initialize;

Line 5504: OZF_Utility_PVT.debug_message(l_full_name ||': delete');

5500: CLOSE csr_settle_obj_ver;
5501:
5502: ------------------------ delete ------------------------
5503: IF OZF_DEBUG_HIGH_ON THEN
5504: OZF_Utility_PVT.debug_message(l_full_name ||': delete');
5505: END IF;
5506:
5507: IF p_object_version_number = l_object_version THEN
5508: BEGIN

Line 5553: OZF_Utility_PVT.debug_message(l_full_name ||': end');

5549: p_data => x_msg_data
5550: );
5551:
5552: IF OZF_DEBUG_HIGH_ON THEN
5553: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5554: END IF;
5555:
5556: EXCEPTION
5557: WHEN FND_API.g_exc_error THEN

Line 5626: OZF_Utility_PVT.debug_message(l_full_name||': start');

5622:
5623: BEGIN
5624: -------------------- initialize ------------------------
5625: IF OZF_DEBUG_HIGH_ON THEN
5626: OZF_Utility_PVT.debug_message(l_full_name||': start');
5627: END IF;
5628:
5629: IF FND_API.to_boolean(p_init_msg_list) THEN
5630: FND_MSG_PUB.initialize;

Line 5646: OZF_Utility_PVT.debug_message(l_full_name||': lock');

5642: x_return_status := FND_API.g_ret_sts_success;
5643:
5644: ------------------------ lock -------------------------
5645: IF OZF_DEBUG_HIGH_ON THEN
5646: OZF_Utility_PVT.debug_message(l_full_name||': lock');
5647: END IF;
5648:
5649: OPEN c_Settlement_Doc;
5650: FETCH c_Settlement_Doc INTO l_settlement_doc_id;

Line 5669: OZF_Utility_PVT.debug_message(l_full_name ||': end');

5665: p_data => x_msg_data
5666: );
5667:
5668: IF OZF_DEBUG_HIGH_ON THEN
5669: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5670: END IF;
5671:
5672: EXCEPTION
5673: WHEN OZF_Utility_PVT.resource_locked THEN

Line 5673: WHEN OZF_Utility_PVT.resource_locked THEN

5669: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5670: END IF;
5671:
5672: EXCEPTION
5673: WHEN OZF_Utility_PVT.resource_locked THEN
5674: x_return_status := FND_API.g_ret_sts_error;
5675: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5676: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED');
5677: FND_MSG_PUB.add;

Line 5735: l_valid_flag := OZF_Utility_PVT.check_uniqueness(

5731: BEGIN
5732: x_return_status := FND_API.g_ret_sts_success;
5733: /*
5734: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
5735: l_valid_flag := OZF_Utility_PVT.check_uniqueness(
5736: 'OZF_SETTLEMENT_DOCS_ALL',
5737: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||''''
5738: );
5739: ELSE

Line 5740: l_valid_flag := OZF_Utility_PVT.check_uniqueness(

5736: 'OZF_SETTLEMENT_DOCS_ALL',
5737: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||''''
5738: );
5739: ELSE
5740: l_valid_flag := OZF_Utility_PVT.check_uniqueness(
5741: 'OZF_SETTLEMENT_DOCS_ALL',
5742: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||
5743: ''' AND SETTLEMENT_DOC_ID <> ' || p_settlement_doc_rec.SETTLEMENT_DOC_ID
5744: );

Line 5748: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_SETTLEMENT_DOC_ID_DUPLICATE');

5744: );
5745: END IF;
5746:
5747: IF l_valid_flag = FND_API.g_false THEN
5748: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_SETTLEMENT_DOC_ID_DUPLICATE');
5749: x_return_status := FND_API.g_ret_sts_error;
5750: RETURN;
5751: END IF;
5752: */

Line 6377: OZF_Utility_PVT.debug_message(l_full_name||': start');

6373:
6374: BEGIN
6375: ----------------------- initialize --------------------
6376: IF OZF_DEBUG_HIGH_ON THEN
6377: OZF_Utility_PVT.debug_message(l_full_name||': start');
6378: END IF;
6379:
6380: IF FND_API.to_boolean(p_init_msg_list) THEN
6381: FND_MSG_PUB.initialize;

Line 6431: OZF_Utility_PVT.debug_message(l_full_name ||': end');

6427: p_data => x_msg_data
6428: );
6429:
6430: IF OZF_DEBUG_HIGH_ON THEN
6431: OZF_Utility_PVT.debug_message(l_full_name ||': end');
6432: END IF;
6433:
6434: EXCEPTION
6435: WHEN FND_API.g_exc_error THEN