[Home] [Help]
1143: --If approval code is not null then the transaction
1144: --extension has already been authorized once. So cannot
1145: --call update_transaction API for this trxn_extension_id
1146: IF (l_approval_code IS NOT NULL AND
1147: NOT OE_GLOBALS.Equal(l_approval_code,FND_API.G_MISS_CHAR))
1148: OR l_settled_flag = 'Y' THEN
1149:
1150: IF l_settled_flag = 'N' THEN
1151: -- need to re-authorize if the authorization has expired.
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:
1208: -- need to create a new payment transaction extension as the old one has been settled.
1209: IF l_debug_level > 0 THEN
1245: -- update oe_payments table
1246: p_trxn_extension_id := l_trxn_extension_id;
1247: END IF; --Security code use ='REQUIRED'
1248: --bug 5299050
1249: ELSIF NOT OE_GLOBALS.Is_Same_Credit_Card(l_old_card_number,
1250: p_card_number,l_old_instrument_id,l_instrument_id) THEN
1251:
1252: l_trxn_attribs.Originating_Application_Id := 660;
1253: l_trxn_attribs.Instrument_Security_Code := p_instrument_security_code;
1460: ELSIF p_payment_type_code = 'CREDIT_CARD' THEN
1461: l_trxn_attribs.Originating_Application_Id := 660;
1462: l_trxn_attribs.Instrument_Security_Code := p_instrument_security_code;
1463: /*IF p_instrument_security_code IS NOT NULL AND
1464: NOT OE_GLOBALS.Equal(p_instrument_security_code,FND_API.G_MISS_CHAR) THEN
1465: --The bill to site has changed and a new credit card
1466: --has been brought in. Since the CVV2 value used here
1467: --would be of the previous cards', displaying this message
1468: --to the user.
2310: END IF;
2311:
2312: BEGIN
2313: IF p_trxn_extension_id IS NOT NULL AND
2314: NOT OE_GLOBALS.Equal(p_trxn_Extension_id, FND_API.G_MISS_NUM) THEN
2315: select settled_flag
2316: into l_Settled_flag
2317: from iby_trxn_extensions_v
2318: where trxn_Extension_id = p_trxn_extension_id;