158:
159: -- Call OE_Order_PVT.Process_order
160:
161: OE_Order_PVT.Header_Payments
162: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
163: , p_init_msg_list => FND_API.G_TRUE
164: , p_control_rec => l_control_rec
165: , p_x_Header_Payment_tbl => l_x_Header_Payment_tbl
166: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
159: -- Call OE_Order_PVT.Process_order
160:
161: OE_Order_PVT.Header_Payments
162: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
163: , p_init_msg_list => FND_API.G_TRUE
164: , p_control_rec => l_control_rec
165: , p_x_Header_Payment_tbl => l_x_Header_Payment_tbl
166: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
167: , x_return_Status => l_return_status
166: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
167: , x_return_Status => l_return_status
168: );
169:
170: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
167: , x_return_Status => l_return_status
168: );
169:
170: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175:
168: );
169:
170: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175:
176: -- Load OUT parameters.
169:
170: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
172: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175:
176: -- Load OUT parameters.
177:
227:
228: -- Write to cache.
229: -- Set db_flag to False before writing to cache
230:
231: l_x_Header_Payment_tbl(1).db_flag := FND_API.G_FALSE;
232:
233: Write_Header_Payment
234: ( p_Header_Payment_rec => l_x_Header_PAYMENT_tbl(1)
235: );
238: OE_GLOBALS.G_UI_FLAG := FALSE;
239:
240: -- Set return status.
241:
242: x_return_status := FND_API.G_RET_STS_SUCCESS;
243:
244: -- Get message count and data
245:
246: oe_msg_pub.Count_And_Get
253: END IF;
254:
255: EXCEPTION
256:
257: WHEN FND_API.G_EXC_ERROR THEN
258:
259: OE_GLOBALS.G_UI_FLAG := FALSE;
260:
261: x_return_status := FND_API.G_RET_STS_ERROR;
257: WHEN FND_API.G_EXC_ERROR THEN
258:
259: OE_GLOBALS.G_UI_FLAG := FALSE;
260:
261: x_return_status := FND_API.G_RET_STS_ERROR;
262:
263: -- Get message count and data
264:
265: oe_msg_pub.Count_And_Get
266: ( p_count => x_msg_count
267: , p_data => x_msg_data
268: );
269:
270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
271:
272: OE_GLOBALS.G_UI_FLAG := FALSE;
273:
274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
270: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
271:
272: OE_GLOBALS.G_UI_FLAG := FALSE;
273:
274: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
275:
276: -- Get message count and data
277:
278: oe_msg_pub.Count_And_Get
283: WHEN OTHERS THEN
284:
285: OE_GLOBALS.G_UI_FLAG := FALSE;
286:
287: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
288:
289: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
290: THEN
291: oe_msg_pub.Add_Exc_Msg
484: END LOOP;
485:
486: -- Set Operation.
487:
488: IF FND_API.To_Boolean(l_x_Header_Payment_tbl(1).db_flag) THEN
489: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
490: ELSE
491: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
492: END IF;
500: --oe_debug_pub.add('New Card holder'||l_x_header_Payment_tbl(1).credit_card_holder_name);
501:
502: OE_Order_PVT.Header_Payments
503: (
504: p_validation_level => FND_API.G_VALID_LEVEL_NONE
505: , p_init_msg_list => FND_API.G_TRUE
506: , p_control_rec => l_control_rec
507: , p_x_Header_Payment_tbl => l_x_Header_PAYMENT_tbl
508: , p_x_old_Header_Payment_tbl => l_x_old_Header_PAYMENT_tbl
501:
502: OE_Order_PVT.Header_Payments
503: (
504: p_validation_level => FND_API.G_VALID_LEVEL_NONE
505: , p_init_msg_list => FND_API.G_TRUE
506: , p_control_rec => l_control_rec
507: , p_x_Header_Payment_tbl => l_x_Header_PAYMENT_tbl
508: , p_x_old_Header_Payment_tbl => l_x_old_Header_PAYMENT_tbl
509: , x_return_status => l_return_status
512: --oe_debug_pub.add('New Holder name'||l_x_Header_Payment_Tbl(1).credit_card_holder_name);
513: --oe_debug_pub.add('Old Holder name'||l_Header_Payment_rec.credit_card_holder_name);
514:
515:
516: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
517: oe_debug_pub.add('ren: unexp error header_payments : ' || p_attr_id);
518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
519: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
520: oe_debug_pub.add('ren: exp error header_payments : ' || p_attr_id);
514:
515:
516: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
517: oe_debug_pub.add('ren: unexp error header_payments : ' || p_attr_id);
518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
519: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
520: oe_debug_pub.add('ren: exp error header_payments : ' || p_attr_id);
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
515:
516: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
517: oe_debug_pub.add('ren: unexp error header_payments : ' || p_attr_id);
518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
519: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
520: oe_debug_pub.add('ren: exp error header_payments : ' || p_attr_id);
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523:
517: oe_debug_pub.add('ren: unexp error header_payments : ' || p_attr_id);
518: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
519: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
520: oe_debug_pub.add('ren: exp error header_payments : ' || p_attr_id);
521: RAISE FND_API.G_EXC_ERROR;
522: END IF;
523:
524:
525: -- Init OUT parameters to missing.
523:
524:
525: -- Init OUT parameters to missing.
526:
527: x_attribute1 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
524:
525: -- Init OUT parameters to missing.
526:
527: x_attribute1 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
525: -- Init OUT parameters to missing.
526:
527: x_attribute1 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
526:
527: x_attribute1 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
527: x_attribute1 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
528: x_attribute2 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
529: x_attribute3 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
530: x_attribute4 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
531: x_attribute5 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
532: x_attribute6 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
533: x_attribute7 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
534: x_attribute8 := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
535: x_attribute9 := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
536: x_attribute10 := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
537: x_attribute11 := FND_API.G_MISS_CHAR;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
538: x_attribute12 := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
539: x_attribute13 := FND_API.G_MISS_CHAR;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
540: x_attribute14 := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
541: x_attribute15 := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
542: x_context := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
543: x_check_number := FND_API.G_MISS_CHAR;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
544: x_credit_card_approval_code := FND_API.G_MISS_CHAR;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
545: x_credit_card_approval_date := FND_API.G_MISS_DATE;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
546: x_credit_card_code := FND_API.G_MISS_CHAR;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
547: x_credit_card_expiration_date := FND_API.G_MISS_DATE;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
548: x_credit_card_holder_name := FND_API.G_MISS_CHAR;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
549: x_credit_card_number := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
550: x_payment_level_code := FND_API.G_MISS_CHAR;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
551: x_commitment_applied_amount := FND_API.G_MISS_NUM;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
552: x_commitment_interfaced_amount := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
553: x_payment_number := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
554: x_header_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
555: x_line_id := FND_API.G_MISS_NUM;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
556: x_payment_amount := FND_API.G_MISS_NUM;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
557: x_payment_collection_event := FND_API.G_MISS_CHAR;
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
565: x_instrument_security_code := FND_API.G_MISS_CHAR; --R12 CC encryption
558: x_payment_trx_id := FND_API.G_MISS_NUM;
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
565: x_instrument_security_code := FND_API.G_MISS_CHAR; --R12 CC encryption
566:
559: x_payment_type_code := FND_API.G_MISS_CHAR;
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
565: x_instrument_security_code := FND_API.G_MISS_CHAR; --R12 CC encryption
566:
567: -- Load display out parameters if any
560: x_payment_set_id := FND_API.G_MISS_NUM;
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
565: x_instrument_security_code := FND_API.G_MISS_CHAR; --R12 CC encryption
566:
567: -- Load display out parameters if any
568:
561: x_prepaid_amount := FND_API.G_MISS_NUM;
562: x_receipt_method_id := FND_API.G_MISS_NUM;
563: x_tangible_id := FND_API.G_MISS_CHAR;
564: x_defer_processing_flag := FND_API.G_MISS_CHAR;
565: x_instrument_security_code := FND_API.G_MISS_CHAR; --R12 CC encryption
566:
567: -- Load display out parameters if any
568:
569: l_Header_Payment_val_rec := OE_Header_PAYMENT_Util.Get_Values
845: OE_GLOBALS.G_UI_FLAG := FALSE;
846:
847: -- Set return status.
848:
849: x_return_status := FND_API.G_RET_STS_SUCCESS;
850:
851: -- Get message count and data
852:
853: oe_msg_pub.Count_And_Get
860: END IF;
861:
862: EXCEPTION
863:
864: WHEN FND_API.G_EXC_ERROR THEN
865:
866: OE_GLOBALS.G_UI_FLAG := FALSE;
867:
868: x_return_status := FND_API.G_RET_STS_ERROR;
864: WHEN FND_API.G_EXC_ERROR THEN
865:
866: OE_GLOBALS.G_UI_FLAG := FALSE;
867:
868: x_return_status := FND_API.G_RET_STS_ERROR;
869:
870: -- Get message count and data
871:
872: oe_msg_pub.Count_And_Get
873: ( p_count => x_msg_count
874: , p_data => x_msg_data
875: );
876:
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878:
879: OE_GLOBALS.G_UI_FLAG := FALSE;
880:
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
877: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
878:
879: OE_GLOBALS.G_UI_FLAG := FALSE;
880:
881: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
882:
883: -- Get message count and data
884:
885: oe_msg_pub.Count_And_Get
890: WHEN OTHERS THEN
891:
892: OE_GLOBALS.G_UI_FLAG := FALSE;
893:
894: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
895:
896: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
897: THEN
898: oe_msg_pub.Add_Exc_Msg
1051: , 'Unrecognized attribute'
1052: );
1053: END IF;
1054:
1055: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1056:
1057: END IF;
1058: EXCEPTION
1059: WHEN OTHERS THEN
1063: ( G_PKG_NAME
1064: , 'Copy_Attribute_To_Rec'
1065: );
1066: END IF;
1067: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1068: END Copy_Attribute_To_Rec;
1069: -- R12 CC Encryption
1070:
1071: -- Procedure Validate_And_Write
1139: );
1140:
1141: -- Set Operation.
1142:
1143: IF FND_API.To_Boolean(l_x_Header_Payment_tbl(1).db_flag) THEN
1144: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
1145: ELSE
1146: l_x_Header_Payment_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
1147: END IF;
1151: -- Call OE_Order_PVT.Process_order
1152:
1153:
1154: OE_Order_PVT.Header_Payments
1155: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
1156: , p_init_msg_list => FND_API.G_TRUE
1157: , p_control_rec => l_control_rec
1158: , p_x_Header_Payment_tbl => l_x_Header_PAYMENT_tbl
1159: , p_x_old_Header_Payment_tbl => l_x_old_Header_PAYMENT_tbl
1152:
1153:
1154: OE_Order_PVT.Header_Payments
1155: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
1156: , p_init_msg_list => FND_API.G_TRUE
1157: , p_control_rec => l_control_rec
1158: , p_x_Header_Payment_tbl => l_x_Header_PAYMENT_tbl
1159: , p_x_old_Header_Payment_tbl => l_x_old_Header_PAYMENT_tbl
1160: , x_return_status => l_return_status
1159: , p_x_old_Header_Payment_tbl => l_x_old_Header_PAYMENT_tbl
1160: , x_return_status => l_return_status
1161: );
1162:
1163: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1160: , x_return_status => l_return_status
1161: );
1162:
1163: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168:
1161: );
1162:
1163: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168:
1169: -- Load OUT parameters.
1162:
1163: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1164: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1165: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1166: RAISE FND_API.G_EXC_ERROR;
1167: END IF;
1168:
1169: -- Load OUT parameters.
1170:
1188: OE_GLOBALS.G_UI_FLAG := FALSE;
1189:
1190: -- Set return status.
1191:
1192: x_return_status := FND_API.G_RET_STS_SUCCESS;
1193:
1194: -- Get message count and data
1195:
1196: oe_msg_pub.Count_And_Get
1203: END IF;
1204:
1205: EXCEPTION
1206:
1207: WHEN FND_API.G_EXC_ERROR THEN
1208:
1209: OE_GLOBALS.G_UI_FLAG := FALSE;
1210:
1211: x_return_status := FND_API.G_RET_STS_ERROR;
1207: WHEN FND_API.G_EXC_ERROR THEN
1208:
1209: OE_GLOBALS.G_UI_FLAG := FALSE;
1210:
1211: x_return_status := FND_API.G_RET_STS_ERROR;
1212:
1213: -- Get message count and data
1214:
1215: oe_msg_pub.Count_And_Get
1216: ( p_count => x_msg_count
1217: , p_data => x_msg_data
1218: );
1219:
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221:
1222: OE_GLOBALS.G_UI_FLAG := FALSE;
1223:
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221:
1222: OE_GLOBALS.G_UI_FLAG := FALSE;
1223:
1224: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1225:
1226: -- Get message count and data
1227:
1228: oe_msg_pub.Count_And_Get
1233: WHEN OTHERS THEN
1234:
1235: OE_GLOBALS.G_UI_FLAG := FALSE;
1236:
1237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1238:
1239: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1240: THEN
1241: oe_msg_pub.Add_Exc_Msg
1317: -- Call OE_Order_PVT.Process_order
1318:
1319:
1320: OE_Order_PVT.Header_Payments
1321: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
1322: , p_init_msg_list => FND_API.G_TRUE
1323: , p_control_rec => l_control_rec
1324: , p_x_Header_Payment_tbl => l_x_Header_Payment_tbl
1325: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
1318:
1319:
1320: OE_Order_PVT.Header_Payments
1321: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
1322: , p_init_msg_list => FND_API.G_TRUE
1323: , p_control_rec => l_control_rec
1324: , p_x_Header_Payment_tbl => l_x_Header_Payment_tbl
1325: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
1326: , x_return_status => l_return_status
1325: , p_x_old_Header_Payment_tbl => l_x_old_Header_Payment_tbl
1326: , x_return_status => l_return_status
1327: );
1328:
1329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1331: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1326: , x_return_status => l_return_status
1327: );
1328:
1329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1331: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1334:
1327: );
1328:
1329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1331: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1334:
1335:
1328:
1329: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1330: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1331: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1332: RAISE FND_API.G_EXC_ERROR;
1333: END IF;
1334:
1335:
1336: -- Clear Header_Payment record cache
1341: OE_GLOBALS.G_UI_FLAG := FALSE;
1342:
1343: -- Set return status.
1344:
1345: x_return_status := FND_API.G_RET_STS_SUCCESS;
1346:
1347: -- Get message count and data
1348:
1349: oe_msg_pub.Count_And_Get
1356: END IF;
1357:
1358: EXCEPTION
1359:
1360: WHEN FND_API.G_EXC_ERROR THEN
1361:
1362: OE_GLOBALS.G_UI_FLAG := FALSE;
1363:
1364: x_return_status := FND_API.G_RET_STS_ERROR;
1360: WHEN FND_API.G_EXC_ERROR THEN
1361:
1362: OE_GLOBALS.G_UI_FLAG := FALSE;
1363:
1364: x_return_status := FND_API.G_RET_STS_ERROR;
1365:
1366: -- Get message count and data
1367:
1368: oe_msg_pub.Count_And_Get
1369: ( p_count => x_msg_count
1370: , p_data => x_msg_data
1371: );
1372:
1373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1374:
1375: OE_GLOBALS.G_UI_FLAG := FALSE;
1376:
1377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1373: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1374:
1375: OE_GLOBALS.G_UI_FLAG := FALSE;
1376:
1377: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1378:
1379: -- Get message count and data
1380:
1381: oe_msg_pub.Count_And_Get
1386: WHEN OTHERS THEN
1387:
1388: OE_GLOBALS.G_UI_FLAG := FALSE;
1389:
1390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1391:
1392: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1393: THEN
1394: oe_msg_pub.Add_Exc_Msg
1475: -- Call OE_Order_PVT.Process_order
1476:
1477: OE_Order_PVT.Process_order
1478: ( p_api_version_number => 1.0
1479: , p_init_msg_list => FND_API.G_TRUE
1480: , x_return_status => l_return_status
1481: , x_msg_count => x_msg_count
1482: , x_msg_data => x_msg_data
1483: , p_control_rec => l_control_rec
1501: );
1502:
1503: Oe_Order_Pvt.Process_Requests_And_Notify
1504: ( p_process_requests => TRUE
1505: , p_init_msg_list => FND_API.G_TRUE
1506: , p_notify => FALSE
1507: , x_return_status => l_return_status
1508: );
1509:
1506: , p_notify => FALSE
1507: , x_return_status => l_return_status
1508: );
1509:
1510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1507: , x_return_status => l_return_status
1508: );
1509:
1510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1515:
1508: );
1509:
1510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1515:
1516:
1509:
1510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1513: RAISE FND_API.G_EXC_ERROR;
1514: END IF;
1515:
1516:
1517: -- Re-set the UI flag to FALSE
1518: OE_GLOBALS.G_UI_FLAG := FALSE;
1519:
1520: -- Set return status.
1521:
1522: x_return_status := FND_API.G_RET_STS_SUCCESS;
1523:
1524: -- Get message count and data
1525:
1526: oe_msg_pub.Count_And_Get
1533: END IF;
1534:
1535: EXCEPTION
1536:
1537: WHEN FND_API.G_EXC_ERROR THEN
1538:
1539: OE_GLOBALS.G_UI_FLAG := FALSE;
1540:
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1537: WHEN FND_API.G_EXC_ERROR THEN
1538:
1539: OE_GLOBALS.G_UI_FLAG := FALSE;
1540:
1541: x_return_status := FND_API.G_RET_STS_ERROR;
1542:
1543: -- Get message count and data
1544:
1545: oe_msg_pub.Count_And_Get
1546: ( p_count => x_msg_count
1547: , p_data => x_msg_data
1548: );
1549:
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551:
1552: OE_GLOBALS.G_UI_FLAG := FALSE;
1553:
1554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1550: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1551:
1552: OE_GLOBALS.G_UI_FLAG := FALSE;
1553:
1554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1555:
1556: -- Get message count and data
1557:
1558: oe_msg_pub.Count_And_Get
1563: WHEN OTHERS THEN
1564:
1565: OE_GLOBALS.G_UI_FLAG := FALSE;
1566:
1567: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1568:
1569: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1570: THEN
1571: oe_msg_pub.Add_Exc_Msg
1618:
1619: OE_Header_Payment_Util.Lock_Row
1620: ( x_return_status => l_return_status
1621: , p_x_header_Payment_rec => l_x_header_payment_rec );
1622: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1623:
1624: -- Set DB flag and write record to cache.
1625:
1626: l_x_Header_Payment_rec.db_flag := FND_API.G_TRUE;
1622: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1623:
1624: -- Set DB flag and write record to cache.
1625:
1626: l_x_Header_Payment_rec.db_flag := FND_API.G_TRUE;
1627:
1628: Write_Header_Payment
1629: ( p_Header_Payment_rec => l_x_Header_Payment_rec
1630: , p_db_record => TRUE
1658: , 'Lock_Row'
1659: );
1660: END IF;
1661:
1662: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1663:
1664: -- Get message count and data
1665:
1666: oe_msg_pub.Count_And_Get
1729: , p_header_id => p_header_id
1730: , x_header_Payment_rec => g_Header_Payment_rec
1731: );
1732:
1733: g_Header_Payment_rec.db_flag := FND_API.G_TRUE;
1734:
1735: -- Load DB record
1736:
1737: g_db_Header_Payment_rec := g_Header_PAYMENT_rec;