16: FUNCTION G_MISS_OE_AK_HPAYMENT_REC
17: RETURN OE_AK_HEADER_PAYMENTS_V%ROWTYPE IS
18: l_rowtype_rec OE_AK_HEADER_PAYMENTS_V%ROWTYPE;
19: --
20: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
21: --
22: BEGIN
23:
24: l_rowtype_rec.ATTRIBUTE1 := FND_API.G_MISS_CHAR;
79: ( p_HEADER_Payment_rec IN OE_Order_PUB.HEADER_PAYMENT_Rec_Type
80: , x_rowtype_rec IN OUT NOCOPY OE_AK_HEADER_PAYMENTS_V%ROWTYPE
81: ) IS
82: --
83: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
84: --
85: BEGIN
86:
87: x_rowtype_rec.ATTRIBUTE1 := p_header_Payment_rec.ATTRIBUTE1;
141: ( p_record IN OE_AK_HEADER_PaymentS_V%ROWTYPE
142: , x_api_rec IN OUT NOCOPY OE_Order_PUB.HEADER_Payment_Rec_Type
143: ) IS
144: --
145: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
146: --
147: BEGIN
148:
149: x_api_rec.ATTRIBUTE1 := p_record.ATTRIBUTE1;
211: l_index NUMBER :=0;
212: l_src_attr_tbl OE_GLOBALS.NUMBER_Tbl_Type;
213: l_dep_attr_tbl OE_GLOBALS.NUMBER_Tbl_Type;
214: --
215: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
216: --
217: BEGIN
218:
219: -- Load out record
805: IS
806: l_Header_Payment_rec OE_AK_HEADER_PaymentS_V%ROWTYPE;
807: l_old_Header_Payment_rec OE_AK_HEADER_PaymentS_V%ROWTYPE;
808: --
809: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
810: --
811: BEGIN
812:
813: API_Rec_To_Rowtype_Rec(p_x_Header_Payment_rec, l_Header_Payment_rec);
850: AND OP.line_id IS NULL;
851:
852: l_order_hold_id OE_ORDER_HOLDS.ORDER_HOLD_ID%TYPE;
853: l_hold_release_id OE_ORDER_HOLDS.HOLD_RELEASE_ID%TYPE;
854: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
855:
856: BEGIN
857: x_return_status := FND_API.G_RET_STS_SUCCESS;
858:
856: BEGIN
857: x_return_status := FND_API.G_RET_STS_SUCCESS;
858:
859: IF l_debug_level > 0 THEN
860: oe_debug_pub.add( 'Entering Delete_PaymentType_Hold' , 3 ) ;
861: END IF;
862:
863: OPEN order_paytype_hold;
864:
868: EXIT;
869: END IF;
870:
871: IF l_debug_level > 0 THEN
872: oe_debug_pub.add( 'DELETING HEADER PAYMENT TYPE HOLD' ) ;
873: END IF;
874:
875: DELETE FROM OE_ORDER_HOLDS
876: WHERE order_hold_id = l_order_hold_id;
882:
883: CLOSE order_paytype_hold;
884:
885: IF l_debug_level > 0 THEN
886: oe_debug_pub.add( 'Exiting Delete_PaymentType_Hold' , 3 ) ;
887: END IF;
888:
889: EXCEPTION
890: WHEN FND_API.G_EXC_ERROR THEN
920: )
921: IS
922: l_return_status Varchar2(10);
923: --
924: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
925: --
926: l_payments_update_flag VARCHAR2(1) := 'N';
927: --bug3507871
928: l_booked_flag VARCHAR2(1) :='N';
986: BEGIN
987:
988: -- Load out record
989:
990: oe_debug_pub.add('Trxn_extension id ksurendr'||p_x_Header_Payment_rec.trxn_extension_id);
991: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.attribute1,p_old_Header_Payment_rec.attribute1)
992: THEN
993: NULL;
994: END IF;
1112: THEN
1113: l_payments_update_flag := 'Y';
1114: END IF;
1115: IF l_debug_level > 0 THEN
1116: oe_debug_pub.add('Old Expiration date in apply attribute changes '||p_old_Header_Payment_rec.credit_card_expiration_date);
1117: oe_debug_pub.add('New Expiration date'||p_x_Header_Payment_rec.credit_card_expiration_date);
1118: END IF;
1119:
1120: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.credit_card_expiration_date,p_old_Header_Payment_rec.credit_card_expiration_date)
1113: l_payments_update_flag := 'Y';
1114: END IF;
1115: IF l_debug_level > 0 THEN
1116: oe_debug_pub.add('Old Expiration date in apply attribute changes '||p_old_Header_Payment_rec.credit_card_expiration_date);
1117: oe_debug_pub.add('New Expiration date'||p_x_Header_Payment_rec.credit_card_expiration_date);
1118: END IF;
1119:
1120: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.credit_card_expiration_date,p_old_Header_Payment_rec.credit_card_expiration_date)
1121: THEN
1121: THEN
1122: l_payments_update_flag := 'Y';
1123: END IF;
1124: IF l_debug_level > 0 THEN
1125: oe_debug_pub.add('Old cc holder name'||p_old_Header_Payment_rec.credit_card_holder_name);
1126: oe_debug_pub.add('New cc holder name'||p_x_Header_Payment_rec.credit_card_holder_name);
1127: END IF;
1128:
1129: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.credit_card_holder_name,p_old_Header_Payment_rec.credit_card_holder_name)
1122: l_payments_update_flag := 'Y';
1123: END IF;
1124: IF l_debug_level > 0 THEN
1125: oe_debug_pub.add('Old cc holder name'||p_old_Header_Payment_rec.credit_card_holder_name);
1126: oe_debug_pub.add('New cc holder name'||p_x_Header_Payment_rec.credit_card_holder_name);
1127: END IF;
1128:
1129: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.credit_card_holder_name,p_old_Header_Payment_rec.credit_card_holder_name)
1130: THEN
1140: p_old_Header_Payment_rec.cc_instrument_id,
1141: p_x_Header_Payment_rec.cc_instrument_id)
1142: THEN
1143: IF l_debug_level > 0 THEN
1144: oe_debug_pub.add('after is_same_credit_card ---> changed cc number');
1145: END IF;
1146: l_payments_update_flag := 'Y';
1147: END IF;
1148:
1200: FROM oe_order_headers_all
1201: WHERE header_id=p_x_header_Payment_rec.header_id;
1202: IF (l_booked_flag = 'Y') THEN
1203: IF( l_debug_level > 0) THEN
1204: oe_debug_pub.add('pviprana: logging a new payment delayed request for making the order go on payment hold', 1);
1205: END IF;
1206:
1207:
1208: OE_delayed_requests_Pvt.log_request
1300: THEN
1301:
1302: IF( l_debug_level > 0) THEN
1303:
1304: oe_debug_pub.add('pviprana: logging a new payment delayed request for processing the payment', 1);
1305: END IF;
1306:
1307: OE_delayed_requests_Pvt.log_request
1308: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1386: -- p_credit_card_approval_code;
1387:
1388: close header_payment_cur;
1389: /*
1390: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1387:
1388: close header_payment_cur;
1389: /*
1390: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1388: close header_payment_cur;
1389: /*
1390: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1389: /*
1390: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1390: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1391: oe_debug_pub.add('p_old_Header_Payment_rec.payment_collection_event ' || p_old_Header_Payment_rec.payment_collection_event);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1392: oe_debug_pub.add('p_payment_type_code ' || p_payment_type_code);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1393: oe_debug_pub.add('p_x_header_payment_rec.payment_type_code ' || p_x_header_payment_rec.payment_type_code);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1394: oe_debug_pub.add('p_payment_amount ' || p_payment_amount);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1395: oe_debug_pub.add('p_x_header_payment_rec.payment_amount ' || p_x_header_payment_rec.payment_amount);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1396: oe_debug_pub.add('p_check_number ' || p_check_number);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1397: oe_debug_pub.add('p_x_header_payment_rec.check_number ' || p_x_header_payment_rec.check_number);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1398: oe_debug_pub.add('p_credit_card_code ' || p_credit_card_code);
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1406:
1399: oe_debug_pub.add('p_x_header_payment_rec.credit_card_code ' || p_x_header_payment_rec.credit_card_code);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1406:
1407: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1400: oe_debug_pub.add('p_credit_card_holder_name ' || p_credit_card_holder_name);
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1406:
1407: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1408: */
1401: oe_debug_pub.add('p_x_header_payment_rec.credit_card_holder_name ' || p_x_header_payment_rec.credit_card_holder_name);
1402: oe_debug_pub.add('p_credit_card_number ' || p_credit_card_number);
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1406:
1407: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1408: */
1409: if p_x_header_payment_rec.payment_type_code IS NOT NULL and
1403: oe_debug_pub.add('p_x_header_payment_rec.credit_card_number ' || p_x_header_payment_rec.credit_card_number);
1404: oe_debug_pub.add('p_credit_card_expiration_date ' || p_credit_card_expiration_date);
1405: oe_debug_pub.add('p_x_header_payment_rec.credit_card_expiration_date ' || p_x_header_payment_rec.credit_card_expiration_date);
1406:
1407: oe_debug_pub.add('p_x_header_payment_rec.payment_collection_event ' || p_x_header_payment_rec.payment_collection_event);
1408: */
1409: if p_x_header_payment_rec.payment_type_code IS NOT NULL and
1410: (((nvl(p_payment_type_code, '-1') <> nvl(p_x_header_payment_rec.payment_type_code, '-1') or
1411: -- nvl(p_payment_amount, -1) <> nvl(p_x_header_payment_rec.payment_amount,-1) or
1421: p_x_header_payment_rec.operation = 'UPDATE')) then
1422: --bug3781675 end
1423:
1424:
1425: oe_debug_pub.add('logging synch from UHPMB.pls payment delayed request', 1);
1426:
1427: OE_delayed_requests_Pvt.log_request
1428: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1429: p_entity_id => p_x_Header_Payment_rec.header_id,
1438:
1439: END IF;
1440:
1441: IF l_delete_payment_hold = 'Y' THEN
1442: oe_debug_pub.add('logging request to release payment related holds', 3);
1443: IF nvl(p_old_Header_Payment_rec.payment_collection_event,'PREPAY')
1444: = 'PREPAY' THEN
1445: l_delete_pmt_param1 := 'PREPAYMENT';
1446: ELSE
1460: --ER#7479609 start
1461: --ER#7479609 start
1462: IF NOT OE_GLOBALS.Equal(p_x_Header_Payment_rec.payment_type_code,p_old_Header_Payment_rec.payment_type_code)
1463: THEN
1464: oe_debug_pub.add('logging Delayed request for evaluation of payments hold', 1);
1465:
1466: OE_delayed_requests_Pvt.log_request
1467: (p_entity_code => OE_GLOBALS.G_ENTITY_HEADER_PAYMENT,
1468: p_entity_id => p_x_Header_Payment_rec.header_id,
1485: , p_old_Header_Payment_rec IN OE_Order_PUB.Header_Payment_Rec_Type
1486: )
1487: IS
1488: --
1489: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1490: --
1491: BEGIN
1492:
1493: IF p_x_Header_Payment_rec.attribute1 = FND_API.G_MISS_CHAR THEN
1701: )
1702: IS
1703:
1704: --
1705: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1706: --
1707: BEGIN
1708:
1709: IF p_x_Header_Payment_rec.attribute1 = FND_API.G_MISS_CHAR THEN
1918: l_return_status VARCHAR2(1);
1919:
1920:
1921: --
1922: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1923: --
1924: BEGIN
1925:
1926: SELECT lock_control
1935: --calling notification framework to update global picture
1936: --check code release level first. Notification framework is at Pack H level
1937: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
1938: IF l_debug_level > 0 THEN
1939: oe_debug_pub.add( 'JFC: payment_number' || P_HEADER_Payment_REC.payment_number ) ;
1940: END IF;
1941: -- Sasi: this should be added by Renga
1942: /* OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
1943: p_Hdr_pmt_rec =>p_header_Payment_rec,
1944: p_hdr_pmt_id => p_header_Payment_rec.payment_number,
1945: x_index => l_index,
1946: x_return_status => l_return_status);*/
1947: IF l_debug_level > 0 THEN
1948: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.UPDATE_ROW IS: ' || L_RETURN_STATUS ) ;
1949: END IF;
1950: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1951: IF l_debug_level > 0 THEN
1952: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
1948: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.UPDATE_ROW IS: ' || L_RETURN_STATUS ) ;
1949: END IF;
1950: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1951: IF l_debug_level > 0 THEN
1952: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
1953: END IF;
1954: IF l_debug_level > 0 THEN
1955: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.UPDATE_ROW' , 1 ) ;
1956: END IF;
1951: IF l_debug_level > 0 THEN
1952: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
1953: END IF;
1954: IF l_debug_level > 0 THEN
1955: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.UPDATE_ROW' , 1 ) ;
1956: END IF;
1957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1958: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1959: IF l_debug_level > 0 THEN
1956: END IF;
1957: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1958: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1959: IF l_debug_level > 0 THEN
1960: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.UPDATE_ROW' ) ;
1961: END IF;
1962: IF l_debug_level > 0 THEN
1963: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.UPDATE_ROW' , 1 ) ;
1964: END IF;
1959: IF l_debug_level > 0 THEN
1960: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.UPDATE_ROW' ) ;
1961: END IF;
1962: IF l_debug_level > 0 THEN
1963: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.UPDATE_ROW' , 1 ) ;
1964: END IF;
1965: RAISE FND_API.G_EXC_ERROR;
1966: END IF;
1967: END IF; /*code_release_level*/
2049: l_lock_control NUMBER:= 1;
2050: l_index NUMBER;
2051: l_return_status VARCHAR2(1);
2052: --
2053: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2054: --
2055: BEGIN
2056: IF l_debug_level > 0 THEN
2057: oe_debug_pub.add( 'ENTERING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2053: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2054: --
2055: BEGIN
2056: IF l_debug_level > 0 THEN
2057: oe_debug_pub.add( 'ENTERING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2058: END IF;
2059:
2060: INSERT INTO OE_PAYMENTS
2061: ( ATTRIBUTE1
2172: p_hdr_pmt_id => p_header_Payment_rec.payment_number,
2173: x_index => l_index,
2174: x_return_status => l_return_status); */
2175: IF l_debug_level > 0 THEN
2176: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.INSERT_ROW IS: ' || L_RETURN_STATUS ) ;
2177: END IF;
2178: IF l_debug_level > 0 THEN
2179: oe_debug_pub.add( 'RETURNED INDEX IS: ' || L_INDEX , 1 ) ;
2180: END IF;
2175: IF l_debug_level > 0 THEN
2176: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.INSERT_ROW IS: ' || L_RETURN_STATUS ) ;
2177: END IF;
2178: IF l_debug_level > 0 THEN
2179: oe_debug_pub.add( 'RETURNED INDEX IS: ' || L_INDEX , 1 ) ;
2180: END IF;
2181:
2182: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2183: IF l_debug_level > 0 THEN
2180: END IF;
2181:
2182: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2183: IF l_debug_level > 0 THEN
2184: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2185: END IF;
2186: IF l_debug_level > 0 THEN
2187: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2188: END IF;
2183: IF l_debug_level > 0 THEN
2184: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2185: END IF;
2186: IF l_debug_level > 0 THEN
2187: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2188: END IF;
2189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2190: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2191: IF l_debug_level > 0 THEN
2188: END IF;
2189: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2190: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2191: IF l_debug_level > 0 THEN
2192: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.INSERT_ROW' ) ;
2193: END IF;
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2196: END IF;
2191: IF l_debug_level > 0 THEN
2192: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.INSERT_ROW' ) ;
2193: END IF;
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2196: END IF;
2197: RAISE FND_API.G_EXC_ERROR;
2198: END IF;
2199: END IF; /*code_release_level*/
2199: END IF; /*code_release_level*/
2200: -- notification framework end
2201:
2202: IF l_debug_level > 0 THEN
2203: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.INSERT_ROW' , 1 ) ;
2204: END IF;
2205:
2206: EXCEPTION
2207:
2205:
2206: EXCEPTION
2207:
2208: WHEN OTHERS THEN
2209: oe_debug_pub.add('Sql error'||sqlerrm);
2210: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2211: THEN
2212: oe_msg_pub.Add_Exc_Msg
2213: ( G_PKG_NAME
2243: -- added for notification framework
2244: l_new_header_Payment_rec OE_Order_PUB.Header_Payment_Rec_Type;
2245: l_index NUMBER;
2246: --
2247: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2248: --R12 CC Encryption
2249: l_trxn_extension_id NUMBER;
2250: l_invoice_to_org_id NUMBER;
2251: l_payment_type_code VARCHAR2(80);
2251: l_payment_type_code VARCHAR2(80);
2252: --R12 CC Encryption
2253: BEGIN
2254: IF l_debug_level > 0 THEN
2255: oe_debug_pub.add( 'ENTERING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2256: END IF;
2257:
2258: IF p_header_id <> FND_API.G_MISS_NUM AND
2259: nvl(p_payment_number, FND_API.G_MISS_NUM) = FND_API.G_MISS_NUM
2278: x_index => l_index,
2279: x_return_status => l_return_status); */
2280:
2281: IF l_debug_level > 0 THEN
2282: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.DELETE_ROW IS: ' || L_RETURN_STATUS ) ;
2283: END IF;
2284: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2285: IF l_debug_level > 0 THEN
2286: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2282: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.DELETE_ROW IS: ' || L_RETURN_STATUS ) ;
2283: END IF;
2284: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2285: IF l_debug_level > 0 THEN
2286: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2287: END IF;
2288: IF l_debug_level > 0 THEN
2289: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2290: END IF;
2285: IF l_debug_level > 0 THEN
2286: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2287: END IF;
2288: IF l_debug_level > 0 THEN
2289: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2290: END IF;
2291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2292: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2293: IF l_debug_level > 0 THEN
2290: END IF;
2291: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2292: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2293: IF l_debug_level > 0 THEN
2294: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2295: END IF;
2296: IF l_debug_level > 0 THEN
2297: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2298: END IF;
2293: IF l_debug_level > 0 THEN
2294: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2295: END IF;
2296: IF l_debug_level > 0 THEN
2297: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2298: END IF;
2299: RAISE FND_API.G_EXC_ERROR;
2300: END IF;
2301: END IF; /*code_release_level*/
2311: /*select invoice_to_org_id into l_invoice_to_org_id --Verify
2312: from oe_order_headers_all where
2313: header_id = p_header_id;*/
2314: IF l_debug_level > 0 THEN
2315: oe_debug_pub.add('Deleting trxn id...'||l_pmt.trxn_extension_id);
2316: oe_debug_pub.add('Invoice to org.'||l_invoice_to_org_id);
2317: END IF;
2318:
2319: OE_PAYMENT_TRXN_UTIL.Delete_Payment_Trxn
2312: from oe_order_headers_all where
2313: header_id = p_header_id;*/
2314: IF l_debug_level > 0 THEN
2315: oe_debug_pub.add('Deleting trxn id...'||l_pmt.trxn_extension_id);
2316: oe_debug_pub.add('Invoice to org.'||l_invoice_to_org_id);
2317: END IF;
2318:
2319: OE_PAYMENT_TRXN_UTIL.Delete_Payment_Trxn
2320: (p_header_id => p_header_id,
2327: x_msg_data => l_msg_data);
2328:
2329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2330: IF l_debug_level > 0 THEN
2331: oe_debug_pub.add( 'Delete Payment at Header - UNEXPECTED ERROR' ) ;
2332: oe_debug_pub.add('Error message'||sqlerrm);
2333: oe_debug_pub.add('Msg data'||l_msg_data);
2334: END IF;
2335: IF l_debug_level > 0 THEN
2328:
2329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2330: IF l_debug_level > 0 THEN
2331: oe_debug_pub.add( 'Delete Payment at Header - UNEXPECTED ERROR' ) ;
2332: oe_debug_pub.add('Error message'||sqlerrm);
2333: oe_debug_pub.add('Msg data'||l_msg_data);
2334: END IF;
2335: IF l_debug_level > 0 THEN
2336: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2330: IF l_debug_level > 0 THEN
2331: oe_debug_pub.add( 'Delete Payment at Header - UNEXPECTED ERROR' ) ;
2332: oe_debug_pub.add('Error message'||sqlerrm);
2333: oe_debug_pub.add('Msg data'||l_msg_data);
2334: END IF;
2335: IF l_debug_level > 0 THEN
2336: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2337: END IF;
2332: oe_debug_pub.add('Error message'||sqlerrm);
2333: oe_debug_pub.add('Msg data'||l_msg_data);
2334: END IF;
2335: IF l_debug_level > 0 THEN
2336: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2337: END IF;
2338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2339: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2340: IF l_debug_level > 0 THEN
2337: END IF;
2338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2339: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2340: IF l_debug_level > 0 THEN
2341: oe_debug_pub.add( 'Delete Payment at Header - OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2342: oe_debug_pub.add('Error message'||sqlerrm);
2343: oe_debug_pub.add('Msg data'||l_msg_data);
2344: END IF;
2345: IF l_debug_level > 0 THEN
2338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2339: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2340: IF l_debug_level > 0 THEN
2341: oe_debug_pub.add( 'Delete Payment at Header - OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2342: oe_debug_pub.add('Error message'||sqlerrm);
2343: oe_debug_pub.add('Msg data'||l_msg_data);
2344: END IF;
2345: IF l_debug_level > 0 THEN
2346: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2339: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2340: IF l_debug_level > 0 THEN
2341: oe_debug_pub.add( 'Delete Payment at Header - OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2342: oe_debug_pub.add('Error message'||sqlerrm);
2343: oe_debug_pub.add('Msg data'||l_msg_data);
2344: END IF;
2345: IF l_debug_level > 0 THEN
2346: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2347: END IF;
2342: oe_debug_pub.add('Error message'||sqlerrm);
2343: oe_debug_pub.add('Msg data'||l_msg_data);
2344: END IF;
2345: IF l_debug_level > 0 THEN
2346: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2347: END IF;
2348: RAISE FND_API.G_EXC_ERROR;
2349: END IF;
2350: END IF;
2362: AND LINE_ID IS NULL;
2363:
2364: --3382262
2365: IF l_debug_level > 0 THEN
2366: oe_debug_pub.add('1: after executing delete statement against oe_payments - before delete_payment_at_header');
2367: END IF;
2368: Delete_Payment_at_header(p_header_id => p_header_id,
2369: x_return_status => l_return_status,
2370: x_msg_count => l_msg_count,
2371: x_msg_data => l_msg_data);
2372: --3382262
2373: -- Release all Prepayment holds;
2374: IF l_debug_level > 0 THEN
2375: oe_debug_pub.add( 'Releasing all payment related holds.' , 3 ) ;
2376: END IF;
2377:
2378: OE_Prepayment_PVT.Release_Prepayment_Hold
2379: ( p_header_id => p_header_id
2435: --ER#7479609 end
2436:
2437:
2438: IF l_debug_level > 0 THEN
2439: oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_HEADER_Payment_UTIL.DELETE_ROW IS: ' || L_RETURN_STATUS ) ;
2440: END IF;
2441:
2442: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2443: IF l_debug_level > 0 THEN
2440: END IF;
2441:
2442: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2443: IF l_debug_level > 0 THEN
2444: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2445: END IF;
2446: IF l_debug_level > 0 THEN
2447: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2448: END IF;
2443: IF l_debug_level > 0 THEN
2444: oe_debug_pub.add( 'EVENT NOTIFY - UNEXPECTED ERROR' ) ;
2445: END IF;
2446: IF l_debug_level > 0 THEN
2447: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2448: END IF;
2449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2450: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2451: IF l_debug_level > 0 THEN
2448: END IF;
2449: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2450: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2451: IF l_debug_level > 0 THEN
2452: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2453: END IF;
2454: IF l_debug_level > 0 THEN
2455: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2456: END IF;
2451: IF l_debug_level > 0 THEN
2452: oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2453: END IF;
2454: IF l_debug_level > 0 THEN
2455: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2456: END IF;
2457: RAISE FND_API.G_EXC_ERROR;
2458: END IF;
2459: END IF; /*code_release_level*/
2485:
2486: /*select invoice_to_org_id into l_invoice_to_org_id
2487: from oe_order_headers_all where header_id = p_header_id;*/
2488: IF l_debug_level > 0 THEN
2489: oe_debug_pub.add('Deleting trxn id...'||l_trxn_extension_id);
2490: oe_debug_pub.add('Invoice to org.'||l_invoice_to_org_id);
2491: END IF;
2492:
2493: OE_PAYMENT_TRXN_UTIL.Delete_Payment_Trxn
2486: /*select invoice_to_org_id into l_invoice_to_org_id
2487: from oe_order_headers_all where header_id = p_header_id;*/
2488: IF l_debug_level > 0 THEN
2489: oe_debug_pub.add('Deleting trxn id...'||l_trxn_extension_id);
2490: oe_debug_pub.add('Invoice to org.'||l_invoice_to_org_id);
2491: END IF;
2492:
2493: OE_PAYMENT_TRXN_UTIL.Delete_Payment_Trxn
2494: (p_header_id => p_header_id,
2502:
2503:
2504: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2505: IF l_debug_level > 0 THEN
2506: oe_debug_pub.add( '2:Delete Payment at Header - UNEXPECTED ERROR' ) ;
2507: END IF;
2508: IF l_debug_level > 0 THEN
2509: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2510: END IF;
2505: IF l_debug_level > 0 THEN
2506: oe_debug_pub.add( '2:Delete Payment at Header - UNEXPECTED ERROR' ) ;
2507: END IF;
2508: IF l_debug_level > 0 THEN
2509: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2510: END IF;
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: IF l_debug_level > 0 THEN
2510: END IF;
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: IF l_debug_level > 0 THEN
2514: oe_debug_pub.add( '2:Delete Payment at Header - OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2515: END IF;
2516: IF l_debug_level > 0 THEN
2517: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2518: END IF;
2513: IF l_debug_level > 0 THEN
2514: oe_debug_pub.add( '2:Delete Payment at Header - OE_HEADER_Payment_UTIL.DELETE_ROW' ) ;
2515: END IF;
2516: IF l_debug_level > 0 THEN
2517: oe_debug_pub.add( 'EXITING OE_HEADER_Payment_UTIL.DELETE_ROW' , 1 ) ;
2518: END IF;
2519: RAISE FND_API.G_EXC_ERROR;
2520: END IF;
2521: END IF;
2527: ;
2528:
2529: --3382262
2530: IF l_debug_level > 0 THEN
2531: oe_debug_pub.add('2: after executing delete statement against oe_payments - before delete_payment_at_header');
2532: END IF;
2533: Delete_Payment_at_header(p_header_id => p_header_id,
2534: x_return_status => l_return_status,
2535: x_msg_count => l_msg_count,
2539:
2540: IF l_pmt_collection_event = 'INVOICE' THEN
2541: -- release any authorization related holds.
2542: IF l_debug_level > 0 THEN
2543: oe_debug_pub.add( 'releasing all authorization related holds.', 3 ) ;
2544: END IF;
2545: OE_Verify_Payment_PUB.Release_Verify_Hold
2546: ( p_header_id => p_header_id
2547: , p_epayment_hold => 'Y'
2570:
2571: IF l_prepay_count = 0 THEN
2572: -- Release all Prepayment holds if no prepayment exists any more.
2573: IF l_debug_level > 0 THEN
2574: oe_debug_pub.add( 'releasing all prepayment related holds.', 3 ) ;
2575: END IF;
2576:
2577: OE_Prepayment_PVT.Release_Prepayment_Hold
2578: ( p_header_id => p_header_id
2589: END IF;
2590:
2591: END IF;
2592:
2593: oe_debug_pub.add('exiting oe_header_Payment_util.delete_row ',1);
2594:
2595: END IF;
2596:
2597: EXCEPTION
2673: AND HEADER_ID = p_header_id
2674: AND LINE_ID IS NULL);
2675:
2676: --
2677: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2678: --R12 CC Encryption Verify
2679: x_bank_account_number VARCHAR2(100);
2680: x_check_number varchar2(100);
2681: l_return_status VARCHAR2(30) := NULL ;
2876: AND LINE_ID IS NULL
2877: ;
2878:
2879: --
2880: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2881: --
2882: --R12 CC Encryption Verify
2883: x_bank_account_number VARCHAR2(100); --bug 5170754
2884: x_check_number varchar2(100);
3009: l_header_id NUMBER;
3010: l_Header_Payment_rec OE_Order_PUB.Header_Payment_Rec_Type;
3011: l_lock_control NUMBER;
3012: --
3013: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3014: --
3015: BEGIN
3016:
3017: IF l_debug_level > 0 THEN
3014: --
3015: BEGIN
3016:
3017: IF l_debug_level > 0 THEN
3018: oe_debug_pub.add( 'ENTERING OE_HEADER_Payment_UTIL.LOCK_ROW' , 1 ) ;
3019: END IF;
3020:
3021: SAVEPOINT Lock_Row;
3022:
3041: AND line_id is null
3042: FOR UPDATE NOWAIT;
3043:
3044: IF l_debug_level > 0 THEN
3045: oe_debug_pub.add( 'SELECTED FOR UPDATE' , 1 ) ;
3046: END IF;
3047:
3048: OE_Header_Payment_Util.Query_Row
3049: (p_payment_number => l_payment_number
3158: FOR UPDATE NOWAIT;
3159:
3160: l_payment_number NUMBER;
3161: --
3162: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3163: --
3164: BEGIN
3165:
3166: IF l_debug_level > 0 THEN
3163: --
3164: BEGIN
3165:
3166: IF l_debug_level > 0 THEN
3167: oe_debug_pub.add( 'ENTERING OE_HEADER_PaymentS_UTIL.LOCK_ROWS' , 1 ) ;
3168: END IF;
3169: /*
3170: IF (p_payment_number IS NOT NULL AND
3171: p_payment_number <> FND_API.G_MISS_NUM) AND
3237:
3238: x_return_status := FND_API.G_RET_STS_SUCCESS;
3239:
3240: IF l_debug_level > 0 THEN
3241: oe_debug_pub.add( 'EXITING OE_HEADER_PaymentS_UTIL.LOCK_ROWS' , 1 ) ;
3242: END IF;
3243:
3244: EXCEPTION
3245: WHEN NO_DATA_FOUND THEN
3285: )RETURN OE_Order_PUB.Header_Payment_Val_Rec_Type
3286: IS
3287: l_Header_Payment_val_rec OE_Order_PUB.Header_Payment_Val_Rec_Type;
3288: --
3289: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3290: --
3291: BEGIN
3292:
3293: IF (p_Header_Payment_rec.payment_collection_event IS NULL OR
3332: )
3333: IS
3334:
3335: --
3336: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3337: --
3338: BEGIN
3339:
3340: -- initialize return_status.
3448: l_bank_acct_uses_id NUMBER;
3449: l_hdr_inv_to_cust_id NUMBER;
3450: l_trx_date DATE;
3451: --
3452: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3453: --
3454: --R12 CC Encryption
3455: l_update_card_flag VARCHAR2(1) := 'N';
3456: l_trxn_extension_id NUMBER;
3463:
3464: BEGIN
3465:
3466: IF l_debug_level > 0 THEN
3467: oe_debug_pub.add( 'entering oe_header_payment_util.Pre_Write_Process. payment_type_code'||p_x_header_Payment_rec.payment_type_code);
3468: END IF;
3469: --R12 CC Encryption
3470: --Querying the invoice to org id before checking the payment type
3471: --as it is needed for both credit card and check payments.
3474: from oe_order_headers
3475: where header_id=p_x_header_Payment_rec.header_id;
3476:
3477: IF l_debug_level > 0 THEN
3478: oe_debug_pub.add( 'l_transactional_curr_code:'||l_transactional_curr_code||':l_invoice_to_org_id:'||l_invoice_to_org_id);
3479: oe_debug_pub.add(' old trxn extn id ksurendr'||p_old_header_Payment_rec.trxn_extension_id);
3480: END IF;
3481:
3482: --For payment types like Credit Card, ACH and Direct Debit, the processing
3475: where header_id=p_x_header_Payment_rec.header_id;
3476:
3477: IF l_debug_level > 0 THEN
3478: oe_debug_pub.add( 'l_transactional_curr_code:'||l_transactional_curr_code||':l_invoice_to_org_id:'||l_invoice_to_org_id);
3479: oe_debug_pub.add(' old trxn extn id ksurendr'||p_old_header_Payment_rec.trxn_extension_id);
3480: END IF;
3481:
3482: --For payment types like Credit Card, ACH and Direct Debit, the processing
3483: --is handled in OE_PAYMENT_TRXN_UTIL package. So need to modify this part
3492: WHERE organization_id = l_invoice_to_org_id;
3493: EXCEPTION
3494: WHEN OTHERS THEN
3495: IF l_debug_level > 0 THEN
3496: oe_debug_pub.add( 'IN OTHERS EXCEPTION ( OE_INVOICE_TO_ORGS_V ) '||SQLERRM , 1 ) ;
3497: END IF;
3498: END;
3499:
3500: IF l_debug_level > 0 THEN
3497: END IF;
3498: END;
3499:
3500: IF l_debug_level > 0 THEN
3501: oe_debug_pub.add('l_hdr_inv_to_cust_id -->' || l_hdr_inv_to_cust_id );
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3498: END;
3499:
3500: IF l_debug_level > 0 THEN
3501: oe_debug_pub.add('l_hdr_inv_to_cust_id -->' || l_hdr_inv_to_cust_id );
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3499:
3500: IF l_debug_level > 0 THEN
3501: oe_debug_pub.add('l_hdr_inv_to_cust_id -->' || l_hdr_inv_to_cust_id );
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3500: IF l_debug_level > 0 THEN
3501: oe_debug_pub.add('l_hdr_inv_to_cust_id -->' || l_hdr_inv_to_cust_id );
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3501: oe_debug_pub.add('l_hdr_inv_to_cust_id -->' || l_hdr_inv_to_cust_id );
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3502: oe_debug_pub.add('p_site_use_id --->'||l_invoice_to_org_id);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3503: oe_debug_pub.add('cc number : ' || p_x_header_payment_rec.credit_card_number );
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3504: oe_debug_pub.add('cc name : ' || p_x_header_payment_rec.credit_card_holder_name );
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3505: oe_debug_pub.add('exp date : ' || to_char(p_x_header_payment_rec.credit_card_expiration_date, 'DD-MON-YYYY') );
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3506: oe_debug_pub.add('instr id...'||p_x_header_payment_rec.cc_instrument_id);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3507: oe_debug_pub.add('instr assgn id'||p_x_header_payment_rec.cc_instrument_assignment_id);
3508: oe_debug_pub.add('Operation...'||p_x_header_Payment_rec.operation);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3515: oe_debug_pub.add('New Approval Date'||p_x_header_Payment_rec.credit_card_approval_date);
3509: oe_debug_pub.add('trxn extn id'||p_x_header_Payment_rec.trxn_extension_id);
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3515: oe_debug_pub.add('New Approval Date'||p_x_header_Payment_rec.credit_card_approval_date);
3516: oe_debug_pub.add('Old Approval Date'||p_old_header_Payment_rec.credit_card_approval_date);
3517: END IF;
3510: oe_debug_pub.add('New name'||p_x_header_Payment_rec.credit_card_holder_name);
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3515: oe_debug_pub.add('New Approval Date'||p_x_header_Payment_rec.credit_card_approval_date);
3516: oe_debug_pub.add('Old Approval Date'||p_old_header_Payment_rec.credit_card_approval_date);
3517: END IF;
3518:
3511: oe_debug_pub.add('Old name'||p_old_header_Payment_rec.credit_card_holder_name);
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3515: oe_debug_pub.add('New Approval Date'||p_x_header_Payment_rec.credit_card_approval_date);
3516: oe_debug_pub.add('Old Approval Date'||p_old_header_Payment_rec.credit_card_approval_date);
3517: END IF;
3518:
3519: IF p_x_header_Payment_rec.trxn_extension_id IS NOT NULL AND
3512: --Bug 7460481
3513: oe_debug_pub.add('New Approval Code'||p_x_header_Payment_rec.credit_card_approval_code);
3514: oe_debug_pub.add('Old Approval Code'||p_old_header_Payment_rec.credit_card_approval_code);
3515: oe_debug_pub.add('New Approval Date'||p_x_header_Payment_rec.credit_card_approval_date);
3516: oe_debug_pub.add('Old Approval Date'||p_old_header_Payment_rec.credit_card_approval_date);
3517: END IF;
3518:
3519: IF p_x_header_Payment_rec.trxn_extension_id IS NOT NULL AND
3520: p_x_header_Payment_rec.trxn_extension_id <> FND_API.G_MISS_NUM
3535: X_return_status => l_return_status,
3536: X_msg_count => l_msg_count,
3537: X_msg_data => l_msg_data);
3538: IF l_debug_level>0 THEN
3539: oe_debug_pub.add('New trxn extension id after calling Copy_Payment_TRXN:'||l_trxn_extension_id);
3540: END IF;
3541: EXCEPTION
3542: WHEN FND_API.G_EXC_ERROR THEN
3543: l_return_status := FND_API.G_RET_STS_ERROR;
3543: l_return_status := FND_API.G_RET_STS_ERROR;
3544: RAISE FND_API.G_EXC_ERROR;
3545: WHEN OTHERS THEN
3546: IF l_debug_level>0 THEN
3547: oe_debug_pub.add('After call to copy payment trxn - exception');
3548: END IF;
3549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3550: END;
3551:
3553:
3554: ELSIF p_x_header_payment_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
3555:
3556: IF l_debug_level > 0 THEN
3557: oe_debug_pub.add('trxn id'||p_x_header_payment_rec.trxn_Extension_id);
3558: oe_debug_pub.add('payemnt type'||p_x_header_payment_rec.payment_type_Code);
3559: IF OE_GLOBALS.Is_Same_Credit_Card(p_old_Header_Payment_rec.credit_card_number,
3560: p_x_Header_Payment_rec.credit_card_number,
3561: p_old_Header_Payment_rec.cc_instrument_id,
3554: ELSIF p_x_header_payment_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
3555:
3556: IF l_debug_level > 0 THEN
3557: oe_debug_pub.add('trxn id'||p_x_header_payment_rec.trxn_Extension_id);
3558: oe_debug_pub.add('payemnt type'||p_x_header_payment_rec.payment_type_Code);
3559: IF OE_GLOBALS.Is_Same_Credit_Card(p_old_Header_Payment_rec.credit_card_number,
3560: p_x_Header_Payment_rec.credit_card_number,
3561: p_old_Header_Payment_rec.cc_instrument_id,
3562: p_x_Header_Payment_rec.cc_instrument_id) THEN
3559: IF OE_GLOBALS.Is_Same_Credit_Card(p_old_Header_Payment_rec.credit_card_number,
3560: p_x_Header_Payment_rec.credit_card_number,
3561: p_old_Header_Payment_rec.cc_instrument_id,
3562: p_x_Header_Payment_rec.cc_instrument_id) THEN
3563: oe_debug_pub.add('same cc true');
3564: ELSE
3565: oe_debug_pub.add('diff cc');
3566: END IF;
3567: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_holder_name,
3561: p_old_Header_Payment_rec.cc_instrument_id,
3562: p_x_Header_Payment_rec.cc_instrument_id) THEN
3563: oe_debug_pub.add('same cc true');
3564: ELSE
3565: oe_debug_pub.add('diff cc');
3566: END IF;
3567: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_holder_name,
3568: p_x_header_Payment_rec.credit_card_holder_name) THEN
3569: oe_debug_pub.add('Same name');
3565: oe_debug_pub.add('diff cc');
3566: END IF;
3567: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_holder_name,
3568: p_x_header_Payment_rec.credit_card_holder_name) THEN
3569: oe_debug_pub.add('Same name');
3570: ELSE
3571: oe_debug_pub.add('Diff name');
3572: END IF;
3573: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_expiration_date,
3567: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_holder_name,
3568: p_x_header_Payment_rec.credit_card_holder_name) THEN
3569: oe_debug_pub.add('Same name');
3570: ELSE
3571: oe_debug_pub.add('Diff name');
3572: END IF;
3573: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_expiration_date,
3574: p_x_header_Payment_rec.credit_card_expiration_date) THEN
3575: oe_debug_pub.add('Same date');
3571: oe_debug_pub.add('Diff name');
3572: END IF;
3573: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_expiration_date,
3574: p_x_header_Payment_rec.credit_card_expiration_date) THEN
3575: oe_debug_pub.add('Same date');
3576: ELSE
3577: oe_debug_pub.add('Diff date');
3578: END IF;
3579: if OE_GLOBALS.Equal(p_old_header_payment_rec.instrument_security_code,
3573: if OE_GLOBALS.Equal(p_old_header_Payment_rec.credit_card_expiration_date,
3574: p_x_header_Payment_rec.credit_card_expiration_date) THEN
3575: oe_debug_pub.add('Same date');
3576: ELSE
3577: oe_debug_pub.add('Diff date');
3578: END IF;
3579: if OE_GLOBALS.Equal(p_old_header_payment_rec.instrument_security_code,
3580: p_x_header_payment_rec.instrument_security_code) THEN
3581: oe_debug_pub.add('Same cvv2');
3577: oe_debug_pub.add('Diff date');
3578: END IF;
3579: if OE_GLOBALS.Equal(p_old_header_payment_rec.instrument_security_code,
3580: p_x_header_payment_rec.instrument_security_code) THEN
3581: oe_debug_pub.add('Same cvv2');
3582: ELSE
3583: oe_debug_pub.add('Diff cvv2');
3584: END IF;
3585: if OE_GLOBALS.Equal(p_x_header_Payment_rec.payment_trx_id,
3579: if OE_GLOBALS.Equal(p_old_header_payment_rec.instrument_security_code,
3580: p_x_header_payment_rec.instrument_security_code) THEN
3581: oe_debug_pub.add('Same cvv2');
3582: ELSE
3583: oe_debug_pub.add('Diff cvv2');
3584: END IF;
3585: if OE_GLOBALS.Equal(p_x_header_Payment_rec.payment_trx_id,
3586: p_old_header_Payment_rec.payment_trx_id) THEN
3587: oe_debug_pub.add('Same trxid');
3583: oe_debug_pub.add('Diff cvv2');
3584: END IF;
3585: if OE_GLOBALS.Equal(p_x_header_Payment_rec.payment_trx_id,
3586: p_old_header_Payment_rec.payment_trx_id) THEN
3587: oe_debug_pub.add('Same trxid');
3588: ELSE
3589: oe_debug_pub.add('Diff trxid');
3590: END IF;
3591: --Bug 7460481
3585: if OE_GLOBALS.Equal(p_x_header_Payment_rec.payment_trx_id,
3586: p_old_header_Payment_rec.payment_trx_id) THEN
3587: oe_debug_pub.add('Same trxid');
3588: ELSE
3589: oe_debug_pub.add('Diff trxid');
3590: END IF;
3591: --Bug 7460481
3592: IF OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_approval_code,
3593: p_old_header_Payment_rec.credit_card_approval_code) THEN
3590: END IF;
3591: --Bug 7460481
3592: IF OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_approval_code,
3593: p_old_header_Payment_rec.credit_card_approval_code) THEN
3594: oe_debug_pub.add('Same approval code');
3595: ELSE
3596: oe_debug_pub.add('Diff approval code');
3597: END IF;
3598: END IF;
3592: IF OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_approval_code,
3593: p_old_header_Payment_rec.credit_card_approval_code) THEN
3594: oe_debug_pub.add('Same approval code');
3595: ELSE
3596: oe_debug_pub.add('Diff approval code');
3597: END IF;
3598: END IF;
3599: IF p_x_header_payment_rec.trxn_extension_id IS NOT NULL
3600: AND p_x_header_payment_rec.trxn_extension_id <> FND_API.G_MISS_NUM
3617: OR (p_x_header_Payment_rec.payment_type_code IN ('CASH','WIRE_TRANSFER'))) THEN
3618:
3619: --no operation is needed as payment information did not change
3620: IF l_debug_level > 0 THEN
3621: oe_debug_pub.add('No change to payments attributes...');
3622: END IF;
3623: NULL;
3624:
3625: --While changing the payment type from cash, check etc to
3627: --transaction extension id would be null.
3628: ELSIF p_x_header_payment_rec.trxn_extension_id is null or
3629: p_x_header_payment_rec.trxn_extension_id =FND_API.G_MISS_NUM THEN
3630: IF l_debug_level > 0 THEN
3631: oe_debug_pub.add( 'getting payment_trx_id as cc details changed');
3632: oe_debug_pub.add('Operation is Update and trxn extension id is null');
3633: oe_debug_pub.add('Payment type has changed from check or cash to one which requires trxn extension id...');
3634: END IF;
3635:
3628: ELSIF p_x_header_payment_rec.trxn_extension_id is null or
3629: p_x_header_payment_rec.trxn_extension_id =FND_API.G_MISS_NUM THEN
3630: IF l_debug_level > 0 THEN
3631: oe_debug_pub.add( 'getting payment_trx_id as cc details changed');
3632: oe_debug_pub.add('Operation is Update and trxn extension id is null');
3633: oe_debug_pub.add('Payment type has changed from check or cash to one which requires trxn extension id...');
3634: END IF;
3635:
3636: -- validate cc security code
3629: p_x_header_payment_rec.trxn_extension_id =FND_API.G_MISS_NUM THEN
3630: IF l_debug_level > 0 THEN
3631: oe_debug_pub.add( 'getting payment_trx_id as cc details changed');
3632: oe_debug_pub.add('Operation is Update and trxn extension id is null');
3633: oe_debug_pub.add('Payment type has changed from check or cash to one which requires trxn extension id...');
3634: END IF;
3635:
3636: -- validate cc security code
3637: IF p_x_Header_Payment_rec.payment_type_code = 'CREDIT_CARD' THEN
3696: X_msg_count => l_msg_count,
3697: X_msg_data => l_msg_data);
3698:
3699: IF l_debug_level > 0 THEN
3700: oe_debug_pub.add('New trxn extension id after calling Create_Payment_TRXN:'||p_x_header_payment_rec.trxn_extension_id);
3701: END IF;
3702: Exception
3703: WHEN FND_API.G_EXC_ERROR THEN
3704: OE_MSG_PUB.Count_And_Get
3715: );
3716: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_ACCT_NOT_SET');
3717: OE_MSG_PUB.ADD;
3718: IF l_debug_level > 0 THEN
3719: oe_debug_pub.add( 'OEXUHPMB: ERROR IN ARP_BANK_PKG.PROCESS_CUST_BANK_ACCOUNT'||l_msg_data ) ;
3720: oe_debug_pub.add('Error messsge ksurendr'||l_return_status);
3721: END IF;
3722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3723: end;
3716: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_ACCT_NOT_SET');
3717: OE_MSG_PUB.ADD;
3718: IF l_debug_level > 0 THEN
3719: oe_debug_pub.add( 'OEXUHPMB: ERROR IN ARP_BANK_PKG.PROCESS_CUST_BANK_ACCOUNT'||l_msg_data ) ;
3720: oe_debug_pub.add('Error messsge ksurendr'||l_return_status);
3721: END IF;
3722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3723: end;
3724:
3722: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3723: end;
3724:
3725: IF l_debug_level > 0 THEN
3726: oe_debug_pub.add( 'Return status...'||l_return_status );
3727: END IF;
3728:
3729: p_x_header_payment_rec.payment_trx_id := l_bank_acct_id;
3730: ELSE
3767: OR NOT OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_expiration_date,
3768: p_old_header_Payment_rec.credit_card_expiration_date) THEN
3769: l_update_card_flag := 'Y';
3770: END IF;
3771: oe_debug_pub.add('b4 call to update pay...');
3772: oe_debug_pub.add('Payment trx id'||p_x_header_payment_rec.payment_trx_id);
3773: OE_PAYMENT_TRXN_UTIL.Update_Payment_TRXN
3774: (P_header_id => p_x_header_Payment_rec.header_id,
3775: p_line_id => p_x_header_payment_rec.line_id,
3768: p_old_header_Payment_rec.credit_card_expiration_date) THEN
3769: l_update_card_flag := 'Y';
3770: END IF;
3771: oe_debug_pub.add('b4 call to update pay...');
3772: oe_debug_pub.add('Payment trx id'||p_x_header_payment_rec.payment_trx_id);
3773: OE_PAYMENT_TRXN_UTIL.Update_Payment_TRXN
3774: (P_header_id => p_x_header_Payment_rec.header_id,
3775: p_line_id => p_x_header_payment_rec.line_id,
3776: p_cust_id => l_hdr_inv_to_cust_id,
3795: X_return_status => l_return_status,
3796: X_msg_count => l_msg_count,
3797: X_msg_data => l_msg_data);
3798: IF l_debug_level > 0 THEN
3799: oe_debug_pub.add('trxn extension id after calling Update_Payment_TRXN:'||p_x_header_payment_rec.trxn_extension_id);
3800: END IF;
3801: EXCEPTION
3802: WHEN FND_API.G_EXC_ERROR THEN
3803:
3801: EXCEPTION
3802: WHEN FND_API.G_EXC_ERROR THEN
3803:
3804: IF l_debug_level > 0 THEN
3805: oe_debug_pub.add('Update_Payment_TRXN error....exc');
3806: oe_debug_pub.add('After call to Update_Payment_TRXN'||l_return_status);
3807: oe_debug_pub.add('Error'||sqlerrm);
3808: END IF;
3809: l_return_status := FND_API.G_RET_STS_ERROR;
3802: WHEN FND_API.G_EXC_ERROR THEN
3803:
3804: IF l_debug_level > 0 THEN
3805: oe_debug_pub.add('Update_Payment_TRXN error....exc');
3806: oe_debug_pub.add('After call to Update_Payment_TRXN'||l_return_status);
3807: oe_debug_pub.add('Error'||sqlerrm);
3808: END IF;
3809: l_return_status := FND_API.G_RET_STS_ERROR;
3810: OE_MSG_PUB.Count_And_Get
3803:
3804: IF l_debug_level > 0 THEN
3805: oe_debug_pub.add('Update_Payment_TRXN error....exc');
3806: oe_debug_pub.add('After call to Update_Payment_TRXN'||l_return_status);
3807: oe_debug_pub.add('Error'||sqlerrm);
3808: END IF;
3809: l_return_status := FND_API.G_RET_STS_ERROR;
3810: OE_MSG_PUB.Count_And_Get
3811: ( p_count => l_msg_count,
3818: ( p_count => l_msg_count,
3819: p_data => l_msg_data
3820: );
3821: IF l_debug_level > 0 THEN
3822: oe_debug_pub.add('After call to Update_Payment_TRXN --> Unexpected error');
3823: oe_debug_pub.add('Error message '||sqlerrm);
3824: END IF;
3825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3826: END;
3819: p_data => l_msg_data
3820: );
3821: IF l_debug_level > 0 THEN
3822: oe_debug_pub.add('After call to Update_Payment_TRXN --> Unexpected error');
3823: oe_debug_pub.add('Error message '||sqlerrm);
3824: END IF;
3825: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3826: END;
3827:
3827:
3828: END IF;
3829:
3830: IF l_debug_level > 0 THEN
3831: oe_debug_pub.add( 'id already derived for this credit card');
3832: END IF;
3833:
3834: ELSIF p_x_header_payment_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN --not a copy order Verify
3835:
3833:
3834: ELSIF p_x_header_payment_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN --not a copy order Verify
3835:
3836: IF l_debug_level > 0 THEN
3837: oe_debug_pub.add( 'getting payment_trx_id as cc details changed');
3838: END IF;
3839:
3840: /*l_trx_date := nvl(l_ordered_date, sysdate)
3841: - nvl( to_number(fnd_profile.value('ONT_DAYS_TO_BACKDATE_BANK_ACCT')), 0);*/
3863: p_x_Header_Payment_rec.cc_instrument_id)
3864: OR NOT OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_code,
3865: p_old_header_Payment_rec.credit_card_code) THEN
3866: IF l_debug_level > 0 THEN
3867: oe_debug_pub.add('credit card details changed!');
3868: END IF;
3869:
3870: IF NOT OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_holder_name,
3871: p_old_header_Payment_rec.credit_card_holder_name)
3871: p_old_header_Payment_rec.credit_card_holder_name)
3872: OR NOT OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_expiration_date,
3873: p_old_header_Payment_rec.credit_card_expiration_date) THEN
3874: IF l_debug_level > 0 THEN
3875: oe_debug_pub.add('Need to call update_card API');
3876: END IF;
3877:
3878: l_update_card_flag := 'Y';
3879: ELSE
3877:
3878: l_update_card_flag := 'Y';
3879: ELSE
3880: IF l_debug_level > 0 THEN
3881: oe_debug_pub.add('Need not call update_card API');
3882: END IF;
3883:
3884: l_update_card_flag := 'N';
3885: END IF;
3887: p_old_header_Payment_rec.credit_card_holder_name)
3888: OR NOT OE_GLOBALS.Equal(p_x_header_Payment_rec.credit_card_expiration_date,
3889: p_old_header_Payment_rec.credit_card_expiration_date) THEN
3890: IF l_debug_level > 0 THEN
3891: oe_debug_pub.add('Need to call update_card API 1');
3892: END IF;
3893:
3894: l_update_card_flag := 'Y';
3895: END IF;
3896:
3897:
3898: Begin
3899: IF l_debug_level > 0 THEN
3900: oe_debug_pub.add('Before calling create_payment_trxn API');
3901: END IF;
3902: OE_PAYMENT_TRXN_UTIL.Create_Payment_TRXN
3903: (p_header_id => p_x_header_Payment_rec.header_id,
3904: p_line_id => p_x_header_payment_rec.line_id,
3922: X_return_status => l_return_status,
3923: X_msg_count => l_msg_count,
3924: X_msg_data => l_msg_data);
3925:
3926: oe_debug_pub.add('New trxn extension id after calling Create_Payment_TRXN:'||p_x_header_payment_rec.trxn_extension_id);
3927:
3928: Exception
3929: WHEN FND_API.G_EXC_ERROR THEN
3930: OE_MSG_PUB.Count_And_Get
3945: );
3946: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_ACCT_NOT_SET');
3947: OE_MSG_PUB.ADD;
3948: IF l_debug_level > 0 THEN
3949: oe_debug_pub.add( 'OEXUHPMB: ERROR IN ARP_BANK_PKG.PROCESS_CUST_BANK_ACCOUNT'||l_msg_data ) ;
3950: oe_debug_pub.add('Error messsge ksurendr'||l_return_status);
3951: END IF;
3952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3953: end;
3946: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_ACCT_NOT_SET');
3947: OE_MSG_PUB.ADD;
3948: IF l_debug_level > 0 THEN
3949: oe_debug_pub.add( 'OEXUHPMB: ERROR IN ARP_BANK_PKG.PROCESS_CUST_BANK_ACCOUNT'||l_msg_data ) ;
3950: oe_debug_pub.add('Error messsge ksurendr'||l_return_status);
3951: END IF;
3952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3953: end;
3954:
3952: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3953: end;
3954:
3955: IF l_debug_level > 0 THEN
3956: oe_debug_pub.add( 'after calling process_cust_bank_account. l_bank_acct_id:'||l_bank_acct_id);
3957: END IF;
3958:
3959: p_x_header_payment_rec.payment_trx_id := l_bank_acct_id;
3960: END IF;
3965: --For update operation, the trxn extension id of the original
3966: --transaction needs to be deleted if it already exists as
3967: --there is no trxn extension id for check payments.
3968: IF l_debug_level > 0 THEN
3969: oe_debug_pub.add(' Before calling delete payment trxn....');
3970: oe_debug_pub.add(' Trxn extension to delete'||p_old_header_Payment_rec.trxn_extension_id);
3971: END IF;
3972: --Passing the invoice to org id as null as in case of
3973: --deleting payments due to bill to change, we would need the
3966: --transaction needs to be deleted if it already exists as
3967: --there is no trxn extension id for check payments.
3968: IF l_debug_level > 0 THEN
3969: oe_debug_pub.add(' Before calling delete payment trxn....');
3970: oe_debug_pub.add(' Trxn extension to delete'||p_old_header_Payment_rec.trxn_extension_id);
3971: END IF;
3972: --Passing the invoice to org id as null as in case of
3973: --deleting payments due to bill to change, we would need the
3974: --old invoice to org id.
3988: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3990: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Before setting the trxn extension id to null...');
3993: oe_debug_pub.add('Id that was deleted from iby tables...'||p_old_header_Payment_rec.trxn_extension_id);
3994: END IF;
3995: END IF;
3996:
3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3990: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
3991: IF l_debug_level > 0 THEN
3992: oe_debug_pub.add('Before setting the trxn extension id to null...');
3993: oe_debug_pub.add('Id that was deleted from iby tables...'||p_old_header_Payment_rec.trxn_extension_id);
3994: END IF;
3995: END IF;
3996:
3997: IF l_debug_level > 0 THEN
3994: END IF;
3995: END IF;
3996:
3997: IF l_debug_level > 0 THEN
3998: oe_debug_pub.add('Successful deletion of trxn extension');
3999: oe_debug_pub.add('Return status after delete trxn in pre write process '|| l_return_status);
4000: oe_debug_pub.add('msg data'||l_msg_data);
4001: END IF;
4002: --Setting the trxn extension id as null as for transactions
3995: END IF;
3996:
3997: IF l_debug_level > 0 THEN
3998: oe_debug_pub.add('Successful deletion of trxn extension');
3999: oe_debug_pub.add('Return status after delete trxn in pre write process '|| l_return_status);
4000: oe_debug_pub.add('msg data'||l_msg_data);
4001: END IF;
4002: --Setting the trxn extension id as null as for transactions
4003: --coming from sales order others tab, the trxn extension id would
3996:
3997: IF l_debug_level > 0 THEN
3998: oe_debug_pub.add('Successful deletion of trxn extension');
3999: oe_debug_pub.add('Return status after delete trxn in pre write process '|| l_return_status);
4000: oe_debug_pub.add('msg data'||l_msg_data);
4001: END IF;
4002: --Setting the trxn extension id as null as for transactions
4003: --coming from sales order others tab, the trxn extension id would
4004: --be updated in oe_payments table during updation.
4017: := ROUND(p_x_header_payment_rec.payment_amount, OE_ORDER_UTIL.G_Precision);
4018: END IF;
4019:
4020: IF l_debug_level > 0 THEN
4021: oe_debug_pub.add('EXITING OE_HEADER_PAYMENT_UTIL.PRE_WRITE_PROCESS');
4022: END IF;
4023:
4024: EXCEPTION
4025: WHEN FND_API.G_EXC_ERROR THEN
4023:
4024: EXCEPTION
4025: WHEN FND_API.G_EXC_ERROR THEN
4026: IF L_DEBUG_LEVEL > 0 THEN
4027: Oe_debug_pub.add('OEXUHPMB.pls - pre_write_process error ');
4028: END if;
4029: p_x_header_Payment_rec.return_status := FND_API.G_RET_STS_ERROR;
4030: RAISE FND_API.G_EXC_ERROR;
4031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4029: p_x_header_Payment_rec.return_status := FND_API.G_RET_STS_ERROR;
4030: RAISE FND_API.G_EXC_ERROR;
4031: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4032: IF L_DEBUG_LEVEL > 0 THEN
4033: Oe_debug_pub.add('OEXUHPMB.pls - pre_write_process unexpected error ');
4034: END if;
4035: p_x_header_payment_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4037:
4036: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4037:
4038: WHEN OTHERS THEN
4039: IF L_DEBUG_LEVEL > 0 THEN
4040: Oe_debug_pub.add('OEXUHPMB.pls - pre_write_process unexpected error ');
4041: END if;
4042: raise fnD_API.G_EXC_UNEXPECTED_ERROR;
4043:
4044: END Pre_Write_Process;
4067:
4068: Exception
4069:
4070: when others then
4071: oe_debug_pub.add('could not find any records');
4072: return;
4073:
4074: End;
4075:
4088: END IF;
4089:
4090: l_header_rec := l_old_header_rec;
4091:
4092: oe_debug_pub.add('before updating oe_order_headers_all ');
4093:
4094: update oe_order_headers_all
4095: set payment_type_code = null,
4096: payment_amount = null,