247:
248: l_error := 3;
249:
250: Oe_Order_Pvt.Lines
251: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
252: , p_init_msg_list => FND_API.G_TRUE
253: , p_control_rec => l_control_rec
254: , p_x_line_tbl => x_line_tbl
255: , p_x_old_line_tbl => x_old_line_tbl
248: l_error := 3;
249:
250: Oe_Order_Pvt.Lines
251: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
252: , p_init_msg_list => FND_API.G_TRUE
253: , p_control_rec => l_control_rec
254: , p_x_line_tbl => x_line_tbl
255: , p_x_old_line_tbl => x_old_line_tbl
256: , x_return_status => l_return_status
260: IF l_debug_level > 0 THEN
261: oe_debug_pub.add( 'LINE CONTROLLER - DEFAULT ATTRIBUTES - AFTER PROCESS' , 2 ) ;
262: END IF;
263:
264: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
267: RAISE FND_API.G_EXC_ERROR;
268: END IF;
261: oe_debug_pub.add( 'LINE CONTROLLER - DEFAULT ATTRIBUTES - AFTER PROCESS' , 2 ) ;
262: END IF;
263:
264: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
267: RAISE FND_API.G_EXC_ERROR;
268: END IF;
269:
262: END IF;
263:
264: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
267: RAISE FND_API.G_EXC_ERROR;
268: END IF;
269:
270:
263:
264: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
265: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
266: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
267: RAISE FND_API.G_EXC_ERROR;
268: END IF;
269:
270:
271: -- Unload OUT
284: IF l_debug_level > 0 THEN
285: oe_debug_pub.add( 'LINE CONTROLLER - DEFAULT ATTRIBUTES - CALLING WRITE LINE' , 2 ) ;
286: END IF;
287:
288: x_line_tbl(1).db_flag := FND_API.G_FALSE;
289:
290: Write_line
291: ( p_line_rec => x_line_tbl(1)
292: );
295: OE_GLOBALS.G_UI_FLAG := FALSE;
296:
297: -- Set return status.
298:
299: x_return_status := FND_API.G_RET_STS_SUCCESS;
300:
301: -- Get message count and data
302:
303: oe_msg_pub.count_and_get
310: END IF;
311:
312: EXCEPTION
313:
314: WHEN FND_API.G_EXC_ERROR THEN
315:
316: OE_GLOBALS.G_UI_FLAG := FALSE;
317:
318: x_return_status := FND_API.G_RET_STS_ERROR;
314: WHEN FND_API.G_EXC_ERROR THEN
315:
316: OE_GLOBALS.G_UI_FLAG := FALSE;
317:
318: x_return_status := FND_API.G_RET_STS_ERROR;
319:
320: -- Get message count and data
321:
322: oe_msg_pub.count_and_get
323: ( p_count => x_msg_count
324: , p_data => x_msg_data
325: );
326:
327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328:
329: OE_GLOBALS.G_UI_FLAG := FALSE;
330:
331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328:
329: OE_GLOBALS.G_UI_FLAG := FALSE;
330:
331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
332:
333: -- Get message count and data
334:
335: oe_msg_pub.count_and_get
340: WHEN OTHERS THEN
341:
342: OE_GLOBALS.G_UI_FLAG := FALSE;
343:
344: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
345:
346: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
347: THEN
348: oe_msg_pub.Add_Exc_Msg
506: ELSIF p_attr_id = OE_Line_Util.G_LATE_DEMAND_PENALTY_FACTOR THEN
507: x_line_tbl(1).late_demand_penalty_factor := TO_NUMBER(p_attr_value);
508: ELSIF p_attr_id = OE_Line_Util.G_LINE_CATEGORY THEN
509: x_line_tbl(1).line_category_code := p_attr_value;
510: x_line_tbl(1).line_type_id := FND_API.G_MISS_NUM;
511: ELSIF p_attr_id = OE_Line_Util.G_LINE THEN
512: x_line_tbl(1).line_id := TO_NUMBER(p_attr_value);
513: ELSIF p_attr_id = OE_Line_Util.G_LINE_NUMBER THEN
514: x_line_tbl(1).line_number := TO_NUMBER(p_attr_value);
1113: , 'Unrecognized attribute'
1114: );
1115: END IF;
1116:
1117: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1118:
1119: END IF;
1120:
1121:
1127: ( G_PKG_NAME
1128: , 'Copy_Attribute_To_Rec'
1129: );
1130: END IF;
1131: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1132: END Copy_Attribute_To_Rec;
1133:
1134: -- Procedure : Change_Attribute
1135: --
1170:
1171: )
1172: IS
1173: l_control_rec OE_GLOBALS.Control_Rec_Type;
1174: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1175: l_date_format_mask VARCHAR2(30) := p_date_format_mask;
1176: l_order_date_type_code VARCHAR2(30) := null;
1177: l_orig_ship_from_org_id OE_Order_LINES.ship_from_org_id%TYPE;
1178: l_x_item_rec_type OE_ORDER_CACHE.item_rec_type; -- OPM 2/JUN/00
1214: -- Read line from cache
1215:
1216: IF p_default_cache_line_rec.line_id IS NOT NULL THEN
1217: x_line_tbl(1):=p_default_cache_line_rec;
1218: x_line_tbl(1).db_flag := FND_API.G_FALSE;
1219: Write_line
1220: ( p_line_rec => x_line_tbl(1)
1221: );
1222:
1230: l_control_rec.default_attributes := FALSE;
1231: l_control_rec.clear_dependents := FALSE;
1232: l_control_rec.check_security := FALSE;
1233:
1234: IF FND_API.To_Boolean(x_line_tbl(1).db_flag) THEN
1235: x_line_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
1236: ELSE
1237: x_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
1238: END IF;
1238: END IF;
1239:
1240: Oe_Order_Pvt.Lines
1241: (
1242: p_validation_level => FND_API.G_VALID_LEVEL_NONE
1243: , p_init_msg_list => FND_API.G_TRUE
1244: , p_control_rec => l_control_rec
1245: , p_x_line_tbl => x_line_tbl
1246: , p_x_old_line_tbl => x_old_line_tbl
1239:
1240: Oe_Order_Pvt.Lines
1241: (
1242: p_validation_level => FND_API.G_VALID_LEVEL_NONE
1243: , p_init_msg_list => FND_API.G_TRUE
1244: , p_control_rec => l_control_rec
1245: , p_x_line_tbl => x_line_tbl
1246: , p_x_old_line_tbl => x_old_line_tbl
1247: , x_return_status => l_return_status
1245: , p_x_line_tbl => x_line_tbl
1246: , p_x_old_line_tbl => x_old_line_tbl
1247: , x_return_status => l_return_status
1248: );
1249: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1250: IF l_debug_level > 0 THEN
1251: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
1252: END IF;
1253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1249: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1250: IF l_debug_level > 0 THEN
1251: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
1252: END IF;
1253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1254: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1255: IF l_debug_level > 0 THEN
1256: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
1257: END IF;
1250: IF l_debug_level > 0 THEN
1251: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
1252: END IF;
1253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1254: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1255: IF l_debug_level > 0 THEN
1256: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
1257: END IF;
1258: RAISE FND_API.G_EXC_ERROR;
1254: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1255: IF l_debug_level > 0 THEN
1256: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
1257: END IF;
1258: RAISE FND_API.G_EXC_ERROR;
1259: END IF;
1260:
1261: x_old_line_tbl(1) := x_line_tbl(1);
1262: ELSE
1444: ELSIF p_attr_id = OE_Line_Util.G_LATE_DEMAND_PENALTY_FACTOR THEN
1445: x_line_tbl(1).late_demand_penalty_factor := TO_NUMBER(p_attr_value);
1446: ELSIF p_attr_id = OE_Line_Util.G_LINE_CATEGORY THEN
1447: x_line_tbl(1).line_category_code := p_attr_value;
1448: x_line_tbl(1).line_type_id := FND_API.G_MISS_NUM;
1449: ELSIF p_attr_id = OE_Line_Util.G_LINE THEN
1450: x_line_tbl(1).line_id := TO_NUMBER(p_attr_value);
1451: ELSIF p_attr_id = OE_Line_Util.G_LINE_NUMBER THEN
1452: x_line_tbl(1).line_number := TO_NUMBER(p_attr_value);
2024: , 'Unrecognized attribute'
2025: );
2026: END IF;
2027:
2028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2029:
2030: END IF;
2031:
2032: -- PLEASE ADD THE ABOVE IF LOGIC FOR NEW ATTRIBUTES TO THE PROCEDURE
2040: IF l_debug_level > 0 THEN
2041: oe_debug_pub.add( 'SETTING OPERATION' , 2 ) ;
2042: END IF;
2043:
2044: IF FND_API.To_Boolean(x_line_tbl(1).db_flag) THEN
2045: x_line_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
2046: ELSE
2047: x_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
2048: END IF;
2064:
2065: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INV_SHP_DATE');
2066: OE_MSG_PUB.Add;
2067:
2068: l_return_status := FND_API.G_RET_STS_ERROR;
2069:
2070: END IF;
2071:
2072: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2068: l_return_status := FND_API.G_RET_STS_ERROR;
2069:
2070: END IF;
2071:
2072: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2073: IF l_debug_level > 0 THEN
2074: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2075: END IF;
2076: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2072: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2073: IF l_debug_level > 0 THEN
2074: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2075: END IF;
2076: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2077: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2078: IF l_debug_level > 0 THEN
2079: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2080: END IF;
2073: IF l_debug_level > 0 THEN
2074: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2075: END IF;
2076: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2077: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2078: IF l_debug_level > 0 THEN
2079: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2080: END IF;
2081: RAISE FND_API.G_EXC_ERROR;
2077: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2078: IF l_debug_level > 0 THEN
2079: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2080: END IF;
2081: RAISE FND_API.G_EXC_ERROR;
2082: END IF;
2083:
2084: END IF;
2085:
2096:
2097: FND_MESSAGE.SET_NAME('ONT','OE_SCH_INV_ARR_DATE');
2098: OE_MSG_PUB.Add;
2099:
2100: l_return_status := FND_API.G_RET_STS_ERROR;
2101:
2102: END IF;
2103:
2104: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2100: l_return_status := FND_API.G_RET_STS_ERROR;
2101:
2102: END IF;
2103:
2104: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2105: IF l_debug_level > 0 THEN
2106: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2107: END IF;
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2104: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2105: IF l_debug_level > 0 THEN
2106: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2107: END IF;
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2109: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2110: IF l_debug_level > 0 THEN
2111: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2112: END IF;
2105: IF l_debug_level > 0 THEN
2106: oe_debug_pub.add( 'DATE TYPE RETURNED UNEXP_ERROR' , 2 ) ;
2107: END IF;
2108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2109: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2110: IF l_debug_level > 0 THEN
2111: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2112: END IF;
2113: RAISE FND_API.G_EXC_ERROR;
2109: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2110: IF l_debug_level > 0 THEN
2111: oe_debug_pub.add( 'DATE TYPE RETURN RET_STS_ERROR' , 2 ) ;
2112: END IF;
2113: RAISE FND_API.G_EXC_ERROR;
2114: END IF;
2115:
2116: END IF;
2117: END IF;
2124: oe_debug_pub.add('Cannot change source type',2);
2125: END IF;
2126: FND_MESSAGE.SET_NAME('ONT','ONT_CANT_CHG_SRC_TYPE');
2127: OE_MSG_PUB.Add;
2128: l_return_status := FND_API.G_RET_STS_ERROR;
2129: RAISE FND_API.G_EXC_ERROR;
2130: END IF;
2131: -- end for 3998402
2132: --Start for bug16574638
2125: END IF;
2126: FND_MESSAGE.SET_NAME('ONT','ONT_CANT_CHG_SRC_TYPE');
2127: OE_MSG_PUB.Add;
2128: l_return_status := FND_API.G_RET_STS_ERROR;
2129: RAISE FND_API.G_EXC_ERROR;
2130: END IF;
2131: -- end for 3998402
2132: --Start for bug16574638
2133: IF x_line_tbl(1).line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE
2147: oe_debug_pub.add('Cannot change reference details',2);
2148: END IF;
2149: FND_MESSAGE.SET_NAME('ONT','OE_RMA_RECEIVED');
2150: OE_MSG_PUB.Add;
2151: l_return_status := FND_API.G_RET_STS_ERROR;
2152: RAISE FND_API.G_EXC_ERROR;
2153: END IF;
2154: END IF;
2155: END IF;
2148: END IF;
2149: FND_MESSAGE.SET_NAME('ONT','OE_RMA_RECEIVED');
2150: OE_MSG_PUB.Add;
2151: l_return_status := FND_API.G_RET_STS_ERROR;
2152: RAISE FND_API.G_EXC_ERROR;
2153: END IF;
2154: END IF;
2155: END IF;
2156: --End for bug 16574638
2161:
2162: -- Call Oe_Order_Pvt.Process_order
2163: Oe_Order_Pvt.Lines
2164: (
2165: p_validation_level => FND_API.G_VALID_LEVEL_NONE
2166: , p_init_msg_list => FND_API.G_TRUE
2167: , p_control_rec => l_control_rec
2168: , p_x_line_tbl => x_line_tbl
2169: , p_x_old_line_tbl => x_old_line_tbl
2162: -- Call Oe_Order_Pvt.Process_order
2163: Oe_Order_Pvt.Lines
2164: (
2165: p_validation_level => FND_API.G_VALID_LEVEL_NONE
2166: , p_init_msg_list => FND_API.G_TRUE
2167: , p_control_rec => l_control_rec
2168: , p_x_line_tbl => x_line_tbl
2169: , p_x_old_line_tbl => x_old_line_tbl
2170: , x_return_status => l_return_status
2173: IF l_debug_level > 0 THEN
2174: oe_debug_pub.add( 'AFTER CALLING PROCESS ORDER' , 1 ) ;
2175: END IF;
2176: --bug 2438466 begin
2177: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN -- Fix for bug3546224
2178: IF p_attr_id = OE_Line_Util.G_RETURN_CONTEXT THEN
2179: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2180: (p_request_type =>OE_GLOBALS.G_COPY_ADJUSTMENTS
2181: ,p_delete => FND_API.G_TRUE
2177: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN -- Fix for bug3546224
2178: IF p_attr_id = OE_Line_Util.G_RETURN_CONTEXT THEN
2179: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2180: (p_request_type =>OE_GLOBALS.G_COPY_ADJUSTMENTS
2181: ,p_delete => FND_API.G_TRUE
2182: ,x_return_status => l_return_status
2183: );
2184: END IF;
2185: END IF;
2184: END IF;
2185: END IF;
2186: --bug 2438466 end
2187:
2188: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2189: IF l_debug_level > 0 THEN
2190: oe_debug_pub.add( 'PROCESS ORDER RETURN UNEXP_ERROR' , 2 ) ;
2191: END IF;
2192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2188: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2189: IF l_debug_level > 0 THEN
2190: oe_debug_pub.add( 'PROCESS ORDER RETURN UNEXP_ERROR' , 2 ) ;
2191: END IF;
2192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2193: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add( 'PROCESS ORDER RETURN RET_STS_ERROR' , 2 ) ;
2196: END IF;
2189: IF l_debug_level > 0 THEN
2190: oe_debug_pub.add( 'PROCESS ORDER RETURN UNEXP_ERROR' , 2 ) ;
2191: END IF;
2192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2193: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add( 'PROCESS ORDER RETURN RET_STS_ERROR' , 2 ) ;
2196: END IF;
2197: RAISE FND_API.G_EXC_ERROR;
2193: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2194: IF l_debug_level > 0 THEN
2195: oe_debug_pub.add( 'PROCESS ORDER RETURN RET_STS_ERROR' , 2 ) ;
2196: END IF;
2197: RAISE FND_API.G_EXC_ERROR;
2198: END IF;
2199:
2200:
2201: -- Unload OUT tbl
2239: OE_GLOBALS.G_UI_FLAG := FALSE;
2240:
2241: -- Set return status.
2242:
2243: x_return_status := FND_API.G_RET_STS_SUCCESS;
2244:
2245: -- Get message count and data
2246:
2247: oe_msg_pub.count_and_get
2254: END IF;
2255:
2256: EXCEPTION
2257:
2258: WHEN FND_API.G_EXC_ERROR THEN
2259:
2260: OE_GLOBALS.G_UI_FLAG := FALSE;
2261:
2262: x_return_status := FND_API.G_RET_STS_ERROR;
2258: WHEN FND_API.G_EXC_ERROR THEN
2259:
2260: OE_GLOBALS.G_UI_FLAG := FALSE;
2261:
2262: x_return_status := FND_API.G_RET_STS_ERROR;
2263:
2264: -- Get message count and data
2265:
2266: oe_msg_pub.count_and_get
2267: ( p_count => x_msg_count
2268: , p_data => x_msg_data
2269: );
2270:
2271: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2272:
2273: OE_GLOBALS.G_UI_FLAG := FALSE;
2274:
2275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2271: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2272:
2273: OE_GLOBALS.G_UI_FLAG := FALSE;
2274:
2275: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2276:
2277: -- Get message count and data
2278:
2279: oe_msg_pub.count_and_get
2284: WHEN OTHERS THEN
2285:
2286: OE_GLOBALS.G_UI_FLAG := FALSE;
2287:
2288: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2289:
2290: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
2291: THEN
2292: oe_msg_pub.Add_Exc_Msg
2381: /* End Audit Trail */
2382:
2383: -- Set Operation.
2384:
2385: IF FND_API.To_Boolean(l_x_line_tbl(1).db_flag) THEN
2386: l_x_line_tbl(1).operation := OE_GLOBALS.G_OPR_UPDATE;
2387: ELSE
2388: l_x_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
2389:
2388: l_x_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
2389:
2390: /* We are passing the miss quantity for reserved filed
2391: since we are not converting this to null in OE_LINE_UTIL_EXT' */
2392: l_x_old_line_tbl(1).reserved_quantity := FND_API.G_MISS_NUM;
2393:
2394: END IF;
2395:
2396: -- Populate line table
2403: oe_debug_pub.add( 'IN VALIDATE_AND_WRITE' ) ;
2404: END IF;
2405: oe_debug_pub.add( 'IN VALIDATE_AND_WRITE Change Reason'||p_change_reason_code ) ;
2406: Oe_Order_Pvt.Lines
2407: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
2408: , p_init_msg_list => FND_API.G_TRUE
2409: , p_control_rec => l_control_rec
2410: , p_x_line_tbl => l_x_line_tbl
2411: , p_x_old_line_tbl => l_x_old_line_tbl
2404: END IF;
2405: oe_debug_pub.add( 'IN VALIDATE_AND_WRITE Change Reason'||p_change_reason_code ) ;
2406: Oe_Order_Pvt.Lines
2407: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
2408: , p_init_msg_list => FND_API.G_TRUE
2409: , p_control_rec => l_control_rec
2410: , p_x_line_tbl => l_x_line_tbl
2411: , p_x_old_line_tbl => l_x_old_line_tbl
2412: , x_return_Status => l_return_status
2411: , p_x_old_line_tbl => l_x_old_line_tbl
2412: , x_return_Status => l_return_status
2413: );
2414:
2415: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2418: RAISE FND_API.G_EXC_ERROR;
2419: END IF;
2412: , x_return_Status => l_return_status
2413: );
2414:
2415: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2418: RAISE FND_API.G_EXC_ERROR;
2419: END IF;
2420:
2413: );
2414:
2415: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2418: RAISE FND_API.G_EXC_ERROR;
2419: END IF;
2420:
2421: /* The Process Requests and Notify should be invoked for */
2414:
2415: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2417: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2418: RAISE FND_API.G_EXC_ERROR;
2419: END IF;
2420:
2421: /* The Process Requests and Notify should be invoked for */
2422: /* Pre-Pack H code level */
2423:
2424: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL < '110508' THEN
2425: Oe_Order_Pvt.Process_Requests_And_Notify
2426: ( p_process_requests => FALSE
2427: , p_init_msg_list => FND_API.G_FALSE
2428: , p_notify => TRUE
2429: , x_return_status => l_return_status
2430: , p_line_tbl => l_x_line_tbl
2431: , p_old_line_tbl => l_x_old_line_tbl
2430: , p_line_tbl => l_x_line_tbl
2431: , p_old_line_tbl => l_x_old_line_tbl
2432: );
2433:
2434: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2437: RAISE FND_API.G_EXC_ERROR;
2438: END IF;
2431: , p_old_line_tbl => l_x_old_line_tbl
2432: );
2433:
2434: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2437: RAISE FND_API.G_EXC_ERROR;
2438: END IF;
2439:
2432: );
2433:
2434: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2437: RAISE FND_API.G_EXC_ERROR;
2438: END IF;
2439:
2440: END IF;
2433:
2434: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2435: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2436: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2437: RAISE FND_API.G_EXC_ERROR;
2438: END IF;
2439:
2440: END IF;
2441:
2443: -- before processing for G_PRICE_LINE.
2444: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2445: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2446: (p_request_type =>OE_GLOBALS.G_COPY_ADJUSTMENTS
2447: ,p_delete => FND_API.G_TRUE
2448: ,x_return_status => l_return_status
2449: );
2450: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2446: (p_request_type =>OE_GLOBALS.G_COPY_ADJUSTMENTS
2447: ,p_delete => FND_API.G_TRUE
2448: ,x_return_status => l_return_status
2449: );
2450: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2452: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2453: RAISE FND_API.G_EXC_ERROR;
2454: END IF;
2447: ,p_delete => FND_API.G_TRUE
2448: ,x_return_status => l_return_status
2449: );
2450: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2452: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2453: RAISE FND_API.G_EXC_ERROR;
2454: END IF;
2455: END IF;
2448: ,x_return_status => l_return_status
2449: );
2450: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2452: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2453: RAISE FND_API.G_EXC_ERROR;
2454: END IF;
2455: END IF;
2456:
2449: );
2450: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2452: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2453: RAISE FND_API.G_EXC_ERROR;
2454: END IF;
2455: END IF;
2456:
2457: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2456:
2457: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2458: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2459: (p_request_type =>OE_GLOBALS.G_PRICE_LINE
2460: ,p_delete => FND_API.G_TRUE
2461: ,x_return_status => l_return_status
2462: );
2463: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2459: (p_request_type =>OE_GLOBALS.G_PRICE_LINE
2460: ,p_delete => FND_API.G_TRUE
2461: ,x_return_status => l_return_status
2462: );
2463: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2466: RAISE FND_API.G_EXC_ERROR;
2467: END IF;
2460: ,p_delete => FND_API.G_TRUE
2461: ,x_return_status => l_return_status
2462: );
2463: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2466: RAISE FND_API.G_EXC_ERROR;
2467: END IF;
2468: END IF;
2461: ,x_return_status => l_return_status
2462: );
2463: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2466: RAISE FND_API.G_EXC_ERROR;
2467: END IF;
2468: END IF;
2469:
2462: );
2463: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2464: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2465: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2466: RAISE FND_API.G_EXC_ERROR;
2467: END IF;
2468: END IF;
2469:
2470: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2471:
2472: IF nvl(FND_PROFILE.VALUE('ONT_DELAY_TAX_CALC'), 'N') = 'N' THEN --TaxER
2473: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2474: (p_request_type =>OE_GLOBALS.G_TAX_LINE
2475: ,p_delete => FND_API.G_TRUE
2476: ,x_return_status => l_return_status
2477: );
2478: END IF; --TaxER
2479:
2476: ,x_return_status => l_return_status
2477: );
2478: END IF; --TaxER
2479:
2480: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2482: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2483: RAISE FND_API.G_EXC_ERROR;
2484: END IF;
2477: );
2478: END IF; --TaxER
2479:
2480: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2482: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2483: RAISE FND_API.G_EXC_ERROR;
2484: END IF;
2485: END IF;
2478: END IF; --TaxER
2479:
2480: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2482: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2483: RAISE FND_API.G_EXC_ERROR;
2484: END IF;
2485: END IF;
2486:
2479:
2480: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2481: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2482: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2483: RAISE FND_API.G_EXC_ERROR;
2484: END IF;
2485: END IF;
2486:
2487: -- lkxu, commitment enhancement
2491:
2492: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2493: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2494: (p_request_type =>OE_GLOBALS.G_CALCULATE_COMMITMENT
2495: ,p_delete => FND_API.G_TRUE
2496: ,x_return_status => l_return_status
2497: );
2498: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2494: (p_request_type =>OE_GLOBALS.G_CALCULATE_COMMITMENT
2495: ,p_delete => FND_API.G_TRUE
2496: ,x_return_status => l_return_status
2497: );
2498: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2500: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;
2495: ,p_delete => FND_API.G_TRUE
2496: ,x_return_status => l_return_status
2497: );
2498: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2500: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;
2503:
2496: ,x_return_status => l_return_status
2497: );
2498: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2500: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;
2503:
2504: --bug 3560198
2497: );
2498: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2500: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2501: RAISE FND_API.G_EXC_ERROR;
2502: END IF;
2503:
2504: --bug 3560198
2505: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2503:
2504: --bug 3560198
2505: OE_DELAYED_REQUESTS_PVT.Process_Request_for_Reqtype
2506: (p_request_type =>OE_GLOBALS.G_UPDATE_COMMITMENT_APPLIED
2507: ,p_delete => FND_API.G_TRUE
2508: ,x_return_status => l_return_status
2509: );
2510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2506: (p_request_type =>OE_GLOBALS.G_UPDATE_COMMITMENT_APPLIED
2507: ,p_delete => FND_API.G_TRUE
2508: ,x_return_status => l_return_status
2509: );
2510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: END IF;
2507: ,p_delete => FND_API.G_TRUE
2508: ,x_return_status => l_return_status
2509: );
2510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: END IF;
2515: --bug 3560198
2508: ,x_return_status => l_return_status
2509: );
2510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: END IF;
2515: --bug 3560198
2516: END IF;
2509: );
2510: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2511: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2512: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2513: RAISE FND_API.G_EXC_ERROR;
2514: END IF;
2515: --bug 3560198
2516: END IF;
2517:
2638: -- Call the charges API to get the Line level charges.
2639: IF OE_GLOBALS.G_DEFER_PRICING='N' THEN
2640: OE_CHARGE_PVT.Get_Charge_Amount(
2641: p_api_version_number => 1.1 ,
2642: p_init_msg_list => FND_API.G_FALSE ,
2643: p_header_id => l_x_line_rec.header_id ,
2644: p_line_id => l_x_line_rec.line_id ,
2645: p_all_charges => FND_API.G_FALSE ,
2646: x_return_status => l_return_status ,
2641: p_api_version_number => 1.1 ,
2642: p_init_msg_list => FND_API.G_FALSE ,
2643: p_header_id => l_x_line_rec.header_id ,
2644: p_line_id => l_x_line_rec.line_id ,
2645: p_all_charges => FND_API.G_FALSE ,
2646: x_return_status => l_return_status ,
2647: x_msg_count => x_msg_count ,
2648: x_msg_data => x_msg_data ,
2649: x_charge_amount => l_charge_amount );
2647: x_msg_count => x_msg_count ,
2648: x_msg_data => x_msg_data ,
2649: x_charge_amount => l_charge_amount );
2650:
2651: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2654: RAISE FND_API.G_EXC_ERROR;
2655: END IF;
2648: x_msg_data => x_msg_data ,
2649: x_charge_amount => l_charge_amount );
2650:
2651: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2654: RAISE FND_API.G_EXC_ERROR;
2655: END IF;
2656: x_line_val_rec.x_charges := l_charge_amount;
2649: x_charge_amount => l_charge_amount );
2650:
2651: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2654: RAISE FND_API.G_EXC_ERROR;
2655: END IF;
2656: x_line_val_rec.x_charges := l_charge_amount;
2657: END IF;
2650:
2651: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2653: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2654: RAISE FND_API.G_EXC_ERROR;
2655: END IF;
2656: x_line_val_rec.x_charges := l_charge_amount;
2657: END IF;
2658:
2685: x_line_val_rec.x_commitment_applied_amount := OE_COMMITMENT_PVT.get_commitment_applied_amount
2686: (p_header_id => l_x_line_rec.header_id ,
2687: p_line_id => l_x_line_rec.line_id ,
2688: p_commitment_id => l_x_line_rec.commitment_id);
2689: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2691: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2692: RAISE FND_API.G_EXC_ERROR;
2693: END IF;
2686: (p_header_id => l_x_line_rec.header_id ,
2687: p_line_id => l_x_line_rec.line_id ,
2688: p_commitment_id => l_x_line_rec.commitment_id);
2689: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2691: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2692: RAISE FND_API.G_EXC_ERROR;
2693: END IF;
2694: END IF;
2687: p_line_id => l_x_line_rec.line_id ,
2688: p_commitment_id => l_x_line_rec.commitment_id);
2689: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2691: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2692: RAISE FND_API.G_EXC_ERROR;
2693: END IF;
2694: END IF;
2695: END IF;
2688: p_commitment_id => l_x_line_rec.commitment_id);
2689: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2690: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2691: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2692: RAISE FND_API.G_EXC_ERROR;
2693: END IF;
2694: END IF;
2695: END IF;
2696: -- Override List Price
2709: OE_GLOBALS.G_UI_FLAG := FALSE;
2710:
2711: -- Set return status.
2712:
2713: x_return_status := FND_API.G_RET_STS_SUCCESS;
2714:
2715: -- Get message count and data
2716:
2717: oe_msg_pub.count_and_get
2725:
2726:
2727: EXCEPTION
2728:
2729: WHEN FND_API.G_EXC_ERROR THEN
2730:
2731: OE_GLOBALS.G_UI_FLAG := FALSE;
2732:
2733: ROLLBACK TO SAVEPOINT Line_Validate_And_Write;
2745: AND l_last_index IS NOT NULL -- 2068070
2746: AND OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_last_index).line_id = p_line_id) THEN --Bug 3000619
2747: OE_GLOBALS.G_START_LINE_FLOWS_TBL.delete(l_last_index);
2748: END IF;
2749: x_return_status := FND_API.G_RET_STS_ERROR;
2750:
2751: -- Get message count and data
2752:
2753: oe_msg_pub.count_and_get
2754: ( p_count => x_msg_count
2755: , p_data => x_msg_data
2756: );
2757:
2758: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2759:
2760: OE_GLOBALS.G_UI_FLAG := FALSE;
2761:
2762: ROLLBACK TO SAVEPOINT Line_Validate_And_Write;
2765: AND l_last_index IS NOT NULL -- 2068070
2766: AND OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_last_index).line_id = p_line_id) THEN --Bug 3000619
2767: OE_GLOBALS.G_START_LINE_FLOWS_TBL.delete(l_last_index);
2768: END IF;
2769: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2770:
2771: -- Get message count and data
2772:
2773: oe_msg_pub.count_and_get
2785: AND l_last_index IS NOT NULL -- 2068070
2786: AND OE_GLOBALS.G_START_LINE_FLOWS_TBL(l_last_index).line_id = p_line_id) THEN --Bug 3000619
2787: OE_GLOBALS.G_START_LINE_FLOWS_TBL.delete(l_last_index);
2788: END IF;
2789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2790:
2791: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
2792: THEN
2793: oe_msg_pub.Add_Exc_Msg
2870:
2871: -- Call Oe_Order_Pvt.Process_order
2872:
2873: Oe_Order_Pvt.Lines
2874: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
2875: , p_init_msg_list => FND_API.G_TRUE
2876: , p_control_rec => l_control_rec
2877: , p_x_line_tbl => l_x_line_tbl
2878: , p_x_old_line_tbl => l_x_old_line_tbl
2871: -- Call Oe_Order_Pvt.Process_order
2872:
2873: Oe_Order_Pvt.Lines
2874: ( p_validation_level => FND_API.G_VALID_LEVEL_NONE
2875: , p_init_msg_list => FND_API.G_TRUE
2876: , p_control_rec => l_control_rec
2877: , p_x_line_tbl => l_x_line_tbl
2878: , p_x_old_line_tbl => l_x_old_line_tbl
2879: , x_return_status => l_return_status
2880:
2881: );
2882:
2883:
2884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2887: RAISE FND_API.G_EXC_ERROR;
2888: END IF;
2881: );
2882:
2883:
2884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2887: RAISE FND_API.G_EXC_ERROR;
2888: END IF;
2889:
2882:
2883:
2884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2887: RAISE FND_API.G_EXC_ERROR;
2888: END IF;
2889:
2890: -- Re-set the UI flag to FALSE
2883:
2884: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2885: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2886: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2887: RAISE FND_API.G_EXC_ERROR;
2888: END IF;
2889:
2890: -- Re-set the UI flag to FALSE
2891: OE_GLOBALS.G_UI_FLAG := FALSE;
2895: Clear_line;
2896:
2897: -- Set return status.
2898:
2899: x_return_status := FND_API.G_RET_STS_SUCCESS;
2900:
2901: -- Get message count and data
2902:
2903: oe_msg_pub.count_and_get
2910: END IF;
2911:
2912: EXCEPTION
2913:
2914: WHEN FND_API.G_EXC_ERROR THEN
2915: ROLLBACK TO SAVEPOINT Line_Delete;
2916: OE_GLOBALS.G_UI_FLAG := FALSE;
2917:
2918: x_return_status := FND_API.G_RET_STS_ERROR;
2914: WHEN FND_API.G_EXC_ERROR THEN
2915: ROLLBACK TO SAVEPOINT Line_Delete;
2916: OE_GLOBALS.G_UI_FLAG := FALSE;
2917:
2918: x_return_status := FND_API.G_RET_STS_ERROR;
2919:
2920: -- Get message count and data
2921:
2922: oe_msg_pub.count_and_get
2923: ( p_count => x_msg_count
2924: , p_data => x_msg_data
2925: );
2926:
2927: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2928: ROLLBACK TO SAVEPOINT Line_Delete;
2929:
2930: OE_GLOBALS.G_UI_FLAG := FALSE;
2931:
2928: ROLLBACK TO SAVEPOINT Line_Delete;
2929:
2930: OE_GLOBALS.G_UI_FLAG := FALSE;
2931:
2932: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2933:
2934: -- Get message count and data
2935:
2936: oe_msg_pub.count_and_get
2942: ROLLBACK TO SAVEPOINT Line_Delete;
2943:
2944: OE_GLOBALS.G_UI_FLAG := FALSE;
2945:
2946: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2947:
2948: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
2949: THEN
2950: oe_msg_pub.Add_Exc_Msg
3029: -- Call Oe_Order_Pvt.Process_order
3030:
3031: Oe_Order_Pvt.Process_order
3032: ( p_api_version_number => 1.0
3033: , p_init_msg_list => FND_API.G_TRUE
3034: , x_return_status => l_return_status
3035: , x_msg_count => x_msg_count
3036: , x_msg_data => x_msg_data
3037: , p_control_rec => l_control_rec
3056: , p_x_action_request_tbl => l_x_Action_Request_tbl
3057: , p_x_lot_serial_tbl => l_x_lot_serial_tbl
3058: );
3059:
3060: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3062: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3063: RAISE FND_API.G_EXC_ERROR;
3064: END IF;
3057: , p_x_lot_serial_tbl => l_x_lot_serial_tbl
3058: );
3059:
3060: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3062: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3063: RAISE FND_API.G_EXC_ERROR;
3064: END IF;
3065:
3058: );
3059:
3060: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3062: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3063: RAISE FND_API.G_EXC_ERROR;
3064: END IF;
3065:
3066: -- Re-set the UI flag to FALSE
3059:
3060: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3061: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3062: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3063: RAISE FND_API.G_EXC_ERROR;
3064: END IF;
3065:
3066: -- Re-set the UI flag to FALSE
3067: OE_GLOBALS.G_UI_FLAG := FALSE;
3067: OE_GLOBALS.G_UI_FLAG := FALSE;
3068:
3069: -- Set return status.
3070:
3071: x_return_status := FND_API.G_RET_STS_SUCCESS;
3072:
3073: -- Get message count and data
3074:
3075: oe_msg_pub.count_and_get
3082: END IF;
3083:
3084: EXCEPTION
3085:
3086: WHEN FND_API.G_EXC_ERROR THEN
3087:
3088: OE_GLOBALS.G_UI_FLAG := FALSE;
3089:
3090: x_return_status := FND_API.G_RET_STS_ERROR;
3086: WHEN FND_API.G_EXC_ERROR THEN
3087:
3088: OE_GLOBALS.G_UI_FLAG := FALSE;
3089:
3090: x_return_status := FND_API.G_RET_STS_ERROR;
3091:
3092: -- Get message count and data
3093:
3094: oe_msg_pub.count_and_get
3095: ( p_count => x_msg_count
3096: , p_data => x_msg_data
3097: );
3098:
3099: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3100:
3101: OE_GLOBALS.G_UI_FLAG := FALSE;
3102:
3103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3099: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3100:
3101: OE_GLOBALS.G_UI_FLAG := FALSE;
3102:
3103: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3104:
3105: -- Get message count and data
3106:
3107: oe_msg_pub.count_and_get
3112: WHEN OTHERS THEN
3113:
3114: OE_GLOBALS.G_UI_FLAG := FALSE;
3115:
3116: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3117:
3118: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
3119: THEN
3120: oe_msg_pub.Add_Exc_Msg
3170: ( x_return_status => l_return_status
3171: , p_x_line_rec => l_x_line_rec
3172: , p_line_id => p_line_id);
3173:
3174: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
3175:
3176: -- Set DB flag and write record to cache.
3177:
3178: l_x_line_rec.db_flag := FND_API.G_TRUE;
3174: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
3175:
3176: -- Set DB flag and write record to cache.
3177:
3178: l_x_line_rec.db_flag := FND_API.G_TRUE;
3179: IF l_debug_level > 0 THEN
3180: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE.LOCK_ROW'||L_X_LINE_REC.LINE_ID , 1 ) ;
3181: END IF;
3182:
3189:
3190: -- Set return status.
3191:
3192: x_return_status := l_return_status;
3193: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3195: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3196: RAISE FND_API.G_EXC_ERROR;
3197: END IF;
3190: -- Set return status.
3191:
3192: x_return_status := l_return_status;
3193: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3195: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3196: RAISE FND_API.G_EXC_ERROR;
3197: END IF;
3198:
3191:
3192: x_return_status := l_return_status;
3193: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3195: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3196: RAISE FND_API.G_EXC_ERROR;
3197: END IF;
3198:
3199: -- Get message count and data
3192: x_return_status := l_return_status;
3193: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3194: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3195: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
3196: RAISE FND_API.G_EXC_ERROR;
3197: END IF;
3198:
3199: -- Get message count and data
3200:
3207: oe_debug_pub.add( 'EXITING OE_OE_FORM_LINE.LOCK_ROW' , 1 ) ;
3208: END IF;
3209:
3210: EXCEPTION
3211: WHEN FND_API.G_EXC_ERROR THEN
3212:
3213: OE_GLOBALS.G_UI_FLAG := FALSE;
3214:
3215: x_return_status := FND_API.G_RET_STS_ERROR;
3211: WHEN FND_API.G_EXC_ERROR THEN
3212:
3213: OE_GLOBALS.G_UI_FLAG := FALSE;
3214:
3215: x_return_status := FND_API.G_RET_STS_ERROR;
3216:
3217: -- Get message count and data
3218:
3219: oe_msg_pub.count_and_get
3220: ( p_count => x_msg_count
3221: , p_data => x_msg_data
3222: );
3223:
3224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3225:
3226: OE_GLOBALS.G_UI_FLAG := FALSE;
3227:
3228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3224: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3225:
3226: OE_GLOBALS.G_UI_FLAG := FALSE;
3227:
3228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3229:
3230: -- Get message count and data
3231:
3232: oe_msg_pub.count_and_get
3243: , 'Lock_Row'
3244: );
3245: END IF;
3246:
3247: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3248:
3249: -- Get message count and data
3250:
3251: oe_msg_pub.count_and_get
3302: END IF;
3303: --reverting back the fix made for bug 2103000 as the problem
3304: --is fixed in file OEXOEFRM.pld(version 115.251)
3305: --Fixes the issue reported in bug 2150247
3306: IF p_line_id <> NVL(g_line_rec.line_id,FND_API.G_MISS_NUM)
3307: THEN
3308:
3309: -- Query row from DB
3310: IF l_debug_level > 0 THEN
3315: ( p_line_id => p_line_id,
3316: x_line_rec =>g_line_rec
3317: );
3318:
3319: g_line_rec.db_flag := FND_API.G_TRUE;
3320:
3321: -- Load DB record
3322:
3323: g_db_line_rec := g_line_rec;
5077: x_blanket_agr_name => x_line_val_rec.blanket_agreement_name);
5078: END If;
5079: --{ recurring charges
5080: /* IF p_line_rec.charge_periodicity_code IS NOT NULL AND
5081: p_line_rec.charge_periodicity_code <> FND_API.G_MISS_CHAR AND
5082: OE_SYS_PARAMETERS.Value('RECURRING_CHARGES',p_line_rec.org_id) = 'Y' THEN
5083:
5084: SELECT unit_of_measure
5085: INTO l_charge_periodicity
5841: ( x_return_status => l_return_status
5842: , p_x_line_rec => l_x_line_tbl(i)
5843: , p_line_id => x_line_tbl_type(i).line_id);
5844:
5845: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5847: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5848: RAISE FND_API.G_EXC_ERROR;
5849: END IF;
5842: , p_x_line_rec => l_x_line_tbl(i)
5843: , p_line_id => x_line_tbl_type(i).line_id);
5844:
5845: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5847: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5848: RAISE FND_API.G_EXC_ERROR;
5849: END IF;
5850:
5843: , p_line_id => x_line_tbl_type(i).line_id);
5844:
5845: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5847: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5848: RAISE FND_API.G_EXC_ERROR;
5849: END IF;
5850:
5851: IF l_debug_level > 0 THEN
5844:
5845: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5846: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5847: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5848: RAISE FND_API.G_EXC_ERROR;
5849: END IF;
5850:
5851: IF l_debug_level > 0 THEN
5852: oe_debug_pub.add( 'LINE CONTROLLER - AFTER GET LINE ' , 1 ) ;
5914: IF x_line_tbl_type(i).ship_from_org_id is not null THEN
5915: IF nvl(l_x_line_tbl(i).ship_from_org_id,-1)<>nvl(x_line_tbl_type(i).ship_from_org_id,-1) THEN
5916: l_x_line_tbl(i).ship_from_org_id:=x_line_tbl_type(i).ship_from_org_id;
5917: -- ship_from_org_id is changed during split, null OUT subinventory
5918: l_x_line_tbl(i).subinventory:= fnd_api.g_miss_char; --Bug 13560415, do not use null
5919:
5920: --10278858
5921: IF l_x_line_tbl(i).ship_from_org_id <> l_org_ship_from_org_id THEN
5922: l_x_line_tbl(i).SPLIT_SHIP_FROM := 'Y';
5931: END IF;
5932:
5933: Oe_Order_Pvt.Process_order
5934: ( p_api_version_number => 1.0
5935: , p_init_msg_list => FND_API.G_TRUE
5936: , x_return_status => l_return_status
5937: , x_msg_count => x_msg_count
5938: , x_msg_data => x_msg_data
5939: , p_control_rec => l_control_rec
5964: IF l_debug_level > 0 THEN
5965: oe_debug_pub.add( 'LINE CONTROLLER - IN SPLIT - AFTER CALLING PROCESS' , 1 ) ;
5966: END IF;
5967:
5968: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5970: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5971: RAISE FND_API.G_EXC_ERROR;
5972: END IF;
5965: oe_debug_pub.add( 'LINE CONTROLLER - IN SPLIT - AFTER CALLING PROCESS' , 1 ) ;
5966: END IF;
5967:
5968: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5970: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5971: RAISE FND_API.G_EXC_ERROR;
5972: END IF;
5973:
5966: END IF;
5967:
5968: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5970: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5971: RAISE FND_API.G_EXC_ERROR;
5972: END IF;
5973:
5974:
5967:
5968: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5969: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5970: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5971: RAISE FND_API.G_EXC_ERROR;
5972: END IF;
5973:
5974:
5975: IF l_x_line_tbl.count>0 THEN
5999: OE_DEBUG_PUB.add('Warehouse: '||x_line_tbl_type(i).ship_from_org_id,1);
6000: END IF;
6001: l_line_tbl(i).change_reason := p_change_reason_code;
6002: l_line_tbl(i).change_comments := p_change_comments;
6003: l_line_tbl(i).split_action_code:=fnd_api.g_miss_char;
6004: l_line_tbl(i).line_id:=l_x_line_tbl(i).line_id;
6005: l_line_tbl(i).header_id:=l_x_line_tbl(i).header_id;
6006:
6007: IF x_line_tbl_type(i).ship_from_org_id is not null THEN
6069: IF x_line_tbl_type(k).ship_from_org_id is not null THEN
6070: IF nvl(l_x_line_tbl(i).ship_from_org_id,-1)<>nvl(x_line_tbl_type(k).ship_from_org_id,-1) THEN
6071: IF l_ref_split_ship_from = 'Y' THEN --14654985
6072: l_line_tbl(l_rec_count).ship_from_org_id := x_line_tbl_type(k).ship_from_org_id;
6073: l_line_tbl(l_rec_count).subinventory := fnd_api.g_miss_char; --Added as a part of 14654985 for Bug 13560415, do not use nullnull;
6074: ELSE
6075: oe_debug_pub.ADD('Inside else Condition');
6076: l_line_tbl(l_rec_count).ship_from_org_id := l_x_line_tbl(i).ship_from_org_id;
6077: l_line_tbl(l_rec_count).subinventory := fnd_api.g_miss_char; --Added as a part of 14654985 for Bug 13560415, do not use nullnull;
6073: l_line_tbl(l_rec_count).subinventory := fnd_api.g_miss_char; --Added as a part of 14654985 for Bug 13560415, do not use nullnull;
6074: ELSE
6075: oe_debug_pub.ADD('Inside else Condition');
6076: l_line_tbl(l_rec_count).ship_from_org_id := l_x_line_tbl(i).ship_from_org_id;
6077: l_line_tbl(l_rec_count).subinventory := fnd_api.g_miss_char; --Added as a part of 14654985 for Bug 13560415, do not use nullnull;
6078: end if ; --14654985
6079:
6080: l_process_add_attributes:=TRUE;
6081: END IF; -- if ship_from_changed
6096: OE_DEBUG_PUB.add('Warehouse :'||l_line_tbl(l_rec_count).ship_from_org_id,1);
6097: END IF;
6098: l_line_tbl(l_rec_count).change_reason := p_change_reason_code;
6099: l_line_tbl(l_rec_count).change_comments := p_change_comments;
6100: l_line_tbl(l_rec_count).split_action_code := fnd_api.g_miss_char;
6101: l_line_tbl(l_rec_count).line_id := l_x_line_tbl(i).line_id;
6102: l_line_tbl(l_rec_count).header_id := l_x_line_tbl(i).header_id;
6103:
6104: l_rec_count := l_rec_count + 1;
6127:
6128: IF l_process_add_attributes THEN
6129: Oe_Order_Pvt.Process_order
6130: ( p_api_version_number => 1.0
6131: , p_init_msg_list => FND_API.G_TRUE
6132: , x_return_status => l_return_status
6133: , x_msg_count => x_msg_count
6134: , x_msg_data => x_msg_data
6135: , p_control_rec => l_control_rec
6158:
6159:
6160: END IF;
6161:
6162: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6164: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6165: RAISE FND_API.G_EXC_ERROR;
6166: END IF;
6159:
6160: END IF;
6161:
6162: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6164: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6165: RAISE FND_API.G_EXC_ERROR;
6166: END IF;
6167:
6160: END IF;
6161:
6162: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6164: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6165: RAISE FND_API.G_EXC_ERROR;
6166: END IF;
6167:
6168: END IF;
6161:
6162: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6163: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6164: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6165: RAISE FND_API.G_EXC_ERROR;
6166: END IF;
6167:
6168: END IF;
6169: x_return_status := FND_API.G_RET_STS_SUCCESS;
6165: RAISE FND_API.G_EXC_ERROR;
6166: END IF;
6167:
6168: END IF;
6169: x_return_status := FND_API.G_RET_STS_SUCCESS;
6170:
6171: -- Get message count and data
6172:
6173: oe_msg_pub.count_and_get
6176: );
6177:
6178: EXCEPTION
6179:
6180: WHEN FND_API.G_EXC_ERROR THEN
6181:
6182: x_return_status := FND_API.G_RET_STS_ERROR;
6183:
6184: -- Get message count and data
6178: EXCEPTION
6179:
6180: WHEN FND_API.G_EXC_ERROR THEN
6181:
6182: x_return_status := FND_API.G_RET_STS_ERROR;
6183:
6184: -- Get message count and data
6185:
6186: oe_msg_pub.count_and_get
6187: ( p_count => x_msg_count
6188: , p_data => x_msg_data
6189: );
6190:
6191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6192:
6193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6194:
6195: -- Get message count and data
6189: );
6190:
6191: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6192:
6193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6194:
6195: -- Get message count and data
6196:
6197: oe_msg_pub.count_and_get
6200: );
6201:
6202: WHEN OTHERS THEN
6203:
6204: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
6205:
6206: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
6207: THEN
6208: oe_msg_pub.Add_Exc_Msg
6239: l_index NUMBER; --3445778 */
6240: l_header_id NUMBER;
6241: BEGIN
6242: OE_MSG_PUB.initialize;
6243: x_return_status := FND_API.G_RET_STS_SUCCESS;
6244:
6245: -- Bug 3800577
6246: -- Clear versioning globals if request was not logged. If request was
6247: -- logged, that indicates that a change on another record had logged the
6263: )
6264: THEN
6265: oe_debug_pub.add('Request does not exist, reset versioning globals');
6266: IF (NOT OE_Versioning_Util.Reset_Globals) THEN
6267: l_return_status := FND_API.G_RET_STS_ERROR;
6268: RETURN;
6269: END IF;
6270: END IF;
6271:
6342: OE_MSG_PUB.Count_And_Get
6343: ( p_count => x_msg_count
6344: , p_data => x_msg_data
6345: );
6346: x_return_status := FND_API.G_RET_STS_ERROR;
6347:
6348: END Clear_Record;
6349:
6350: FUNCTION Get_Date_Type
6495: , 'Get_Line_Shipment_Number'
6496: );
6497: END IF;
6498:
6499: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6500:
6501: END GET_LINE_SHIPMENT_NUMBER;
6502:
6503:
6609: , 'GET_ORDERED_ITEM'
6610: );
6611: END IF;
6612:
6613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6614:
6615: END GET_ORDERED_ITEM;
6616: /*--- Bug 1823073 end----- */
6617: