APPS.INV_MOVE_ORDER_PUB dependencies on FND_API

Line 58: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

54: -- End of Comments
55:
56: PROCEDURE Create_Move_Order_Header
57: ( p_api_version_number IN NUMBER
58: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
59: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
60: , p_commit IN VARCHAR2 := FND_API.G_FALSE
61: , x_return_status OUT NOCOPY VARCHAR2
62: , x_msg_count OUT NOCOPY NUMBER

Line 59: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

55:
56: PROCEDURE Create_Move_Order_Header
57: ( p_api_version_number IN NUMBER
58: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
59: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
60: , p_commit IN VARCHAR2 := FND_API.G_FALSE
61: , x_return_status OUT NOCOPY VARCHAR2
62: , x_msg_count OUT NOCOPY NUMBER
63: , x_msg_data OUT NOCOPY VARCHAR2

Line 60: , p_commit IN VARCHAR2 := FND_API.G_FALSE

56: PROCEDURE Create_Move_Order_Header
57: ( p_api_version_number IN NUMBER
58: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
59: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
60: , p_commit IN VARCHAR2 := FND_API.G_FALSE
61: , x_return_status OUT NOCOPY VARCHAR2
62: , x_msg_count OUT NOCOPY NUMBER
63: , x_msg_data OUT NOCOPY VARCHAR2
64: , p_trohdr_rec IN Trohdr_Rec_Type := G_MISS_TROHDR_REC

Line 83: IF NOT FND_API.Compatible_API_Call

79: if l_debug = 1 THEN
80: print_debug('enter Create Move Order Header', l_api_name);
81: end if;
82: -- Standard call to check for call compatibility
83: IF NOT FND_API.Compatible_API_Call
84: ( l_api_version_number
85: , p_api_version_number
86: , l_api_name
87: , G_PKG_NAME

Line 90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

86: , l_api_name
87: , G_PKG_NAME
88: )
89: THEN
90: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
91: END IF;
92:
93: g_primary_uom_code := NULL;
94: g_inventory_item_id := NULL;

Line 131: x_return_status := fnd_api.g_ret_sts_success;

127: x_trohdr_rec.attribute13 := NULL;
128: x_trohdr_rec.attribute14 := NULL;
129: x_trohdr_rec.attribute15 := NULL;
130: inv_trohdr_util.insert_row(x_trohdr_rec);
131: x_return_status := fnd_api.g_ret_sts_success;
132:
133: ELSE
134: If l_debug = 1 THEN
135: print_debug('Validation turned on', l_api_name);

Line 151: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

147: INV_Transfer_Order_PVT.Process_Transfer_Order
148: ( p_api_version_number => 1.0
149: , p_init_msg_list => p_init_msg_list
150: , p_commit => p_commit
151: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
152: , p_control_rec => l_control_rec
153: , x_return_status => x_return_status
154: , x_msg_count => x_msg_count
155: , x_msg_data => x_msg_data

Line 164: IF x_return_status = fnd_api.g_ret_sts_error THEN

160: , x_trohdr_rec => l_trohdr_rec
161: , x_trolin_tbl => l_trolin_tbl
162: );
163:
164: IF x_return_status = fnd_api.g_ret_sts_error THEN
165: If l_debug = 1 THEN
166: print_debug('Error from process_transfer_order',l_api_name);
167: End If;
168: RAISE fnd_api.g_exc_error;

Line 168: RAISE fnd_api.g_exc_error;

164: IF x_return_status = fnd_api.g_ret_sts_error THEN
165: If l_debug = 1 THEN
166: print_debug('Error from process_transfer_order',l_api_name);
167: End If;
168: RAISE fnd_api.g_exc_error;
169: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
170: If l_debug = 1 THEN
171: print_debug('Unexpected error from process_transfer_order',l_api_name);
172: End If;

Line 169: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

165: If l_debug = 1 THEN
166: print_debug('Error from process_transfer_order',l_api_name);
167: End If;
168: RAISE fnd_api.g_exc_error;
169: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
170: If l_debug = 1 THEN
171: print_debug('Unexpected error from process_transfer_order',l_api_name);
172: End If;
173: RAISE fnd_api.g_exc_unexpected_error;

Line 173: RAISE fnd_api.g_exc_unexpected_error;

169: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
170: If l_debug = 1 THEN
171: print_debug('Unexpected error from process_transfer_order',l_api_name);
172: End If;
173: RAISE fnd_api.g_exc_unexpected_error;
174: END IF;
175:
176: -- Load Id OUT parameters.
177:

Line 179: if( p_commit = FND_API.G_TRUE ) Then

175:
176: -- Load Id OUT parameters.
177:
178: x_trohdr_rec := l_trohdr_rec;
179: if( p_commit = FND_API.G_TRUE ) Then
180: commit;
181: end if;
182: --x_trolin_tbl := p_trolin_tbl;
183:

Line 186: IF FND_API.to_Boolean(p_return_values) THEN

182: --x_trolin_tbl := p_trolin_tbl;
183:
184: -- If p_return_values is TRUE then convert Ids to Values.
185:
186: IF FND_API.to_Boolean(p_return_values) THEN
187:
188: Id_To_Value
189: ( p_trohdr_rec => p_trohdr_rec
190: , p_trolin_tbl => l_trolin_tbl

Line 203: WHEN FND_API.G_EXC_ERROR THEN

199: print_debug('End Create Move Order Header', l_api_name);
200: End If;
201: EXCEPTION
202:
203: WHEN FND_API.G_EXC_ERROR THEN
204: x_return_status := FND_API.G_RET_STS_ERROR;
205:
206: -- Get message count and data
207: FND_MSG_PUB.Count_And_Get

Line 204: x_return_status := FND_API.G_RET_STS_ERROR;

200: End If;
201: EXCEPTION
202:
203: WHEN FND_API.G_EXC_ERROR THEN
204: x_return_status := FND_API.G_RET_STS_ERROR;
205:
206: -- Get message count and data
207: FND_MSG_PUB.Count_And_Get
208: ( p_count => x_msg_count

Line 212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

208: ( p_count => x_msg_count
209: , p_data => x_msg_data
210: );
211:
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
214:
215: -- Get message count and data
216: FND_MSG_PUB.Count_And_Get

Line 213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

209: , p_data => x_msg_data
210: );
211:
212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
213: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
214:
215: -- Get message count and data
216: FND_MSG_PUB.Count_And_Get
217: ( p_count => x_msg_count

Line 222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

218: , p_data => x_msg_data
219: );
220:
221: WHEN OTHERS THEN
222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
223:
224: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
225: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , 'Create_Move_Order_Header');
226: END IF;

Line 255: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

251: -- End of Comments
252:
253: PROCEDURE Create_Move_Order_Lines
254: ( p_api_version_number IN NUMBER
255: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
256: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
257: , p_commit IN VARCHAR2 := FND_API.G_FALSE
258: , x_return_status OUT NOCOPY VARCHAR2
259: , x_msg_count OUT NOCOPY NUMBER

Line 256: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

252:
253: PROCEDURE Create_Move_Order_Lines
254: ( p_api_version_number IN NUMBER
255: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
256: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
257: , p_commit IN VARCHAR2 := FND_API.G_FALSE
258: , x_return_status OUT NOCOPY VARCHAR2
259: , x_msg_count OUT NOCOPY NUMBER
260: , x_msg_data OUT NOCOPY VARCHAR2

Line 257: , p_commit IN VARCHAR2 := FND_API.G_FALSE

253: PROCEDURE Create_Move_Order_Lines
254: ( p_api_version_number IN NUMBER
255: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
256: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
257: , p_commit IN VARCHAR2 := FND_API.G_FALSE
258: , x_return_status OUT NOCOPY VARCHAR2
259: , x_msg_count OUT NOCOPY NUMBER
260: , x_msg_data OUT NOCOPY VARCHAR2
261: , p_trolin_tbl IN Trolin_Tbl_Type :=

Line 339: IF NOT FND_API.Compatible_API_Call

335: BEGIN
336:
337: -- Standard call to check for call compatibility
338:
339: IF NOT FND_API.Compatible_API_Call
340: ( l_api_version_number
341: , p_api_version_number
342: , l_api_name
343: , G_PKG_NAME

Line 346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

342: , l_api_name
343: , G_PKG_NAME
344: )
345: THEN
346: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
347: END IF;
348:
349: /*
350: -- Perform Value to Id conversion

Line 361: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

357: , x_trohdr_rec => l_trohdr_rec
358: , x_trolin_tbl => l_trolin_tbl
359: );
360:
361: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;

Line 362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

358: , x_trolin_tbl => l_trolin_tbl
359: );
360:
361: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;
366: */

Line 363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

359: );
360:
361: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;
366: */
367: --l_control_rec.process_entity := INV_GLOBALS.G_ENTITY_TROLIN;

Line 364: RAISE FND_API.G_EXC_ERROR;

360:
361: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
362: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
363: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
364: RAISE FND_API.G_EXC_ERROR;
365: END IF;
366: */
367: --l_control_rec.process_entity := INV_GLOBALS.G_ENTITY_TROLIN;
368: --l_control_rec.controlled_operation := TRUE;

Line 369: --l_control_rec.write_to_db := FND_API.to_boolean(p_commit);

365: END IF;
366: */
367: --l_control_rec.process_entity := INV_GLOBALS.G_ENTITY_TROLIN;
368: --l_control_rec.controlled_operation := TRUE;
369: --l_control_rec.write_to_db := FND_API.to_boolean(p_commit);
370:
371: IF NVL(p_validation_flag, g_validation_yes) = g_validation_no THEN --{ Validation No
372: l_index := p_trolin_tbl.FIRST;
373: l_count := 1;

Line 377: x_trolin_tbl(l_Index).return_status := fnd_api.g_ret_sts_success;

373: l_count := 1;
374: Loop
375: -- print_debug('start l_index '||l_index,l_api_name);
376: x_trolin_tbl(l_index) := p_trolin_tbl(l_index);
377: x_trolin_tbl(l_Index).return_status := fnd_api.g_ret_sts_success;
378: l_found_backorder_cache := FALSE;
379: l_restrict_subinventories_code := NULL;
380: l_restrict_locators_code := NULL;
381:

Line 383: x_trolin_tbl(l_index).ship_set_id <> fnd_api.g_miss_num AND

379: l_restrict_subinventories_code := NULL;
380: l_restrict_locators_code := NULL;
381:
382: IF x_trolin_tbl(l_index).ship_set_id IS NOT NULL AND
383: x_trolin_tbl(l_index).ship_set_id <> fnd_api.g_miss_num AND
384: x_trolin_tbl(l_index).ship_set_id <> nvl(l_current_ship_set_id, -9999) THEN
385: SAVEPOINT SHIPSET_SP;
386: l_current_ship_set_id := x_trolin_tbl(l_index).ship_set_id;
387: l_shipset_start_index := l_index;

Line 389: x_trolin_tbl(l_index).ship_set_Id = fnd_api.g_miss_num) AND

385: SAVEPOINT SHIPSET_SP;
386: l_current_ship_set_id := x_trolin_tbl(l_index).ship_set_id;
387: l_shipset_start_index := l_index;
388: ELSIF (x_trolin_tbl(l_index).ship_set_id IS NULL OR
389: x_trolin_tbl(l_index).ship_set_Id = fnd_api.g_miss_num) AND
390: l_current_ship_set_id IS NOT NULL THEN
391: l_current_ship_set_id := NULL;
392: l_shipset_start_index := NULL;
393: END IF;

Line 397: x_trolin_tbl(l_index).ship_model_id <> fnd_api.g_miss_num AND

393: END IF;
394:
395: -- Bug 7148749, added for ship model complete handling
396: IF x_trolin_tbl(l_index).ship_model_id IS NOT NULL AND
397: x_trolin_tbl(l_index).ship_model_id <> fnd_api.g_miss_num AND
398: x_trolin_tbl(l_index).ship_model_id <> nvl(l_current_ship_model_id, -9999) THEN
399: SAVEPOINT SHIPMODEL_SP;
400: l_current_ship_model_id := x_trolin_tbl(l_index).ship_model_id;
401: l_shipmodel_start_index := l_index;

Line 403: x_trolin_tbl(l_index).ship_model_Id = fnd_api.g_miss_num) AND

399: SAVEPOINT SHIPMODEL_SP;
400: l_current_ship_model_id := x_trolin_tbl(l_index).ship_model_id;
401: l_shipmodel_start_index := l_index;
402: ELSIF (x_trolin_tbl(l_index).ship_model_id IS NULL OR
403: x_trolin_tbl(l_index).ship_model_Id = fnd_api.g_miss_num) AND
404: l_current_ship_model_id IS NOT NULL THEN
405: l_current_ship_model_id := NULL;
406: l_shipmodel_start_index := NULL;
407: END IF;

Line 423: RAISE fnd_api.g_exc_error;

419: where transaction_type_id = x_trolin_tbl(l_index).transaction_type_id;
420: EXCEPTION
421: WHEN NO_DATA_FOUND THEN
422: print_debug('Error in fetching source type, Invalid transaction type', l_api_name);
423: RAISE fnd_api.g_exc_error;
424: END;
425: End If;
426:
427: IF x_trolin_tbl(l_index).primary_quantity IS NULL OR

Line 428: x_trolin_tbl(l_index).primary_quantity = fnd_api.g_miss_num THEN

424: END;
425: End If;
426:
427: IF x_trolin_tbl(l_index).primary_quantity IS NULL OR
428: x_trolin_tbl(l_index).primary_quantity = fnd_api.g_miss_num THEN
429: IF g_inventory_item_id = x_trolin_tbl(l_index).inventory_item_id THEN
430: l_primary_uom_code := g_primary_uom_code;
431: ELSE
432: -- print_debug('Selecting primary uom code', l_api_name);

Line 464: RAISE fnd_api.g_exc_error;

460: , to_name => NULL);
461: --print_debug('primary_quantity = '|| x_trolin_tbl(l_index).primary_quantity, l_api_name);
462: IF x_trolin_tbl(l_index).primary_quantity < 0 THEN
463: print_debug('Error during conversion. Primary quantity less that 0', l_api_name);
464: RAISE fnd_api.g_exc_error;
465: END IF;
466: END IF; -- primary uom = txn uom
467: END IF; -- primary qty is missing
468:

Line 505: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;

501: AND secondary_locator = x_trolin_tbl(l_index).to_locator_id
502: AND inventory_item_id = x_trolin_tbl(l_index).inventory_item_id);
503: EXCEPTION
504: WHEN NO_DATA_FOUND THEN
505: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
506: END;
507:
508: ELSIF l_restrict_subinventories_code = 1 and x_trolin_tbl(l_index).to_subinventory_code is NOT NULL Then
509: BEGIN

Line 521: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;

517: AND secondary_inventory = x_trolin_tbl(l_index).to_subinventory_code
518: AND inventory_item_id = x_trolin_tbl(l_index).inventory_item_id);
519: EXCEPTION
520: WHEN NO_DATA_FOUND THEN
521: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
522: END;
523: END IF;
524: END IF; -- to sub is not null
525:

Line 526: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN --{

522: END;
523: END IF;
524: END IF; -- to sub is not null
525:
526: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN --{
527:
528: l_return_value := INV_CACHE.set_item_rec( p_organization_id => x_trolin_tbl(l_index).organization_id
529: ,p_item_id => x_trolin_tbl(l_index).inventory_item_id);
530:

Line 533: RAISE fnd_api.g_exc_unexpected_error;

529: ,p_item_id => x_trolin_tbl(l_index).inventory_item_id);
530:
531: IF NOT l_return_value Then
532: print_debug('Error setting cache for inventory_item', l_api_name);
533: RAISE fnd_api.g_exc_unexpected_error;
534: END IF;
535:
536: l_reservable_type := INV_CACHE.item_rec.reservable_type;
537:

Line 561: p_init_msg_list => fnd_api.g_false,

557:
558: wsh_integration.ins_backorder_ss_smc_rec
559: (p_api_version_number => 1.0,
560: p_source_code => 'INV',
561: p_init_msg_list => fnd_api.g_false,
562: p_backorder_rec => l_shipset_smc_backorder_rec,
563: x_return_status => l_return_status,
564: x_msg_count => x_msg_count,
565: x_msg_data => x_msg_data);

Line 567: IF l_return_status <> fnd_api.g_ret_sts_success THEN

563: x_return_status => l_return_status,
564: x_msg_count => x_msg_count,
565: x_msg_data => x_msg_data);
566:
567: IF l_return_status <> fnd_api.g_ret_sts_success THEN
568: print_debug('Error occured while updating shipping for ' || 'failed ship set',l_api_name);
569: print_debug('l_return_status: ' || l_return_status, l_api_name);
570: END IF;
571:

Line 591: p_init_msg_list => fnd_api.g_false,

587:
588: wsh_integration.ins_backorder_ss_smc_rec
589: (p_api_version_number => 1.0,
590: p_source_code => 'INV',
591: p_init_msg_list => fnd_api.g_false,
592: p_backorder_rec => l_shipset_smc_backorder_rec,
593: x_return_status => l_return_status,
594: x_msg_count => x_msg_count,
595: x_msg_data => x_msg_data);

Line 597: IF l_return_status <> fnd_api.g_ret_sts_success THEN

593: x_return_status => l_return_status,
594: x_msg_count => x_msg_count,
595: x_msg_data => x_msg_data);
596:
597: IF l_return_status <> fnd_api.g_ret_sts_success THEN
598: print_debug('Error occured while updating shipping for ' || 'failed ship set',l_api_name);
599: print_debug('l_return_status: ' || l_return_status, l_api_name);
600: END IF;
601:

Line 609: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;

605: print_debug('l_return_status: ' || l_return_status, l_api_name);
606: END;
607: -- End Bug 7148749
608: END IF;
609: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
610: END IF;
611: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
612:
613: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{

Line 611: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }

607: -- End Bug 7148749
608: END IF;
609: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
610: END IF;
611: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
612:
613: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{
614: IF l_current_ship_set_id is NOT NULL THEN --{
615: ROLLBACK to SHIPSET_SP;

Line 613: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{

609: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
610: END IF;
611: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
612:
613: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{
614: IF l_current_ship_set_id is NOT NULL THEN --{
615: ROLLBACK to SHIPSET_SP;
616: l_index := l_shipset_start_index;
617: LOOP

Line 634: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

630: p_changed_attributes => l_shipping_attr,
631: x_return_status => l_return_status
632: );
633:
634: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
635: print_debug('return error from update shipping attributes',l_api_name);
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: print_debug('return error from update shipping attributes',l_api_name);

Line 636: RAISE FND_API.G_EXC_ERROR;

632: );
633:
634: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
635: print_debug('return error from update shipping attributes',l_api_name);
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: print_debug('return error from update shipping attributes',l_api_name);
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;

Line 637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

633:
634: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
635: print_debug('return error from update shipping attributes',l_api_name);
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: print_debug('return error from update shipping attributes',l_api_name);
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641: END IF; --} backorder_flag

Line 639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

635: print_debug('return error from update shipping attributes',l_api_name);
636: RAISE FND_API.G_EXC_ERROR;
637: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
638: print_debug('return error from update shipping attributes',l_api_name);
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641: END IF; --} backorder_flag
642: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
643: EXIT WHEN l_index = p_trolin_tbl.LAST;

Line 642: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;

638: print_debug('return error from update shipping attributes',l_api_name);
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END IF;
641: END IF; --} backorder_flag
642: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
643: EXIT WHEN l_index = p_trolin_tbl.LAST;
644: l_index := p_trolin_tbl.NEXT(l_index);
645:
646: IF p_trolin_tbl(l_index).ship_set_id IS NULL OR

Line 647: p_trolin_tbl(l_index).ship_set_id = fnd_api.g_miss_num OR

643: EXIT WHEN l_index = p_trolin_tbl.LAST;
644: l_index := p_trolin_tbl.NEXT(l_index);
645:
646: IF p_trolin_tbl(l_index).ship_set_id IS NULL OR
647: p_trolin_tbl(l_index).ship_set_id = fnd_api.g_miss_num OR
648: p_trolin_tbl(l_index).ship_set_id <> nvl(l_current_ship_set_id, -9999) THEN
649: l_index := p_trolin_tbl.prior(l_index);
650: EXIT;
651: END IF;

Line 677: IF l_return_status = FND_API.G_RET_STS_ERROR then

673: (p_source_code => 'INV',
674: p_changed_attributes => l_shipping_attr,
675: x_return_status => l_return_status
676: );
677: IF l_return_status = FND_API.G_RET_STS_ERROR then
678: print_debug('return error from update shipping attributes',l_api_name);
679: RAISE FND_API.G_EXC_ERROR;
680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
681: print_debug('return error from update shipping attributes',l_api_name);

Line 679: RAISE FND_API.G_EXC_ERROR;

675: x_return_status => l_return_status
676: );
677: IF l_return_status = FND_API.G_RET_STS_ERROR then
678: print_debug('return error from update shipping attributes',l_api_name);
679: RAISE FND_API.G_EXC_ERROR;
680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
681: print_debug('return error from update shipping attributes',l_api_name);
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;

Line 680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

676: );
677: IF l_return_status = FND_API.G_RET_STS_ERROR then
678: print_debug('return error from update shipping attributes',l_api_name);
679: RAISE FND_API.G_EXC_ERROR;
680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
681: print_debug('return error from update shipping attributes',l_api_name);
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;
684: END IF; -- l_back_order_flag }

Line 682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

678: print_debug('return error from update shipping attributes',l_api_name);
679: RAISE FND_API.G_EXC_ERROR;
680: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
681: print_debug('return error from update shipping attributes',l_api_name);
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;
684: END IF; -- l_back_order_flag }
685: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
686:

Line 685: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;

681: print_debug('return error from update shipping attributes',l_api_name);
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: END IF;
684: END IF; -- l_back_order_flag }
685: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
686:
687: EXIT WHEN l_index = p_trolin_tbl.LAST;
688: l_index := p_trolin_tbl.NEXT(l_index);
689:

Line 691: p_trolin_tbl(l_index).ship_model_id = fnd_api.g_miss_num OR

687: EXIT WHEN l_index = p_trolin_tbl.LAST;
688: l_index := p_trolin_tbl.NEXT(l_index);
689:
690: IF p_trolin_tbl(l_index).ship_model_id IS NULL OR
691: p_trolin_tbl(l_index).ship_model_id = fnd_api.g_miss_num OR
692: p_trolin_tbl(l_index).ship_model_id <> nvl(l_current_ship_model_id, -9999) THEN
693: l_index := p_trolin_tbl.prior(l_index);
694: EXIT;
695: END IF;

Line 715: IF l_return_status = FND_API.G_RET_STS_ERROR then

711: p_changed_attributes => l_shipping_attr,
712: x_return_status => l_return_status
713: );
714:
715: IF l_return_status = FND_API.G_RET_STS_ERROR then
716: print_debug('return error from update shipping attributes',l_api_name);
717: RAISE FND_API.G_EXC_ERROR;
718: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
719: print_debug('return error from update shipping attributes',l_api_name);

Line 717: RAISE FND_API.G_EXC_ERROR;

713: );
714:
715: IF l_return_status = FND_API.G_RET_STS_ERROR then
716: print_debug('return error from update shipping attributes',l_api_name);
717: RAISE FND_API.G_EXC_ERROR;
718: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
719: print_debug('return error from update shipping attributes',l_api_name);
720: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
721: END IF;

Line 718: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

714:
715: IF l_return_status = FND_API.G_RET_STS_ERROR then
716: print_debug('return error from update shipping attributes',l_api_name);
717: RAISE FND_API.G_EXC_ERROR;
718: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
719: print_debug('return error from update shipping attributes',l_api_name);
720: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
721: END IF;
722: END IF; -- l_back_order_flag }

Line 720: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

716: print_debug('return error from update shipping attributes',l_api_name);
717: RAISE FND_API.G_EXC_ERROR;
718: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
719: print_debug('return error from update shipping attributes',l_api_name);
720: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
721: END IF;
722: END IF; -- l_back_order_flag }
723: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
724: END IF; -- l_current_ship_set_id }

Line 723: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;

719: print_debug('return error from update shipping attributes',l_api_name);
720: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
721: END IF;
722: END IF; -- l_back_order_flag }
723: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
724: END IF; -- l_current_ship_set_id }
725: --Bug 7148749, moving this after the loop, so that the new move order lines table
726: --l_new_trolin_tbl gets populated only when all the lines in x_trolin_tbl are validated.
727: /* ELSE --} {

Line 738: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;

734: x_trolin_tbl(l_index).created_by := fnd_global.user_id;
735: x_trolin_tbl(l_index).last_update_date := SYSDATE;
736: x_trolin_tbl(l_index).last_updated_by := fnd_global.user_id;
737: x_trolin_tbl(l_index).last_update_login := fnd_global.login_id;
738: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;
739: x_trolin_tbl(l_index) := inv_trolin_util.convert_miss_to_null_parallel
740: (p_trolin_rec => x_trolin_tbl(l_index));
741:
742: l_new_trolin_tbl(l_count).attribute1 := x_trolin_tbl(l_index).attribute1;

Line 839: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error }

835: -- INVCONV END
836:
837: l_count := l_count+1;
838: */ -- Bug 7148749
839: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error }
840: -- gmi_reservation_util.println('- PAL inside Create_Move_Order_Lines ');
841: /* Bug 4162173 Added the following to initate the Outbound for Third Party Integration */
842: OPEN get_move_order_type(x_trolin_tbl(l_index).header_id);
843: FETCH get_move_order_type INTO l_move_order_type;

Line 915: If x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN

911: --have been successfully validated, so that entire ship set can be handled.
912: l_index := x_trolin_tbl.FIRST;
913: l_count := 1;
914: Loop
915: If x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN
916:
917: If l_debug = 1 THEN
918: print_debug('Creating MO Line for WDD = '||x_trolin_tbl(l_index).txn_source_line_detail_id,l_api_name);
919: End If;

Line 930: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;

926: x_trolin_tbl(l_index).created_by := fnd_global.user_id;
927: x_trolin_tbl(l_index).last_update_date := SYSDATE;
928: x_trolin_tbl(l_index).last_updated_by := fnd_global.user_id;
929: x_trolin_tbl(l_index).last_update_login := fnd_global.login_id;
930: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;
931: x_trolin_tbl(l_index) := inv_trolin_util.convert_miss_to_null_parallel
932: (p_trolin_rec => x_trolin_tbl(l_index));
933:
934: l_new_trolin_tbl(l_count).attribute1 := x_trolin_tbl(l_index).attribute1;

Line 1041: x_return_status := fnd_api.g_ret_sts_success;

1037: ||', p_trolin_tbl Count = '||p_trolin_tbl.count,l_api_name);
1038: End If;
1039: -- End bug 7148749
1040:
1041: x_return_status := fnd_api.g_ret_sts_success;
1042:
1043: inv_trolin_util.insert_mo_lines_bulk
1044: (p_new_trolin_tbl => l_new_trolin_tbl
1045: ,x_return_status => x_return_status);

Line 1050: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1046:
1047: --delete the records from l_new_trolin_tbl
1048: l_new_trolin_tbl.delete;
1049:
1050: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1051: print_debug('return error from INSERT_MO_LINES_BULK',l_api_name);
1052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1053: END IF;
1054:

Line 1052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1048: l_new_trolin_tbl.delete;
1049:
1050: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1051: print_debug('return error from INSERT_MO_LINES_BULK',l_api_name);
1052: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1053: END IF;
1054:
1055: ELSE --} Validation Yes
1056: l_control_rec.controlled_operation := TRUE;

Line 1066: if( (l_trolin_tbl(i).line_id <> FND_API.G_MISS_NUM OR l_trolin_tbl(i).line_id is NULL ) AND

1062: if( l_trolin_tbl.count > 0 ) then
1063: for i in 1..l_trolin_tbl.count LOOP
1064: --inv_debug.message('trolin.line_id is ' || l_trolin_tbl(l).line_id);
1065: /* to fix bug 1402677: Also we shouldn't change the operation here
1066: if( (l_trolin_tbl(i).line_id <> FND_API.G_MISS_NUM OR l_trolin_tbl(i).line_id is NULL ) AND
1067: l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_CREATE ) then
1068: l_trolin_tbl(i).operation := INV_GLOBALS.G_OPR_UPDATE;
1069: els*/
1070: if (l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_UPDATE and

Line 1071: (l_trolin_tbl(i).line_id = FND_API.G_MISS_NUM OR

1067: l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_CREATE ) then
1068: l_trolin_tbl(i).operation := INV_GLOBALS.G_OPR_UPDATE;
1069: els*/
1070: if (l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_UPDATE and
1071: (l_trolin_tbl(i).line_id = FND_API.G_MISS_NUM OR
1072: l_trolin_tbl(i).line_id is null ) ) then
1073: --inv_debug.message('update and no line id');
1074: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1075: fnd_message.set_token('ATTRIBUTE', 'LINE_ID');

Line 1077: raise fnd_api.g_exc_error;

1073: --inv_debug.message('update and no line id');
1074: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1075: fnd_message.set_token('ATTRIBUTE', 'LINE_ID');
1076: fnd_msg_pub.add;
1077: raise fnd_api.g_exc_error;
1078: end if;
1079:
1080: if( l_trolin_tbl(i).header_id is not null
1081: and l_trolin_tbl(i).header_id <> FND_API.G_MISS_NUM ) then

Line 1081: and l_trolin_tbl(i).header_id <> FND_API.G_MISS_NUM ) then

1077: raise fnd_api.g_exc_error;
1078: end if;
1079:
1080: if( l_trolin_tbl(i).header_id is not null
1081: and l_trolin_tbl(i).header_id <> FND_API.G_MISS_NUM ) then
1082: --inv_debug.message('check if the header_id exists');
1083: select count(*)
1084: into l_dummy
1085: from mtl_txn_request_headers

Line 1094: raise fnd_api.g_exc_error;

1090: --inv_debug.message('header id not found');
1091: FND_MESSAGE.SET_NAME('INV', 'INV_FIELD_INVALID');
1092: FND_MESSAGE.SET_TOKEN('ENTITY1', 'Header_Id');
1093: FND_MSG_PUB.ADD;
1094: raise fnd_api.g_exc_error;
1095: else
1096: l_trohdr_rec := inv_trohdr_util.query_row(p_header_id => l_trolin_tbl(i).header_id);
1097: end if;
1098: end if;

Line 1158: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1154:
1155: INV_Transfer_Order_PVT.Process_Transfer_Order
1156: ( p_api_version_number => 1.0
1157: , p_init_msg_list => p_init_msg_list
1158: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1159: , p_commit => p_commit
1160: , x_return_status => x_return_status
1161: , x_msg_count => x_msg_count
1162: , x_msg_data => x_msg_data

Line 1177: if( p_commit = FND_API.G_TRUE ) Then

1173:
1174: --x_trohdr_rec := p_trohdr_rec;
1175: x_trolin_tbl := l_trolin_tbl_out;
1176:
1177: if( p_commit = FND_API.G_TRUE ) Then
1178: commit;
1179: end if;
1180: -- If p_return_values is TRUE then convert Ids to Values.
1181:

Line 1182: IF FND_API.to_Boolean(p_return_values) THEN

1178: commit;
1179: end if;
1180: -- If p_return_values is TRUE then convert Ids to Values.
1181:
1182: IF FND_API.to_Boolean(p_return_values) THEN
1183: Id_To_Value
1184: ( p_trohdr_rec => l_trohdr_rec
1185: , p_trolin_tbl => p_trolin_tbl
1186: , x_trohdr_val_rec => l_trohdr_val_rec

Line 1193: WHEN FND_API.G_EXC_ERROR THEN

1189: END IF;
1190: END IF;
1191: EXCEPTION
1192:
1193: WHEN FND_API.G_EXC_ERROR THEN
1194: --inv_debug.message('returning error');
1195: x_return_status := FND_API.G_RET_STS_ERROR;
1196: -- Get message count and data
1197: FND_MSG_PUB.Count_And_Get

Line 1195: x_return_status := FND_API.G_RET_STS_ERROR;

1191: EXCEPTION
1192:
1193: WHEN FND_API.G_EXC_ERROR THEN
1194: --inv_debug.message('returning error');
1195: x_return_status := FND_API.G_RET_STS_ERROR;
1196: -- Get message count and data
1197: FND_MSG_PUB.Count_And_Get
1198: ( p_count => x_msg_count
1199: , p_data => x_msg_data

Line 1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1198: ( p_count => x_msg_count
1199: , p_data => x_msg_data
1200: );
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1204: -- Get message count and data
1205: FND_MSG_PUB.Count_And_Get
1206: ( p_count => x_msg_count

Line 1203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1199: , p_data => x_msg_data
1200: );
1201:
1202: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1204: -- Get message count and data
1205: FND_MSG_PUB.Count_And_Get
1206: ( p_count => x_msg_count
1207: , p_data => x_msg_data

Line 1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1207: , p_data => x_msg_data
1208: );
1209:
1210: WHEN OTHERS THEN
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1212: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1213: THEN
1214: FND_MSG_PUB.Add_Exc_Msg
1215: ( G_PKG_NAME

Line 1244: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1240: -- End of Comments
1241:
1242: PROCEDURE Process_Move_Order
1243: ( p_api_version_number IN NUMBER
1244: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1245: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1246: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1247: , x_return_status OUT NOCOPY VARCHAR2
1248: , x_msg_count OUT NOCOPY NUMBER

Line 1245: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

1241:
1242: PROCEDURE Process_Move_Order
1243: ( p_api_version_number IN NUMBER
1244: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1245: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1246: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1247: , x_return_status OUT NOCOPY VARCHAR2
1248: , x_msg_count OUT NOCOPY NUMBER
1249: , x_msg_data OUT NOCOPY VARCHAR2

Line 1246: , p_commit IN VARCHAR2 := FND_API.G_FALSE

1242: PROCEDURE Process_Move_Order
1243: ( p_api_version_number IN NUMBER
1244: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1245: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1246: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1247: , x_return_status OUT NOCOPY VARCHAR2
1248: , x_msg_count OUT NOCOPY NUMBER
1249: , x_msg_data OUT NOCOPY VARCHAR2
1250: , p_trohdr_rec IN Trohdr_Rec_Type := G_MISS_TROHDR_REC

Line 1271: IF NOT FND_API.Compatible_API_Call

1267: BEGIN
1268:
1269: -- Standard call to check for call compatibility
1270:
1271: IF NOT FND_API.Compatible_API_Call
1272: ( l_api_version_number
1273: , p_api_version_number
1274: , l_api_name
1275: , G_PKG_NAME

Line 1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1274: , l_api_name
1275: , G_PKG_NAME
1276: )
1277: THEN
1278: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1279: END IF;
1280:
1281: l_control_Rec.process_entity := INV_GLOBALS.G_ENTITY_ALL;
1282: /*

Line 1294: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1290: , x_trohdr_rec => l_trohdr_rec
1291: , x_trolin_tbl => l_trolin_tbl
1292: );
1293:
1294: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;

Line 1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1291: , x_trolin_tbl => l_trolin_tbl
1292: );
1293:
1294: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;
1299: */

Line 1296: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1292: );
1293:
1294: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;
1299: */
1300:

Line 1297: RAISE FND_API.G_EXC_ERROR;

1293:
1294: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1295: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1296: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1297: RAISE FND_API.G_EXC_ERROR;
1298: END IF;
1299: */
1300:
1301: -- Call INV_Transfer_Order_PVT.Process_Transfer_Order

Line 1306: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1302:
1303: INV_Transfer_Order_PVT.Process_Transfer_Order
1304: ( p_api_version_number => 1.0
1305: , p_init_msg_list => p_init_msg_list
1306: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1307: , p_commit => p_commit
1308: , x_return_status => x_return_status
1309: , x_msg_count => x_msg_count
1310: , x_msg_data => x_msg_data

Line 1325: if p_commit = FND_API.G_TRUE then

1321:
1322: x_trohdr_rec := l_trohdr_rec;
1323: x_trolin_tbl := l_trolin_tbl;
1324:
1325: if p_commit = FND_API.G_TRUE then
1326: commit;
1327: end if;
1328: -- If p_return_values is TRUE then convert Ids to Values.
1329:

Line 1330: IF FND_API.to_Boolean(p_return_values) THEN

1326: commit;
1327: end if;
1328: -- If p_return_values is TRUE then convert Ids to Values.
1329:
1330: IF FND_API.to_Boolean(p_return_values) THEN
1331: Id_To_Value
1332: ( p_trohdr_rec => p_trohdr_rec
1333: , p_trolin_tbl => p_trolin_tbl
1334: , x_trohdr_val_rec => x_trohdr_val_rec

Line 1340: WHEN FND_API.G_EXC_ERROR THEN

1336: );
1337: END IF;
1338:
1339: EXCEPTION
1340: WHEN FND_API.G_EXC_ERROR THEN
1341: x_return_status := FND_API.G_RET_STS_ERROR;
1342: -- Get message count and data
1343: FND_MSG_PUB.Count_And_Get
1344: ( p_count => x_msg_count

Line 1341: x_return_status := FND_API.G_RET_STS_ERROR;

1337: END IF;
1338:
1339: EXCEPTION
1340: WHEN FND_API.G_EXC_ERROR THEN
1341: x_return_status := FND_API.G_RET_STS_ERROR;
1342: -- Get message count and data
1343: FND_MSG_PUB.Count_And_Get
1344: ( p_count => x_msg_count
1345: , p_data => x_msg_data

Line 1347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1343: FND_MSG_PUB.Count_And_Get
1344: ( p_count => x_msg_count
1345: , p_data => x_msg_data
1346: );
1347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1349: -- Get message count and data
1350: FND_MSG_PUB.Count_And_Get
1351: ( p_count => x_msg_count

Line 1348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1344: ( p_count => x_msg_count
1345: , p_data => x_msg_data
1346: );
1347: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1349: -- Get message count and data
1350: FND_MSG_PUB.Count_And_Get
1351: ( p_count => x_msg_count
1352: , p_data => x_msg_data

Line 1355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1351: ( p_count => x_msg_count
1352: , p_data => x_msg_data
1353: );
1354: WHEN OTHERS THEN
1355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1356: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1357: THEN
1358: FND_MSG_PUB.Add_Exc_Msg
1359: ( G_PKG_NAME

Line 1388: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1384: -- End of Comments
1385:
1386: PROCEDURE Lock_Move_Order
1387: ( p_api_version_number IN NUMBER
1388: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1389: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1390: , x_return_status OUT NOCOPY VARCHAR2
1391: , x_msg_count OUT NOCOPY NUMBER
1392: , x_msg_data OUT NOCOPY VARCHAR2

Line 1389: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

1385:
1386: PROCEDURE Lock_Move_Order
1387: ( p_api_version_number IN NUMBER
1388: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1389: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1390: , x_return_status OUT NOCOPY VARCHAR2
1391: , x_msg_count OUT NOCOPY NUMBER
1392: , x_msg_data OUT NOCOPY VARCHAR2
1393: , p_trohdr_rec IN Trohdr_Rec_Type :=

Line 1417: IF NOT FND_API.Compatible_API_Call

1413: BEGIN
1414:
1415: -- Standard call to check for call compatibility
1416:
1417: IF NOT FND_API.Compatible_API_Call
1418: ( l_api_version_number
1419: , p_api_version_number
1420: , l_api_name
1421: , G_PKG_NAME

Line 1424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1420: , l_api_name
1421: , G_PKG_NAME
1422: )
1423: THEN
1424: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1425: END IF;
1426:
1427: -- Perform Value to Id conversion
1428:

Line 1439: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1435: , x_trohdr_rec => l_trohdr_rec
1436: , x_trolin_tbl => l_trolin_tbl
1437: );
1438:
1439: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1441: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;

Line 1440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1436: , x_trolin_tbl => l_trolin_tbl
1437: );
1438:
1439: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1441: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;
1444:

Line 1441: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1437: );
1438:
1439: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1441: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;
1444:
1445:

Line 1442: RAISE FND_API.G_EXC_ERROR;

1438:
1439: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1440: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1441: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1442: RAISE FND_API.G_EXC_ERROR;
1443: END IF;
1444:
1445:
1446: -- Call INV_Transfer_Order_PVT.Lock_Transfer_Order

Line 1467: IF FND_API.to_Boolean(p_return_values) THEN

1463: x_trolin_tbl := l_trolin_tbl;
1464:
1465: -- If p_return_values is TRUE then convert Ids to Values.
1466:
1467: IF FND_API.to_Boolean(p_return_values) THEN
1468:
1469: Id_To_Value
1470: ( p_trohdr_rec => l_trohdr_rec
1471: , p_trolin_tbl => l_trolin_tbl

Line 1480: WHEN FND_API.G_EXC_ERROR THEN

1476: END IF;
1477:
1478: EXCEPTION
1479:
1480: WHEN FND_API.G_EXC_ERROR THEN
1481:
1482: x_return_status := FND_API.G_RET_STS_ERROR;
1483:
1484: -- Get message count and data

Line 1482: x_return_status := FND_API.G_RET_STS_ERROR;

1478: EXCEPTION
1479:
1480: WHEN FND_API.G_EXC_ERROR THEN
1481:
1482: x_return_status := FND_API.G_RET_STS_ERROR;
1483:
1484: -- Get message count and data
1485:
1486: FND_MSG_PUB.Count_And_Get

Line 1491: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1487: ( p_count => x_msg_count
1488: , p_data => x_msg_data
1489: );
1490:
1491: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1492:
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1494:
1495: -- Get message count and data

Line 1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1489: );
1490:
1491: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1492:
1493: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1494:
1495: -- Get message count and data
1496:
1497: FND_MSG_PUB.Count_And_Get

Line 1504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1500: );
1501:
1502: WHEN OTHERS THEN
1503:
1504: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1505:
1506: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1507: THEN
1508: FND_MSG_PUB.Add_Exc_Msg

Line 1541: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1537: -- End of Comments
1538:
1539: PROCEDURE Get_Move_Order
1540: ( p_api_version_number IN NUMBER
1541: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1542: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1543: , x_return_status OUT NOCOPY VARCHAR2
1544: , x_msg_count OUT NOCOPY NUMBER
1545: , x_msg_data OUT NOCOPY VARCHAR2

Line 1542: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

1538:
1539: PROCEDURE Get_Move_Order
1540: ( p_api_version_number IN NUMBER
1541: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1542: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1543: , x_return_status OUT NOCOPY VARCHAR2
1544: , x_msg_count OUT NOCOPY NUMBER
1545: , x_msg_data OUT NOCOPY VARCHAR2
1546: , p_header_id IN NUMBER :=

Line 1547: FND_API.G_MISS_NUM

1543: , x_return_status OUT NOCOPY VARCHAR2
1544: , x_msg_count OUT NOCOPY NUMBER
1545: , x_msg_data OUT NOCOPY VARCHAR2
1546: , p_header_id IN NUMBER :=
1547: FND_API.G_MISS_NUM
1548: , p_header IN VARCHAR2 :=
1549: FND_API.G_MISS_CHAR
1550: , x_trohdr_rec OUT NOCOPY Trohdr_Rec_Type
1551: , x_trohdr_val_rec OUT NOCOPY Trohdr_Val_Rec_Type

Line 1549: FND_API.G_MISS_CHAR

1545: , x_msg_data OUT NOCOPY VARCHAR2
1546: , p_header_id IN NUMBER :=
1547: FND_API.G_MISS_NUM
1548: , p_header IN VARCHAR2 :=
1549: FND_API.G_MISS_CHAR
1550: , x_trohdr_rec OUT NOCOPY Trohdr_Rec_Type
1551: , x_trohdr_val_rec OUT NOCOPY Trohdr_Val_Rec_Type
1552: , x_trolin_tbl OUT NOCOPY Trolin_Tbl_Type
1553: , x_trolin_val_tbl OUT NOCOPY Trolin_Val_Tbl_Type

Line 1566: IF NOT FND_API.Compatible_API_Call

1562: BEGIN
1563:
1564: -- Standard call to check for call compatibility
1565:
1566: IF NOT FND_API.Compatible_API_Call
1567: ( l_api_version_number
1568: , p_api_version_number
1569: , l_api_name
1570: , G_PKG_NAME

Line 1573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1569: , l_api_name
1570: , G_PKG_NAME
1571: )
1572: THEN
1573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1574: END IF;
1575:
1576: -- Standard check for Val/ID conversion
1577:

Line 1578: IF p_header = FND_API.G_MISS_CHAR

1574: END IF;
1575:
1576: -- Standard check for Val/ID conversion
1577:
1578: IF p_header = FND_API.G_MISS_CHAR
1579: THEN
1580:
1581: l_header_id := p_header_id;
1582:

Line 1583: ELSIF p_header_id <> FND_API.G_MISS_NUM THEN

1579: THEN
1580:
1581: l_header_id := p_header_id;
1582:
1583: ELSIF p_header_id <> FND_API.G_MISS_NUM THEN
1584:
1585: l_header_id := p_header_id;
1586:
1587: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

Line 1604: IF l_header_id = FND_API.G_MISS_NUM THEN

1600: l_header_id := INV_Value_To_Id.header
1601: ( p_header => p_header
1602: );
1603:
1604: IF l_header_id = FND_API.G_MISS_NUM THEN
1605: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1606: THEN
1607:
1608: FND_MESSAGE.SET_NAME('INV','Invalid Business Object Value');

Line 1615: RAISE FND_API.G_EXC_ERROR;

1611:
1612: END IF;
1613: END IF;
1614:
1615: RAISE FND_API.G_EXC_ERROR;
1616:
1617: END IF;
1618:
1619:

Line 1640: IF FND_API.TO_BOOLEAN(p_return_values) THEN

1636: x_trolin_tbl := l_trolin_tbl;
1637:
1638: -- If p_return_values is TRUE then convert Ids to Values.
1639:
1640: IF FND_API.TO_BOOLEAN(p_return_values) THEN
1641:
1642: Id_To_Value
1643: ( p_trohdr_rec => l_trohdr_rec
1644: , p_trolin_tbl => l_trolin_tbl

Line 1653: x_return_status := FND_API.G_RET_STS_SUCCESS;

1649: END IF;
1650:
1651: -- Set return status
1652:
1653: x_return_status := FND_API.G_RET_STS_SUCCESS;
1654:
1655: -- Get message count and data
1656:
1657: FND_MSG_PUB.Count_And_Get

Line 1665: WHEN FND_API.G_EXC_ERROR THEN

1661:
1662:
1663: EXCEPTION
1664:
1665: WHEN FND_API.G_EXC_ERROR THEN
1666:
1667: x_return_status := FND_API.G_RET_STS_ERROR;
1668:
1669: -- Get message count and data

Line 1667: x_return_status := FND_API.G_RET_STS_ERROR;

1663: EXCEPTION
1664:
1665: WHEN FND_API.G_EXC_ERROR THEN
1666:
1667: x_return_status := FND_API.G_RET_STS_ERROR;
1668:
1669: -- Get message count and data
1670:
1671: FND_MSG_PUB.Count_And_Get

Line 1676: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1672: ( p_count => x_msg_count
1673: , p_data => x_msg_data
1674: );
1675:
1676: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1677:
1678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1679:
1680: -- Get message count and data

Line 1678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1674: );
1675:
1676: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1677:
1678: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1679:
1680: -- Get message count and data
1681:
1682: FND_MSG_PUB.Count_And_Get

Line 1689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1685: );
1686:
1687: WHEN OTHERS THEN
1688:
1689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1690:
1691: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1692: THEN
1693: FND_MSG_PUB.Add_Exc_Msg

Line 1743: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1739: , 'Id_To_Value'
1740: );
1741: END IF;
1742:
1743: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1744:
1745: END Id_To_Value;
1746:
1747: -- Procedure Value_To_Id

Line 1767: x_return_status := FND_API.G_RET_STS_SUCCESS;

1763: BEGIN
1764:
1765: -- Init x_return_status.
1766:
1767: x_return_status := FND_API.G_RET_STS_SUCCESS;
1768:
1769: -- Convert trohdr
1770:
1771: l_trohdr_rec := INV_Trohdr_Util.Get_Ids

Line 1778: IF l_trohdr_rec.return_status = FND_API.G_RET_STS_ERROR THEN

1774: );
1775:
1776: x_trohdr_rec := l_trohdr_rec;
1777:
1778: IF l_trohdr_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1779: x_return_status := FND_API.G_RET_STS_ERROR;
1780: END IF;
1781:
1782: -- Convert trolin

Line 1779: x_return_status := FND_API.G_RET_STS_ERROR;

1775:
1776: x_trohdr_rec := l_trohdr_rec;
1777:
1778: IF l_trohdr_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1779: x_return_status := FND_API.G_RET_STS_ERROR;
1780: END IF;
1781:
1782: -- Convert trolin
1783:

Line 1797: IF l_trolin_rec.return_status = FND_API.G_RET_STS_ERROR THEN

1793: );
1794:
1795: x_trolin_tbl(l_index) := l_trolin_rec;
1796:
1797: IF l_trolin_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1798: x_return_status := FND_API.G_RET_STS_ERROR;
1799: END IF;
1800:
1801: l_index := p_trolin_val_tbl.NEXT(l_index);

Line 1798: x_return_status := FND_API.G_RET_STS_ERROR;

1794:
1795: x_trolin_tbl(l_index) := l_trolin_rec;
1796:
1797: IF l_trolin_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1798: x_return_status := FND_API.G_RET_STS_ERROR;
1799: END IF;
1800:
1801: l_index := p_trolin_val_tbl.NEXT(l_index);
1802:

Line 1817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1813: , 'Value_To_Id'
1814: );
1815: END IF;
1816:
1817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1818:
1819: END Value_To_Id;
1820:
1821: PROCEDURE Process_Move_Order_Line

Line 1824: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

1820:
1821: PROCEDURE Process_Move_Order_Line
1822: (
1823: p_api_version_number IN NUMBER
1824: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1825: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1826: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1827: , x_return_status OUT NOCOPY VARCHAR2
1828: , x_msg_count OUT NOCOPY NUMBER

Line 1825: , p_return_values IN VARCHAR2 := FND_API.G_FALSE

1821: PROCEDURE Process_Move_Order_Line
1822: (
1823: p_api_version_number IN NUMBER
1824: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1825: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1826: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1827: , x_return_status OUT NOCOPY VARCHAR2
1828: , x_msg_count OUT NOCOPY NUMBER
1829: , x_msg_data OUT NOCOPY VARCHAR2

Line 1826: , p_commit IN VARCHAR2 := FND_API.G_TRUE

1822: (
1823: p_api_version_number IN NUMBER
1824: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1825: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1826: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1827: , x_return_status OUT NOCOPY VARCHAR2
1828: , x_msg_count OUT NOCOPY NUMBER
1829: , x_msg_data OUT NOCOPY VARCHAR2
1830: , p_trolin_tbl IN Trolin_Tbl_Type

Line 1846: IF NOT FND_API.Compatible_API_Call

1842: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1843: BEGIN
1844:
1845: -- Standard call to check for call compatibility
1846: IF NOT FND_API.Compatible_API_Call
1847: ( l_api_version_number
1848: , p_api_version_number
1849: , l_api_name
1850: , G_PKG_NAME

Line 1853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1849: , l_api_name
1850: , G_PKG_NAME
1851: )
1852: THEN
1853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1854: END IF;
1855:
1856: l_control_rec.controlled_operation := TRUE;
1857: l_control_Rec.validate_entity := TRUE;

Line 1875: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1871: INV_Transfer_Order_PVT.Process_Transfer_Order
1872: ( p_api_version_number => 1.0
1873: , p_init_msg_list => p_init_msg_list
1874: , p_commit => p_commit
1875: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1876: , p_control_rec => l_control_rec
1877: , x_return_status => x_return_status
1878: , x_msg_count => x_msg_count
1879: , x_msg_data => x_msg_data

Line 1890: if( p_commit = FND_API.G_TRUE ) then

1886: -- Load Id OUT parameters.
1887:
1888: --x_trohdr_rec := p_trohdr_rec;
1889: x_trolin_tbl := l_trolin_tbl;
1890: if( p_commit = FND_API.G_TRUE ) then
1891: commit;
1892: end if;
1893: -- If p_return_values is TRUE then convert Ids to Values.
1894:

Line 1895: IF FND_API.to_Boolean(p_return_values) THEN

1891: commit;
1892: end if;
1893: -- If p_return_values is TRUE then convert Ids to Values.
1894:
1895: IF FND_API.to_Boolean(p_return_values) THEN
1896:
1897: Id_To_Value
1898: ( p_trohdr_rec => l_trohdr_rec
1899: , p_trolin_tbl => l_trolin_tbl

Line 1908: WHEN FND_API.G_EXC_ERROR THEN

1904: END IF;
1905:
1906: EXCEPTION
1907:
1908: WHEN FND_API.G_EXC_ERROR THEN
1909:
1910: x_return_status := FND_API.G_RET_STS_ERROR;
1911:
1912: -- Get message count and data

Line 1910: x_return_status := FND_API.G_RET_STS_ERROR;

1906: EXCEPTION
1907:
1908: WHEN FND_API.G_EXC_ERROR THEN
1909:
1910: x_return_status := FND_API.G_RET_STS_ERROR;
1911:
1912: -- Get message count and data
1913:
1914: FND_MSG_PUB.Count_And_Get

Line 1919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1915: ( p_count => x_msg_count
1916: , p_data => x_msg_data
1917: );
1918:
1919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1920:
1921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1922:
1923: -- Get message count and data

Line 1921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1917: );
1918:
1919: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1920:
1921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1922:
1923: -- Get message count and data
1924:
1925: FND_MSG_PUB.Count_And_Get

Line 1937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1933: );
1934:
1935: WHEN OTHERS THEN
1936:
1937: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1938:
1939: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1940: THEN
1941: FND_MSG_PUB.Add_Exc_Msg