DBA Data[Home] [Help]

APPS.GME_RESERVE_CONC dependencies on FND_API

Line 30: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

26: p_use_reservation_time_fence IN VARCHAR2,
27: x_return_status OUT NOCOPY VARCHAR2
28: )
29: IS
30: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
31: l_result Varchar2(30);
32: l_scheduling_level_code VARCHAR2(30) := NULL;
33: l_out_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
34: l_type_code VARCHAR2(30);

Line 33: l_out_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

29: IS
30: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
31: l_result Varchar2(30);
32: l_scheduling_level_code VARCHAR2(30) := NULL;
33: l_out_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
34: l_type_code VARCHAR2(30);
35: l_org_id NUMBER;
36: l_time_fence BOOLEAN;
37: l_msg_count NUMBER;

Line 55: l_return_status := FND_API.G_RET_STS_ERROR;

51: IF ( p_line_rec.open_flag = 'N' ) THEN
52: IF l_debug_level > 0 THEN
53: OE_DEBUG_PUB.Add('Line is closed, not eligible for reservation', 1);
54: END IF;
55: l_return_status := FND_API.G_RET_STS_ERROR;
56:
57: /* Check if line is shipped, if shipped then ignore the line */
58: ELSIF ( nvl(p_line_rec.shipped_quantity, -99) > 0 ) THEN
59: IF l_debug_level > 0 THEN

Line 62: l_return_status := FND_API.G_RET_STS_ERROR;

58: ELSIF ( nvl(p_line_rec.shipped_quantity, -99) > 0 ) THEN
59: IF l_debug_level > 0 THEN
60: OE_DEBUG_PUB.Add('Line is shipped, not eligible for reservation', 1);
61: END IF;
62: l_return_status := FND_API.G_RET_STS_ERROR;
63: END IF;
64:
65: -- Bug 13458175
66: -- Uncommented the AND 1=2 condition so that the existing reservations can be verified.

Line 67: IF l_return_status = FND_API.G_RET_STS_SUCCESS

63: END IF;
64:
65: -- Bug 13458175
66: -- Uncommented the AND 1=2 condition so that the existing reservations can be verified.
67: IF l_return_status = FND_API.G_RET_STS_SUCCESS
68: AND NVL(g_reservation_mode,'*') <> 'PARTIAL' THEN
69: /* We need to check for Existing Reservations on the Line */
70: BEGIN
71: IF l_debug_level > 0 THEN

Line 84: RAISE FND_API.G_EXC_ERROR;

80: IF l_debug_level > 0 THEN
81: OE_DEBUG_PUB.Add('Reservations exists on the line',3);
82: END IF;
83:
84: RAISE FND_API.G_EXC_ERROR;
85: EXCEPTION
86: WHEN FND_API.G_EXC_ERROR THEN
87: IF l_debug_level > 0 THEN
88: OE_DEBUG_PUB.Add('In Expected Error for Check Reservation',3);

Line 86: WHEN FND_API.G_EXC_ERROR THEN

82: END IF;
83:
84: RAISE FND_API.G_EXC_ERROR;
85: EXCEPTION
86: WHEN FND_API.G_EXC_ERROR THEN
87: IF l_debug_level > 0 THEN
88: OE_DEBUG_PUB.Add('In Expected Error for Check Reservation',3);
89: END IF;
90: l_return_status := FND_API.G_RET_STS_ERROR;

Line 90: l_return_status := FND_API.G_RET_STS_ERROR;

86: WHEN FND_API.G_EXC_ERROR THEN
87: IF l_debug_level > 0 THEN
88: OE_DEBUG_PUB.Add('In Expected Error for Check Reservation',3);
89: END IF;
90: l_return_status := FND_API.G_RET_STS_ERROR;
91:
92: WHEN NO_DATA_FOUND THEN
93: null; -- Prior Reservation does not exists and l_return_status is already initialized to success.
94: WHEN TOO_MANY_ROWS THEN

Line 95: l_return_status := FND_API.G_RET_STS_ERROR;

91:
92: WHEN NO_DATA_FOUND THEN
93: null; -- Prior Reservation does not exists and l_return_status is already initialized to success.
94: WHEN TOO_MANY_ROWS THEN
95: l_return_status := FND_API.G_RET_STS_ERROR;
96: END;
97: END IF;
98: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
99: BEGIN

Line 98: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

94: WHEN TOO_MANY_ROWS THEN
95: l_return_status := FND_API.G_RET_STS_ERROR;
96: END;
97: END IF;
98: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
99: BEGIN
100: IF l_debug_level > 0 THEN
101: OE_DEBUG_PUB.Add('Before checking for Staged/Closed deliveries', 1);
102: END IF;

Line 115: RAISE FND_API.G_EXC_ERROR;

111: IF l_debug_level > 0 THEN
112: OE_DEBUG_PUB.Add('Staged/Closed deliveries exist for the line', 3);
113: END IF;
114:
115: RAISE FND_API.G_EXC_ERROR;
116:
117: EXCEPTION
118: WHEN FND_API.G_EXC_ERROR THEN
119: IF l_debug_level > 0 THEN

Line 118: WHEN FND_API.G_EXC_ERROR THEN

114:
115: RAISE FND_API.G_EXC_ERROR;
116:
117: EXCEPTION
118: WHEN FND_API.G_EXC_ERROR THEN
119: IF l_debug_level > 0 THEN
120: OE_DEBUG_PUB.Add('In Expected Error for Checking Staged/Closed deliveries', 3);
121: END IF;
122: l_return_status := FND_API.G_RET_STS_ERROR;

Line 122: l_return_status := FND_API.G_RET_STS_ERROR;

118: WHEN FND_API.G_EXC_ERROR THEN
119: IF l_debug_level > 0 THEN
120: OE_DEBUG_PUB.Add('In Expected Error for Checking Staged/Closed deliveries', 3);
121: END IF;
122: l_return_status := FND_API.G_RET_STS_ERROR;
123: WHEN NO_DATA_FOUND THEN
124: NULL;
125: WHEN TOO_MANY_ROWS THEN
126: l_return_status := FND_API.G_RET_STS_ERROR;

Line 126: l_return_status := FND_API.G_RET_STS_ERROR;

122: l_return_status := FND_API.G_RET_STS_ERROR;
123: WHEN NO_DATA_FOUND THEN
124: NULL;
125: WHEN TOO_MANY_ROWS THEN
126: l_return_status := FND_API.G_RET_STS_ERROR;
127: END;
128: END IF;
129: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
130:

Line 129: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

125: WHEN TOO_MANY_ROWS THEN
126: l_return_status := FND_API.G_RET_STS_ERROR;
127: END;
128: END IF;
129: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
130:
131: -- WE NEED TO CHECK FOR THE reservation_time_fence Value.
132: -- If the Value of the parameter passed to the concurrent
133: -- program is "NO' then we reserve the lines irrespective

Line 150: RAISE FND_API.G_EXC_ERROR ;

146: IF l_debug_level > 0 THEN
147: OE_DEBUG_PUB.Add('The Schedule Date for Line falls
148: beyond reservation Time Fence',3);
149: END IF;
150: RAISE FND_API.G_EXC_ERROR ;
151:
152: END IF;
153: END IF;
154:

Line 180: RAISE FND_API.G_EXC_ERROR;

176: THEN
177: IF l_debug_level > 0 THEN
178: OE_DEBUG_PUB.Add('Order Type Does not Allow Scheduling',3);
179: END IF;
180: RAISE FND_API.G_EXC_ERROR;
181: END IF;
182: END IF;
183:
184: END IF; -- Check for Reservation Exists Clause

Line 192: WHEN FND_API.G_EXC_ERROR THEN

188: OE_DEBUG_PUB.Add('..Exiting GME_RESERVE_CONC.Need_Reservation' ||
189: l_return_status ,1);
190: END IF;
191: EXCEPTION
192: WHEN FND_API.G_EXC_ERROR THEN
193: IF l_debug_level > 0 THEN
194: OE_DEBUG_PUB.Add('In Expected Error...in Proc Reserve_Eligible',3);
195: END IF;
196: x_return_status := FND_API.G_RET_STS_ERROR;

Line 196: x_return_status := FND_API.G_RET_STS_ERROR;

192: WHEN FND_API.G_EXC_ERROR THEN
193: IF l_debug_level > 0 THEN
194: OE_DEBUG_PUB.Add('In Expected Error...in Proc Reserve_Eligible',3);
195: END IF;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197:
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: IF l_debug_level > 0 THEN
200: OE_DEBUG_PUB.Add('In UnExpected Error...in Proc Reserve_Eligible',3);

Line 198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

194: OE_DEBUG_PUB.Add('In Expected Error...in Proc Reserve_Eligible',3);
195: END IF;
196: x_return_status := FND_API.G_RET_STS_ERROR;
197:
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: IF l_debug_level > 0 THEN
200: OE_DEBUG_PUB.Add('In UnExpected Error...in Proc Reserve_Eligible',3);
201: END IF;
202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: IF l_debug_level > 0 THEN
200: OE_DEBUG_PUB.Add('In UnExpected Error...in Proc Reserve_Eligible',3);
201: END IF;
202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
203:
204: WHEN OTHERS THEN
205:
206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

202: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
203:
204: WHEN OTHERS THEN
205:
206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
207:
208: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
209: THEN
210: OE_MSG_PUB.Add_Exc_Msg

Line 228: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

224: Procedure Create_Reservation
225: (p_line_rec IN OE_ORDER_PUB.line_rec_type,
226: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
227: IS
228: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
229: l_reservation_rec Inv_Reservation_Global.Mtl_Reservation_Rec_Type;
230: l_msg_count NUMBER;
231: l_dummy_sn Inv_Reservation_Global.Serial_Number_Tbl_Type;
232: l_msg_data VARCHAR2(1000);

Line 273: , p_init_msg_lst => FND_API.G_TRUE

269: END IF;
270:
271: INV_RESERVATION_PUB.Create_Reservation
272: ( p_api_version_number => 1.0
273: , p_init_msg_lst => FND_API.G_TRUE
274: , x_return_status => l_return_status
275: , x_msg_count => l_msg_count
276: , x_msg_data => l_msg_data
277: , p_rsv_rec => l_reservation_rec

Line 280: , p_partial_reservation_flag => FND_API.G_FALSE

276: , x_msg_data => l_msg_data
277: , p_rsv_rec => l_reservation_rec
278: , p_serial_number => l_dummy_sn
279: , x_serial_number => l_dummy_sn
280: , p_partial_reservation_flag => FND_API.G_FALSE
281: , p_force_reservation_flag => FND_API.G_FALSE
282: , p_validation_flag => FND_API.G_TRUE
283: , x_quantity_reserved => l_quantity_reserved
284: , x_secondary_quantity_reserved => l_quantity2_reserved

Line 281: , p_force_reservation_flag => FND_API.G_FALSE

277: , p_rsv_rec => l_reservation_rec
278: , p_serial_number => l_dummy_sn
279: , x_serial_number => l_dummy_sn
280: , p_partial_reservation_flag => FND_API.G_FALSE
281: , p_force_reservation_flag => FND_API.G_FALSE
282: , p_validation_flag => FND_API.G_TRUE
283: , x_quantity_reserved => l_quantity_reserved
284: , x_secondary_quantity_reserved => l_quantity2_reserved
285: , x_reservation_id => l_rsv_id

Line 282: , p_validation_flag => FND_API.G_TRUE

278: , p_serial_number => l_dummy_sn
279: , x_serial_number => l_dummy_sn
280: , p_partial_reservation_flag => FND_API.G_FALSE
281: , p_force_reservation_flag => FND_API.G_FALSE
282: , p_validation_flag => FND_API.G_TRUE
283: , x_quantity_reserved => l_quantity_reserved
284: , x_secondary_quantity_reserved => l_quantity2_reserved
285: , x_reservation_id => l_rsv_id
286: );

Line 293: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

289: l_return_status,1);
290: OE_DEBUG_PUB.Add(l_msg_data,1);
291: END IF;
292:
293: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
294: IF l_debug_level > 0 THEN
295: OE_DEBUG_PUB.Add('Raising Unexpected error',1);
296: END IF;
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

293: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
294: IF l_debug_level > 0 THEN
295: OE_DEBUG_PUB.Add('Raising Unexpected error',1);
296: END IF;
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298:
299: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
300: IF l_debug_level > 0 THEN
301: OE_DEBUG_PUB.Add('Raising Expected error',1);

Line 299: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

295: OE_DEBUG_PUB.Add('Raising Unexpected error',1);
296: END IF;
297: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
298:
299: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
300: IF l_debug_level > 0 THEN
301: OE_DEBUG_PUB.Add('Raising Expected error',1);
302: END IF;
303: IF l_msg_data is not null THEN

Line 311: RAISE FND_API.G_EXC_ERROR;

307: IF l_debug_level > 0 THEN
308: OE_DEBUG_PUB.Add(l_msg_data,1);
309: END IF;
310: END IF;
311: RAISE FND_API.G_EXC_ERROR;
312:
313: END IF;
314: IF l_debug_level > 0 THEN
315: OE_DEBUG_PUB.Add('..Exiting GME_RESERVE_CONC.Create_reservation' ||

Line 318: x_return_status := FND_API.G_RET_STS_SUCCESS;

314: IF l_debug_level > 0 THEN
315: OE_DEBUG_PUB.Add('..Exiting GME_RESERVE_CONC.Create_reservation' ||
316: l_return_status ,1);
317: END IF;
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319:
320: EXCEPTION
321: WHEN FND_API.G_EXC_ERROR THEN
322: IF l_debug_level > 0 THEN

Line 321: WHEN FND_API.G_EXC_ERROR THEN

317: END IF;
318: x_return_status := FND_API.G_RET_STS_SUCCESS;
319:
320: EXCEPTION
321: WHEN FND_API.G_EXC_ERROR THEN
322: IF l_debug_level > 0 THEN
323: OE_DEBUG_PUB.Add('In Expected Error...in Proc Create_Reservation',1);
324: END IF;
325: x_return_status := FND_API.G_RET_STS_ERROR;

Line 325: x_return_status := FND_API.G_RET_STS_ERROR;

321: WHEN FND_API.G_EXC_ERROR THEN
322: IF l_debug_level > 0 THEN
323: OE_DEBUG_PUB.Add('In Expected Error...in Proc Create_Reservation',1);
324: END IF;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326:
327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328: IF l_debug_level > 0 THEN
329: OE_DEBUG_PUB.Add('In Unexpected Error...in Proc Create_Reservation');

Line 327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

323: OE_DEBUG_PUB.Add('In Expected Error...in Proc Create_Reservation',1);
324: END IF;
325: x_return_status := FND_API.G_RET_STS_ERROR;
326:
327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328: IF l_debug_level > 0 THEN
329: OE_DEBUG_PUB.Add('In Unexpected Error...in Proc Create_Reservation');
330: END IF;
331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

327: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
328: IF l_debug_level > 0 THEN
329: OE_DEBUG_PUB.Add('In Unexpected Error...in Proc Create_Reservation');
330: END IF;
331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
332:
333: WHEN OTHERS THEN
334: IF l_debug_level > 0 THEN
335: OE_DEBUG_PUB.Add('In others error...in Proc Create_Reservation');

Line 337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

333: WHEN OTHERS THEN
334: IF l_debug_level > 0 THEN
335: OE_DEBUG_PUB.Add('In others error...in Proc Create_Reservation');
336: END IF;
337: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
338:
339: END;
340:
341:

Line 376: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

372:
373: l_api_name CONSTANT VARCHAR2 (30) := 'Make_to_Order';
374: l_stmt VARCHAR2(4000) :=NULL;
375: l_line_rec OE_ORDER_PUB.line_rec_type;
376: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
377: l_request_date_low DATE;
378: l_request_date_high DATE;
379: l_schedule_ship_date_low DATE;
380: l_schedule_ship_date_high DATE;

Line 695: l_return_status := FND_API.G_RET_STS_SUCCESS;

691: END IF;
692: DBMS_SQL.COLUMN_VALUE(l_cursor_id, 1, l_line_id);
693:
694: FND_FILE.Put_Line(FND_FILE.LOG, '***** Processing Line id '|| l_line_id||' *****');
695: l_return_status := FND_API.G_RET_STS_SUCCESS;
696: OE_LINE_UTIL.Lock_Row
697: (p_line_id => l_Line_id,
698: p_x_line_rec => l_line_rec,
699: x_return_status => l_return_status);

Line 701: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

697: (p_line_id => l_Line_id,
698: p_x_line_rec => l_line_rec,
699: x_return_status => l_return_status);
700:
701: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
702: IF l_debug_level > 0 THEN
703: OE_DEBUG_PUB.Add('Lock row returned with error',1);
704: END IF;
705: END IF;

Line 724: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

720: p_line_rec => l_line_rec
721: ,p_use_reservation_time_fence => 'N'
722: ,x_return_status => l_return_status);
723:
724: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
725: IF g_debug <= gme_debug.g_log_procedure THEN
726: gme_debug.put_line('This line is not eligible for creating reservations so cannot proceed with MTO');
727: END IF;
728: GOTO NEXT_RECORD;

Line 739: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

735: (p_line_id => l_Line_id,
736: p_x_line_rec => l_line_rec,
737: x_return_status => l_return_status);
738:
739: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
740: IF g_debug <= gme_debug.g_log_procedure THEN
741: gme_debug.put_line('Failure to Lock Row for line_id '||l_Line_id);
742: END IF;
743: GOTO NEXT_RECORD;

Line 755: -- ,p_init_msg_lst => FND_API.G_TRUE

751: END IF;
752:
753: GME_MAKE_TO_ORDER_PVT.create_batch_for_order_line(
754: p_api_version => 1.0
755: -- ,p_init_msg_lst => FND_API.G_TRUE
756: -- ,p_commit => FND_API.G_TRUE
757: ,p_so_line_id => l_line_id);
758:
759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN -- change create_batch above to return return_status

Line 756: -- ,p_commit => FND_API.G_TRUE

752:
753: GME_MAKE_TO_ORDER_PVT.create_batch_for_order_line(
754: p_api_version => 1.0
755: -- ,p_init_msg_lst => FND_API.G_TRUE
756: -- ,p_commit => FND_API.G_TRUE
757: ,p_so_line_id => l_line_id);
758:
759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN -- change create_batch above to return return_status
760:

Line 759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN -- change create_batch above to return return_status

755: -- ,p_init_msg_lst => FND_API.G_TRUE
756: -- ,p_commit => FND_API.G_TRUE
757: ,p_so_line_id => l_line_id);
758:
759: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN -- change create_batch above to return return_status
760:
761: IF g_debug <= gme_debug.g_log_procedure THEN
762: gme_debug.put_line('Failure during create batch for order line : line is '||l_line_rec.line_id);
763:

Line 841: when FND_API.G_EXC_ERROR then

837: OE_STANDARD_WF.Clear_Msg_Context;
838:
839:
840: EXCEPTION
841: when FND_API.G_EXC_ERROR then
842: IF l_debug_level <> 0 THEN
843: OE_DEBUG_PUB.add('set_parameter_work_order_wf: ' || 'CTO_WORKFLOW.set_parameter_work_order_wf raised exc error. ' ||
844: to_char(l_stmt_num) );
845: END IF;

Line 853: when FND_API.G_EXC_UNEXPECTED_ERROR then

849: rollback to savepoint before_process;
850: return;
851:
852:
853: when FND_API.G_EXC_UNEXPECTED_ERROR then
854: cto_msg_pub.cto_message('BOM', 'CTO_CREATE_WORK_ORDER_ERROR');
855: IF l_debug_level <> 0 THEN
856: OE_DEBUG_PUB.add('set_parameter_work_order_wf: ' || 'CTO_WORKFLOW.set_parameter_work_order_wf raised unexc error. ' ||
857: to_char(l_stmt_num) );