93: x_return_status := FND_API.G_RET_STS_SUCCESS;
94:
95: x_payment_rec := l_payment_rec;
96:
97: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
98:
99: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
100: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
101: END IF;
96:
97: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
98:
99: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
100: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
101: END IF;
102:
103:
104:
201: END IF;
202:
203: EXCEPTION
204: WHEN FND_API.G_EXC_ERROR THEN
205: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
206: P_API_NAME => L_API_NAME
207: ,P_PKG_NAME => G_PKG_NAME
208: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
209: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
205: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
206: P_API_NAME => L_API_NAME
207: ,P_PKG_NAME => G_PKG_NAME
208: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
209: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
210: ,X_MSG_COUNT => X_MSG_COUNT
211: ,X_MSG_DATA => X_MSG_DATA
212: ,X_RETURN_STATUS => X_RETURN_STATUS);
213:
211: ,X_MSG_DATA => X_MSG_DATA
212: ,X_RETURN_STATUS => X_RETURN_STATUS);
213:
214: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
215: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
216: P_API_NAME => L_API_NAME
217: ,P_PKG_NAME => G_PKG_NAME
218: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
219: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
215: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
216: P_API_NAME => L_API_NAME
217: ,P_PKG_NAME => G_PKG_NAME
218: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
219: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
220: ,X_MSG_COUNT => X_MSG_COUNT
221: ,X_MSG_DATA => X_MSG_DATA
222: ,X_RETURN_STATUS => X_RETURN_STATUS);
223:
221: ,X_MSG_DATA => X_MSG_DATA
222: ,X_RETURN_STATUS => X_RETURN_STATUS);
223:
224: WHEN OTHERS THEN
225: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
226: P_API_NAME => L_API_NAME
227: ,P_PKG_NAME => G_PKG_NAME
228: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
229: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
224: WHEN OTHERS THEN
225: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
226: P_API_NAME => L_API_NAME
227: ,P_PKG_NAME => G_PKG_NAME
228: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
229: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
230: ,X_MSG_COUNT => X_MSG_COUNT
231: ,X_MSG_DATA => X_MSG_DATA
232: ,X_RETURN_STATUS => X_RETURN_STATUS);
225: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
226: P_API_NAME => L_API_NAME
227: ,P_PKG_NAME => G_PKG_NAME
228: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
229: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
230: ,X_MSG_COUNT => X_MSG_COUNT
231: ,X_MSG_DATA => X_MSG_DATA
232: ,X_RETURN_STATUS => X_RETURN_STATUS);
233: End create_iby_payment;
326: close c_get_db_hdr_payment;
327: END IF;
328:
329:
330: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
331:
332: IF aso_debug_pub.g_debug_flag = 'Y' THEN
333: aso_debug_pub.add('After querying the header row', 1, 'Y');
334: aso_debug_pub.add('l_qte_header_rec.quote_header_id: ' || l_qte_header_rec.quote_header_id, 1, 'Y');
334: aso_debug_pub.add('l_qte_header_rec.quote_header_id: ' || l_qte_header_rec.quote_header_id, 1, 'Y');
335: END IF;
336:
337: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
338: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
339: END IF;
340:
341: IF aso_debug_pub.g_debug_flag = 'Y' THEN
342: aso_debug_pub.add('After querying the line row', 1, 'Y');
621: END IF;
622:
623: EXCEPTION
624: WHEN FND_API.G_EXC_ERROR THEN
625: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
626: P_API_NAME => L_API_NAME
627: ,P_PKG_NAME => G_PKG_NAME
628: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
629: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
625: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
626: P_API_NAME => L_API_NAME
627: ,P_PKG_NAME => G_PKG_NAME
628: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
629: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
630: ,X_MSG_COUNT => X_MSG_COUNT
631: ,X_MSG_DATA => X_MSG_DATA
632: ,X_RETURN_STATUS => X_RETURN_STATUS);
633:
631: ,X_MSG_DATA => X_MSG_DATA
632: ,X_RETURN_STATUS => X_RETURN_STATUS);
633:
634: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
635: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
636: P_API_NAME => L_API_NAME
637: ,P_PKG_NAME => G_PKG_NAME
638: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
639: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
635: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
636: P_API_NAME => L_API_NAME
637: ,P_PKG_NAME => G_PKG_NAME
638: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
639: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
640: ,X_MSG_COUNT => X_MSG_COUNT
641: ,X_MSG_DATA => X_MSG_DATA
642: ,X_RETURN_STATUS => X_RETURN_STATUS);
643:
641: ,X_MSG_DATA => X_MSG_DATA
642: ,X_RETURN_STATUS => X_RETURN_STATUS);
643:
644: WHEN OTHERS THEN
645: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
646: P_API_NAME => L_API_NAME
647: ,P_PKG_NAME => G_PKG_NAME
648: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
649: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
644: WHEN OTHERS THEN
645: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
646: P_API_NAME => L_API_NAME
647: ,P_PKG_NAME => G_PKG_NAME
648: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
649: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
650: ,X_MSG_COUNT => X_MSG_COUNT
651: ,X_MSG_DATA => X_MSG_DATA
652: ,X_RETURN_STATUS => X_RETURN_STATUS);
645: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
646: P_API_NAME => L_API_NAME
647: ,P_PKG_NAME => G_PKG_NAME
648: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
649: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
650: ,X_MSG_COUNT => X_MSG_COUNT
651: ,X_MSG_DATA => X_MSG_DATA
652: ,X_RETURN_STATUS => X_RETURN_STATUS);
653: End create_payment_row;
705:
706:
707:
708: -- Start API Body
709: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
710:
711: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
712: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
713: END IF;
708: -- Start API Body
709: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
710:
711: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
712: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
713: END IF;
714:
715: --Get the databse payment record and assign it to l_db_payment_rec
716: IF ( l_payment_rec.Quote_Line_Id = fnd_api.g_miss_num) then
715: --Get the databse payment record and assign it to l_db_payment_rec
716: IF ( l_payment_rec.Quote_Line_Id = fnd_api.g_miss_num) then
717: l_payment_rec.quote_line_id := null;
718: END IF;
719: l_payment_tbl := aso_utility_pvt.Query_Payment_Rows(l_payment_rec.quote_header_id,l_payment_rec.quote_line_id);
720: l_db_payment_rec := l_payment_tbl(1);
721:
722:
723: IF aso_debug_pub.g_debug_flag = 'Y' THEN
1451: END IF;
1452:
1453: EXCEPTION
1454: WHEN FND_API.G_EXC_ERROR THEN
1455: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1456: P_API_NAME => L_API_NAME
1457: ,P_PKG_NAME => G_PKG_NAME
1458: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1459: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1455: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1456: P_API_NAME => L_API_NAME
1457: ,P_PKG_NAME => G_PKG_NAME
1458: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1459: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1460: ,X_MSG_COUNT => X_MSG_COUNT
1461: ,X_MSG_DATA => X_MSG_DATA
1462: ,X_RETURN_STATUS => X_RETURN_STATUS);
1463:
1461: ,X_MSG_DATA => X_MSG_DATA
1462: ,X_RETURN_STATUS => X_RETURN_STATUS);
1463:
1464: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1465: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1466: P_API_NAME => L_API_NAME
1467: ,P_PKG_NAME => G_PKG_NAME
1468: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1469: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1465: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1466: P_API_NAME => L_API_NAME
1467: ,P_PKG_NAME => G_PKG_NAME
1468: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1469: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1470: ,X_MSG_COUNT => X_MSG_COUNT
1471: ,X_MSG_DATA => X_MSG_DATA
1472: ,X_RETURN_STATUS => X_RETURN_STATUS);
1473:
1471: ,X_MSG_DATA => X_MSG_DATA
1472: ,X_RETURN_STATUS => X_RETURN_STATUS);
1473:
1474: WHEN OTHERS THEN
1475: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1476: P_API_NAME => L_API_NAME
1477: ,P_PKG_NAME => G_PKG_NAME
1478: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1479: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1474: WHEN OTHERS THEN
1475: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1476: P_API_NAME => L_API_NAME
1477: ,P_PKG_NAME => G_PKG_NAME
1478: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1479: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1480: ,X_MSG_COUNT => X_MSG_COUNT
1481: ,X_MSG_DATA => X_MSG_DATA
1482: ,X_RETURN_STATUS => X_RETURN_STATUS);
1475: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1476: P_API_NAME => L_API_NAME
1477: ,P_PKG_NAME => G_PKG_NAME
1478: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1479: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1480: ,X_MSG_COUNT => X_MSG_COUNT
1481: ,X_MSG_DATA => X_MSG_DATA
1482: ,X_RETURN_STATUS => X_RETURN_STATUS);
1483: end update_payment_row;
1514: END IF;
1515:
1516: x_return_status := FND_API.G_RET_STS_SUCCESS;
1517:
1518: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
1519:
1520: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
1521: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
1522: END IF;
1517:
1518: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row (l_payment_rec.Quote_Header_Id );
1519:
1520: IF ( l_payment_rec.Quote_Line_Id IS NOT NULL and l_payment_rec.Quote_Line_Id <> fnd_api.g_miss_num) then
1521: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row ( l_payment_rec.Quote_Line_Id );
1522: END IF;
1523:
1524: --Get the databse payment record and assign it to l_payment_rec
1525: IF ( l_payment_rec.Quote_Line_Id = fnd_api.g_miss_num) then
1525: IF ( l_payment_rec.Quote_Line_Id = fnd_api.g_miss_num) then
1526: l_payment_rec.quote_line_id := null;
1527: END IF;
1528:
1529: l_payment_tbl := aso_utility_pvt.Query_Payment_Rows(l_payment_rec.quote_header_id,l_payment_rec.quote_line_id);
1530: l_payment_rec := l_payment_tbl(1);
1531:
1532: if l_payment_tbl.count > 0 and l_payment_rec.payment_type_code = 'CREDIT_CARD' then
1533:
1605: END IF;
1606:
1607: EXCEPTION
1608: WHEN FND_API.G_EXC_ERROR THEN
1609: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1610: P_API_NAME => L_API_NAME
1611: ,P_PKG_NAME => G_PKG_NAME
1612: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1613: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1609: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1610: P_API_NAME => L_API_NAME
1611: ,P_PKG_NAME => G_PKG_NAME
1612: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1613: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1614: ,X_MSG_COUNT => X_MSG_COUNT
1615: ,X_MSG_DATA => X_MSG_DATA
1616: ,X_RETURN_STATUS => X_RETURN_STATUS);
1617:
1615: ,X_MSG_DATA => X_MSG_DATA
1616: ,X_RETURN_STATUS => X_RETURN_STATUS);
1617:
1618: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1619: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1620: P_API_NAME => L_API_NAME
1621: ,P_PKG_NAME => G_PKG_NAME
1622: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1623: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1619: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1620: P_API_NAME => L_API_NAME
1621: ,P_PKG_NAME => G_PKG_NAME
1622: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1623: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1624: ,X_MSG_COUNT => X_MSG_COUNT
1625: ,X_MSG_DATA => X_MSG_DATA
1626: ,X_RETURN_STATUS => X_RETURN_STATUS);
1627:
1625: ,X_MSG_DATA => X_MSG_DATA
1626: ,X_RETURN_STATUS => X_RETURN_STATUS);
1627:
1628: WHEN OTHERS THEN
1629: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1630: P_API_NAME => L_API_NAME
1631: ,P_PKG_NAME => G_PKG_NAME
1632: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1633: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1628: WHEN OTHERS THEN
1629: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1630: P_API_NAME => L_API_NAME
1631: ,P_PKG_NAME => G_PKG_NAME
1632: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1633: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1634: ,X_MSG_COUNT => X_MSG_COUNT
1635: ,X_MSG_DATA => X_MSG_DATA
1636: ,X_RETURN_STATUS => X_RETURN_STATUS);
1629: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1630: P_API_NAME => L_API_NAME
1631: ,P_PKG_NAME => G_PKG_NAME
1632: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1633: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_INT
1634: ,X_MSG_COUNT => X_MSG_COUNT
1635: ,X_MSG_DATA => X_MSG_DATA
1636: ,X_RETURN_STATUS => X_RETURN_STATUS);
1637: End delete_payment_row;