DBA Data[Home] [Help]

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 467: RAISE fnd_api.g_exc_error;

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

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

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

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

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

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

565: AND inventory_item_id = x_trolin_tbl(l_index).inventory_item_id);
566: EXCEPTION
567: WHEN NO_DATA_FOUND THEN
568: print_debug('From Subinventory is not in list of restricted sub inventory', l_api_name);
569: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
570: END;
571: END IF;
572: END IF; -- From sub is not null
573: --END bug#8608683

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

572: END IF; -- From sub is not null
573: --END bug#8608683
574:
575:
576: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN --{
577:
578: l_return_value := INV_CACHE.set_item_rec( p_organization_id => x_trolin_tbl(l_index).organization_id
579: ,p_item_id => x_trolin_tbl(l_index).inventory_item_id);
580:

Line 583: RAISE fnd_api.g_exc_unexpected_error;

579: ,p_item_id => x_trolin_tbl(l_index).inventory_item_id);
580:
581: IF NOT l_return_value Then
582: print_debug('Error setting cache for inventory_item', l_api_name);
583: RAISE fnd_api.g_exc_unexpected_error;
584: END IF;
585:
586: l_reservable_type := INV_CACHE.item_rec.reservable_type;
587:

Line 611: p_init_msg_list => fnd_api.g_false,

607:
608: wsh_integration.ins_backorder_ss_smc_rec
609: (p_api_version_number => 1.0,
610: p_source_code => 'INV',
611: p_init_msg_list => fnd_api.g_false,
612: p_backorder_rec => l_shipset_smc_backorder_rec,
613: x_return_status => l_return_status,
614: x_msg_count => x_msg_count,
615: x_msg_data => x_msg_data);

Line 617: IF l_return_status <> fnd_api.g_ret_sts_success THEN

613: x_return_status => l_return_status,
614: x_msg_count => x_msg_count,
615: x_msg_data => x_msg_data);
616:
617: IF l_return_status <> fnd_api.g_ret_sts_success THEN
618: print_debug('Error occured while updating shipping for ' || 'failed ship set',l_api_name);
619: print_debug('l_return_status: ' || l_return_status, l_api_name);
620: END IF;
621:

Line 641: p_init_msg_list => fnd_api.g_false,

637:
638: wsh_integration.ins_backorder_ss_smc_rec
639: (p_api_version_number => 1.0,
640: p_source_code => 'INV',
641: p_init_msg_list => fnd_api.g_false,
642: p_backorder_rec => l_shipset_smc_backorder_rec,
643: x_return_status => l_return_status,
644: x_msg_count => x_msg_count,
645: x_msg_data => x_msg_data);

Line 647: IF l_return_status <> fnd_api.g_ret_sts_success THEN

643: x_return_status => l_return_status,
644: x_msg_count => x_msg_count,
645: x_msg_data => x_msg_data);
646:
647: IF l_return_status <> fnd_api.g_ret_sts_success THEN
648: print_debug('Error occured while updating shipping for ' || 'failed ship set',l_api_name);
649: print_debug('l_return_status: ' || l_return_status, l_api_name);
650: END IF;
651:

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

655: print_debug('l_return_status: ' || l_return_status, l_api_name);
656: END;
657: -- End Bug 7148749
658: END IF;
659: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
660: END IF;
661: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
662:
663: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{

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

657: -- End Bug 7148749
658: END IF;
659: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
660: END IF;
661: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
662:
663: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{
664: IF l_current_ship_set_id is NOT NULL THEN --{
665: ROLLBACK to SHIPSET_SP;

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

659: x_trolin_tbl(l_index).return_status:= fnd_api.g_ret_sts_error;
660: END IF;
661: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success }
662:
663: IF x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error THEN --{
664: IF l_current_ship_set_id is NOT NULL THEN --{
665: ROLLBACK to SHIPSET_SP;
666: l_index := l_shipset_start_index;
667: LOOP

Line 684: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

680: p_changed_attributes => l_shipping_attr,
681: x_return_status => l_return_status
682: );
683:
684: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
685: print_debug('return error from update shipping attributes',l_api_name);
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: print_debug('return error from update shipping attributes',l_api_name);

Line 686: RAISE FND_API.G_EXC_ERROR;

682: );
683:
684: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
685: print_debug('return error from update shipping attributes',l_api_name);
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: print_debug('return error from update shipping attributes',l_api_name);
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: END IF;

Line 687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

683:
684: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
685: print_debug('return error from update shipping attributes',l_api_name);
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: print_debug('return error from update shipping attributes',l_api_name);
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: END IF;
691: END IF; --} backorder_flag

Line 689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

685: print_debug('return error from update shipping attributes',l_api_name);
686: RAISE FND_API.G_EXC_ERROR;
687: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
688: print_debug('return error from update shipping attributes',l_api_name);
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: END IF;
691: END IF; --} backorder_flag
692: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
693: EXIT WHEN l_index = p_trolin_tbl.LAST;

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

688: print_debug('return error from update shipping attributes',l_api_name);
689: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
690: END IF;
691: END IF; --} backorder_flag
692: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
693: EXIT WHEN l_index = p_trolin_tbl.LAST;
694: l_index := p_trolin_tbl.NEXT(l_index);
695:
696: IF p_trolin_tbl(l_index).ship_set_id IS NULL OR

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

693: EXIT WHEN l_index = p_trolin_tbl.LAST;
694: l_index := p_trolin_tbl.NEXT(l_index);
695:
696: IF p_trolin_tbl(l_index).ship_set_id IS NULL OR
697: p_trolin_tbl(l_index).ship_set_id = fnd_api.g_miss_num OR
698: p_trolin_tbl(l_index).ship_set_id <> nvl(l_current_ship_set_id, -9999) THEN
699: l_index := p_trolin_tbl.prior(l_index);
700: EXIT;
701: END IF;

Line 727: IF l_return_status = FND_API.G_RET_STS_ERROR then

723: (p_source_code => 'INV',
724: p_changed_attributes => l_shipping_attr,
725: x_return_status => l_return_status
726: );
727: IF l_return_status = FND_API.G_RET_STS_ERROR then
728: print_debug('return error from update shipping attributes',l_api_name);
729: RAISE FND_API.G_EXC_ERROR;
730: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
731: print_debug('return error from update shipping attributes',l_api_name);

Line 729: RAISE FND_API.G_EXC_ERROR;

725: x_return_status => l_return_status
726: );
727: IF l_return_status = FND_API.G_RET_STS_ERROR then
728: print_debug('return error from update shipping attributes',l_api_name);
729: RAISE FND_API.G_EXC_ERROR;
730: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
731: print_debug('return error from update shipping attributes',l_api_name);
732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
733: END IF;

Line 730: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

726: );
727: IF l_return_status = FND_API.G_RET_STS_ERROR then
728: print_debug('return error from update shipping attributes',l_api_name);
729: RAISE FND_API.G_EXC_ERROR;
730: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
731: print_debug('return error from update shipping attributes',l_api_name);
732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
733: END IF;
734: END IF; -- l_back_order_flag }

Line 732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

728: print_debug('return error from update shipping attributes',l_api_name);
729: RAISE FND_API.G_EXC_ERROR;
730: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
731: print_debug('return error from update shipping attributes',l_api_name);
732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
733: END IF;
734: END IF; -- l_back_order_flag }
735: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
736:

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

731: print_debug('return error from update shipping attributes',l_api_name);
732: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
733: END IF;
734: END IF; -- l_back_order_flag }
735: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
736:
737: EXIT WHEN l_index = p_trolin_tbl.LAST;
738: l_index := p_trolin_tbl.NEXT(l_index);
739:

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

737: EXIT WHEN l_index = p_trolin_tbl.LAST;
738: l_index := p_trolin_tbl.NEXT(l_index);
739:
740: IF p_trolin_tbl(l_index).ship_model_id IS NULL OR
741: p_trolin_tbl(l_index).ship_model_id = fnd_api.g_miss_num OR
742: p_trolin_tbl(l_index).ship_model_id <> nvl(l_current_ship_model_id, -9999) THEN
743: l_index := p_trolin_tbl.prior(l_index);
744: EXIT;
745: END IF;

Line 765: IF l_return_status = FND_API.G_RET_STS_ERROR then

761: p_changed_attributes => l_shipping_attr,
762: x_return_status => l_return_status
763: );
764:
765: IF l_return_status = FND_API.G_RET_STS_ERROR then
766: print_debug('return error from update shipping attributes',l_api_name);
767: RAISE FND_API.G_EXC_ERROR;
768: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
769: print_debug('return error from update shipping attributes',l_api_name);

Line 767: RAISE FND_API.G_EXC_ERROR;

763: );
764:
765: IF l_return_status = FND_API.G_RET_STS_ERROR then
766: print_debug('return error from update shipping attributes',l_api_name);
767: RAISE FND_API.G_EXC_ERROR;
768: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
769: print_debug('return error from update shipping attributes',l_api_name);
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;

Line 768: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

764:
765: IF l_return_status = FND_API.G_RET_STS_ERROR then
766: print_debug('return error from update shipping attributes',l_api_name);
767: RAISE FND_API.G_EXC_ERROR;
768: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
769: print_debug('return error from update shipping attributes',l_api_name);
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;
772: END IF; -- l_back_order_flag }

Line 770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

766: print_debug('return error from update shipping attributes',l_api_name);
767: RAISE FND_API.G_EXC_ERROR;
768: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
769: print_debug('return error from update shipping attributes',l_api_name);
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;
772: END IF; -- l_back_order_flag }
773: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
774: END IF; -- l_current_ship_set_id }

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

769: print_debug('return error from update shipping attributes',l_api_name);
770: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
771: END IF;
772: END IF; -- l_back_order_flag }
773: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_error;
774: END IF; -- l_current_ship_set_id }
775: --Bug 7148749, moving this after the loop, so that the new move order lines table
776: --l_new_trolin_tbl gets populated only when all the lines in x_trolin_tbl are validated.
777: /* ELSE --} {

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

784: x_trolin_tbl(l_index).created_by := fnd_global.user_id;
785: x_trolin_tbl(l_index).last_update_date := SYSDATE;
786: x_trolin_tbl(l_index).last_updated_by := fnd_global.user_id;
787: x_trolin_tbl(l_index).last_update_login := fnd_global.login_id;
788: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;
789: x_trolin_tbl(l_index) := inv_trolin_util.convert_miss_to_null_parallel
790: (p_trolin_rec => x_trolin_tbl(l_index));
791:
792: l_new_trolin_tbl(l_count).attribute1 := x_trolin_tbl(l_index).attribute1;

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

885: -- INVCONV END
886:
887: l_count := l_count+1;
888: */ -- Bug 7148749
889: END IF; -- x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_error }
890: -- gmi_reservation_util.println('- PAL inside Create_Move_Order_Lines ');
891: /* Bug 4162173 Added the following to initate the Outbound for Third Party Integration */
892: OPEN get_move_order_type(x_trolin_tbl(l_index).header_id);
893: FETCH get_move_order_type INTO l_move_order_type;

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

961: --have been successfully validated, so that entire ship set can be handled.
962: l_index := x_trolin_tbl.FIRST;
963: l_count := 1;
964: Loop
965: If x_trolin_tbl(l_index).return_status = fnd_api.g_ret_sts_success THEN
966:
967: If l_debug = 1 THEN
968: print_debug('Creating MO Line for WDD = '||x_trolin_tbl(l_index).txn_source_line_detail_id,l_api_name);
969: End If;

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

976: x_trolin_tbl(l_index).created_by := fnd_global.user_id;
977: x_trolin_tbl(l_index).last_update_date := SYSDATE;
978: x_trolin_tbl(l_index).last_updated_by := fnd_global.user_id;
979: x_trolin_tbl(l_index).last_update_login := fnd_global.login_id;
980: x_trolin_tbl(l_index).return_status := fnd_api.g_ret_sts_success;
981: x_trolin_tbl(l_index) := inv_trolin_util.convert_miss_to_null_parallel
982: (p_trolin_rec => x_trolin_tbl(l_index));
983:
984: l_new_trolin_tbl(l_count).attribute1 := x_trolin_tbl(l_index).attribute1;

Line 1091: x_return_status := fnd_api.g_ret_sts_success;

1087: ||', p_trolin_tbl Count = '||p_trolin_tbl.count,l_api_name);
1088: End If;
1089: -- End bug 7148749
1090:
1091: x_return_status := fnd_api.g_ret_sts_success;
1092:
1093: inv_trolin_util.insert_mo_lines_bulk
1094: (p_new_trolin_tbl => l_new_trolin_tbl
1095: ,x_return_status => x_return_status);

Line 1100: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1096:
1097: --delete the records from l_new_trolin_tbl
1098: l_new_trolin_tbl.delete;
1099:
1100: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1101: print_debug('return error from INSERT_MO_LINES_BULK',l_api_name);
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1104:

Line 1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1098: l_new_trolin_tbl.delete;
1099:
1100: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1101: print_debug('return error from INSERT_MO_LINES_BULK',l_api_name);
1102: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1103: END IF;
1104:
1105: ELSE --} Validation Yes
1106: l_control_rec.controlled_operation := TRUE;

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

1112: if( l_trolin_tbl.count > 0 ) then
1113: for i in 1..l_trolin_tbl.count LOOP
1114: --inv_debug.message('trolin.line_id is ' || l_trolin_tbl(l).line_id);
1115: /* to fix bug 1402677: Also we shouldn't change the operation here
1116: if( (l_trolin_tbl(i).line_id <> FND_API.G_MISS_NUM OR l_trolin_tbl(i).line_id is NULL ) AND
1117: l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_CREATE ) then
1118: l_trolin_tbl(i).operation := INV_GLOBALS.G_OPR_UPDATE;
1119: els*/
1120: if (l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_UPDATE and

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

1117: l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_CREATE ) then
1118: l_trolin_tbl(i).operation := INV_GLOBALS.G_OPR_UPDATE;
1119: els*/
1120: if (l_trolin_tbl(i).operation = INV_GLOBALS.G_OPR_UPDATE and
1121: (l_trolin_tbl(i).line_id = FND_API.G_MISS_NUM OR
1122: l_trolin_tbl(i).line_id is null ) ) then
1123: --inv_debug.message('update and no line id');
1124: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1125: fnd_message.set_token('ATTRIBUTE', 'LINE_ID');

Line 1127: raise fnd_api.g_exc_error;

1123: --inv_debug.message('update and no line id');
1124: fnd_message.set_name('INV', 'INV_ATTRIBUTE_REQUIRED');
1125: fnd_message.set_token('ATTRIBUTE', 'LINE_ID');
1126: fnd_msg_pub.add;
1127: raise fnd_api.g_exc_error;
1128: end if;
1129:
1130: if( l_trolin_tbl(i).header_id is not null
1131: and l_trolin_tbl(i).header_id <> FND_API.G_MISS_NUM ) then

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

1127: raise fnd_api.g_exc_error;
1128: end if;
1129:
1130: if( l_trolin_tbl(i).header_id is not null
1131: and l_trolin_tbl(i).header_id <> FND_API.G_MISS_NUM ) then
1132: --inv_debug.message('check if the header_id exists');
1133: select count(*)
1134: into l_dummy
1135: from mtl_txn_request_headers

Line 1144: raise fnd_api.g_exc_error;

1140: --inv_debug.message('header id not found');
1141: FND_MESSAGE.SET_NAME('INV', 'INV_FIELD_INVALID');
1142: FND_MESSAGE.SET_TOKEN('ENTITY1', 'Header_Id');
1143: FND_MSG_PUB.ADD;
1144: raise fnd_api.g_exc_error;
1145: else
1146: l_trohdr_rec := inv_trohdr_util.query_row(p_header_id => l_trolin_tbl(i).header_id);
1147: end if;
1148: end if;

Line 1208: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1204:
1205: INV_Transfer_Order_PVT.Process_Transfer_Order
1206: ( p_api_version_number => 1.0
1207: , p_init_msg_list => p_init_msg_list
1208: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1209: , p_commit => p_commit
1210: , x_return_status => x_return_status
1211: , x_msg_count => x_msg_count
1212: , x_msg_data => x_msg_data

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

1223:
1224: --x_trohdr_rec := p_trohdr_rec;
1225: x_trolin_tbl := l_trolin_tbl_out;
1226:
1227: if( p_commit = FND_API.G_TRUE ) Then
1228: commit;
1229: end if;
1230: -- If p_return_values is TRUE then convert Ids to Values.
1231:

Line 1232: IF FND_API.to_Boolean(p_return_values) THEN

1228: commit;
1229: end if;
1230: -- If p_return_values is TRUE then convert Ids to Values.
1231:
1232: IF FND_API.to_Boolean(p_return_values) THEN
1233: Id_To_Value
1234: ( p_trohdr_rec => l_trohdr_rec
1235: , p_trolin_tbl => p_trolin_tbl
1236: , x_trohdr_val_rec => l_trohdr_val_rec

Line 1243: WHEN FND_API.G_EXC_ERROR THEN

1239: END IF;
1240: END IF;
1241: EXCEPTION
1242:
1243: WHEN FND_API.G_EXC_ERROR THEN
1244: --inv_debug.message('returning error');
1245: x_return_status := FND_API.G_RET_STS_ERROR;
1246: -- Get message count and data
1247: FND_MSG_PUB.Count_And_Get

Line 1245: x_return_status := FND_API.G_RET_STS_ERROR;

1241: EXCEPTION
1242:
1243: WHEN FND_API.G_EXC_ERROR THEN
1244: --inv_debug.message('returning error');
1245: x_return_status := FND_API.G_RET_STS_ERROR;
1246: -- Get message count and data
1247: FND_MSG_PUB.Count_And_Get
1248: ( p_count => x_msg_count
1249: , p_data => x_msg_data

Line 1252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1248: ( p_count => x_msg_count
1249: , p_data => x_msg_data
1250: );
1251:
1252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1254: -- Get message count and data
1255: FND_MSG_PUB.Count_And_Get
1256: ( p_count => x_msg_count

Line 1253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1249: , p_data => x_msg_data
1250: );
1251:
1252: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1254: -- Get message count and data
1255: FND_MSG_PUB.Count_And_Get
1256: ( p_count => x_msg_count
1257: , p_data => x_msg_data

Line 1261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1257: , p_data => x_msg_data
1258: );
1259:
1260: WHEN OTHERS THEN
1261: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1262: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1263: THEN
1264: FND_MSG_PUB.Add_Exc_Msg
1265: ( G_PKG_NAME

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

1290: -- End of Comments
1291:
1292: PROCEDURE Process_Move_Order
1293: ( p_api_version_number IN NUMBER
1294: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1295: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1296: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1297: , x_return_status OUT NOCOPY VARCHAR2
1298: , x_msg_count OUT NOCOPY NUMBER

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

1291:
1292: PROCEDURE Process_Move_Order
1293: ( p_api_version_number IN NUMBER
1294: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1295: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1296: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1297: , x_return_status OUT NOCOPY VARCHAR2
1298: , x_msg_count OUT NOCOPY NUMBER
1299: , x_msg_data OUT NOCOPY VARCHAR2

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

1292: PROCEDURE Process_Move_Order
1293: ( p_api_version_number IN NUMBER
1294: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1295: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1296: , p_commit IN VARCHAR2 := FND_API.G_FALSE
1297: , x_return_status OUT NOCOPY VARCHAR2
1298: , x_msg_count OUT NOCOPY NUMBER
1299: , x_msg_data OUT NOCOPY VARCHAR2
1300: , p_trohdr_rec IN Trohdr_Rec_Type := G_MISS_TROHDR_REC

Line 1321: IF NOT FND_API.Compatible_API_Call

1317: BEGIN
1318:
1319: -- Standard call to check for call compatibility
1320:
1321: IF NOT FND_API.Compatible_API_Call
1322: ( l_api_version_number
1323: , p_api_version_number
1324: , l_api_name
1325: , G_PKG_NAME

Line 1328: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1324: , l_api_name
1325: , G_PKG_NAME
1326: )
1327: THEN
1328: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1329: END IF;
1330:
1331: l_control_Rec.process_entity := INV_GLOBALS.G_ENTITY_ALL;
1332: /*

Line 1344: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1340: , x_trohdr_rec => l_trohdr_rec
1341: , x_trolin_tbl => l_trolin_tbl
1342: );
1343:
1344: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1346: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1347: RAISE FND_API.G_EXC_ERROR;
1348: END IF;

Line 1345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1341: , x_trolin_tbl => l_trolin_tbl
1342: );
1343:
1344: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1346: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1347: RAISE FND_API.G_EXC_ERROR;
1348: END IF;
1349: */

Line 1346: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1342: );
1343:
1344: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1346: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1347: RAISE FND_API.G_EXC_ERROR;
1348: END IF;
1349: */
1350:

Line 1347: RAISE FND_API.G_EXC_ERROR;

1343:
1344: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1345: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1346: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1347: RAISE FND_API.G_EXC_ERROR;
1348: END IF;
1349: */
1350:
1351: -- Call INV_Transfer_Order_PVT.Process_Transfer_Order

Line 1356: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1352:
1353: INV_Transfer_Order_PVT.Process_Transfer_Order
1354: ( p_api_version_number => 1.0
1355: , p_init_msg_list => p_init_msg_list
1356: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1357: , p_commit => p_commit
1358: , x_return_status => x_return_status
1359: , x_msg_count => x_msg_count
1360: , x_msg_data => x_msg_data

Line 1375: if p_commit = FND_API.G_TRUE then

1371:
1372: x_trohdr_rec := l_trohdr_rec;
1373: x_trolin_tbl := l_trolin_tbl;
1374:
1375: if p_commit = FND_API.G_TRUE then
1376: commit;
1377: end if;
1378: -- If p_return_values is TRUE then convert Ids to Values.
1379:

Line 1380: IF FND_API.to_Boolean(p_return_values) THEN

1376: commit;
1377: end if;
1378: -- If p_return_values is TRUE then convert Ids to Values.
1379:
1380: IF FND_API.to_Boolean(p_return_values) THEN
1381: Id_To_Value
1382: ( p_trohdr_rec => p_trohdr_rec
1383: , p_trolin_tbl => p_trolin_tbl
1384: , x_trohdr_val_rec => x_trohdr_val_rec

Line 1390: WHEN FND_API.G_EXC_ERROR THEN

1386: );
1387: END IF;
1388:
1389: EXCEPTION
1390: WHEN FND_API.G_EXC_ERROR THEN
1391: x_return_status := FND_API.G_RET_STS_ERROR;
1392: -- Get message count and data
1393: FND_MSG_PUB.Count_And_Get
1394: ( p_count => x_msg_count

Line 1391: x_return_status := FND_API.G_RET_STS_ERROR;

1387: END IF;
1388:
1389: EXCEPTION
1390: WHEN FND_API.G_EXC_ERROR THEN
1391: x_return_status := FND_API.G_RET_STS_ERROR;
1392: -- Get message count and data
1393: FND_MSG_PUB.Count_And_Get
1394: ( p_count => x_msg_count
1395: , p_data => x_msg_data

Line 1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1393: FND_MSG_PUB.Count_And_Get
1394: ( p_count => x_msg_count
1395: , p_data => x_msg_data
1396: );
1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1399: -- Get message count and data
1400: FND_MSG_PUB.Count_And_Get
1401: ( p_count => x_msg_count

Line 1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1394: ( p_count => x_msg_count
1395: , p_data => x_msg_data
1396: );
1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1398: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1399: -- Get message count and data
1400: FND_MSG_PUB.Count_And_Get
1401: ( p_count => x_msg_count
1402: , p_data => x_msg_data

Line 1405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1401: ( p_count => x_msg_count
1402: , p_data => x_msg_data
1403: );
1404: WHEN OTHERS THEN
1405: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1406: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1407: THEN
1408: FND_MSG_PUB.Add_Exc_Msg
1409: ( G_PKG_NAME

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

1434: -- End of Comments
1435:
1436: PROCEDURE Lock_Move_Order
1437: ( p_api_version_number IN NUMBER
1438: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1439: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1440: , x_return_status OUT NOCOPY VARCHAR2
1441: , x_msg_count OUT NOCOPY NUMBER
1442: , x_msg_data OUT NOCOPY VARCHAR2

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

1435:
1436: PROCEDURE Lock_Move_Order
1437: ( p_api_version_number IN NUMBER
1438: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1439: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1440: , x_return_status OUT NOCOPY VARCHAR2
1441: , x_msg_count OUT NOCOPY NUMBER
1442: , x_msg_data OUT NOCOPY VARCHAR2
1443: , p_trohdr_rec IN Trohdr_Rec_Type :=

Line 1467: IF NOT FND_API.Compatible_API_Call

1463: BEGIN
1464:
1465: -- Standard call to check for call compatibility
1466:
1467: IF NOT FND_API.Compatible_API_Call
1468: ( l_api_version_number
1469: , p_api_version_number
1470: , l_api_name
1471: , G_PKG_NAME

Line 1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1470: , l_api_name
1471: , G_PKG_NAME
1472: )
1473: THEN
1474: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1475: END IF;
1476:
1477: -- Perform Value to Id conversion
1478:

Line 1489: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1485: , x_trohdr_rec => l_trohdr_rec
1486: , x_trolin_tbl => l_trolin_tbl
1487: );
1488:
1489: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;

Line 1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1486: , x_trolin_tbl => l_trolin_tbl
1487: );
1488:
1489: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;
1494:

Line 1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

1487: );
1488:
1489: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;
1494:
1495:

Line 1492: RAISE FND_API.G_EXC_ERROR;

1488:
1489: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1490: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1491: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1492: RAISE FND_API.G_EXC_ERROR;
1493: END IF;
1494:
1495:
1496: -- Call INV_Transfer_Order_PVT.Lock_Transfer_Order

Line 1517: IF FND_API.to_Boolean(p_return_values) THEN

1513: x_trolin_tbl := l_trolin_tbl;
1514:
1515: -- If p_return_values is TRUE then convert Ids to Values.
1516:
1517: IF FND_API.to_Boolean(p_return_values) THEN
1518:
1519: Id_To_Value
1520: ( p_trohdr_rec => l_trohdr_rec
1521: , p_trolin_tbl => l_trolin_tbl

Line 1530: WHEN FND_API.G_EXC_ERROR THEN

1526: END IF;
1527:
1528: EXCEPTION
1529:
1530: WHEN FND_API.G_EXC_ERROR THEN
1531:
1532: x_return_status := FND_API.G_RET_STS_ERROR;
1533:
1534: -- Get message count and data

Line 1532: x_return_status := FND_API.G_RET_STS_ERROR;

1528: EXCEPTION
1529:
1530: WHEN FND_API.G_EXC_ERROR THEN
1531:
1532: x_return_status := FND_API.G_RET_STS_ERROR;
1533:
1534: -- Get message count and data
1535:
1536: FND_MSG_PUB.Count_And_Get

Line 1541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1537: ( p_count => x_msg_count
1538: , p_data => x_msg_data
1539: );
1540:
1541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1542:
1543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1544:
1545: -- Get message count and data

Line 1543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1539: );
1540:
1541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1542:
1543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1544:
1545: -- Get message count and data
1546:
1547: FND_MSG_PUB.Count_And_Get

Line 1554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1550: );
1551:
1552: WHEN OTHERS THEN
1553:
1554: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1555:
1556: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1557: THEN
1558: FND_MSG_PUB.Add_Exc_Msg

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

1587: -- End of Comments
1588:
1589: PROCEDURE Get_Move_Order
1590: ( p_api_version_number IN NUMBER
1591: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1592: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1593: , x_return_status OUT NOCOPY VARCHAR2
1594: , x_msg_count OUT NOCOPY NUMBER
1595: , x_msg_data OUT NOCOPY VARCHAR2

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

1588:
1589: PROCEDURE Get_Move_Order
1590: ( p_api_version_number IN NUMBER
1591: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1592: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1593: , x_return_status OUT NOCOPY VARCHAR2
1594: , x_msg_count OUT NOCOPY NUMBER
1595: , x_msg_data OUT NOCOPY VARCHAR2
1596: , p_header_id IN NUMBER :=

Line 1597: FND_API.G_MISS_NUM

1593: , x_return_status OUT NOCOPY VARCHAR2
1594: , x_msg_count OUT NOCOPY NUMBER
1595: , x_msg_data OUT NOCOPY VARCHAR2
1596: , p_header_id IN NUMBER :=
1597: FND_API.G_MISS_NUM
1598: , p_header IN VARCHAR2 :=
1599: FND_API.G_MISS_CHAR
1600: , x_trohdr_rec OUT NOCOPY Trohdr_Rec_Type
1601: , x_trohdr_val_rec OUT NOCOPY Trohdr_Val_Rec_Type

Line 1599: FND_API.G_MISS_CHAR

1595: , x_msg_data OUT NOCOPY VARCHAR2
1596: , p_header_id IN NUMBER :=
1597: FND_API.G_MISS_NUM
1598: , p_header IN VARCHAR2 :=
1599: FND_API.G_MISS_CHAR
1600: , x_trohdr_rec OUT NOCOPY Trohdr_Rec_Type
1601: , x_trohdr_val_rec OUT NOCOPY Trohdr_Val_Rec_Type
1602: , x_trolin_tbl OUT NOCOPY Trolin_Tbl_Type
1603: , x_trolin_val_tbl OUT NOCOPY Trolin_Val_Tbl_Type

Line 1616: IF NOT FND_API.Compatible_API_Call

1612: BEGIN
1613:
1614: -- Standard call to check for call compatibility
1615:
1616: IF NOT FND_API.Compatible_API_Call
1617: ( l_api_version_number
1618: , p_api_version_number
1619: , l_api_name
1620: , G_PKG_NAME

Line 1623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1619: , l_api_name
1620: , G_PKG_NAME
1621: )
1622: THEN
1623: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1624: END IF;
1625:
1626: -- Standard check for Val/ID conversion
1627:

Line 1628: IF p_header = FND_API.G_MISS_CHAR

1624: END IF;
1625:
1626: -- Standard check for Val/ID conversion
1627:
1628: IF p_header = FND_API.G_MISS_CHAR
1629: THEN
1630:
1631: l_header_id := p_header_id;
1632:

Line 1633: ELSIF p_header_id <> FND_API.G_MISS_NUM THEN

1629: THEN
1630:
1631: l_header_id := p_header_id;
1632:
1633: ELSIF p_header_id <> FND_API.G_MISS_NUM THEN
1634:
1635: l_header_id := p_header_id;
1636:
1637: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_SUCCESS)

Line 1654: IF l_header_id = FND_API.G_MISS_NUM THEN

1650: l_header_id := INV_Value_To_Id.header
1651: ( p_header => p_header
1652: );
1653:
1654: IF l_header_id = FND_API.G_MISS_NUM THEN
1655: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1656: THEN
1657:
1658: FND_MESSAGE.SET_NAME('INV','Invalid Business Object Value');

Line 1665: RAISE FND_API.G_EXC_ERROR;

1661:
1662: END IF;
1663: END IF;
1664:
1665: RAISE FND_API.G_EXC_ERROR;
1666:
1667: END IF;
1668:
1669:

Line 1690: IF FND_API.TO_BOOLEAN(p_return_values) THEN

1686: x_trolin_tbl := l_trolin_tbl;
1687:
1688: -- If p_return_values is TRUE then convert Ids to Values.
1689:
1690: IF FND_API.TO_BOOLEAN(p_return_values) THEN
1691:
1692: Id_To_Value
1693: ( p_trohdr_rec => l_trohdr_rec
1694: , p_trolin_tbl => l_trolin_tbl

Line 1703: x_return_status := FND_API.G_RET_STS_SUCCESS;

1699: END IF;
1700:
1701: -- Set return status
1702:
1703: x_return_status := FND_API.G_RET_STS_SUCCESS;
1704:
1705: -- Get message count and data
1706:
1707: FND_MSG_PUB.Count_And_Get

Line 1715: WHEN FND_API.G_EXC_ERROR THEN

1711:
1712:
1713: EXCEPTION
1714:
1715: WHEN FND_API.G_EXC_ERROR THEN
1716:
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718:
1719: -- Get message count and data

Line 1717: x_return_status := FND_API.G_RET_STS_ERROR;

1713: EXCEPTION
1714:
1715: WHEN FND_API.G_EXC_ERROR THEN
1716:
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718:
1719: -- Get message count and data
1720:
1721: FND_MSG_PUB.Count_And_Get

Line 1726: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1722: ( p_count => x_msg_count
1723: , p_data => x_msg_data
1724: );
1725:
1726: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1727:
1728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1729:
1730: -- Get message count and data

Line 1728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1724: );
1725:
1726: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1727:
1728: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1729:
1730: -- Get message count and data
1731:
1732: FND_MSG_PUB.Count_And_Get

Line 1739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1735: );
1736:
1737: WHEN OTHERS THEN
1738:
1739: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1740:
1741: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1742: THEN
1743: FND_MSG_PUB.Add_Exc_Msg

Line 1793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1789: , 'Id_To_Value'
1790: );
1791: END IF;
1792:
1793: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1794:
1795: END Id_To_Value;
1796:
1797: -- Procedure Value_To_Id

Line 1817: x_return_status := FND_API.G_RET_STS_SUCCESS;

1813: BEGIN
1814:
1815: -- Init x_return_status.
1816:
1817: x_return_status := FND_API.G_RET_STS_SUCCESS;
1818:
1819: -- Convert trohdr
1820:
1821: l_trohdr_rec := INV_Trohdr_Util.Get_Ids

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

1824: );
1825:
1826: x_trohdr_rec := l_trohdr_rec;
1827:
1828: IF l_trohdr_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1829: x_return_status := FND_API.G_RET_STS_ERROR;
1830: END IF;
1831:
1832: -- Convert trolin

Line 1829: x_return_status := FND_API.G_RET_STS_ERROR;

1825:
1826: x_trohdr_rec := l_trohdr_rec;
1827:
1828: IF l_trohdr_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1829: x_return_status := FND_API.G_RET_STS_ERROR;
1830: END IF;
1831:
1832: -- Convert trolin
1833:

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

1843: );
1844:
1845: x_trolin_tbl(l_index) := l_trolin_rec;
1846:
1847: IF l_trolin_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1848: x_return_status := FND_API.G_RET_STS_ERROR;
1849: END IF;
1850:
1851: l_index := p_trolin_val_tbl.NEXT(l_index);

Line 1848: x_return_status := FND_API.G_RET_STS_ERROR;

1844:
1845: x_trolin_tbl(l_index) := l_trolin_rec;
1846:
1847: IF l_trolin_rec.return_status = FND_API.G_RET_STS_ERROR THEN
1848: x_return_status := FND_API.G_RET_STS_ERROR;
1849: END IF;
1850:
1851: l_index := p_trolin_val_tbl.NEXT(l_index);
1852:

Line 1867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1863: , 'Value_To_Id'
1864: );
1865: END IF;
1866:
1867: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1868:
1869: END Value_To_Id;
1870:
1871: PROCEDURE Process_Move_Order_Line

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

1870:
1871: PROCEDURE Process_Move_Order_Line
1872: (
1873: p_api_version_number IN NUMBER
1874: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1875: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1876: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1877: , x_return_status OUT NOCOPY VARCHAR2
1878: , x_msg_count OUT NOCOPY NUMBER

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

1871: PROCEDURE Process_Move_Order_Line
1872: (
1873: p_api_version_number IN NUMBER
1874: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1875: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1876: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1877: , x_return_status OUT NOCOPY VARCHAR2
1878: , x_msg_count OUT NOCOPY NUMBER
1879: , x_msg_data OUT NOCOPY VARCHAR2

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

1872: (
1873: p_api_version_number IN NUMBER
1874: , p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1875: , p_return_values IN VARCHAR2 := FND_API.G_FALSE
1876: , p_commit IN VARCHAR2 := FND_API.G_TRUE
1877: , x_return_status OUT NOCOPY VARCHAR2
1878: , x_msg_count OUT NOCOPY NUMBER
1879: , x_msg_data OUT NOCOPY VARCHAR2
1880: , p_trolin_tbl IN Trolin_Tbl_Type

Line 1896: IF NOT FND_API.Compatible_API_Call

1892: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1893: BEGIN
1894:
1895: -- Standard call to check for call compatibility
1896: IF NOT FND_API.Compatible_API_Call
1897: ( l_api_version_number
1898: , p_api_version_number
1899: , l_api_name
1900: , G_PKG_NAME

Line 1903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1899: , l_api_name
1900: , G_PKG_NAME
1901: )
1902: THEN
1903: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1904: END IF;
1905:
1906: l_control_rec.controlled_operation := TRUE;
1907: l_control_Rec.validate_entity := TRUE;

Line 1925: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1921: INV_Transfer_Order_PVT.Process_Transfer_Order
1922: ( p_api_version_number => 1.0
1923: , p_init_msg_list => p_init_msg_list
1924: , p_commit => p_commit
1925: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1926: , p_control_rec => l_control_rec
1927: , x_return_status => x_return_status
1928: , x_msg_count => x_msg_count
1929: , x_msg_data => x_msg_data

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

1936: -- Load Id OUT parameters.
1937:
1938: --x_trohdr_rec := p_trohdr_rec;
1939: x_trolin_tbl := l_trolin_tbl;
1940: if( p_commit = FND_API.G_TRUE ) then
1941: commit;
1942: end if;
1943: -- If p_return_values is TRUE then convert Ids to Values.
1944:

Line 1945: IF FND_API.to_Boolean(p_return_values) THEN

1941: commit;
1942: end if;
1943: -- If p_return_values is TRUE then convert Ids to Values.
1944:
1945: IF FND_API.to_Boolean(p_return_values) THEN
1946:
1947: Id_To_Value
1948: ( p_trohdr_rec => l_trohdr_rec
1949: , p_trolin_tbl => l_trolin_tbl

Line 1958: WHEN FND_API.G_EXC_ERROR THEN

1954: END IF;
1955:
1956: EXCEPTION
1957:
1958: WHEN FND_API.G_EXC_ERROR THEN
1959:
1960: x_return_status := FND_API.G_RET_STS_ERROR;
1961:
1962: -- Get message count and data

Line 1960: x_return_status := FND_API.G_RET_STS_ERROR;

1956: EXCEPTION
1957:
1958: WHEN FND_API.G_EXC_ERROR THEN
1959:
1960: x_return_status := FND_API.G_RET_STS_ERROR;
1961:
1962: -- Get message count and data
1963:
1964: FND_MSG_PUB.Count_And_Get

Line 1969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1965: ( p_count => x_msg_count
1966: , p_data => x_msg_data
1967: );
1968:
1969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1970:
1971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1972:
1973: -- Get message count and data

Line 1971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1967: );
1968:
1969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1970:
1971: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1972:
1973: -- Get message count and data
1974:
1975: FND_MSG_PUB.Count_And_Get

Line 1987: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1983: );
1984:
1985: WHEN OTHERS THEN
1986:
1987: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1988:
1989: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1990: THEN
1991: FND_MSG_PUB.Add_Exc_Msg