14: l_x_line_tbl OE_ORDER_PUB.Line_Tbl_Type;
15: l_x_line_rec OE_ORDER_PUB.Line_Rec_Type;
16: l_control_rec OE_GLOBALS.Control_Rec_Type;
17: l_count NUMBER;
18: l_init_msg VARCHAR2(30) := FND_API.G_TRUE;
19: l_failed_count NUMBER := 0;
20: K NUMBER := 2;
21: L NUMBER;
22: l_dummy NUMBER;
175: K := 2; --reset K
176:
177: SAVEPOINT PRE_LINES;
178:
179: OE_ORDER_PVT.Lines(p_validation_level => FND_API.G_VALID_LEVEL_FULL,
180: p_init_msg_list => l_init_msg,
181: p_control_rec => l_control_rec,
182: p_x_line_tbl => l_x_line_tbl,
183: p_x_old_line_tbl => l_x_old_line_tbl,
182: p_x_line_tbl => l_x_line_tbl,
183: p_x_old_line_tbl => l_x_old_line_tbl,
184: x_return_status => x_return_status);
185:
186: l_init_msg := FND_API.G_FALSE;
187: IF l_debug_level > 0 THEN
188: oe_debug_pub.add( 'SCH: DONE CALLING LINES: ' || X_RETURN_STATUS ) ;
189: END IF;
190:
187: IF l_debug_level > 0 THEN
188: oe_debug_pub.add( 'SCH: DONE CALLING LINES: ' || X_RETURN_STATUS ) ;
189: END IF;
190:
191: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
194: RAISE FND_API.G_EXC_ERROR;
195: END IF;
188: oe_debug_pub.add( 'SCH: DONE CALLING LINES: ' || X_RETURN_STATUS ) ;
189: END IF;
190:
191: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
194: RAISE FND_API.G_EXC_ERROR;
195: END IF;
196:
189: END IF;
190:
191: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
194: RAISE FND_API.G_EXC_ERROR;
195: END IF;
196:
197: Oe_Order_Pvt.Process_Requests_And_Notify
190:
191: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
192: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
193: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
194: RAISE FND_API.G_EXC_ERROR;
195: END IF;
196:
197: Oe_Order_Pvt.Process_Requests_And_Notify
198: ( p_process_requests => TRUE
195: END IF;
196:
197: Oe_Order_Pvt.Process_Requests_And_Notify
198: ( p_process_requests => TRUE
199: , p_init_msg_list => FND_API.G_FALSE
200: , p_notify => TRUE
201: , x_return_status => x_return_status
202: , p_line_tbl => l_x_line_tbl
203: , p_old_line_tbl => l_x_old_line_tbl
202: , p_line_tbl => l_x_line_tbl
203: , p_old_line_tbl => l_x_old_line_tbl
204: );
205:
206: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
207: ROLLBACK TO SAVEPOINT PRE_LINES;
208: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
209: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
210: ROLLBACK TO SAVEPOINT PRE_LINES;
204: );
205:
206: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
207: ROLLBACK TO SAVEPOINT PRE_LINES;
208: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
209: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
210: ROLLBACK TO SAVEPOINT PRE_LINES;
211: RAISE FND_API.G_EXC_ERROR;
212: END IF;
205:
206: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
207: ROLLBACK TO SAVEPOINT PRE_LINES;
208: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
209: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
210: ROLLBACK TO SAVEPOINT PRE_LINES;
211: RAISE FND_API.G_EXC_ERROR;
212: END IF;
213:
207: ROLLBACK TO SAVEPOINT PRE_LINES;
208: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
209: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
210: ROLLBACK TO SAVEPOINT PRE_LINES;
211: RAISE FND_API.G_EXC_ERROR;
212: END IF;
213:
214: l_x_line_tbl.delete; -- clear out the table for every order
215: l_x_old_line_tbl.delete;
216:
217: END IF; -- not marked as exclude
218:
219: EXCEPTION
220: WHEN FND_API.G_EXC_ERROR THEN
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: l_failed_count := l_failed_count + l_x_line_tbl.count;
223: x_failed_count := l_failed_count;
224: l_x_line_tbl.delete;
217: END IF; -- not marked as exclude
218:
219: EXCEPTION
220: WHEN FND_API.G_EXC_ERROR THEN
221: x_return_status := FND_API.G_RET_STS_ERROR;
222: l_failed_count := l_failed_count + l_x_line_tbl.count;
223: x_failed_count := l_failed_count;
224: l_x_line_tbl.delete;
225: l_x_old_line_tbl.delete;
232: IF l_debug_level > 0 THEN
233: oe_debug_pub.add( 'SCH: IN EXCEPTION HANDLER! MSG COUNT: ' || OE_MSG_PUB.COUNT_MSG ) ;
234: END IF;
235:
236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: l_failed_count := l_failed_count + l_x_line_tbl.count;
239: x_failed_count := l_failed_count;
240: oe_delayed_requests_pvt.Clear_Request(x_return_status=> l_return_status);--bug11790590
233: oe_debug_pub.add( 'SCH: IN EXCEPTION HANDLER! MSG COUNT: ' || OE_MSG_PUB.COUNT_MSG ) ;
234: END IF;
235:
236: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
237: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
238: l_failed_count := l_failed_count + l_x_line_tbl.count;
239: x_failed_count := l_failed_count;
240: oe_delayed_requests_pvt.Clear_Request(x_return_status=> l_return_status);--bug11790590
241: OE_ORDER_UTIL.Clear_Global_Picture(l_return_status); --bug11790590
251: oe_debug_pub.add( 'SCH: IN UNEXP EXCEPTION HANDLER! MSG COUNT: ' || OE_MSG_PUB.COUNT_MSG ) ;
252: END IF;
253:
254: WHEN OTHERS THEN
255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
256: l_failed_count := l_failed_count + l_x_line_tbl.count;
257: x_failed_count := l_failed_count;
258: IF l_debug_level > 0 THEN
259: oe_debug_pub.add( 'SCH: IN OTHER EXCEPTION HANDLER! FAILED COUNT: ' || L_FAILED_COUNT ) ;
619: END IF;
620: /* MOAC Changes */
621: --Remember and re-set the access mode, if its Multi.
622: l_access_mode := mo_global.get_access_mode();
623: x_return_status := FND_API.G_RET_STS_SUCCESS;
624: l_count := p_selected_line_tbl.count;
625:
626: IF l_debug_level > 0 THEN
627: oe_debug_pub.add( 'Lines selected '||l_count , 1 ) ;
710: oe_debug_pub.add( 'EXITING Process_Schedule_Action ' , 1 ) ;
711: END IF;
712: EXCEPTION
713: WHEN OTHERS THEN
714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
715: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
716: OE_MSG_PUB.Add_Exc_Msg
717: ( G_PKG_NAME
718: , 'process_schedule_action');
717: ( G_PKG_NAME
718: , 'process_schedule_action');
719: END IF;
720:
721: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
722:
723: END Process_Schedule_Action;
724:
725: