[Home] [Help]
883: l_invoice_id NUMBER := NULL;
884: l_receipt_id NUMBER := NULL;
885: l_settle_amount NUMBER;
886: l_settlement_doc_id NUMBER;
887: l_settlement_doc_rec OZF_Settlement_Doc_PVT.settlement_doc_rec_type;
888: l_settlement_doc_tbl OZF_Settlement_Doc_PVT.settlement_doc_tbl_type;
889: l_err_msg VARCHAR2(2000);
890: l_do_fetch VARCHAR2(1) := 'N';
891: l_is_overpayment BOOLEAN := FALSE;
884: l_receipt_id NUMBER := NULL;
885: l_settle_amount NUMBER;
886: l_settlement_doc_id NUMBER;
887: l_settlement_doc_rec OZF_Settlement_Doc_PVT.settlement_doc_rec_type;
888: l_settlement_doc_tbl OZF_Settlement_Doc_PVT.settlement_doc_tbl_type;
889: l_err_msg VARCHAR2(2000);
890: l_do_fetch VARCHAR2(1) := 'N';
891: l_is_overpayment BOOLEAN := FALSE;
892: l_trx_attribute_name VARCHAR2(30);
1146: l_settlement_doc_rec.claim_id := l_claim_id;
1147:
1148: -- create ozf_setttlement_docs_all
1149: BEGIN
1150: OZF_Settlement_Doc_PVT.Create_Settlement_Doc(
1151: p_api_version_number => 1.0,
1152: p_init_msg_list => FND_API.g_false,
1153: p_commit => FND_API.g_false,
1154: p_validation_level => FND_API.g_valid_level_full,
1213: , l_settlement_doc_rec.object_version_number;
1214: CLOSE csr_del_settle_doc;
1215:
1216: BEGIN
1217: OZF_Settlement_Doc_PVT.Delete_Settlement_Doc(
1218: p_api_version_number => 1.0,
1219: p_init_msg_list => FND_API.g_false,
1220: p_commit => FND_API.g_false,
1221: p_validation_level => FND_API.g_valid_level_full,
1308: l_org_id NUMBER;
1309: l_settle_amount NUMBER;
1310: l_settlement_doc_id NUMBER;
1311: l_settlement_method VARCHAR(15);
1312: l_settlement_doc_rec OZF_Settlement_Doc_PVT.settlement_doc_rec_type;
1313: l_settlement_doc_tbl OZF_Settlement_Doc_PVT.settlement_doc_tbl_type;
1314: l_err_msg VARCHAR2(2000);
1315: l_do_fetch VARCHAR2(1) := 'N';
1316: l_is_overpayment BOOLEAN := FALSE;
1309: l_settle_amount NUMBER;
1310: l_settlement_doc_id NUMBER;
1311: l_settlement_method VARCHAR(15);
1312: l_settlement_doc_rec OZF_Settlement_Doc_PVT.settlement_doc_rec_type;
1313: l_settlement_doc_tbl OZF_Settlement_Doc_PVT.settlement_doc_tbl_type;
1314: l_err_msg VARCHAR2(2000);
1315: l_do_fetch VARCHAR2(1) := 'N';
1316: l_is_overpayment BOOLEAN := FALSE;
1317: l_trx_attribute_name VARCHAR2(30);
1416: l_settlement_doc_tbl(i).claim_id := l_claim_id;
1417:
1418: -- create ozf_setttlement_docs_all
1419: BEGIN
1420: OZF_Settlement_Doc_PVT.Create_Settlement_Doc(
1421: p_api_version_number => 1.0,
1422: p_init_msg_list => FND_API.g_false,
1423: p_commit => FND_API.g_false,
1424: p_validation_level => FND_API.g_valid_level_full,
1457: , l_settlement_doc_rec.object_version_number;
1458: CLOSE csr_del_settle_doc;
1459:
1460: BEGIN
1461: OZF_Settlement_Doc_PVT.Delete_Settlement_Doc(
1462: p_api_version_number => 1.0,
1463: p_init_msg_list => FND_API.g_false,
1464: p_commit => FND_API.g_false,
1465: p_validation_level => FND_API.g_valid_level_full,
1525: -- OZF_AR_SETTLEMENT_PVT OZF_CLOSE_CLAIM
1526: --
1527: -- HISTORY
1528: -- 04/05/2001 MCHANG CREATION.
1529: -- 11/15/2001 MCHANG Call OZF_SETTLEMENT_DOC_PVT.Update_Claim_From_Settlement()
1530: -- to update claim status to CLOSED.
1531: --------------------------------------------------------------------------------
1532: PROCEDURE Close_Claim (
1533: itemtype IN VARCHAR2,
1590: END IF;
1591:
1592: -- set org_context since workflow mailer does not set the context
1593: --Set_Org_Ctx (l_claim_rec.org_id);
1594: OZF_Settlement_Doc_PVT.Update_Claim_From_Settlement(
1595: p_api_version_number => 1.0
1596: ,p_init_msg_list => FND_API.g_false
1597: ,p_commit => FND_API.g_false
1598: ,p_validation_level => FND_API.g_valid_level_full
2881:
2882:
2883: l_claim_settle csr_claim_settle%ROWTYPE;
2884: l_payment_term NUMBER;
2885: l_settlement_doc_rec OZF_SETTLEMENT_DOC_PVT.settlement_doc_rec_type;
2886: l_automate_settlement VARCHAR2(1);
2887: BEGIN
2888: SAVEPOINT create_payment;
2889: ---- RUN mode ----