[Home] [Help]
1: PACKAGE BODY OE_Blanket_util AS
2: /* $Header: OEXUBSOB.pls 120.19.12010000.5 2008/11/18 01:51:05 smusanna ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Blanket_Util';
4:
5: PROCEDURE Insert_History_Records
1: PACKAGE BODY OE_Blanket_util AS
2: /* $Header: OEXUBSOB.pls 120.19.12010000.5 2008/11/18 01:51:05 smusanna ship $ */
3: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Blanket_Util';
4:
5: PROCEDURE Insert_History_Records
6: (p_header_rec IN OUT NOCOPY OE_Blanket_PUB.Header_Rec_Type
7: ,p_line_tbl IN OUT NOCOPY OE_Blanket_PUB.Line_Tbl_Type
921: --
922: BEGIN
923:
924: if l_debug_level > 0 then
925: oe_debug_pub.add('Entering OE_BLANKET_UTIL.VALIDATE_ATTRIBUTES',1);
926: end if;
927: x_return_status := FND_API.G_RET_STS_SUCCESS;
928:
929: -- Validate header attributes
1460: END IF;
1461:
1462: if l_debug_level > 0 then
1463: oe_debug_pub.add('After blanket header_desc_flex ' || x_return_status,2);
1464: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.VALIDATE_ATTRIBUTES',1);
1465: end if;
1466: EXCEPTION
1467:
1468: WHEN FND_API.G_EXC_ERROR THEN
1507: --
1508: BEGIN
1509:
1510: if l_debug_level > 0 then
1511: oe_debug_pub.add('Enter procedure OE_blanket_util.validate line Attributes',1);
1512: end if;
1513:
1514: x_return_status := FND_API.G_RET_STS_SUCCESS;
1515: -- Compare line attributes with header record if the header record is
1981:
1982: END IF; -- 5562785
1983:
1984: if l_debug_level > 0 then
1985: oe_debug_pub.add('Exiting procedure OE_BLANKET_UTIL.Validate Line Attributes',1);
1986: end if;
1987:
1988: EXCEPTION
1989:
2229:
2230: x_return_status := FND_API.G_RET_STS_SUCCESS;
2231:
2232: if l_debug_level > 0 then
2233: oe_debug_pub.add('Enter OE_BLANKET_UTIL.Validate ENTITY - Line',1);
2234: oe_debug_pub.add('Operation : '||p_line_rec.operation);
2235: oe_debug_pub.add('Price List ID : '||p_line_rec.price_list_id);
2236: oe_debug_pub.add('Unit List Price : '||p_line_rec.unit_list_price);
2237: oe_debug_pub.add('Line end date : '||p_line_rec.end_date_active);
2347:
2348: -- Customer Item Validation
2349: IF (p_line_rec.operation = oe_globals.g_opr_update or p_line_rec.operation = oe_globals.g_opr_create) AND
2350: p_line_rec.ITEM_IDENTIFIER_TYPE = 'CUST' then
2351: oe_blanket_util.Get_Inventory_Item(p_x_line_rec => p_line_rec,
2352: x_return_status => l_return_status);
2353: END if;
2354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2355: oe_debug_pub.add('Raise and Error in Customer ITem Validation oe_blanket_util.Get_Inventory_Item');
2351: oe_blanket_util.Get_Inventory_Item(p_x_line_rec => p_line_rec,
2352: x_return_status => l_return_status);
2353: END if;
2354: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2355: oe_debug_pub.add('Raise and Error in Customer ITem Validation oe_blanket_util.Get_Inventory_Item');
2356: RAISE FND_API.G_EXC_ERROR;
2357: END IF;
2358: --PP Revenue Recognition
2359: --bug 4893057
2687: fnd_message.set_name('ONT', 'OE_BLKT_UPDATE_ATTR_CLOSED');
2688: OE_MSG_PUB.Add;
2689: END IF;
2690: --Srini
2691: --oe_blanket_util.Get_Inventory_Item(p_x_line_rec => p_line_rec,
2692: -- x_return_status => l_return_status);
2693: --End srini
2694: --display warning if we haven't fulfilled minimum requirements
2695: IF NOT OE_GLOBALS.Equal(p_line_rec.end_date_active, l_old_line_rec.end_date_active) AND
3110: END IF; --bug 3443777, need to call validate entity for reasons capture
3111:
3112: if l_debug_level > 0 then
3113: -- Done validating entity
3114: oe_debug_pub.add('Exit OE_BLANKET_UTIL.Validate ENTITY- Line',1);
3115: end if;
3116:
3117: EXCEPTION
3118:
3157: BEGIN
3158: x_return_status := FND_API.G_RET_STS_SUCCESS;
3159:
3160: if l_debug_level > 0 then
3161: oe_debug_pub.add('Enter OE_BLANKET_UTIL.Validate_ENTITY- Header',1);
3162: oe_debug_pub.add('Operation :'||p_header_rec.operation);
3163: oe_debug_pub.add('new end date :'||p_header_rec.end_date_active);
3164: oe_debug_pub.add('old end date :'||l_old_header_rec.end_date_active);
3165: end if;
4026:
4027: g_header_rec := p_header_rec;
4028:
4029: if l_debug_level > 0 then
4030: oe_debug_pub.add('Exit OE_BLANKET_UTIL.Validate_ENTITY- Header',1);
4031: end if;
4032:
4033: EXCEPTION
4034: WHEN FND_API.G_EXC_ERROR THEN
4056:
4057: x_return_status := FND_API.G_RET_STS_SUCCESS;
4058:
4059: if l_debug_level > 0 then
4060: oe_debug_pub.add('Entering OE_BLANKET_UTIL.INSERT_ROW - Header ID :'||
4061: p_header_rec.header_id);
4062: end if;
4063: --bug 7139169
4064: OE_GLOBALS.Set_Context;
4273: );
4274:
4275: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4276: if l_debug_level > 0 then
4277: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.INSERT_ROW- Header', 1);
4278: end if;
4279:
4280: EXCEPTION
4281:
4430: AND END_DATE_ACTIVE IS NULL;
4431:
4432: OE_Blanket_Header_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4433: if l_debug_level > 0 then
4434: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.UPDATE_ROW', 1);
4435: end if;
4436:
4437: EXCEPTION
4438:
4477: -- hashraf ... start of pack J
4478: x_return_status := FND_API.G_RET_STS_SUCCESS;
4479:
4480: if l_debug_level > 0 then
4481: oe_debug_pub.add('Entering OE_BLANKET_UTIL.DELETE_ROW - HEADER ID :'||
4482: p_header_id);
4483: end if;
4484:
4485: BEGIN
4503:
4504: IF l_transaction_phase_code IS NOT NULL THEN
4505:
4506: IF l_transaction_phase_code = 'N' THEN
4507: oe_debug_pub.add('OE_BLANKET_UTIL.Delete_Row WF negotiate');
4508: OE_Order_WF_Util.delete_row(p_type=>'NEGOTIATE', p_id => p_header_id);
4509: ELSE
4510: oe_debug_pub.add('OE_BLANKET_UTIL.Delete_Row WF blanket');
4511: OE_Order_WF_Util.delete_row(p_type=>'BLANKET', p_id => p_header_id);
4506: IF l_transaction_phase_code = 'N' THEN
4507: oe_debug_pub.add('OE_BLANKET_UTIL.Delete_Row WF negotiate');
4508: OE_Order_WF_Util.delete_row(p_type=>'NEGOTIATE', p_id => p_header_id);
4509: ELSE
4510: oe_debug_pub.add('OE_BLANKET_UTIL.Delete_Row WF blanket');
4511: OE_Order_WF_Util.delete_row(p_type=>'BLANKET', p_id => p_header_id);
4512: END IF;
4513:
4514: END IF;
4511: OE_Order_WF_Util.delete_row(p_type=>'BLANKET', p_id => p_header_id);
4512: END IF;
4513:
4514: END IF;
4515: oe_debug_pub.add('OE_BLANKET_UTIL.Delete_Row after WF delete');
4516:
4517: -- 11i10 Pricing Changes
4518: OE_Blanket_Pricing_Util.Deactivate_Pricing
4519: (p_blanket_header_id => p_header_id
4546:
4547: --for bug 3348870
4548: For r_line_id in c_line_id
4549: Loop
4550: OE_Blanket_Util.Delete_Row(p_line_id => r_line_id.line_id
4551: ,x_return_status => X_RETURN_STATUS);
4552: End Loop;
4553:
4554: --End bug
4563: DELETE FROM OE_BLANKET_HEADERS_EXT
4564: WHERE order_number=l_order_number;
4565:
4566: if l_debug_level > 0 then
4567: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.DELETE_ROW', 1);
4568: end if;
4569:
4570: EXCEPTION
4571: WHEN FND_API.G_EXC_ERROR THEN
4616:
4617: x_return_status := FND_API.G_RET_STS_SUCCESS;
4618:
4619: if l_debug_level > 0 then
4620: oe_debug_pub.add('Entering OE_BLANKET_UTIL.INSERT_ROW - Line ID :'||
4621: p_line_rec.line_id);
4622: end if;
4623:
4624: --Versioning changes
4840: );
4841:
4842: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4843: if l_debug_level > 0 then
4844: oe_debug_pub.add('Exiting OE_blanket_UTIL.INSERT_ROW', 1);
4845: end if;
4846:
4847: EXCEPTION
4848:
4871: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4872: --
4873: BEGIN
4874: if l_debug_level > 0 then
4875: oe_debug_pub.add('Entering OE_Blanket_UTIL.UPDATE_ROW - LINE', 1);
4876: end if;
4877: x_return_status := FND_API.G_RET_STS_SUCCESS;
4878:
4879: --Versioning changes
4991: WHERE line_id = p_line_rec.line_id;
4992:
4993: OE_Blanket_Line_Security.g_check_all_cols_constraint := 'Y'; /* Bug # 5516348 */
4994: if l_debug_level > 0 then
4995: oe_debug_pub.add('Exiting OE_Blanket_UTIL.UPDATE_ROW - LINE', 1);
4996: end if;
4997:
4998: EXCEPTION
4999:
5026: -- hashraf ... start of pack J
5027: x_return_status := FND_API.G_RET_STS_SUCCESS;
5028:
5029: if l_debug_level > 0 then
5030: oe_debug_pub.add('Entering OE_BLANKET_UTIL.DELETE_ROW - LINE ID :'||
5031: p_line_id);
5032: end if;
5033:
5034: IF l_header_id IS NULL or
5085: DELETE FROM OE_BLANKET_LINES_HIST
5086: WHERE line_id = p_line_id;
5087:
5088: if l_debug_level > 0 then
5089: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.DELETE_ROW', 1);
5090: end if;
5091:
5092: EXCEPTION
5093: WHEN FND_API.G_EXC_ERROR THEN
5322:
5323: x_return_status := FND_API.G_RET_STS_SUCCESS;
5324:
5325: if l_debug_level > 0 then
5326: oe_debug_pub.add('Entering OE_BLANKET_UTIL.QUERY_ROW', 1);
5327: end if;
5328:
5329: IF p_version_number IS NOT NULL THEN
5330: SELECT /* MOAC_SQL_CHANGE */ version_number INTO l_current_version_number FROM OE_BLANKET_HEADERS_ALL WHERE header_id = p_header_id;
5550: CLOSE l_hdr_hist_csr;
5551: END IF;
5552:
5553: if l_debug_level > 0 then
5554: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.QUERY_ROW -Header', 1);
5555: end if;
5556:
5557: EXCEPTION
5558:
6233: --
6234: BEGIN
6235:
6236: if l_debug_level > 0 then
6237: oe_debug_pub.add('Entering OE_BLANKET_UTIL.LOCK_ROW', 1);
6238: end if;
6239:
6240: OE_MSG_PUB.initialize;
6241:
6262: , p_data => x_msg_data
6263: );
6264:
6265: if l_debug_level > 0 then
6266: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.LOCK_ROW', 1);
6267: end if;
6268:
6269: EXCEPTION
6270: WHEN FND_API.G_EXC_ERROR THEN
6354: BEGIN
6355:
6356:
6357: if l_debug_level > 0 then
6358: oe_debug_pub.add('Entering OE_BLANKET_UTIL.LOCK_BLANKET', 1);
6359: end if;
6360:
6361: OE_MSG_PUB.initialize;
6362:
6468:
6469: END IF;
6470:
6471: if l_debug_level > 0 then
6472: oe_debug_pub.add('Exiting OE_BLANKET_UTIL.LOCK_BLANKET', 1);
6473: end if;
6474:
6475: OE_GLOBALS.G_LOCK_TEST := 'N';
6476:
7165: x_msg_count => lx_msg_count,
7166: x_msg_data => lx_msg_Data);
7167: IF lx_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7168: if l_debug_level > 0 then
7169: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object unexp error in Create and Start flow ', 1);
7170: end if;
7171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7172: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7173: if l_debug_level > 0 then
7170: end if;
7171: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7172: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7173: if l_debug_level > 0 then
7174: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object exc error in Create and Start Flow ', 1);
7175: end if;
7176: RAISE FND_API.G_EXC_ERROR;
7177: END IF;
7178:
7203: );
7204:
7205: IF lx_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7206: if l_debug_level > 0 then
7207: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object unexp error in inst. doc terms ', 1);
7208: end if;
7209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7210: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7211: if l_debug_level > 0 then
7208: end if;
7209: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7210: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7211: if l_debug_level > 0 then
7212: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object exc error in inst. doc terms ', 1);
7213: end if;
7214: RAISE FND_API.G_EXC_ERROR;
7215: END IF;
7216:
7226: x_return_status => l_return_status);
7227:
7228: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7229: if l_debug_level > 0 then
7230: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object unexp error in perform versioning ', 1);
7231: end if;
7232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7233: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
7234: if l_debug_level > 0 then
7231: end if;
7232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7233: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
7234: if l_debug_level > 0 then
7235: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object exc error in perform versioning ', 1);
7236: end if;
7237: RAISE FND_API.G_EXC_ERROR;
7238: END IF;
7239:
7247:
7248:
7249: IF lx_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7250: if l_debug_level > 0 then
7251: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object unexp error in perform versioning ', 1);
7252: end if;
7253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7254: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7255: if l_debug_level > 0 then
7252: end if;
7253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7254: ELSIF lx_return_status = FND_API.G_RET_STS_ERROR THEN
7255: if l_debug_level > 0 then
7256: oe_debug_pub.ADD('OE_Blanket_Util.Process_Object exc error in perform versioning ', 1);
7257: end if;
7258: RAISE FND_API.G_EXC_ERROR;
7259: END IF;
7260:
8339: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8340: --
8341: BEGIN
8342: if l_debug_level > 0 then
8343: oe_debug_pub.add('Enter OE_Blanket_Util.Returns_Exist');
8344: end if;
8345:
8346: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8347: l_blanket_number := oe_blanket_line_security.g_record.order_number;
8391: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8392: --
8393: BEGIN
8394: if l_debug_level > 0 then
8395: oe_debug_pub.add('Enter OE_Blanket_Util.Release_Lines_Exist');
8396: end if;
8397:
8398: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8399: l_blanket_number := oe_blanket_line_security.g_record.order_number;
8441: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8442: --
8443: BEGIN
8444: if l_debug_level > 0 then
8445: oe_debug_pub.add('Enter OE_Blanket_Util.Release_Lines_Exist');
8446: end if;
8447:
8448: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8449: l_blanket_number := oe_blanket_line_security.g_record.order_number;
8489: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8490: --
8491: BEGIN
8492: if l_debug_level > 0 then
8493: oe_debug_pub.add('Enter OE_Blanket_Util.Open_Release_Lines_Exist');
8494: end if;
8495:
8496: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8497: l_blanket_number := oe_blanket_line_security.g_record.order_number;
8541: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8542: --
8543: BEGIN
8544: if l_debug_level > 0 then
8545: oe_debug_pub.add('Enter OE_Blanket_Util.Open_Release_Lines_Exist');
8546: end if;
8547:
8548: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8549: l_blanket_number := oe_blanket_line_security.g_record.order_number;
8589: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
8590: --
8591: BEGIN
8592: if l_debug_level > 0 then
8593: oe_debug_pub.add('Enter OE_Blanket_Util.Is_Expired');
8594: end if;
8595:
8596: If p_validation_entity_short_name = 'BLANKET_LINE' Then
8597: If (trunc(sysdate) >= OE_Blanket_Line_Security.g_record.start_date_active
9226: post message OE_INVALIDATES_CUSTOMER_ITEM
9227: set return status to error.
9228: */
9229: x_return_status := FND_API.G_RET_STS_SUCCESS;
9230: oe_debug_pub.add('Entering Oe_blanket_util Get_Inventory_Item', 1);
9231: IF (p_x_line_rec.ship_to_org_id IS NOT NULL AND
9232: p_x_line_rec.ship_to_org_id <> FND_API.G_MISS_NUM) THEN
9233:
9234: SELECT u.cust_acct_site_id,s.cust_account_id
9304: BEGIN
9305: OE_MSG_PUB.initialize;
9306: x_return_status := FND_API.G_RET_STS_SUCCESS;
9307: IF l_debug_level > 0 THEN
9308: oe_debug_pub.add('ENTERING OE_Blanket_util.validate_sold_to:');
9309: oe_debug_pub.add('DB Line ID : '|| TO_CHAR (mc1x.line_id) ,1);
9310: oe_debug_pub.add('DB Sold To Org ID : '|| TO_CHAR (mc1x.sold_to_org_id) ,1);
9311: oe_debug_pub.add('actual Hdr Sold To Org ID : '|| TO_CHAR (p_sold_to_org_id) ,1);
9312: END IF;
9331: and address_status='A';
9332: EXCEPTION
9333: WHEN NO_DATA_FOUND THEN
9334: if l_debug_level > 0 then
9335: oe_debug_pub.add ('OE_blanket_util.validate_sold_to Blanket In ship to No data found',2);
9336: end if;
9337: l_dummy := 'INVALID';
9338: x_return_status := FND_API.G_RET_STS_ERROR;
9339: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9341: , OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
9342: OE_MSG_PUB.Add;
9343: WHEN OTHERS THEN
9344: if l_debug_level > 0 then
9345: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Ship No data found',2);
9346: end if;
9347: l_dummy := 'INVALID';
9348: x_return_status := FND_API.G_RET_STS_ERROR;
9349: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9364:
9365: EXCEPTION
9366: WHEN NO_DATA_FOUND THEN
9367: if l_debug_level > 0 then
9368: oe_debug_pub.add ('OE_blanket_util.validate_sold_to Blanket In deliver No data found',2);
9369: end if;
9370: l_dummy := 'INVALID';
9371: x_return_status := FND_API.G_RET_STS_ERROR;
9372: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9374: OE_Order_Util.Get_Attribute_Name('deliver_to_org_id'));
9375: OE_MSG_PUB.Add;
9376: WHEN OTHERS THEN
9377: if l_debug_level > 0 then
9378: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Deliver No data found',2);
9379: end if;
9380: l_dummy := 'INVALID';
9381: x_return_status := FND_API.G_RET_STS_ERROR;
9382: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9394: AND site_use_id = mc1x.invoice_to_org_id;
9395: EXCEPTION
9396: WHEN NO_DATA_FOUND THEN
9397: if l_debug_level > 0 then
9398: oe_debug_pub.add ('OE_blanket_util.validate_sold_to Blanket In invoice No data found',2);
9399: end if;
9400: l_dummy := 'INVALID';
9401: x_return_status := FND_API.G_RET_STS_ERROR;
9402: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
9404: OE_Order_Util.Get_Attribute_Name('invoice_to_org_id'));
9405: OE_MSG_PUB.Add;
9406: WHEN OTHERS THEN
9407: if l_debug_level > 0 then
9408: oe_debug_pub.add ('OE_blanket_util.validate_sold_to WOE Blanket In Invoice No data found',2);
9409: end if;
9410: l_dummy := 'INVALID';
9411: x_return_status := FND_API.G_RET_STS_ERROR;
9412: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9417: end if;
9418: END LOOP;
9419: CLOSE C1;
9420: if l_debug_level > 0 then
9421: oe_debug_pub.add ('OE_blanket_util.validate_sold_to After Close In Invoice '||x_return_status,2);
9422: end if;
9423:
9424: if x_return_status = FND_API.G_RET_STS_ERROR then
9425: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
9427: update oe_blanket_lines_all set sold_to_org_id = p_sold_to_org_id
9428: where header_id = p_header_id;
9429: end if;
9430: IF l_debug_level > 0 THEN
9431: oe_debug_pub.add('EXISTING OE_Blanket_util.validate_sold_to: '|| TO_CHAR (p_header_id) ,1);
9432: END IF;
9433: END validate_sold_to;
9434:
9435: -- New procedure added for 5528599 start
9547: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9548: --
9549: BEGIN
9550: if l_debug_level > 0 then
9551: oe_debug_pub.add('Enter OE_Blanket_Util.Batch_Call');
9552: end if;
9553:
9554: if OE_GLOBALS.G_UI_FLAG THEN
9555: oe_debug_pub.add(' UI Call ');
9563: END IF;
9564: --END IF;
9565: END Is_Batch_Call;
9566:
9567: END OE_Blanket_UTIL;