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 128: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);

124: FETCH csr_claim_class INTO l_claim_class;
125: CLOSE csr_claim_class;
126:
127: IF OZF_DEBUG_HIGH_ON THEN
128: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
129: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);
130: OZF_Utility_PVT.debug_message('p_settlement_type_id:' || p_settlement_type_id);
131: END IF;
132:

Line 129: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);

125: CLOSE csr_claim_class;
126:
127: IF OZF_DEBUG_HIGH_ON THEN
128: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
129: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);
130: OZF_Utility_PVT.debug_message('p_settlement_type_id:' || p_settlement_type_id);
131: END IF;
132:
133: IF (p_payment_method NOT IN ('CHECK','AP_DEBIT','AP_DEFAULT', 'WIRE', 'EFT') AND p_payment_method IS NOT NULL) THEN

Line 130: OZF_Utility_PVT.debug_message('p_settlement_type_id:' || p_settlement_type_id);

126:
127: IF OZF_DEBUG_HIGH_ON THEN
128: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
129: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);
130: OZF_Utility_PVT.debug_message('p_settlement_type_id:' || p_settlement_type_id);
131: END IF;
132:
133: IF (p_payment_method NOT IN ('CHECK','AP_DEBIT','AP_DEFAULT', 'WIRE', 'EFT') AND p_payment_method IS NOT NULL) THEN
134:

Line 173: OZF_Utility_PVT.debug_message('x_settlement_type:' || x_settlement_type);

169: COMMIT;
170: END IF;
171:
172: IF OZF_DEBUG_HIGH_ON THEN
173: OZF_Utility_PVT.debug_message('x_settlement_type:' || x_settlement_type);
174: OZF_Utility_PVT.debug_message(l_full_name||': end');
175: END IF;
176:
177: EXCEPTION

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

170: END IF;
171:
172: IF OZF_DEBUG_HIGH_ON THEN
173: OZF_Utility_PVT.debug_message('x_settlement_type:' || x_settlement_type);
174: OZF_Utility_PVT.debug_message(l_full_name||': end');
175: END IF;
176:
177: EXCEPTION
178: WHEN FND_API.g_exc_error THEN

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

447:
448: BEGIN
449: -------------------- initialize -----------------------
450: IF OZF_DEBUG_HIGH_ON THEN
451: OZF_Utility_PVT.debug_message(l_full_name||': start');
452: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);
453:
454: END IF;
455:

Line 452: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);

448: BEGIN
449: -------------------- initialize -----------------------
450: IF OZF_DEBUG_HIGH_ON THEN
451: OZF_Utility_PVT.debug_message(l_full_name||': start');
452: OZF_Utility_PVT.debug_message('p_payment_method:' || p_payment_method);
453:
454: END IF;
455:
456: x_return_status := FND_API.g_ret_sts_success;

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

467: IF p_payment_method = 'REG_CREDIT_MEMO' THEN
468: IF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED', 'CLAIM') THEN
469: IF p_customer_trx_id IS NOT NULL THEN
470: IF OZF_DEBUG_HIGH_ON THEN
471: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_credit');
472: END IF;
473: OPEN csr_invoice_credit(p_customer_trx_id);
474: LOOP
475: FETCH csr_invoice_credit INTO l_settlement_doc_tbl(l_counter).settlement_id

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

521: ELSIF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED') THEN
522: IF p_cash_receipt_id IS NOT NULL AND
523: p_customer_trx_id IS NOT NULL THEN
524: IF OZF_DEBUG_HIGH_ON THEN
525: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');
526: END IF;
527: OPEN csr_receipt_apply(p_cash_receipt_id, p_customer_trx_id);
528: FETCH csr_receipt_apply INTO l_settlement_doc_tbl(1).settlement_id
529: , l_settlement_doc_tbl(1).settlement_type_id

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

564: ELSIF p_payment_method = 'ON_ACCT_CREDIT' THEN
565: IF p_deduction_type = 'RECEIPT_OPM' THEN
566: IF p_cash_receipt_id IS NOT NULL THEN
567: IF OZF_DEBUG_HIGH_ON THEN
568: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_account_credit');
569: END IF;
570: OPEN csr_on_account_credit(p_cash_receipt_id);
571: FETCH csr_on_account_credit INTO l_settlement_doc_tbl(1).settlement_id
572: , l_settlement_doc_tbl(1).settlement_type_id

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

601: -- ---------------
602: ELSIF p_payment_method = 'ACCOUNTING_ONLY' THEN
603: IF p_deduction_type = 'CLAIM' THEN
604: IF OZF_DEBUG_HIGH_ON THEN
605: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_on_acct_only');
606: END IF;
607: OPEN csr_on_acct_only(p_claim_id);
608: FETCH csr_on_acct_only INTO l_settlement_doc_tbl(1).payment_method
609: ,l_settlement_doc_tbl(1).settlement_amount;

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

629: ELSIF p_payment_method = 'CHARGEBACK' THEN
630: IF p_deduction_type IN ('SOURCE_DED', 'RECEIPT_DED') THEN
631: IF p_customer_trx_id IS NOT NULL THEN
632: IF OZF_DEBUG_HIGH_ON THEN
633: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_chargeback');
634: END IF;
635: OPEN csr_chargeback(p_customer_trx_id);
636: FETCH csr_chargeback INTO l_settlement_doc_tbl(1).settlement_id
637: , l_settlement_doc_tbl(1).settlement_type_id

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

667: -- Added for ER#14109799
668: IF p_deduction_type IN ('SOURCE_DED','SOURCE_OPM') THEN
669: IF p_adjust_id IS NOT NULL THEN
670: IF OZF_DEBUG_HIGH_ON THEN
671: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_invoice_writeoff');
672: END IF;
673: OPEN csr_invoice_writeoff(p_adjust_id);
674: FETCH csr_invoice_writeoff INTO l_settlement_doc_tbl(1).settlement_id
675: , l_settlement_doc_tbl(1).settlement_type_id

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

693: END IF;
694: ELSIF p_deduction_type IN ('RECEIPT_OPM', 'RECEIPT_DED') THEN
695: IF p_cash_receipt_id IS NOT NULL THEN
696: IF OZF_DEBUG_HIGH_ON THEN
697: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_writeoff');
698: END IF;
699: OPEN csr_receipt_writeoff(p_cash_receipt_id);
700: FETCH csr_receipt_writeoff INTO l_settlement_doc_tbl(1).settlement_id
701: , l_settlement_doc_tbl(1).settlement_type_id

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

744: ELSIF p_deduction_type = 'RECEIPT_OPM' THEN
745: IF p_cash_receipt_id IS NOT NULL AND
746: p_customer_trx_id IS NOT NULL THEN
747: IF OZF_DEBUG_HIGH_ON THEN
748: OZF_Utility_PVT.debug_message(l_full_name||': open cursor::csr_receipt_apply');
749: END IF;
750: OPEN csr_receipt_apply(p_cash_receipt_id, p_customer_trx_id);
751: FETCH csr_receipt_apply INTO l_settlement_doc_tbl(1).settlement_id
752: , l_settlement_doc_tbl(1).settlement_type_id

Line 810: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);

806:
807: -- Added for Bug 14126231
808: IF l_settlement_doc_tbl.count > 0 THEN
809: FOR j IN l_settlement_doc_tbl.FIRST..l_settlement_doc_tbl.LAST LOOP
810: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
811: OZF_Utility_PVT.debug_message('l_settlement_doc_tbl(j).payment_method:' || l_settlement_doc_tbl(j).payment_method);
812:
813: OZF_SETTLEMENT_DOC_PVT.Get_Settlement_Trx_Type(
814: p_api_version_number => 1.0,

Line 811: OZF_Utility_PVT.debug_message('l_settlement_doc_tbl(j).payment_method:' || l_settlement_doc_tbl(j).payment_method);

807: -- Added for Bug 14126231
808: IF l_settlement_doc_tbl.count > 0 THEN
809: FOR j IN l_settlement_doc_tbl.FIRST..l_settlement_doc_tbl.LAST LOOP
810: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
811: OZF_Utility_PVT.debug_message('l_settlement_doc_tbl(j).payment_method:' || l_settlement_doc_tbl(j).payment_method);
812:
813: OZF_SETTLEMENT_DOC_PVT.Get_Settlement_Trx_Type(
814: p_api_version_number => 1.0,
815: p_init_msg_list => FND_API.G_FALSE,

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

888: END IF;
889: END IF; -- end if l_settlement_doc_tbl.count > 0
890:
891: IF OZF_DEBUG_HIGH_ON THEN
892: OZF_Utility_PVT.debug_message(l_full_name||': end');
893: END IF;
894: EXCEPTION
895: WHEN FND_API.g_exc_error THEN
896: x_return_status := FND_API.g_ret_sts_error;

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

946:
947: BEGIN
948: -------------------- initialize -----------------------
949: IF OZF_DEBUG_HIGH_ON THEN
950: OZF_Utility_PVT.debug_message(l_full_name||': start');
951: END IF;
952:
953: x_return_status := FND_API.g_ret_sts_success;
954:

Line 964: OZF_UTILITY_PVT.Convert_Currency(

960:
961: IF l_function_currency = p_claim_rec.currency_code THEN
962: l_acctd_amount_settled := p_claim_rec.amount_settled;
963: ELSE
964: OZF_UTILITY_PVT.Convert_Currency(
965: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
966: P_FROM_CURRENCY => p_claim_rec.currency_code,
967: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
968: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

Line 1009: OZF_UTILITY_PVT.Convert_Currency(

1005:
1006: IF l_function_currency = p_claim_rec.currency_code THEN
1007: l_acctd_amount_remaining := l_amount_remaining;
1008: ELSE
1009: OZF_UTILITY_PVT.Convert_Currency(
1010: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
1011: P_FROM_CURRENCY => p_claim_rec.currency_code,
1012: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
1013: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

Line 1031: OZF_UTILITY_PVT.Convert_Currency(

1027: -- Bug3805485: Tax Accounted Amount Calculation
1028: IF l_function_currency = p_claim_rec.currency_code THEN
1029: l_acctd_tax_amount := NVL(p_claim_rec.tax_amount,0);
1030: ELSE
1031: OZF_UTILITY_PVT.Convert_Currency(
1032: P_SET_OF_BOOKS_ID => p_claim_rec.set_of_books_id,
1033: P_FROM_CURRENCY => p_claim_rec.currency_code,
1034: P_CONVERSION_DATE => p_claim_rec.exchange_rate_date,
1035: P_CONVERSION_TYPE => p_claim_rec.exchange_rate_type,

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

1046: END IF;
1047: END IF;
1048:
1049: IF OZF_DEBUG_HIGH_ON THEN
1050: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);

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

1047: END IF;
1048:
1049: IF OZF_DEBUG_HIGH_ON THEN
1050: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
1055: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);

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

1048:
1049: IF OZF_DEBUG_HIGH_ON THEN
1050: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
1055: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
1056: END IF;

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

1049: IF OZF_DEBUG_HIGH_ON THEN
1050: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
1055: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
1056: END IF;
1057:

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

1050: OZF_Utility_PVT.debug_message('claim.amount_remaining = '||l_amount_remaining);
1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
1055: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
1056: END IF;
1057:
1058: BEGIN

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

1051: OZF_Utility_PVT.debug_message('claim.acctd_amount_remaining = '||l_acctd_amount_remaining);
1052: OZF_Utility_PVT.debug_message('claim.amount_settled = '||p_claim_rec.amount_settled);
1053: OZF_Utility_PVT.debug_message('claim.acctd_amount_settled = '||l_acctd_amount_settled);
1054: OZF_Utility_PVT.debug_message('claim.amount_adjusted = '||p_claim_rec.amount_adjusted);
1055: OZF_Utility_PVT.debug_message('claim.tax_amount = '||p_claim_rec.tax_amount);
1056: END IF;
1057:
1058: BEGIN
1059: UPDATE ozf_claims_all

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

1079: END;
1080:
1081:
1082: IF OZF_DEBUG_HIGH_ON THEN
1083: OZF_Utility_PVT.debug_message(l_full_name||': end');
1084: END IF;
1085: EXCEPTION
1086: WHEN FND_API.g_exc_error THEN
1087: x_return_status := FND_API.g_ret_sts_error;

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

1122:
1123: BEGIN
1124: -------------------- initialize -----------------------
1125: IF OZF_DEBUG_HIGH_ON THEN
1126: OZF_Utility_PVT.debug_message(l_full_name||': start');
1127: END IF;
1128:
1129: x_return_status := FND_API.g_ret_sts_success;
1130:

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

1143: RAISE FND_API.g_exc_unexpected_error;
1144: END;
1145:
1146: IF OZF_DEBUG_HIGH_ON THEN
1147: OZF_Utility_PVT.debug_message(l_full_name||': end');
1148: END IF;
1149: EXCEPTION
1150: WHEN FND_API.g_exc_error THEN
1151: x_return_status := FND_API.g_ret_sts_error;

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

1207:
1208: x_return_status := FND_API.g_ret_sts_success;
1209:
1210: IF OZF_DEBUG_HIGH_ON THEN
1211: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
1212: END IF;
1213:
1214: -- 1. Change Claim Status to Open.
1215: -- Note: payment_reference_number is not set to null since this information is used to build

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

1217: -- information is not displayed.
1218:
1219: UPDATE ozf_claims
1220: SET status_code = 'OPEN',
1221: user_status_id = ozf_utility_pvt.get_default_user_status( 'OZF_CLAIM_STATUS', 'OPEN'),
1222: amount_remaining = NVL(amount_remaining,0) + amount_settled,
1223: acctd_amount_remaining = NVL(acctd_amount_remaining,0)+acctd_amount_settled,
1224: amount_settled = 0,
1225: acctd_amount_settled = 0,

Line 1308: ozf_utility_pvt.send_wf_standalone_message(

1304: fnd_message.set_token('SETTLEMENT_METHOD_NAME',l_claim_rec.payment_method);
1305: l_notif_body := substrb(fnd_message.get, 1, 4000);
1306:
1307:
1308: ozf_utility_pvt.send_wf_standalone_message(
1309: p_subject => l_notif_subject
1310: , p_body => l_notif_body
1311: , p_send_to_res_id => l_claim_rec.owner_id
1312: , x_notif_id => l_notif_id

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

1375: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Reopened. ');
1376: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
1377:
1378: IF OZF_DEBUG_HIGH_ON THEN
1379: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
1380: END IF;
1381:
1382: EXCEPTION
1383: WHEN FND_API.G_EXC_ERROR THEN

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

1502: BEGIN
1503: x_return_status := FND_API.g_ret_sts_success;
1504:
1505: IF OZF_DEBUG_HIGH_ON THEN
1506: OZF_Utility_PVT.debug_message(l_full_name||': start');
1507: END IF;
1508:
1509:
1510: OPEN csr_get_claim_details(p_claim_id);

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

1570: x_settlement_doc_tbl.DELETE(l_counter); -- Last Record has junk
1571: END IF;
1572:
1573: IF OZF_DEBUG_HIGH_ON THEN
1574: OZF_Utility_PVT.debug_message(l_full_name||': end');
1575: END IF;
1576:
1577:
1578: EXCEPTION

Line 1743: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);

1739: IF x_settlement_doc_tbl.count > 0 THEN
1740: FOR j IN x_settlement_doc_tbl.FIRST..x_settlement_doc_tbl.LAST LOOP
1741:
1742: IF OZF_DEBUG_HIGH_ON THEN
1743: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
1744: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).payment_method:' || x_settlement_doc_tbl(j).payment_method);
1745: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type_id:' || x_settlement_doc_tbl(j).settlement_type_id);
1746: END IF;
1747:

Line 1744: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).payment_method:' || x_settlement_doc_tbl(j).payment_method);

1740: FOR j IN x_settlement_doc_tbl.FIRST..x_settlement_doc_tbl.LAST LOOP
1741:
1742: IF OZF_DEBUG_HIGH_ON THEN
1743: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
1744: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).payment_method:' || x_settlement_doc_tbl(j).payment_method);
1745: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type_id:' || x_settlement_doc_tbl(j).settlement_type_id);
1746: END IF;
1747:
1748: OZF_SETTLEMENT_DOC_PVT.Get_Settlement_Trx_Type(

Line 1745: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type_id:' || x_settlement_doc_tbl(j).settlement_type_id);

1741:
1742: IF OZF_DEBUG_HIGH_ON THEN
1743: OZF_Utility_PVT.debug_message('l_claim_class:' || l_claim_class);
1744: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).payment_method:' || x_settlement_doc_tbl(j).payment_method);
1745: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type_id:' || x_settlement_doc_tbl(j).settlement_type_id);
1746: END IF;
1747:
1748: OZF_SETTLEMENT_DOC_PVT.Get_Settlement_Trx_Type(
1749: p_api_version_number => 1.0,

Line 1759: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type:' || x_settlement_doc_tbl(j).settlement_type);

1755: p_settlement_type_id => x_settlement_doc_tbl(j).settlement_type_id,
1756: x_settlement_type => x_settlement_doc_tbl(j).settlement_type,
1757: x_return_status => x_return_status
1758: );
1759: OZF_Utility_PVT.debug_message('x_settlement_doc_tbl(j).settlement_type:' || x_settlement_doc_tbl(j).settlement_type);
1760: IF x_return_status = FND_API.g_ret_sts_error THEN
1761: RAISE FND_API.g_exc_error;
1762: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
1763: RAISE FND_API.g_exc_unexpected_error;

Line 1773: OZF_Utility_PVT.debug_message('SQLERRM:'|| SQLERRM);

1769: -- x_settlement_doc_tbl.DELETE(l_counter); -- Last Record has junk
1770:
1771: EXCEPTION
1772: WHEN OTHERS THEN
1773: OZF_Utility_PVT.debug_message('SQLERRM:'|| SQLERRM);
1774: x_return_status := FND_API.g_ret_sts_unexp_error;
1775: IF OZF_DEBUG_LOW_ON THEN
1776: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1777: FND_MESSAGE.Set_Token('TEXT','Get_AR_Rec : Error');

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

2098: x_return_status := FND_API.g_ret_sts_success;
2099:
2100: --------------------- start -----------------------
2101: IF OZF_DEBUG_HIGH_ON THEN
2102: OZF_Utility_PVT.debug_message(l_full_name||': start');
2103: END IF;
2104:
2105:
2106: l_claim_rec.claim_id := p_claim_id;

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

2187: , l_fund_rec.paid_amt;
2188: CLOSE csr_fund_rec;
2189:
2190: IF OZF_DEBUG_HIGH_ON THEN
2191: OZF_Utility_PVT.debug_message('Original Fund Paid Amount = '||l_fund_rec.paid_amt);
2192: END IF;
2193:
2194:
2195:

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

2197: l_fund_rec.paid_amt := NVL(l_fund_rec.paid_amt, 0) + l_fund_curr_paid_amt;
2198: END IF;
2199:
2200: IF OZF_DEBUG_HIGH_ON THEN
2201: OZF_Utility_PVT.debug_message('Updated Fund Paid Amount = '||l_fund_rec.paid_amt);
2202: END IF;
2203:
2204: -- Update Fund with paid_amt
2205: OZF_Funds_PVT.Update_Fund(

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

2516: p_data => x_msg_data
2517: );
2518:
2519: IF OZF_DEBUG_HIGH_ON THEN
2520: OZF_Utility_PVT.debug_message(l_full_name||': end');
2521: END IF;
2522:
2523: EXCEPTION
2524: WHEN FND_API.G_EXC_ERROR THEN

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

2581: l_claim_rec OZF_CLAIM_PVT.claim_rec_type ;
2582:
2583: BEGIN
2584: IF OZF_DEBUG_HIGH_ON THEN
2585: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2586: END IF;
2587:
2588: x_return_status := FND_API.g_ret_sts_success;
2589:

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

2590: /*----------------------------*
2591: | Create Split
2592: *----------------------------*/
2593: IF OZF_DEBUG_HIGH_ON THEN
2594: OZF_Utility_PVT.debug_message(l_full_name||' : Create Split Claim');
2595: END IF;
2596:
2597: l_child_claim_tbl(1).claim_type_id := p_claim_rec.claim_type_id;
2598: l_child_claim_tbl(1).amount := p_difference_amount;

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

2644:
2645:
2646:
2647: IF OZF_DEBUG_HIGH_ON THEN
2648: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2649: END IF;
2650: EXCEPTION
2651: WHEN FND_API.G_EXC_ERROR THEN
2652: x_return_status := FND_API.G_RET_STS_ERROR;

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

2714: AND adj.adjustment_id = cv_adjust_id;
2715:
2716: BEGIN
2717: IF OZF_DEBUG_HIGH_ON THEN
2718: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2719: END IF;
2720:
2721: x_return_status := FND_API.g_ret_sts_success;
2722:

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

2736: /*----------------------------*
2737: | Create Claim Line with write_off amount
2738: *----------------------------*/
2739: IF OZF_DEBUG_HIGH_ON THEN
2740: OZF_Utility_PVT.debug_message(l_full_name||' : Create Claim Line :: claim_currency_amount='||p_difference_amount);
2741: END IF;
2742: l_claim_line_rec.claim_id := p_claim_rec.claim_id;
2743: l_claim_line_rec.claim_currency_amount := p_difference_amount;
2744: l_claim_line_rec.item_description := 'Write Off';

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

2766: | 1. Create Write off
2767: | 2. Update Invoice Dispute Amount if source deduction
2768: *----------------------------*/
2769: IF OZF_DEBUG_HIGH_ON THEN
2770: OZF_Utility_PVT.debug_message(l_full_name||' : Create AR Write Off');
2771: END IF;
2772: OZF_AR_PAYMENT_PVT.Create_AR_Write_Off(
2773: p_claim_rec => p_claim_rec
2774: ,p_deduction_type => p_deduction_type

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

2805:
2806: x_claim_object_version := l_claim_object_version;
2807:
2808: IF OZF_DEBUG_HIGH_ON THEN
2809: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2810: END IF;
2811: EXCEPTION
2812: WHEN FND_API.G_EXC_ERROR THEN
2813: x_return_status := FND_API.G_RET_STS_ERROR;

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

2896:
2897:
2898: BEGIN
2899: IF OZF_DEBUG_HIGH_ON THEN
2900: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2901: END IF;
2902: -- Initialize API return status to sucess
2903: x_return_status := FND_API.g_ret_sts_success;
2904:

Line 3140: OZF_UTILITY_PVT.write_conc_log;

3136: ,x_return_status => l_return_status
3137: );
3138: IF l_return_status = FND_API.g_ret_sts_error THEN
3139: l_inv_bal_error := TRUE;
3140: OZF_UTILITY_PVT.write_conc_log;
3141:
3142: --Raise exception to allow for rollback of split
3143: RAISE FND_API.g_exc_error;
3144: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

3187: FND_FILE.PUT_LINE(FND_FILE.LOG, p_claim_setl_rec.claim_number||' --> Success.');
3188: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||p_claim_setl_rec.claim_number||' -------------*/');
3189:
3190: IF OZF_DEBUG_HIGH_ON THEN
3191: OZF_Utility_PVT.debug_message(l_full_name||' : end');
3192: END IF;
3193: EXCEPTION
3194: WHEN FND_API.G_EXC_ERROR THEN
3195: x_return_status := FND_API.G_RET_STS_ERROR;

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

3403: x_return_status := FND_API.g_ret_sts_success;
3404:
3405: --------------------- start -----------------------
3406: IF OZF_DEBUG_HIGH_ON THEN
3407: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
3408: END IF;
3409:
3410: IF p_payment_method = 'RMA' OR
3411: p_payment_method IS NULL THEN

Line 3606: OZF_UTILITY_PVT.write_conc_log;

3602: EXCEPTION
3603: WHEN FND_API.G_EXC_ERROR THEN
3604: ROLLBACK TO RMA_CR_FETCH;
3605: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3606: OZF_UTILITY_PVT.write_conc_log;
3607: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3608:
3609: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3610: ROLLBACK TO RMA_CR_FETCH;

Line 3612: OZF_UTILITY_PVT.write_conc_log;

3608:
3609: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3610: ROLLBACK TO RMA_CR_FETCH;
3611: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3612: OZF_UTILITY_PVT.write_conc_log;
3613: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3614:
3615: WHEN OTHERS THEN
3616: ROLLBACK TO RMA_CR_FETCH;

Line 3618: OZF_UTILITY_PVT.write_conc_log;

3614:
3615: WHEN OTHERS THEN
3616: ROLLBACK TO RMA_CR_FETCH;
3617: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_fetch(i).claim_number||' --> Failed in Fetch.');
3618: OZF_UTILITY_PVT.write_conc_log;
3619: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_fetch(i).claim_number||' --------------*/');
3620:
3621: END;
3622: END LOOP;

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

3752: EXCEPTION
3753: WHEN FND_API.G_EXC_ERROR THEN
3754: ROLLBACK TO RMA_SETL;
3755: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3756: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3757: OZF_UTILITY_PVT.write_conc_log;
3758: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3759: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3760: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3757: OZF_UTILITY_PVT.write_conc_log;

3753: WHEN FND_API.G_EXC_ERROR THEN
3754: ROLLBACK TO RMA_SETL;
3755: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3756: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3757: OZF_UTILITY_PVT.write_conc_log;
3758: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3759: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3760: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
3761: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

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

3763:
3764: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3765: ROLLBACK TO RMA_SETL;
3766: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3767: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3768: OZF_UTILITY_PVT.write_conc_log;
3769: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3770: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3771: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 3768: OZF_UTILITY_PVT.write_conc_log;

3764: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3765: ROLLBACK TO RMA_SETL;
3766: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3767: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3768: OZF_UTILITY_PVT.write_conc_log;
3769: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3770: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3771: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
3772: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

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

3774:
3775: WHEN OTHERS THEN
3776: ROLLBACK TO RMA_SETL;
3777: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3778: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3779: OZF_UTILITY_PVT.write_conc_log;
3780: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3781: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3782: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);

Line 3779: OZF_UTILITY_PVT.write_conc_log;

3775: WHEN OTHERS THEN
3776: ROLLBACK TO RMA_SETL;
3777: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_rma_setl(i).claim_number||' --> Failed in Settlement.');
3778: --OZF_UTILITY_PVT.debug_message(l_claim_rma_setl(i).claim_number||' --> Failed.');
3779: OZF_UTILITY_PVT.write_conc_log;
3780: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_rma_setl(i).claim_number||' --------------*/');
3781: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
3782: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);
3783: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

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

3793: IF FND_API.to_boolean(p_commit) THEN
3794: COMMIT;
3795: END IF;
3796: IF OZF_DEBUG_HIGH_ON THEN
3797: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
3798: END IF;
3799: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for RMA Settlement : ' || l_successful_claims);
3800: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for RMA Settlement : ' || l_failed_claims);
3801: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims reopened for RMA Settlement : ' || l_reopened_claims);

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

3926: x_return_status := FND_API.g_ret_sts_success;
3927:
3928: --------------------- start -----------------------
3929: IF OZF_DEBUG_HIGH_ON THEN
3930: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
3931: END IF;
3932:
3933: IF p_payment_method IS NULL THEN
3934: l_payment_method_tbl(1) := 'CREDIT_MEMO';

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

4064: IF l_claim_rec.source_object_class IS NULL AND
4065: l_claim_rec.source_object_id IS NULL THEN
4066: l_deduction_type := 'RECEIPT_DED';
4067: IF OZF_DEBUG_HIGH_ON THEN
4068: OZF_Utility_PVT.debug_message('Non-Invoice Deduction');
4069: END IF;
4070: ELSE
4071: l_deduction_type := 'SOURCE_DED';
4072: IF OZF_DEBUG_HIGH_ON THEN

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

4069: END IF;
4070: ELSE
4071: l_deduction_type := 'SOURCE_DED';
4072: IF OZF_DEBUG_HIGH_ON THEN
4073: OZF_Utility_PVT.debug_message('Invoice Deduction : invoice_id ='||l_claim_id_ver(i).source_object_id);
4074: END IF;
4075: END IF;
4076: ELSIF l_claim_rec.claim_class = 'OVERPAYMENT' THEN
4077: IF l_claim_rec.source_object_class IS NULL AND

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

4077: IF l_claim_rec.source_object_class IS NULL AND
4078: l_claim_rec.source_object_id IS NULL THEN
4079: l_deduction_type := 'RECEIPT_OPM';
4080: IF OZF_DEBUG_HIGH_ON THEN
4081: OZF_Utility_PVT.debug_message('Overpayment');
4082: END IF;
4083: ELSE
4084: l_deduction_type := 'SOURCE_OPM';
4085: END IF;

Line 4282: OZF_UTILITY_PVT.write_conc_log;

4278: ,x_return_status => l_return_status
4279: );
4280: IF l_return_status = FND_API.g_ret_sts_error THEN
4281: l_inv_bal_error := TRUE;
4282: OZF_UTILITY_PVT.write_conc_log;
4283: --Raise exception to allow for rollback of split
4284: RAISE FND_API.g_exc_error;
4285: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4286: RAISE FND_API.g_exc_error;

Line 4401: OZF_UTILITY_PVT.write_conc_log;

4397: EXCEPTION
4398: WHEN FND_API.G_EXC_ERROR THEN
4399: ROLLBACK TO AR_SETTLEMENT;
4400: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4401: OZF_UTILITY_PVT.write_conc_log;
4402: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
4403:
4404: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4405: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 4413: OZF_UTILITY_PVT.write_conc_log;

4409:
4410: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4411: ROLLBACK TO AR_SETTLEMENT;
4412: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4413: OZF_UTILITY_PVT.write_conc_log;
4414: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
4415:
4416: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4417: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));

Line 4435: OZF_UTILITY_PVT.write_conc_log;

4431:
4432: WHEN OTHERS THEN
4433: ROLLBACK TO AR_SETTLEMENT;
4434: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4435: OZF_UTILITY_PVT.write_conc_log;
4436: FND_FILE.PUT_LINE(FND_FILE.LOG, '---------------- '||l_claim_id_ver(i).claim_number||' ----------------');
4437:
4438: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4439: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);

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

4450: COMMIT;
4451: END IF;
4452:
4453: IF OZF_DEBUG_HIGH_ON THEN
4454: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
4455: END IF;
4456:
4457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for AR Settlement : ' || l_successful_claims);
4458: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for AR Settlement : ' || l_failed_claims);

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

4599: x_return_status := FND_API.g_ret_sts_success;
4600:
4601: --------------------- start -----------------------
4602: IF OZF_DEBUG_HIGH_ON THEN
4603: OZF_UTILITY_PVT.debug_message(l_full_name ||': start');
4604: END IF;
4605:
4606: IF p_payment_method IN ( 'CHECK','EFT','WIRE','AP_DEFAULT','AP_DEBIT') THEN
4607: l_payment_method_tbl(1) := p_payment_method;

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

4805: IF l_settle_amount <> l_settlement_doc_tbl(j).settlement_amount OR
4806: l_settle_status <> l_settlement_doc_tbl(j).status_code
4807: THEN
4808: IF OZF_DEBUG_HIGH_ON THEN
4809: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4810: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4811: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4812: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4813: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');

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

4806: l_settle_status <> l_settlement_doc_tbl(j).status_code
4807: THEN
4808: IF OZF_DEBUG_HIGH_ON THEN
4809: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4810: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4811: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4812: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4813: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4814: END IF;

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

4807: THEN
4808: IF OZF_DEBUG_HIGH_ON THEN
4809: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4810: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4811: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4812: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4813: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4814: END IF;
4815: Update_Settlement_Doc(

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

4808: IF OZF_DEBUG_HIGH_ON THEN
4809: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4810: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4811: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4812: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4813: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4814: END IF;
4815: Update_Settlement_Doc(
4816: p_api_version_number => 1.0,

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

4809: OZF_UTILITY_PVT.debug_message('New Status' || l_settlement_doc_tbl(j).status_code );
4810: OZF_UTILITY_PVT.debug_message('Old Status' || l_settle_status );
4811: OZF_UTILITY_PVT.debug_message('New Amount' || l_settlement_doc_tbl(j).settlement_amount );
4812: OZF_UTILITY_PVT.debug_message('Old Amount' || l_settle_amount );
4813: OZF_UTILITY_PVT.debug_message('Updating settlement doc ');
4814: END IF;
4815: Update_Settlement_Doc(
4816: p_api_version_number => 1.0,
4817: p_init_msg_list => FND_API.g_false,

Line 4976: OZF_UTILITY_PVT.write_conc_log;

4972: EXCEPTION
4973: WHEN FND_API.G_EXC_ERROR THEN
4974: ROLLBACK TO AP_SETTLEMENT;
4975: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4976: OZF_UTILITY_PVT.write_conc_log;
4977: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_id_ver(i).claim_number||' --------------*/');
4978: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4979: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
4980: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 4986: OZF_UTILITY_PVT.write_conc_log;

4982:
4983: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4984: ROLLBACK TO AP_SETTLEMENT;
4985: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4986: OZF_UTILITY_PVT.write_conc_log;
4987: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*-------------- '||l_claim_id_ver(i).claim_number||' --------------*/');
4988: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4989: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || FND_MSG_PUB.get(FND_MSG_PUB.Count_Msg, FND_API.g_false));
4990: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');

Line 4996: OZF_UTILITY_PVT.write_conc_log;

4992:
4993: WHEN OTHERS THEN
4994: ROLLBACK TO AP_SETTLEMENT;
4995: FND_FILE.PUT_LINE(FND_FILE.LOG, l_claim_id_ver(i).claim_number||' --> Failed.');
4996: OZF_UTILITY_PVT.write_conc_log;
4997: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Status : Failed.');
4998: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Error : ' || SQLCODE || ' : ' || SQLERRM);
4999: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
5000: l_failed_claims := l_failed_claims + 1;

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

5013: p_data => x_msg_data
5014: );
5015:
5016: IF OZF_DEBUG_HIGH_ON THEN
5017: OZF_UTILITY_PVT.debug_message(l_full_name ||': end');
5018: END IF;
5019: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims successfully fetched for AP Settlement : ' || l_successful_claims);
5020: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims failed to be fetched for AP Settlement : ' || l_failed_claims);
5021: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, ' Claims reopened for AP Settlement : ' || l_reopened_claims);

Line 5131: l_org_id OZF_UTILITY_PVT.operating_units_tbl;

5127: FROM hr_operating_units ou
5128: WHERE mo_global.check_access(ou.organization_id) = 'Y';
5129:
5130: m NUMBER := 0;
5131: l_org_id OZF_UTILITY_PVT.operating_units_tbl;
5132:
5133: BEGIN
5134: SAVEPOINT Populate_Settlement_Data;
5135:

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

5229: FND_FILE.PUT_LINE(FND_FILE.LOG, '===== END: fetching AR settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS')||' =======');
5230: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
5231: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Fetching for Account Payable Settlement : ');
5232: FND_FILE.PUT_LINE(FND_FILE.LOG, '===== START: fetching AP settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS')||' =====');
5233: --OZF_UTILITY_PVT.debug_message('== START: fetching AP settlement -- time stamp :: '||TO_CHAR(SYSDATE, 'MM-DD-YYYY HH24:MI:SS'));
5234: END IF;
5235:
5236: IF p_payment_method IS NULL OR p_payment_method IN ( 'CHECK','EFT','WIRE','AP_DEFAULT','AP_DEBIT') THEN
5237: Get_Payable_Settlement(

Line 5308: --OZF_UTILITY_PVT.write_conc_log;

5304: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));
5305: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
5306: END IF;
5307:
5308: --OZF_UTILITY_PVT.write_conc_log;
5309: END LOOP;
5310: END IF;
5311:
5312: EXCEPTION

Line 5315: OZF_UTILITY_PVT.write_conc_log;

5311:
5312: EXCEPTION
5313: WHEN FND_API.g_exc_error THEN
5314: ROLLBACK TO Populate_Settlement_Data;
5315: OZF_UTILITY_PVT.write_conc_log;
5316: ERRBUF := l_msg_data;
5317: RETCODE := 2;
5318: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' || l_msg_data ||')');
5319: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

Line 5324: OZF_UTILITY_PVT.write_conc_log;

5320: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
5321:
5322: WHEN FND_API.g_exc_unexpected_error THEN
5323: ROLLBACK TO Populate_Settlement_Data;
5324: OZF_UTILITY_PVT.write_conc_log;
5325: ERRBUF := l_msg_data;
5326: RETCODE := 2;
5327: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' || l_msg_data ||')');
5328: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

Line 5333: OZF_UTILITY_PVT.write_conc_log;

5329: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
5330:
5331: WHEN OTHERS THEN
5332: ROLLBACK TO Populate_Settlement_Data;
5333: OZF_UTILITY_PVT.write_conc_log;
5334: ERRBUF := substr(sqlerrm, 1, 80);
5335: RETCODE := 2;
5336: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Status: Failure (Error:' ||SQLCODE||SQLERRM || ')');
5337: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Execution Ends On: ' || to_char(sysdate,'MM-DD-YYYY HH24:MI:SS'));

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

5413: --------------------- initialize -----------------------
5414: SAVEPOINT Create_Settlement_Doc;
5415:
5416: IF OZF_DEBUG_HIGH_ON THEN
5417: OZF_Utility_PVT.debug_message(l_full_name||': start');
5418: END IF;
5419:
5420: IF FND_API.to_boolean(p_init_msg_list) THEN
5421: FND_MSG_PUB.initialize;

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

5439:
5440: --------------------- validate -----------------------
5441: -- Validate Environment
5442: IF FND_GLOBAL.user_Id IS NULL THEN
5443: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_USER_PROFILE_MISSING');
5444: RAISE FND_API.G_EXC_ERROR;
5445: END IF;
5446:
5447: IF ( P_validation_level >= FND_API.g_valid_level_full) THEN

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

5464: CLOSE csr_claim_currency;
5465:
5466: -------------------- Amount Rounding -----------------------
5467: IF l_settlement_doc_rec.settlement_amount IS NOT NULL THEN
5468: l_settlement_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_settlement_doc_rec.settlement_amount, l_claim_rec.currency_code);
5469: -- Calculate Accounted Amount
5470: OZF_UTILITY_PVT.Convert_Currency(
5471: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5472: P_FROM_CURRENCY => l_claim_rec.currency_code,

Line 5470: OZF_UTILITY_PVT.Convert_Currency(

5466: -------------------- Amount Rounding -----------------------
5467: IF l_settlement_doc_rec.settlement_amount IS NOT NULL THEN
5468: l_settlement_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_settlement_doc_rec.settlement_amount, l_claim_rec.currency_code);
5469: -- Calculate Accounted Amount
5470: OZF_UTILITY_PVT.Convert_Currency(
5471: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5472: P_FROM_CURRENCY => l_claim_rec.currency_code,
5473: P_CONVERSION_DATE => l_claim_rec.exchange_rate_date,
5474: P_CONVERSION_TYPE => l_claim_rec.exchange_rate_type,

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

5594: p_data => x_msg_data
5595: );
5596:
5597: IF OZF_DEBUG_HIGH_ON THEN
5598: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5599: END IF;
5600:
5601: EXCEPTION
5602: WHEN FND_API.g_exc_error THEN

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

5702: -------------------- initialize -------------------------
5703: SAVEPOINT Update_Settlement_Doc;
5704:
5705: IF OZF_DEBUG_HIGH_ON THEN
5706: OZF_Utility_PVT.debug_message(l_full_name||': start');
5707: END IF;
5708:
5709: IF FND_API.to_boolean(p_init_msg_list) THEN
5710: FND_MSG_PUB.initialize;

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

5791: CLOSE csr_claim_currency;
5792:
5793: -------------------- Amount Rounding -----------------------
5794: IF l_complete_doc_rec.settlement_amount IS NOT NULL THEN
5795: l_complete_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_complete_doc_rec.settlement_amount, l_claim_rec.currency_code);
5796: -- Calculate Accounted Amount
5797: OZF_UTILITY_PVT.Convert_Currency(
5798: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5799: P_FROM_CURRENCY => l_claim_rec.currency_code,

Line 5797: OZF_UTILITY_PVT.Convert_Currency(

5793: -------------------- Amount Rounding -----------------------
5794: IF l_complete_doc_rec.settlement_amount IS NOT NULL THEN
5795: l_complete_doc_rec.settlement_amount := OZF_UTILITY_PVT.CurrRound(l_complete_doc_rec.settlement_amount, l_claim_rec.currency_code);
5796: -- Calculate Accounted Amount
5797: OZF_UTILITY_PVT.Convert_Currency(
5798: P_SET_OF_BOOKS_ID => l_claim_rec.set_of_books_id,
5799: P_FROM_CURRENCY => l_claim_rec.currency_code,
5800: P_CONVERSION_DATE => l_claim_rec.exchange_rate_date,
5801: P_CONVERSION_TYPE => l_claim_rec.exchange_rate_type,

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

5940: p_data => x_msg_data
5941: );
5942:
5943: IF OZF_DEBUG_HIGH_ON THEN
5944: OZF_Utility_PVT.debug_message(l_full_name ||': end');
5945: END IF;
5946:
5947: EXCEPTION
5948: WHEN FND_API.g_exc_error THEN

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

6013: --------------------- initialize -----------------------
6014: SAVEPOINT Delete_Settlement_Doc;
6015:
6016: IF OZF_DEBUG_HIGH_ON THEN
6017: OZF_Utility_PVT.debug_message(l_full_name||': start');
6018: END IF;
6019:
6020: IF FND_API.to_boolean(p_init_msg_list) THEN
6021: FND_MSG_PUB.initialize;

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

6038: CLOSE csr_settle_obj_ver;
6039:
6040: ------------------------ delete ------------------------
6041: IF OZF_DEBUG_HIGH_ON THEN
6042: OZF_Utility_PVT.debug_message(l_full_name ||': delete');
6043: END IF;
6044:
6045: IF p_object_version_number = l_object_version THEN
6046: BEGIN

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

6087: p_data => x_msg_data
6088: );
6089:
6090: IF OZF_DEBUG_HIGH_ON THEN
6091: OZF_Utility_PVT.debug_message(l_full_name ||': end');
6092: END IF;
6093:
6094: EXCEPTION
6095: WHEN FND_API.g_exc_error THEN

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

6160:
6161: BEGIN
6162: -------------------- initialize ------------------------
6163: IF OZF_DEBUG_HIGH_ON THEN
6164: OZF_Utility_PVT.debug_message(l_full_name||': start');
6165: END IF;
6166:
6167: IF FND_API.to_boolean(p_init_msg_list) THEN
6168: FND_MSG_PUB.initialize;

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

6180: x_return_status := FND_API.g_ret_sts_success;
6181:
6182: ------------------------ lock -------------------------
6183: IF OZF_DEBUG_HIGH_ON THEN
6184: OZF_Utility_PVT.debug_message(l_full_name||': lock');
6185: END IF;
6186:
6187: OPEN c_Settlement_Doc;
6188: FETCH c_Settlement_Doc INTO l_settlement_doc_id;

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

6203: p_data => x_msg_data
6204: );
6205:
6206: IF OZF_DEBUG_HIGH_ON THEN
6207: OZF_Utility_PVT.debug_message(l_full_name ||': end');
6208: END IF;
6209:
6210: EXCEPTION
6211: WHEN OZF_Utility_PVT.resource_locked THEN

Line 6211: WHEN OZF_Utility_PVT.resource_locked THEN

6207: OZF_Utility_PVT.debug_message(l_full_name ||': end');
6208: END IF;
6209:
6210: EXCEPTION
6211: WHEN OZF_Utility_PVT.resource_locked THEN
6212: x_return_status := FND_API.g_ret_sts_error;
6213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6214: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED');
6215: FND_MSG_PUB.add;

Line 6273: l_valid_flag := OZF_Utility_PVT.check_uniqueness(

6269: BEGIN
6270: x_return_status := FND_API.g_ret_sts_success;
6271: /*
6272: IF p_validation_mode = JTF_PLSQL_API.g_create THEN
6273: l_valid_flag := OZF_Utility_PVT.check_uniqueness(
6274: 'OZF_SETTLEMENT_DOCS_ALL',
6275: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||''''
6276: );
6277: ELSE

Line 6278: l_valid_flag := OZF_Utility_PVT.check_uniqueness(

6274: 'OZF_SETTLEMENT_DOCS_ALL',
6275: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||''''
6276: );
6277: ELSE
6278: l_valid_flag := OZF_Utility_PVT.check_uniqueness(
6279: 'OZF_SETTLEMENT_DOCS_ALL',
6280: 'SETTLEMENT_DOC_ID = ''' || p_settlement_doc_rec.SETTLEMENT_DOC_ID ||
6281: ''' AND SETTLEMENT_DOC_ID <> ' || p_settlement_doc_rec.SETTLEMENT_DOC_ID
6282: );

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

6282: );
6283: END IF;
6284:
6285: IF l_valid_flag = FND_API.g_false THEN
6286: OZF_Utility_PVT.Error_Message(p_message_name => 'OZF_SETTLEMENT_DOC_ID_DUPLICATE');
6287: x_return_status := FND_API.g_ret_sts_error;
6288: RETURN;
6289: END IF;
6290: */

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

6911:
6912: BEGIN
6913: ----------------------- initialize --------------------
6914: IF OZF_DEBUG_HIGH_ON THEN
6915: OZF_Utility_PVT.debug_message(l_full_name||': start');
6916: END IF;
6917:
6918: IF FND_API.to_boolean(p_init_msg_list) THEN
6919: FND_MSG_PUB.initialize;

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

6965: p_data => x_msg_data
6966: );
6967:
6968: IF OZF_DEBUG_HIGH_ON THEN
6969: OZF_Utility_PVT.debug_message(l_full_name ||': end');
6970: END IF;
6971:
6972: EXCEPTION
6973: WHEN FND_API.g_exc_error THEN