285: x_return_status := FND_API.g_ret_sts_success;
286: EXCEPTION
287: WHEN OTHERS THEN
288: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
289: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_QUERY_ERROR');
290: FND_MSG_PUB.add;
291: END IF;
292: x_return_status := FND_API.g_ret_sts_unexp_error;
293: END Query_Claim;
526:
527: EXCEPTION
528: WHEN OTHERS THEN
529: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
530: FND_MESSAGE.set_name('OZF', 'OZF_AR_DISTRIBUTE_ERROR');
531: FND_MSG_PUB.add;
532: END IF;
533: IF OZF_DEBUG_LOW_ON THEN
534: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
530: FND_MESSAGE.set_name('OZF', 'OZF_AR_DISTRIBUTE_ERROR');
531: FND_MSG_PUB.add;
532: END IF;
533: IF OZF_DEBUG_LOW_ON THEN
534: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
535: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
536: FND_MSG_PUB.Add;
537: END IF;
538: x_return_status := FND_API.g_ret_sts_unexp_error;
531: FND_MSG_PUB.add;
532: END IF;
533: IF OZF_DEBUG_LOW_ON THEN
534: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
535: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
536: FND_MSG_PUB.Add;
537: END IF;
538: x_return_status := FND_API.g_ret_sts_unexp_error;
539: END Insert_Int_Distributions ;
734: x_return_status := FND_API.g_ret_sts_success;
735: EXCEPTION
736: WHEN OTHERS THEN
737: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
738: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
739: FND_MSG_PUB.add;
740: END IF;
741: IF OZF_DEBUG_LOW_ON THEN
742: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
738: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
739: FND_MSG_PUB.add;
740: END IF;
741: IF OZF_DEBUG_LOW_ON THEN
742: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
743: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
744: FND_MSG_PUB.Add;
745: END IF;
746: x_return_status := FND_API.g_ret_sts_unexp_error;
739: FND_MSG_PUB.add;
740: END IF;
741: IF OZF_DEBUG_LOW_ON THEN
742: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
743: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
744: FND_MSG_PUB.Add;
745: END IF;
746: x_return_status := FND_API.g_ret_sts_unexp_error;
747: END Insert_Interface_Line ;
859: x_return_status := FND_API.g_ret_sts_success;
860: EXCEPTION
861: WHEN OTHERS THEN
862: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
863: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
864: FND_MSG_PUB.add;
865: END IF;
866: IF OZF_DEBUG_LOW_ON THEN
867: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
863: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
864: FND_MSG_PUB.add;
865: END IF;
866: IF OZF_DEBUG_LOW_ON THEN
867: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
868: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
869: FND_MSG_PUB.Add;
870: END IF;
871: x_return_status := FND_API.g_ret_sts_unexp_error;
864: FND_MSG_PUB.add;
865: END IF;
866: IF OZF_DEBUG_LOW_ON THEN
867: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
868: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
869: FND_MSG_PUB.Add;
870: END IF;
871: x_return_status := FND_API.g_ret_sts_unexp_error;
872: END Insert_Interface_Tax;
968: x_return_status := FND_API.g_ret_sts_success;
969: EXCEPTION
970: WHEN OTHERS THEN
971: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
972: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
973: FND_MSG_PUB.add;
974: END IF;
975: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
976: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
972: FND_MESSAGE.set_name('OZF', 'OZF_AR_INTERFACE_ERROR');
973: FND_MSG_PUB.add;
974: END IF;
975: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
976: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
977: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
978: FND_MSG_PUB.Add;
979: END IF;
980: x_return_status := FND_API.g_ret_sts_unexp_error;
973: FND_MSG_PUB.add;
974: END IF;
975: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN
976: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
977: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
978: FND_MSG_PUB.Add;
979: END IF;
980: x_return_status := FND_API.g_ret_sts_unexp_error;
981: END Insert_Interface_Sales_Credits;
1194: CLOSE sys_param_csr;
1195:
1196: IF (l_batch_source_id IS NULL) THEN
1197: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1198: FND_MESSAGE.set_name('OZF','OZF_BATCH_SRC_REQ_FOR_INTF');
1199: FND_MSG_PUB.add;
1200: END IF;
1201: x_return_status := FND_API.g_ret_sts_error;
1202: ELSE
1352: IF ( p_claim_rec.payment_method IS NULL OR
1353: p_claim_rec.payment_method = FND_API.G_MISS_CHAR )
1354: THEN
1355: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1356: FND_MESSAGE.set_name('OZF', 'OZF_MISSING_PAYMENT_METHOD');
1357: FND_MSG_PUB.add;
1358: END IF;
1359: ELSIF p_claim_rec.payment_method IS NOT NULL THEN
1360: -- Now get Trx_type from the claim type
1408: END IF;
1409:
1410: IF p_x_interface_line_rec.TERM_ID IS NULL THEN
1411: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1412: FND_MESSAGE.set_name('OZF', 'OZF_MISSING_PAYMENT_TERM');
1413: FND_MSG_PUB.add;
1414: END IF;
1415: x_return_status := FND_API.g_ret_sts_error;
1416: END IF;
1424: p_x_interface_line_rec.AMOUNT := p_line_claim_curr_amt;
1425:
1426: ELSE
1427: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1428: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INT_ERR_PAYMETHOD');
1429: FND_MSG_PUB.add;
1430: END IF;
1431: x_return_status := FND_API.g_ret_sts_error;
1432: END IF;
1440: IF ( p_claim_rec.payment_method IN ('CHARGEBACK','DEBIT_MEMO') )
1441: THEN
1442: IF l_billback_trx_type_id IS NULL THEN
1443: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1444: FND_MESSAGE.set_name('OZF', 'OZF_MISSING_BILLBACK_TRX_TYPE');
1445: FND_MSG_PUB.add;
1446: END IF;
1447: x_return_status := FND_API.g_ret_sts_error;
1448: ELSE
1450: END IF;
1451: ELSIF p_claim_rec.payment_method = 'CREDIT_MEMO' THEN
1452: IF l_cm_trx_type_id IS NULL THEN
1453: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1454: FND_MESSAGE.set_name('OZF', 'OZF_MISSING_CM_TRX_TYPE');
1455: FND_MSG_PUB.add;
1456: END IF;
1457: x_return_status := FND_API.g_ret_sts_error;
1458: ELSE
1593: CLOSE csr_claim_line_product ;
1594: END IF;
1595:
1596: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1597: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_INTF_ERROR');
1598: FND_MSG_PUB.add;
1599: END IF;
1600: IF OZF_DEBUG_LOW_ON THEN
1601: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1597: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_INTF_ERROR');
1598: FND_MSG_PUB.add;
1599: END IF;
1600: IF OZF_DEBUG_LOW_ON THEN
1601: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1602: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1603: FND_MSG_PUB.Add;
1604: END IF;
1605: x_return_status := FND_API.g_ret_sts_unexp_error;
1598: FND_MSG_PUB.add;
1599: END IF;
1600: IF OZF_DEBUG_LOW_ON THEN
1601: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1602: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1603: FND_MSG_PUB.Add;
1604: END IF;
1605: x_return_status := FND_API.g_ret_sts_unexp_error;
1606: END Populate_Interface_Line_Rec;
1694:
1695: EXCEPTION
1696: WHEN OTHERS THEN
1697: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1698: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_INTF_ERROR');
1699: FND_MSG_PUB.add;
1700: END IF;
1701: IF OZF_DEBUG_LOW_ON THEN
1702: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1698: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_INTF_ERROR');
1699: FND_MSG_PUB.add;
1700: END IF;
1701: IF OZF_DEBUG_LOW_ON THEN
1702: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1703: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1704: FND_MSG_PUB.Add;
1705: END IF;
1706: x_return_status := FND_API.g_ret_sts_unexp_error;
1699: FND_MSG_PUB.add;
1700: END IF;
1701: IF OZF_DEBUG_LOW_ON THEN
1702: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1703: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1704: FND_MSG_PUB.Add;
1705: END IF;
1706: x_return_status := FND_API.g_ret_sts_unexp_error;
1707: END Populate_Interface_Tax_Rec;
1798:
1799: EXCEPTION
1800: WHEN OTHERS THEN
1801: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1802: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_DIST_ERROR');
1803: FND_MSG_PUB.add;
1804: END IF;
1805: IF OZF_DEBUG_LOW_ON THEN
1806: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1802: FND_MESSAGE.set_name('OZF', 'OZF_POPULATE_DIST_ERROR');
1803: FND_MSG_PUB.add;
1804: END IF;
1805: IF OZF_DEBUG_LOW_ON THEN
1806: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1807: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1808: FND_MSG_PUB.Add;
1809: END IF;
1810: x_return_status := FND_API.g_ret_sts_unexp_error;
1803: FND_MSG_PUB.add;
1804: END IF;
1805: IF OZF_DEBUG_LOW_ON THEN
1806: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1807: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1808: FND_MSG_PUB.Add;
1809: END IF;
1810: x_return_status := FND_API.g_ret_sts_unexp_error;
1811: END Populate_Distributions_Rec;
2068: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2069: END IF;
2070: -- Debug Message
2071: IF OZF_DEBUG_LOW_ON THEN
2072: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2073: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
2074: FND_MSG_PUB.Add;
2075: END IF;
2076: --Initialize message list if p_init_msg_list is TRUE.
2069: END IF;
2070: -- Debug Message
2071: IF OZF_DEBUG_LOW_ON THEN
2072: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2073: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
2074: FND_MSG_PUB.Add;
2075: END IF;
2076: --Initialize message list if p_init_msg_list is TRUE.
2077: IF FND_API.To_Boolean (p_init_msg_list) THEN
2174: COMMIT WORK;
2175: END IF;
2176: -- Debug Message
2177: IF OZF_DEBUG_LOW_ON THEN
2178: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2179: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
2180: FND_MSG_PUB.Add;
2181: END IF;
2182: --Standard call to get message count and if count=1, get the message
2175: END IF;
2176: -- Debug Message
2177: IF OZF_DEBUG_LOW_ON THEN
2178: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
2179: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
2180: FND_MSG_PUB.Add;
2181: END IF;
2182: --Standard call to get message count and if count=1, get the message
2183: FND_MSG_PUB.Count_And_Get (