[Home] [Help]
1: PACKAGE BODY OE_Validate_Header AS
2: /* $Header: OEXLHDRB.pls 120.25.12020000.3 2013/01/25 20:23:42 suthumma ship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: OEXLHDRB.pls 120.25.12020000.3 2013/01/25 20:23:42 suthumma ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Validate_Header';
7:
8:
9: /* LOCAL PROCEDURES */
10:
24: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
25: BEGIN
26:
27: if l_debug_level > 0 then
28: oe_debug_pub.add('Enter OE_VALIDATE_HEADER.Check_Negotiation_Attributes',1);
29: end if;
30:
31: x_return_status := FND_API.G_RET_STS_SUCCESS;
32:
159: END IF;
160:
161: END IF; -- End of check if phase = F/N
162:
163: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.Check_Negotiation_Attributes',1);
164:
165: EXCEPTION
166: WHEN FND_API.G_EXC_ERROR THEN
167: x_return_status := FND_API.G_RET_STS_ERROR;
192: l_order_type_rec OE_Order_Cache.Order_Type_Rec_Type;
193: l_set_of_books_rec OE_Order_Cache.Set_Of_Books_Rec_Type;
194: BEGIN
195:
196: oe_debug_pub.add('Enter OE_VALIDATE_HEADER.CHECK_BOOK_REQD',1);
197:
198: -- Check for the following required fields on a booked order:
199: -- Order Number, Sold To Org, Invoice To Org,
200: -- Price List, Tax Exempt Flag, Sales Person, Order Date
388: */
389:
390: END IF; -- END of checks related to payment type
391:
392: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.CHECK_BOOK_REQD',1);
393: EXCEPTION
394: WHEN OTHERS THEN
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396:
420: lexists varchar2(30);
421: lprocessname varchar2(80);
422: BEGIN
423:
424: oe_debug_pub.add('Entering OE_VALIDATE_HEADER.Validate_Order_Type',1);
425: IF p_operation = OE_GLOBALS.G_OPR_UPDATE
426: THEN
427: IF NOT OE_GLOBALS.EQUAL(p_order_type_id
428: ,p_old_Order_type_id)
444: AND rownum = 1;
445: END IF;
446: END IF;
447:
448: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.Validate_Order_Type',1);
449: EXCEPTION
450: WHEN NO_DATA_FOUND THEN
451: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
452: OE_MSG_PUB.ADD;
481: AND commitment_id is not null;
482:
483: BEGIN
484:
485: oe_debug_pub.add('Entering OE_VALIDATE_HEADER.Validate_Commitment_Currency',1);
486: OPEN l_line_csr;
487: LOOP
488: FETCH l_line_csr INTO l_commitment_id;
489: EXIT WHEN l_line_csr%NOTFOUND;
511:
512: END LOOP;
513: CLOSE l_line_csr;
514:
515: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.Validate_Commitment_Currency',1);
516:
517: EXCEPTION
518: WHEN NO_DATA_FOUND THEN
519: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
568: AND hcar.bill_to_flag = 'Y');
569:
570: BEGIN
571:
572: oe_debug_pub.add('Entering OE_VALIDATE_HEADER.Validate_Commitment_Customer',1);
573: OPEN l_line_csr;
574: LOOP
575: FETCH l_line_csr INTO l_commitment_id;
576: EXIT WHEN l_line_csr%NOTFOUND;
615:
616: END LOOP;
617: CLOSE l_line_csr;
618:
619: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.Validate_Commitment_Customer',1);
620:
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
737: l_customer_name VARCHAR2(240);
738: l_customer_number NUMBER;
739: BEGIN
740: if l_debug_level > 0 then
741: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_HEADER.Validate_Blanket_Values',1);
742: OE_DEBUG_PUB.Add('Blanket Number :'||p_header_rec.blanket_number,1);
743: end if;
744:
745: IF p_header_rec.blanket_number IS NULL THEN
884: OE_MSG_PUB.Add;
885: x_return_status := FND_API.G_RET_STS_ERROR;
886: END IF;
887: if l_debug_level > 0 then
888: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_HEADER.Validate_Blanket_Values',1);
889: end if;
890: EXCEPTION
891:
892: WHEN FND_API.G_EXC_ERROR THEN
996: WHERE l.header_id=p_old_header_rec.header_id;
997: --added for bug 3739650
998: l_site_use_code VARCHAR2(30);
999: BEGIN
1000: oe_debug_pub.add('Enter OE_VALIDATE_HEADER.ENTITY',1);
1001:
1002: -- Check required attributes.
1003: --lcustomer_relations := FND_PROFILE.VALUE('ONT_CUSTOMER_RELATIONSHIPS');
1004: lcustomer_relations := OE_Sys_Parameters.VALUE('CUSTOMER_RELATIONSHIPS_FLAG');
1277: THEN
1278:
1279: OE_MSG_PUB.Add_Exc_Msg
1280: ( G_PKG_NAME ,
1281: 'OE_VALIDATE_HEADER-QP_UTIL_PUB'
1282: );
1283: END IF;
1284: Oe_Debug_Pub.Add('Error when calling QP_UTIL_PUB.Validate_Price_list_Curr_code:'||SQLERRM);
1285: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2448: OR (p_header_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2449: )
2450: THEN
2451:
2452: IF OE_Validate_Header.Is_Duplicate_PO_Number
2453: (p_header_rec.cust_po_number
2454: ,p_header_rec.sold_to_org_id
2455: ,p_header_rec.header_id )
2456: THEN
2769:
2770: -- Done validating entity
2771: x_return_status := l_return_status;
2772:
2773: oe_debug_pub.add('Exit OE_VALIDATE_HEADER.ENTITY',1);
2774:
2775: EXCEPTION
2776:
2777: WHEN FND_API.G_EXC_ERROR THEN
2811: l_cc_security_code_use Varchar2(20);
2812: l_auth_exist varchar2(10); --Bug# 16099743
2813: BEGIN
2814:
2815: oe_debug_pub.add('Entering OE_VALIDATE_HEADER.ATTRIBUTES',1);
2816:
2817: x_return_status := FND_API.G_RET_STS_SUCCESS;
2818:
2819: -- Validate header attributes
3767: END IF;
3768:
3769: oe_Debug_pub.add('after flow_status_code');
3770: if OE_GLOBALS.g_validate_desc_flex ='Y' then -- bug4343612
3771: oe_debug_pub.add('Validation of desc flex is set to Y in OE_Validate_Header.attributes ',1);
3772: IF p_x_header_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
3773:
3774: ( p_x_header_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
3775: (p_x_header_rec.attribute1 IS NOT NULL AND
3873: -- p_x_header_rec.source_document_type_id = FND_API.G_MISS_NUM OR
3874: -- p_x_header_rec.source_document_type_id = 2) THEN
3875: -- commented above, bug 2511313
3876:
3877: IF NOT OE_VALIDATE.Header_Desc_Flex
3878: (p_context => p_x_header_rec.context
3879: ,p_attribute1 => p_x_header_rec.attribute1
3880: ,p_attribute2 => p_x_header_rec.attribute2
3881: ,p_attribute3 => p_x_header_rec.attribute3
5136:
5137:
5138: --End Of Addition
5139: --End Of Addition
5140: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.ATTRIBUTES',1);
5141:
5142: EXCEPTION
5143:
5144: WHEN FND_API.G_EXC_ERROR THEN
5201: END IF;
5202:
5203: END Entity_Delete;
5204:
5205: END OE_Validate_Header;