[Home] [Help]
1: PACKAGE BODY OE_PAYMENT_TRXN_UTIL AS
2: /* $Header: OEXUPTXB.pls 120.28.12010000.2 2008/11/25 14:21:32 sgoli ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_PAYMENT_TRXN_UTIL';
4:
5: Procedure Create_Payment_Trxn
1: PACKAGE BODY OE_PAYMENT_TRXN_UTIL AS
2: /* $Header: OEXUPTXB.pls 120.28.12010000.2 2008/11/25 14:21:32 sgoli ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_PAYMENT_TRXN_UTIL';
4:
5: Procedure Create_Payment_Trxn
6: (p_header_id IN NUMBER,
7: P_line_id IN NUMBER,
57: l_instrument_id NUMBER; -- bug 5170754
58:
59: BEGIN
60: IF l_debug_level > 0 THEN
61: oe_debug_pub.add('ENTERING OE_PAYMENT_TRXN_UTIL.Create_Payment_Trxn....');
62: oe_debug_pub.add('Instrument security code and payment number.....'||p_instrument_security_code||' and '||p_payment_number);
63: oe_debug_pub.add('Instrument id'||p_instrument_id);
64: oe_debug_pub.add('Instrument assgn id'||p_instrument_assignment_id);
65: oe_debug_pub.add('Trxn extension id'||P_x_trxn_extension_id);
629: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
630: THEN
631: FND_MSG_PUB.Add_Exc_Msg
632: ( G_PKG_NAME
633: , 'OE_PAYMENT_TRXN_UTIL'
634: );
635: END IF;
636:
637: OE_MSG_PUB.Count_And_Get
712: BEGIN
713:
714:
715: IF l_debug_level > 0 THEN
716: oe_debug_pub.add('Entering OE_PAYMENT_TRXN_UTIL.Update_Payment_Trxn...');
717: END IF;
718:
719: IF p_payment_type_code IN( 'CREDIT_CARD') THEN
720: L_pmt_channel_code := p_payment_type_code;
1073: IF p_line_id IS NOT NULL THEN
1074: l_trxn_attribs.trxn_ref_number1 := p_line_id;
1075: END IF;
1076: --END IF;
1077: IF OE_Payment_Trxn_Util.g_old_bill_to_site IS NULL THEN
1078: --
1079: --
1080: IF l_debug_level > 0 THEN
1081: oe_debug_pub.add('Calling update transaction extension...');
1190: IF l_debug_level > 0 THEN
1191: oe_debug_pub.add( 'OEXUPTXB.pls: authorization has been settled, need to re-authorize.');
1192: END IF;
1193:
1194: IF Oe_Payment_Trxn_Util.Get_CC_Security_Code_Use = 'REQUIRED'
1195: AND (l_trxn_attribs.Instrument_Security_Code IS NULL OR
1196: OE_GLOBALS.Equal(l_trxn_attribs.Instrument_Security_Code,FND_API.G_MISS_CHAR))
1197: THEN
1198:
1199: FND_MESSAGE.SET_NAME('ONT','OE_CC_SECURITY_CODE_REQD');
1200: OE_Msg_Pub.Add;
1201: RAISE FND_API.G_EXC_ERROR;
1202:
1203: ELSIF Oe_Payment_Trxn_Util.Get_CC_Security_Code_Use = 'REQUIRED'
1204: AND l_trxn_attribs.Instrument_Security_Code IS NOT NULL
1205: AND NOT OE_GLOBALS.Equal(l_trxn_attribs.Instrument_Security_Code,FND_API.G_MISS_CHAR)
1206: THEN
1207:
1403: END IF;
1404: END IF; -- Approval code not null
1405: --bug 5028932
1406: --bug 4885313
1407: ELSIF OE_Payment_Trxn_Util.g_old_bill_to_site IS NOT NULL THEN
1408: IF l_debug_level > 0 THEN
1409: oe_debug_pub.add('Bill to has changed....Need to delete this trxn id as context has changed!');
1410: oe_debug_pub.add('Before calling Delete Transaction Extension API...');
1411: oe_debug_pub.add('Trxn extension id --------> '||p_trxn_extension_id);
1412: oe_debug_pub.add('Payer equivalency --------> '||IBY_FNDCPT_COMMON_PUB.G_PAYER_EQUIV_IMMEDIATE);
1413: END IF;
1414: --Setting the context corresponding to the old bill to
1415: --site as the trxn extension id was created for that site.
1416: l_payer.account_site_id := OE_Payment_Trxn_Util.g_old_bill_to_site;
1417:
1418: --Resetting the bill to change flag so as to
1419: --maintain the consistent behaviour in different sessions
1420:
1417:
1418: --Resetting the bill to change flag so as to
1419: --maintain the consistent behaviour in different sessions
1420:
1421: OE_Payment_Trxn_Util.g_old_bill_to_site := null;
1422:
1423: IBY_FNDCPT_TRXN_PUB.Delete_Transaction_Extension
1424: (
1425: p_api_version => 1.0,
1562: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1563: THEN
1564: FND_MSG_PUB.Add_Exc_Msg
1565: ( G_PKG_NAME
1566: , 'OE_PAYMENT_TRXN_UTIL'
1567: );
1568: END IF;
1569:
1570: OE_MSG_PUB.Count_And_Get
1797: END IF;
1798: END IF;
1799:
1800: IF l_debug_level > 0 THEN
1801: oe_debug_pub.add('Exiting OE_PAYMENT_TRXN_UTIL.Copy_Payment_Trxn.', 1);
1802: END IF;
1803:
1804: X_return_status := FND_API.G_RET_STS_SUCCESS;
1805:
1849: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1850: THEN
1851: FND_MSG_PUB.Add_Exc_Msg
1852: ( G_PKG_NAME
1853: , 'OE_PAYMENT_TRXN_UTIL'
1854: );
1855: END IF;
1856:
1857: OE_MSG_PUB.Count_And_Get
2053: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2054: THEN
2055: FND_MSG_PUB.Add_Exc_Msg
2056: ( G_PKG_NAME
2057: , 'OE_PAYMENT_TRXN_UTIL'
2058: );
2059: END IF;
2060:
2061: -- FND_MESSAGE.SET_NAME('ONT','Exception in Get_Payment_Trxn_Info');
2283: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2284: THEN
2285: FND_MSG_PUB.Add_Exc_Msg
2286: ( G_PKG_NAME
2287: , 'OE_PAYMENT_TRXN_UTIL'
2288: );
2289: END IF;
2290:
2291: -- FND_MESSAGE.SET_NAME('ONT','Exception in Delete_Payment_Trxn'||sqlerrm);
2377: oe_debug_pub.add('Return Status --> '||l_return_status);
2378: oe_debug_pub.add('Response code --> '||l_response_code.result_code);
2379: oe_debug_pub.add('Security code use ---> '||G_CC_Security_Code_Use);
2380: oe_debug_pub.add('Statement Billing Address Use ----> '|| l_channel_attrib_uses.Instr_Billing_Address);
2381: oe_debug_pub.add('Exiting OE_PAYMENT_TRXN_UTIL.Get_CC_Security_Code_Use: '||l_return_status, 1);
2382: END IF;
2383:
2384: RETURN G_CC_Security_Code_Use;
2385:
2400: END Get_CC_Security_Code_Use;
2401:
2402:
2403: --R12 CC Encryption
2404: END OE_PAYMENT_TRXN_UTIL;