APPS.RCV_ACCEVENTS_PVT dependencies on FND_API

Line 16: -- Default = FND_API.G_FALSE

12: -- Pre-reqs :
13: -- Parameters :
14: -- IN : p_api_version IN NUMBER Required
15: -- p_init_msg_list IN VARCHAR2 Optional
16: -- Default = FND_API.G_FALSE
17: -- p_commit IN VARCHAR2 Optional
18: -- Default = FND_API.G_FALSE
19: -- p_validation_level IN NUMBER Optional
20: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 18: -- Default = FND_API.G_FALSE

14: -- IN : p_api_version IN NUMBER Required
15: -- p_init_msg_list IN VARCHAR2 Optional
16: -- Default = FND_API.G_FALSE
17: -- p_commit IN VARCHAR2 Optional
18: -- Default = FND_API.G_FALSE
19: -- p_validation_level IN NUMBER Optional
20: -- Default = FND_API.G_VALID_LEVEL_FULL
21: -- p_rcv_transaction_id IN NUMBER Optional
22: -- p_direct_delivery_flag IN VARCHAR2 Required

Line 20: -- Default = FND_API.G_VALID_LEVEL_FULL

16: -- Default = FND_API.G_FALSE
17: -- p_commit IN VARCHAR2 Optional
18: -- Default = FND_API.G_FALSE
19: -- p_validation_level IN NUMBER Optional
20: -- Default = FND_API.G_VALID_LEVEL_FULL
21: -- p_rcv_transaction_id IN NUMBER Optional
22: -- p_direct_delivery_flag IN VARCHAR2 Required
23: --
24: -- OUT : x_return_status OUT VARCHAR2(1)

Line 51: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

47: ) IS
48: l_api_name CONSTANT VARCHAR2(30) := 'Create_ReceivingEvent';
49: l_api_version CONSTANT NUMBER := 1.0;
50:
51: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
52: l_msg_count NUMBER := 0;
53: l_msg_data VARCHAR2(8000) := '';
54: l_stmt_num NUMBER := 0;
55: l_api_message VARCHAR2(1000);

Line 93: IF NOT FND_API.Compatible_API_Call (

89: ,'Create_ReceivingEvents <<');
90: END IF;
91:
92: -- Standard call to check for call compatibility
93: IF NOT FND_API.Compatible_API_Call (
94: l_api_version,
95: p_api_version,
96: l_api_name,
97: G_PKG_NAME ) THEN

Line 98: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

94: l_api_version,
95: p_api_version,
96: l_api_name,
97: G_PKG_NAME ) THEN
98: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
99: END IF;
100:
101: -- Initialize message list if p_init_msg_list is set to TRUE
102: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 102: IF FND_API.to_Boolean(p_init_msg_list) THEN

98: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
99: END IF;
100:
101: -- Initialize message list if p_init_msg_list is set to TRUE
102: IF FND_API.to_Boolean(p_init_msg_list) THEN
103: FND_MSG_PUB.initialize;
104: END IF;
105:
106: -- Initialize API return status to success

Line 107: x_return_status := FND_API.G_RET_STS_SUCCESS;

103: FND_MSG_PUB.initialize;
104: END IF;
105:
106: -- Initialize API return status to success
107: x_return_status := FND_API.G_RET_STS_SUCCESS;
108:
109: l_stmt_num := 20;
110: -- Check if accrual is disabled.
111: l_return_code := CSTRVHKS.disable_accrual(l_err_num,

Line 118: RAISE FND_API.g_exc_unexpected_error;

114: IF(l_return_code = -999) THEN
115: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
116: FND_LOG.message(FND_LOG.LEVEL_ERROR,G_LOG_HEAD || '.'||l_api_name||l_stmt_num,FALSE);
117: END IF;
118: RAISE FND_API.g_exc_unexpected_error;
119: ELSIF (l_return_code = 1) THEN
120: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
121: FND_LOG.string(FND_LOG.LEVEL_STATEMENT,G_LOG_HEAD||'.'||l_api_name||'.'||l_stmt_num
122: ,'Accrual has been disabled.');

Line 275: IF l_return_status <> FND_API.g_ret_sts_success THEN

271: p_rcv_transaction_id => p_rcv_transaction_id,
272: p_direct_delivery_flag => p_direct_delivery_flag );
273: END IF;
274:
275: IF l_return_status <> FND_API.g_ret_sts_success THEN
276: l_api_message := 'Error creating event';
277: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
278: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
279: ,'Create_ReceivingEvents : '||l_stmt_num||' : '||l_api_message);

Line 281: RAISE FND_API.g_exc_unexpected_error;

277: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
278: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
279: ,'Create_ReceivingEvents : '||l_stmt_num||' : '||l_api_message);
280: END IF;
281: RAISE FND_API.g_exc_unexpected_error;
282: END IF;
283:
284:
285: l_stmt_num := 120;

Line 287: IF FND_API.to_Boolean(p_commit) THEN

283:
284:
285: l_stmt_num := 120;
286: --- Standard check of p_commit
287: IF FND_API.to_Boolean(p_commit) THEN
288: COMMIT WORK;
289: END IF;
290:
291: -- Standard Call to get message count and if count = 1, get message info

Line 302: WHEN FND_API.g_exc_error THEN

298: ,'Create_ReceivingEvents>>');
299: END IF;
300:
301: EXCEPTION
302: WHEN FND_API.g_exc_error THEN
303: ROLLBACK TO Create_ReceivingEvents_PVT;
304: x_return_status := FND_API.g_ret_sts_error;
305: FND_MSG_PUB.count_and_get
306: ( p_count => x_msg_count

Line 304: x_return_status := FND_API.g_ret_sts_error;

300:
301: EXCEPTION
302: WHEN FND_API.g_exc_error THEN
303: ROLLBACK TO Create_ReceivingEvents_PVT;
304: x_return_status := FND_API.g_ret_sts_error;
305: FND_MSG_PUB.count_and_get
306: ( p_count => x_msg_count
307: , p_data => x_msg_data
308: );

Line 309: WHEN FND_API.g_exc_unexpected_error THEN

305: FND_MSG_PUB.count_and_get
306: ( p_count => x_msg_count
307: , p_data => x_msg_data
308: );
309: WHEN FND_API.g_exc_unexpected_error THEN
310: ROLLBACK TO Create_ReceivingEvents_PVT;
311: x_return_status := FND_API.g_ret_sts_unexp_error ;
312: FND_MSG_PUB.count_and_get
313: ( p_count => x_msg_count

Line 311: x_return_status := FND_API.g_ret_sts_unexp_error ;

307: , p_data => x_msg_data
308: );
309: WHEN FND_API.g_exc_unexpected_error THEN
310: ROLLBACK TO Create_ReceivingEvents_PVT;
311: x_return_status := FND_API.g_ret_sts_unexp_error ;
312: FND_MSG_PUB.count_and_get
313: ( p_count => x_msg_count
314: , p_data => x_msg_data
315: );

Line 319: x_return_status := fnd_api.g_ret_sts_unexp_error ;

315: );
316:
317: WHEN OTHERS THEN
318: ROLLBACK TO Create_ReceivingEvents_PVT;
319: x_return_status := fnd_api.g_ret_sts_unexp_error ;
320:
321: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
322: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
323: ,'Create_ReceivingEvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 349: -- Default = FND_API.G_FALSE

345: -- Pre-reqs :
346: -- Parameters :
347: -- IN : p_api_version IN NUMBER Required
348: -- p_init_msg_list IN VARCHAR2 Optional
349: -- Default = FND_API.G_FALSE
350: -- p_commit IN VARCHAR2 Optional
351: -- Default = FND_API.G_FALSE
352: -- p_validation_level IN NUMBER Optional
353: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 351: -- Default = FND_API.G_FALSE

347: -- IN : p_api_version IN NUMBER Required
348: -- p_init_msg_list IN VARCHAR2 Optional
349: -- Default = FND_API.G_FALSE
350: -- p_commit IN VARCHAR2 Optional
351: -- Default = FND_API.G_FALSE
352: -- p_validation_level IN NUMBER Optional
353: -- Default = FND_API.G_VALID_LEVEL_FULL
354: -- p_po_header_id IN NUMBER Required
355: -- p_po_release_id IN NUMBER Optional

Line 353: -- Default = FND_API.G_VALID_LEVEL_FULL

349: -- Default = FND_API.G_FALSE
350: -- p_commit IN VARCHAR2 Optional
351: -- Default = FND_API.G_FALSE
352: -- p_validation_level IN NUMBER Optional
353: -- Default = FND_API.G_VALID_LEVEL_FULL
354: -- p_po_header_id IN NUMBER Required
355: -- p_po_release_id IN NUMBER Optional
356: -- p_po_line_id IN NUMBER Optional
357: -- p_po_line_location_id IN NUMBER Required

Line 393: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

389: ) IS
390: l_api_name CONSTANT VARCHAR2(30) := 'Create_AdjustEvents';
391: l_api_version CONSTANT NUMBER := 1.0;
392:
393: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
394: l_msg_count NUMBER := 0;
395: l_msg_data VARCHAR2(8000) := '';
396: l_stmt_num NUMBER := 0;
397: l_api_message VARCHAR2(1000);

Line 471: IF NOT FND_API.Compatible_API_Call (

467: ,'Create_AdjustEvent <<');
468: END IF;
469:
470: -- Standard call to check for call compatibility
471: IF NOT FND_API.Compatible_API_Call (
472: l_api_version,
473: p_api_version,
474: l_api_name,
475: G_PKG_NAME ) THEN

Line 476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

472: l_api_version,
473: p_api_version,
474: l_api_name,
475: G_PKG_NAME ) THEN
476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
478:
479: -- Initialize message list if p_init_msg_list is set to TRUE
480: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 480: IF FND_API.to_Boolean(p_init_msg_list) THEN

476: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
477: END IF;
478:
479: -- Initialize message list if p_init_msg_list is set to TRUE
480: IF FND_API.to_Boolean(p_init_msg_list) THEN
481: FND_MSG_PUB.initialize;
482:
483: END IF;
484: -- Initialize API return status to success

Line 485: x_return_status := FND_API.G_RET_STS_SUCCESS;

481: FND_MSG_PUB.initialize;
482:
483: END IF;
484: -- Initialize API return status to success
485: x_return_status := FND_API.G_RET_STS_SUCCESS;
486:
487: -- If the old and new price are the same, return
488: IF p_old_po_price = p_new_po_price THEN
489: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 631: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

627: -- Suppose there is no net quantity for this receipt (all received quantity has been
628: -- returned), there is no need to seed an event, since there is no accrual to adjust.
629: -- If transaction quantity is 0, the Seed_RAEEvent API will return a warning. In the
630: -- case of Adjust events, this warning is normal and should be ignored.
631: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
632: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
633: ELSIF (l_return_status <> 'W') THEN
634: l_api_message := 'Error seeding event';
635: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 639: RAISE FND_API.g_exc_unexpected_error;

635: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
636: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
637: ,'Create_AdjustEvents : '||l_stmt_num||' : '||l_api_message);
638: END IF;
639: RAISE FND_API.g_exc_unexpected_error;
640: END IF;
641:
642: ELSE
643:

Line 679: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

675: -- Suppose there is no net quantity for this receipt (all received quantity has been
676: -- returned), there is no need to seed an event, since there is no accrual to adjust.
677: -- If transaction quantity is 0, the Seed_RAEEvent API will return a warning. In the
678: -- case of Adjust events, this warning is normal and should be ignored.
679: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
680: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
681: ELSIF (l_return_status <> 'W') THEN
682: l_api_message := 'Error seeding event';
683: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 687: RAISE FND_API.g_exc_unexpected_error;

683: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
684: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
685: ,'Create_AdjustEvents : '||l_stmt_num||' : '||l_api_message);
686: END IF;
687: RAISE FND_API.g_exc_unexpected_error;
688: END IF;
689: END LOOP;
690:
691: END IF;

Line 731: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN

727: -- Suppose there is no net quantity for this deliver (all delivered quantity has been
728: -- returned), there is no need to seed an event, since there is no accrual to adjust.
729: -- If transaction quantity is 0, the Seed_RAEEvent API will return a warning. In the
730: -- case of Adjust events, this warning is normal and should be ignored.
731: IF (l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
732: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
733: ELSIF (l_return_status <> 'W') THEN
734: l_api_message := 'Error seeding event';
735: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 739: RAISE FND_API.g_exc_unexpected_error;

735: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
736: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
737: ,'Create_AdjustEvents : '||l_stmt_num||' : '||l_api_message);
738: END IF;
739: RAISE FND_API.g_exc_unexpected_error;
740: END IF;
741:
742: END LOOP; -- C_DEL_TXN
743:

Line 761: IF l_return_status <> FND_API.g_ret_sts_success THEN

757: p_rcv_events_tbl => l_rcv_events_tbl,
758: /* Support for Landed Cost Management */
759: p_lcm_flag => 'N');
760:
761: IF l_return_status <> FND_API.g_ret_sts_success THEN
762: l_api_message := 'Error inserting events into RAE';
763: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
764: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
765: ,'Create_AdjustEvents : '||l_stmt_num||' : '||l_api_message);

Line 767: RAISE FND_API.g_exc_unexpected_error;

763: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
764: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
765: ,'Create_AdjustEvents : '||l_stmt_num||' : '||l_api_message);
766: END IF;
767: RAISE FND_API.g_exc_unexpected_error;
768: END IF;
769: END IF;
770:
771:

Line 773: IF FND_API.to_Boolean(p_commit) THEN

769: END IF;
770:
771:
772: --- Standard check of p_commit
773: IF FND_API.to_Boolean(p_commit) THEN
774: COMMIT WORK;
775: END IF;
776:
777: -- Standard Call to get message count and if count = 1, get message info

Line 788: WHEN FND_API.g_exc_error THEN

784: ,'Create_AdjustEvents >>');
785: END IF;
786:
787: EXCEPTION
788: WHEN FND_API.g_exc_error THEN
789: ROLLBACK TO Create_AdjustEvents_PVT;
790: x_return_status := FND_API.g_ret_sts_error;
791: FND_MSG_PUB.count_and_get
792: ( p_count => x_msg_count

Line 790: x_return_status := FND_API.g_ret_sts_error;

786:
787: EXCEPTION
788: WHEN FND_API.g_exc_error THEN
789: ROLLBACK TO Create_AdjustEvents_PVT;
790: x_return_status := FND_API.g_ret_sts_error;
791: FND_MSG_PUB.count_and_get
792: ( p_count => x_msg_count
793: , p_data => x_msg_data
794: );

Line 795: WHEN FND_API.g_exc_unexpected_error THEN

791: FND_MSG_PUB.count_and_get
792: ( p_count => x_msg_count
793: , p_data => x_msg_data
794: );
795: WHEN FND_API.g_exc_unexpected_error THEN
796: ROLLBACK TO Create_AdjustEvents_PVT;
797: x_return_status := FND_API.g_ret_sts_unexp_error ;
798: FND_MSG_PUB.count_and_get
799: ( p_count => x_msg_count

Line 797: x_return_status := FND_API.g_ret_sts_unexp_error ;

793: , p_data => x_msg_data
794: );
795: WHEN FND_API.g_exc_unexpected_error THEN
796: ROLLBACK TO Create_AdjustEvents_PVT;
797: x_return_status := FND_API.g_ret_sts_unexp_error ;
798: FND_MSG_PUB.count_and_get
799: ( p_count => x_msg_count
800: , p_data => x_msg_data
801: );

Line 805: x_return_status := fnd_api.g_ret_sts_unexp_error ;

801: );
802:
803: WHEN OTHERS THEN
804: ROLLBACK TO Create_AdjustEvents_PVT;
805: x_return_status := fnd_api.g_ret_sts_unexp_error ;
806:
807: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
808: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
809: ,'Create_AdjustEvent : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 834: -- Default = FND_API.G_FALSE

830: -- Pre-reqs :
831: -- Parameters :
832: -- IN : p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Optional
834: -- Default = FND_API.G_FALSE
835: -- p_commit IN VARCHAR2 Optional
836: -- Default = FND_API.G_FALSE
837: -- p_validation_level IN NUMBER Optional
838: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 836: -- Default = FND_API.G_FALSE

832: -- IN : p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Optional
834: -- Default = FND_API.G_FALSE
835: -- p_commit IN VARCHAR2 Optional
836: -- Default = FND_API.G_FALSE
837: -- p_validation_level IN NUMBER Optional
838: -- Default = FND_API.G_VALID_LEVEL_FULL
839: -- p_invoice_distribution_id IN NUMBER Required
840: --

Line 838: -- Default = FND_API.G_VALID_LEVEL_FULL

834: -- Default = FND_API.G_FALSE
835: -- p_commit IN VARCHAR2 Optional
836: -- Default = FND_API.G_FALSE
837: -- p_validation_level IN NUMBER Optional
838: -- Default = FND_API.G_VALID_LEVEL_FULL
839: -- p_invoice_distribution_id IN NUMBER Required
840: --
841: -- OUT : x_return_status OUT VARCHAR2(1)
842: -- x_msg_count OUT NUMBER

Line 866: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

862: )IS
863: l_api_name CONSTANT VARCHAR2(30) := 'Create_ICEvents';
864: l_api_version CONSTANT NUMBER := 1.0;
865:
866: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
867: l_msg_count NUMBER := 0;
868: l_msg_data VARCHAR2(8000) := '';
869: l_stmt_num NUMBER := 0;
870: l_api_message VARCHAR2(1000);

Line 919: IF NOT FND_API.Compatible_API_Call (

915: ,'Create_ICEvents <<');
916: END IF;
917:
918: -- Standard call to check for call compatibility
919: IF NOT FND_API.Compatible_API_Call (
920: l_api_version,
921: p_api_version,
922: l_api_name,
923: G_PKG_NAME ) THEN

Line 924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

920: l_api_version,
921: p_api_version,
922: l_api_name,
923: G_PKG_NAME ) THEN
924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
927: -- Initialize message list if p_init_msg_list is set to TRUE
928: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 928: IF FND_API.to_Boolean(p_init_msg_list) THEN

924: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
925: END IF;
926:
927: -- Initialize message list if p_init_msg_list is set to TRUE
928: IF FND_API.to_Boolean(p_init_msg_list) THEN
929: FND_MSG_PUB.initialize;
930: END IF;
931:
932: -- Initialize API return status to success

Line 933: x_return_status := FND_API.G_RET_STS_SUCCESS;

929: FND_MSG_PUB.initialize;
930: END IF;
931:
932: -- Initialize API return status to success
933: x_return_status := FND_API.G_RET_STS_SUCCESS;
934:
935: -- Stubbing out the code since AP will no longer be calling our API for period-end
936: -- accruals. This is due to changes to the design for global procurement using
937: -- period end accruals. Due to various constraints, it was decided that we will not

Line 952: WHEN FND_API.g_exc_error THEN

948: ,'Create_ICEvents >>');
949: END IF;
950:
951: EXCEPTION
952: WHEN FND_API.g_exc_error THEN
953: ROLLBACK TO Create_ICEvents_PVT;
954: x_return_status := FND_API.g_ret_sts_error;
955: FND_MSG_PUB.count_and_get
956: ( p_count => x_msg_count

Line 954: x_return_status := FND_API.g_ret_sts_error;

950:
951: EXCEPTION
952: WHEN FND_API.g_exc_error THEN
953: ROLLBACK TO Create_ICEvents_PVT;
954: x_return_status := FND_API.g_ret_sts_error;
955: FND_MSG_PUB.count_and_get
956: ( p_count => x_msg_count
957: , p_data => x_msg_data
958: );

Line 959: WHEN FND_API.g_exc_unexpected_error THEN

955: FND_MSG_PUB.count_and_get
956: ( p_count => x_msg_count
957: , p_data => x_msg_data
958: );
959: WHEN FND_API.g_exc_unexpected_error THEN
960: ROLLBACK TO Create_ICEvents_PVT;
961: x_return_status := FND_API.g_ret_sts_unexp_error ;
962: FND_MSG_PUB.count_and_get
963: ( p_count => x_msg_count

Line 961: x_return_status := FND_API.g_ret_sts_unexp_error ;

957: , p_data => x_msg_data
958: );
959: WHEN FND_API.g_exc_unexpected_error THEN
960: ROLLBACK TO Create_ICEvents_PVT;
961: x_return_status := FND_API.g_ret_sts_unexp_error ;
962: FND_MSG_PUB.count_and_get
963: ( p_count => x_msg_count
964: , p_data => x_msg_data
965: );

Line 969: x_return_status := fnd_api.g_ret_sts_unexp_error ;

965: );
966:
967: WHEN OTHERS THEN
968: ROLLBACK TO Create_ICEvents_PVT;
969: x_return_status := fnd_api.g_ret_sts_unexp_error ;
970:
971: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
972: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
973: ,'Create_ICEvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 998: -- Default = FND_API.G_FALSE

994: -- Pre-reqs :
995: -- Parameters :
996: -- IN : p_api_version IN NUMBER Required
997: -- p_init_msg_list IN VARCHAR2 Optional
998: -- Default = FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Optional
1000: -- Default = FND_API.G_FALSE
1001: -- p_validation_level IN NUMBER Optional
1002: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 1000: -- Default = FND_API.G_FALSE

996: -- IN : p_api_version IN NUMBER Required
997: -- p_init_msg_list IN VARCHAR2 Optional
998: -- Default = FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Optional
1000: -- Default = FND_API.G_FALSE
1001: -- p_validation_level IN NUMBER Optional
1002: -- Default = FND_API.G_VALID_LEVEL_FULL
1003: -- p_rcv_transaction_id IN NUMBER Required
1004: -- p_direct_delivery_flag IN VARCHAR2 Optional

Line 1002: -- Default = FND_API.G_VALID_LEVEL_FULL

998: -- Default = FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Optional
1000: -- Default = FND_API.G_FALSE
1001: -- p_validation_level IN NUMBER Optional
1002: -- Default = FND_API.G_VALID_LEVEL_FULL
1003: -- p_rcv_transaction_id IN NUMBER Required
1004: -- p_direct_delivery_flag IN VARCHAR2 Optional
1005: --
1006: -- OUT : x_return_status OUT VARCHAR2(1)

Line 1032: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1028: ) IS
1029: l_api_name CONSTANT VARCHAR2(30) := 'Create_ReceiveEvents';
1030: l_api_version CONSTANT NUMBER := 1.0;
1031:
1032: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1033: l_msg_count NUMBER := 0;
1034: l_msg_data VARCHAR2(8000) := '';
1035: l_stmt_num NUMBER := 0;
1036: l_api_message VARCHAR2(1000);

Line 1099: IF NOT FND_API.Compatible_API_Call (

1095: ,'Create_ReceiveEvents <<');
1096: END IF;
1097:
1098: -- Standard call to check for call compatibility
1099: IF NOT FND_API.Compatible_API_Call (
1100: l_api_version,
1101: p_api_version,
1102: l_api_name,
1103: G_PKG_NAME ) THEN

Line 1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1100: l_api_version,
1101: p_api_version,
1102: l_api_name,
1103: G_PKG_NAME ) THEN
1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1105: END IF;
1106:
1107: -- Initialize message list if p_init_msg_list is set to TRUE
1108: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 1108: IF FND_API.to_Boolean(p_init_msg_list) THEN

1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1105: END IF;
1106:
1107: -- Initialize message list if p_init_msg_list is set to TRUE
1108: IF FND_API.to_Boolean(p_init_msg_list) THEN
1109: FND_MSG_PUB.initialize;
1110: END IF;
1111:
1112: -- Initialize API return status to success

Line 1113: x_return_status := FND_API.G_RET_STS_SUCCESS;

1109: FND_MSG_PUB.initialize;
1110: END IF;
1111:
1112: -- Initialize API return status to success
1113: x_return_status := FND_API.G_RET_STS_SUCCESS;
1114:
1115: l_stmt_num := 20;
1116: SELECT
1117: RT.po_header_id,

Line 1227: IF (l_return_status = FND_API.g_ret_sts_success) THEN

1223: p_qualifier_value_tbl => l_qualifier_value_tbl,
1224: p_transaction_date => l_rcv_trx_date,
1225: p_get_default_cost_group=> 'N');
1226:
1227: IF (l_return_status = FND_API.g_ret_sts_success) THEN
1228: l_trx_flow_exists_flag := 1;
1229: l_trx_flow_header_id := l_transaction_flows_tbl(l_transaction_flows_tbl.FIRST).header_id;
1230: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1231: FND_LOG.string(FND_LOG.LEVEL_EVENT,G_LOG_HEAD||'.'||l_api_name||'.'||l_stmt_num

Line 1251: RAISE FND_API.g_exc_unexpected_error;

1247: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1248: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1249: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1250: END IF;
1251: RAISE FND_API.g_exc_unexpected_error;
1252: END IF;
1253:
1254: ELSE
1255: l_api_message := 'Error occurred in Transaction Flow API';

Line 1260: RAISE FND_API.g_exc_unexpected_error;

1256: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1257: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1258: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1259: END IF;
1260: RAISE FND_API.g_exc_unexpected_error;
1261: END IF; -- IF l_return_status
1262: END IF; -- IF l_po_org_id
1263:
1264:

Line 1303: p_init_msg_list =>FND_API.G_FALSE,

1299:
1300: PO_SHARED_PROC_GRP.check_shared_proc_scenario
1301: (
1302: p_api_version =>1.0,
1303: p_init_msg_list =>FND_API.G_FALSE,
1304: x_return_status =>l_return_status,
1305: p_destination_type_code =>rec_pod.destination_type_code,
1306: p_document_type_code =>l_po_document_type_code,
1307: p_project_id =>rec_pod.project_id,

Line 1314: IF l_return_status <> FND_API.g_ret_sts_success THEN

1310: p_transaction_flow_header_id =>l_trx_flow_header_id,
1311: x_is_shared_proc_scenario =>l_is_shared_proc
1312: );
1313:
1314: IF l_return_status <> FND_API.g_ret_sts_success THEN
1315: l_api_message := 'Error in API PO_SHARED_PROC_GRP.check_shared_proc_scenario';
1316: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >=
1317: FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1318: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num

Line 1321: RAISE FND_API.g_exc_unexpected_error;

1317: FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1318: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1319: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1320: END IF;
1321: RAISE FND_API.g_exc_unexpected_error;
1322: END IF;
1323:
1324: IF l_is_shared_proc IS NULL OR l_is_shared_proc = 'N' THEN
1325: l_is_shared_proc := 'N';

Line 1407: IF l_return_status <> FND_API.g_ret_sts_success THEN

1403: /* Support for Landed Cost Management */
1404: p_lcm_flag => l_lcm_flag,
1405: x_rcv_event => l_rcv_event);
1406:
1407: IF l_return_status <> FND_API.g_ret_sts_success THEN
1408: l_api_message := 'Error creating event';
1409: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1410: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1411: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1413: RAISE FND_API.g_exc_unexpected_error;

1409: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1410: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1411: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1412: END IF;
1413: RAISE FND_API.g_exc_unexpected_error;
1414: END IF;
1415:
1416: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
1417:

Line 1456: IF l_return_status <> FND_API.g_ret_sts_success THEN

1452: /* Support for Landed Cost Management */
1453: p_lcm_flag => l_lcm_flag,
1454: x_rcv_event => l_rcv_event);
1455:
1456: IF l_return_status <> FND_API.g_ret_sts_success THEN
1457: l_api_message := 'Error creating event';
1458: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1459: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1460: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1462: RAISE FND_API.g_exc_unexpected_error;

1458: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1459: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1460: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1461: END IF;
1462: RAISE FND_API.g_exc_unexpected_error;
1463: END IF;
1464:
1465: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
1466: END IF;

Line 1527: IF l_return_status <> FND_API.g_ret_sts_success THEN

1523: p_prior_unit_price => NULL,
1524: /* Support for Landed Cost Management */
1525: p_lcm_flag => l_lcm_flag,
1526: x_rcv_event => l_rcv_event);
1527: IF l_return_status <> FND_API.g_ret_sts_success THEN
1528: l_api_message := 'Error creating event';
1529: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1530: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1531: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1533: RAISE FND_API.g_exc_unexpected_error;

1529: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1530: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1531: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1532: END IF;
1533: RAISE FND_API.g_exc_unexpected_error;
1534: END IF;
1535:
1536: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
1537:

Line 1580: IF l_return_status <> FND_API.g_ret_sts_success THEN

1576: p_prior_unit_price => NULL,
1577: /* Support for Landed Cost Management */
1578: p_lcm_flag => l_lcm_flag,
1579: x_rcv_event => l_rcv_event);
1580: IF l_return_status <> FND_API.g_ret_sts_success THEN
1581: l_api_message := 'Error creating event';
1582: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1583: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1584: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1586: RAISE FND_API.g_exc_unexpected_error;

1582: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1583: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1584: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1585: END IF;
1586: RAISE FND_API.g_exc_unexpected_error;
1587: END IF;
1588:
1589: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
1590:

Line 1607: IF l_return_status <> FND_API.g_ret_sts_success THEN

1603: x_msg_data => l_msg_data,
1604: p_rcv_events_tbl => l_rcv_events_tbl,
1605: /* Support for Landed Cost Management */
1606: p_lcm_flag => l_lcm_flag);
1607: IF l_return_status <> FND_API.g_ret_sts_success THEN
1608: l_api_message := 'Error inserting events into RAE';
1609: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1610: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1611: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1613: RAISE FND_API.g_exc_unexpected_error;

1609: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1610: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1611: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1612: END IF;
1613: RAISE FND_API.g_exc_unexpected_error;
1614: END IF;
1615:
1616: IF(l_trx_flow_exists_flag = 1 AND l_item_id IS NOT NULL) THEN
1617: l_stmt_num := 160;

Line 1628: IF l_return_status <> FND_API.g_ret_sts_success THEN

1624: x_return_status => l_return_status,
1625: x_msg_count => l_msg_count,
1626: x_msg_data => l_msg_data,
1627: p_rcv_events_tbl => l_rcv_events_tbl);
1628: IF l_return_status <> FND_API.g_ret_sts_success THEN
1629: l_api_message := 'Error inserting events into MMT';
1630: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1631: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1632: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1634: RAISE FND_API.g_exc_unexpected_error;

1630: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1631: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1632: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1633: END IF;
1634: RAISE FND_API.g_exc_unexpected_error;
1635: END IF;
1636: END IF;
1637:
1638:

Line 1640: IF FND_API.to_Boolean(p_commit) THEN

1636: END IF;
1637:
1638:
1639: --- Standard check of p_commit
1640: IF FND_API.to_Boolean(p_commit) THEN
1641: COMMIT WORK;
1642: END IF;
1643:
1644: -- Standard Call to get message count and if count = 1, get message info

Line 1655: WHEN FND_API.g_exc_error THEN

1651: ,'Create_ReceiveEvents >>');
1652: END IF;
1653:
1654: EXCEPTION
1655: WHEN FND_API.g_exc_error THEN
1656: ROLLBACK TO Create_ReceiveEvents_PVT;
1657: x_return_status := FND_API.g_ret_sts_error;
1658: FND_MSG_PUB.count_and_get
1659: ( p_count => x_msg_count

Line 1657: x_return_status := FND_API.g_ret_sts_error;

1653:
1654: EXCEPTION
1655: WHEN FND_API.g_exc_error THEN
1656: ROLLBACK TO Create_ReceiveEvents_PVT;
1657: x_return_status := FND_API.g_ret_sts_error;
1658: FND_MSG_PUB.count_and_get
1659: ( p_count => x_msg_count
1660: , p_data => x_msg_data
1661: );

Line 1662: WHEN FND_API.g_exc_unexpected_error THEN

1658: FND_MSG_PUB.count_and_get
1659: ( p_count => x_msg_count
1660: , p_data => x_msg_data
1661: );
1662: WHEN FND_API.g_exc_unexpected_error THEN
1663: ROLLBACK TO Create_ReceiveEvents_PVT;
1664: x_return_status := FND_API.g_ret_sts_unexp_error ;
1665: FND_MSG_PUB.count_and_get
1666: ( p_count => x_msg_count

Line 1664: x_return_status := FND_API.g_ret_sts_unexp_error ;

1660: , p_data => x_msg_data
1661: );
1662: WHEN FND_API.g_exc_unexpected_error THEN
1663: ROLLBACK TO Create_ReceiveEvents_PVT;
1664: x_return_status := FND_API.g_ret_sts_unexp_error ;
1665: FND_MSG_PUB.count_and_get
1666: ( p_count => x_msg_count
1667: , p_data => x_msg_data
1668: );

Line 1672: x_return_status := fnd_api.g_ret_sts_unexp_error ;

1668: );
1669:
1670: WHEN OTHERS THEN
1671: ROLLBACK TO Create_ReceiveEvents_PVT;
1672: x_return_status := fnd_api.g_ret_sts_unexp_error ;
1673:
1674: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1675: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1676: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 1702: -- Default = FND_API.G_FALSE

1698: -- Pre-reqs :
1699: -- Parameters :
1700: -- IN : p_api_version IN NUMBER Required
1701: -- p_init_msg_list IN VARCHAR2 Optional
1702: -- Default = FND_API.G_FALSE
1703: -- p_commit IN VARCHAR2 Optional
1704: -- Default = FND_API.G_FALSE
1705: -- p_validation_level IN NUMBER Optional
1706: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 1704: -- Default = FND_API.G_FALSE

1700: -- IN : p_api_version IN NUMBER Required
1701: -- p_init_msg_list IN VARCHAR2 Optional
1702: -- Default = FND_API.G_FALSE
1703: -- p_commit IN VARCHAR2 Optional
1704: -- Default = FND_API.G_FALSE
1705: -- p_validation_level IN NUMBER Optional
1706: -- Default = FND_API.G_VALID_LEVEL_FULL
1707: -- p_rcv_transaction_id IN NUMBER Required
1708: -- p_direct_delivery_flag IN VARCHAR2 Optional

Line 1706: -- Default = FND_API.G_VALID_LEVEL_FULL

1702: -- Default = FND_API.G_FALSE
1703: -- p_commit IN VARCHAR2 Optional
1704: -- Default = FND_API.G_FALSE
1705: -- p_validation_level IN NUMBER Optional
1706: -- Default = FND_API.G_VALID_LEVEL_FULL
1707: -- p_rcv_transaction_id IN NUMBER Required
1708: -- p_direct_delivery_flag IN VARCHAR2 Optional
1709: --
1710: -- OUT : x_return_status OUT VARCHAR2(1)

Line 1737: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1733: ) IS
1734: l_api_name CONSTANT VARCHAR2(30) := 'Create_DeliverEvents';
1735: l_api_version CONSTANT NUMBER := 1.0;
1736:
1737: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1738: l_msg_count NUMBER := 0;
1739: l_msg_data VARCHAR2(8000) := '';
1740: l_stmt_num NUMBER := 0;
1741: l_api_message VARCHAR2(1000);

Line 1791: IF NOT FND_API.Compatible_API_Call (

1787: ,'Create_DeliverEvents <<');
1788: END IF;
1789:
1790: -- Standard call to check for call compatibility
1791: IF NOT FND_API.Compatible_API_Call (
1792: l_api_version,
1793: p_api_version,
1794: l_api_name,
1795: G_PKG_NAME ) THEN

Line 1796: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1792: l_api_version,
1793: p_api_version,
1794: l_api_name,
1795: G_PKG_NAME ) THEN
1796: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1798:
1799: -- Initialize message list if p_init_msg_list is set to TRUE
1800: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 1800: IF FND_API.to_Boolean(p_init_msg_list) THEN

1796: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1797: END IF;
1798:
1799: -- Initialize message list if p_init_msg_list is set to TRUE
1800: IF FND_API.to_Boolean(p_init_msg_list) THEN
1801: FND_MSG_PUB.initialize;
1802: END IF;
1803:
1804: -- Initialize API return status to success

Line 1805: x_return_status := FND_API.G_RET_STS_SUCCESS;

1801: FND_MSG_PUB.initialize;
1802: END IF;
1803:
1804: -- Initialize API return status to success
1805: x_return_status := FND_API.G_RET_STS_SUCCESS;
1806:
1807: -- Unlike for Receive transactions, for Deliver transactions, the po_distribution_id
1808: -- is always available.
1809: l_stmt_num := 20;

Line 1926: IF (l_return_status = FND_API.g_ret_sts_success) THEN

1922: p_qualifier_code_tbl => l_qualifier_code_tbl,
1923: p_qualifier_value_tbl => l_qualifier_value_tbl,
1924: p_transaction_date => l_rcv_trx_date,
1925: p_get_default_cost_group=> 'N');
1926: IF (l_return_status = FND_API.g_ret_sts_success) THEN
1927: l_procurement_org_flag := 'N';
1928: l_trx_flow_exists_flag := 1;
1929: l_trx_flow_header_id := l_transaction_flows_tbl(l_transaction_flows_tbl.FIRST).header_id;
1930: l_trx_flow_ctr := l_transaction_flows_tbl.COUNT;

Line 1954: p_init_msg_list =>FND_API.G_FALSE,

1950:
1951: PO_SHARED_PROC_GRP.check_shared_proc_scenario
1952: (
1953: p_api_version =>1.0,
1954: p_init_msg_list =>FND_API.G_FALSE,
1955: x_return_status =>l_return_status,
1956: p_destination_type_code =>l_destination_type,
1957: p_document_type_code =>l_po_document_type_code,
1958: p_project_id =>l_project_id,

Line 1965: IF l_return_status <> FND_API.g_ret_sts_success THEN

1961: p_transaction_flow_header_id =>l_trx_flow_header_id,
1962: x_is_shared_proc_scenario =>l_is_shared_proc
1963: );
1964:
1965: IF l_return_status <> FND_API.g_ret_sts_success THEN
1966: l_api_message := 'Error in API PO_SHARED_PROC_GRP.check_shared_proc_scenario';
1967: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1968: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1969: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 1971: RAISE FND_API.g_exc_unexpected_error;

1967: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1968: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
1969: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
1970: END IF;
1971: RAISE FND_API.g_exc_unexpected_error;
1972: END IF;
1973:
1974: IF l_is_shared_proc IS NULL OR l_is_shared_proc = 'N' THEN
1975: l_is_shared_proc := 'N';

Line 2016: RAISE FND_API.g_exc_unexpected_error;

2012: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2013: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2014: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2015: END IF;
2016: RAISE FND_API.g_exc_unexpected_error;
2017: END IF;
2018:
2019: ELSE
2020: l_api_message := 'Error occurred in Transaction Flow API';

Line 2025: RAISE FND_API.g_exc_unexpected_error;

2021: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2022: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2023: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2024: END IF;
2025: RAISE FND_API.g_exc_unexpected_error;
2026: END IF;
2027: END IF;
2028:
2029: l_stmt_num := 50;

Line 2070: IF l_return_status <> FND_API.g_ret_sts_success THEN

2066: /* Support for Landed Cost Management */
2067: p_lcm_flag => l_lcm_flag,
2068: x_rcv_event => l_rcv_event);
2069:
2070: IF l_return_status <> FND_API.g_ret_sts_success THEN
2071: l_api_message := 'Error creating event';
2072: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2073: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2074: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);

Line 2076: RAISE FND_API.g_exc_unexpected_error;

2072: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2073: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2074: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2075: END IF;
2076: RAISE FND_API.g_exc_unexpected_error;
2077: END IF;
2078: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
2079:
2080: -- Encumbrance cannot be enabled for global procurement scenarios.

Line 2095: IF l_return_status <> FND_API.g_ret_sts_success THEN

2091: x_msg_data => l_msg_data,
2092: p_rcv_sob_id => l_rcv_sob_id,
2093: x_encumbrance_flag => l_encumbrance_flag,
2094: x_ussgl_option => l_ussgl_option);
2095: IF l_return_status <> FND_API.g_ret_sts_success THEN
2096: l_api_message := 'Error in checking for encumbrance flag ';
2097: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2098: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2099: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);

Line 2101: RAISE FND_API.g_exc_unexpected_error;

2097: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2098: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2099: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2100: END IF;
2101: RAISE FND_API.g_exc_unexpected_error;
2102: END IF;
2103:
2104: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2105: l_api_message := 'Encumbrance Flag : '||l_encumbrance_flag;

Line 2149: IF l_return_status = FND_API.g_ret_sts_success THEN

2145:
2146: /* Bug #3333610. In the case of encumbrance reversals, the quantity to unencumber
2147: may turn out to be zero if the quantity delivered is greater than the quantity
2148: ordered. In such a situation, we should not error out the event. */
2149: IF l_return_status = FND_API.g_ret_sts_success THEN
2150: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
2151: ELSIF l_return_status <> 'W' THEN
2152: l_api_message := 'Error in seeding encumbrance reversal event';
2153: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 2157: RAISE FND_API.g_exc_unexpected_error;

2153: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2154: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2155: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2156: END IF;
2157: RAISE FND_API.g_exc_unexpected_error;
2158: END IF;
2159: END IF;
2160: END IF;
2161:

Line 2175: IF l_return_status <> FND_API.g_ret_sts_success THEN

2171: x_msg_data => l_msg_data,
2172: p_rcv_events_tbl => l_rcv_events_tbl,
2173: /* Support for Landed Cost Management */
2174: p_lcm_flag => l_lcm_flag);
2175: IF l_return_status <> FND_API.g_ret_sts_success THEN
2176: l_api_message := 'Error inserting events into RAE';
2177: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2178: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2179: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);

Line 2181: RAISE FND_API.g_exc_unexpected_error;

2177: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2178: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2179: ,'Create_DeliverEvents : '||l_stmt_num||' : '||l_api_message);
2180: END IF;
2181: RAISE FND_API.g_exc_unexpected_error;
2182: END IF;
2183:
2184:
2185:

Line 2187: IF FND_API.to_Boolean(p_commit) THEN

2183:
2184:
2185:
2186: --- Standard check of p_commit
2187: IF FND_API.to_Boolean(p_commit) THEN
2188: COMMIT WORK;
2189: END IF;
2190:
2191: -- Standard Call to get message count and if count = 1, get message info

Line 2203: WHEN FND_API.g_exc_error THEN

2199: END IF;
2200:
2201:
2202: EXCEPTION
2203: WHEN FND_API.g_exc_error THEN
2204: ROLLBACK TO Create_DeliverEvents_PVT;
2205: x_return_status := FND_API.g_ret_sts_error;
2206: FND_MSG_PUB.count_and_get
2207: ( p_count => x_msg_count

Line 2205: x_return_status := FND_API.g_ret_sts_error;

2201:
2202: EXCEPTION
2203: WHEN FND_API.g_exc_error THEN
2204: ROLLBACK TO Create_DeliverEvents_PVT;
2205: x_return_status := FND_API.g_ret_sts_error;
2206: FND_MSG_PUB.count_and_get
2207: ( p_count => x_msg_count
2208: , p_data => x_msg_data
2209: );

Line 2210: WHEN FND_API.g_exc_unexpected_error THEN

2206: FND_MSG_PUB.count_and_get
2207: ( p_count => x_msg_count
2208: , p_data => x_msg_data
2209: );
2210: WHEN FND_API.g_exc_unexpected_error THEN
2211: ROLLBACK TO Create_DeliverEvents_PVT;
2212: x_return_status := FND_API.g_ret_sts_unexp_error ;
2213: FND_MSG_PUB.count_and_get
2214: ( p_count => x_msg_count

Line 2212: x_return_status := FND_API.g_ret_sts_unexp_error ;

2208: , p_data => x_msg_data
2209: );
2210: WHEN FND_API.g_exc_unexpected_error THEN
2211: ROLLBACK TO Create_DeliverEvents_PVT;
2212: x_return_status := FND_API.g_ret_sts_unexp_error ;
2213: FND_MSG_PUB.count_and_get
2214: ( p_count => x_msg_count
2215: , p_data => x_msg_data
2216: );

Line 2220: x_return_status := fnd_api.g_ret_sts_unexp_error ;

2216: );
2217:
2218: WHEN OTHERS THEN
2219: ROLLBACK TO Create_DeliverEvents_PVT;
2220: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2221:
2222: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2223: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2224: ,'Create_DeliverEvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 2250: -- Default = FND_API.G_FALSE

2246: -- Pre-reqs :
2247: -- Parameters :
2248: -- IN : p_api_version IN NUMBER Required
2249: -- p_init_msg_list IN VARCHAR2 Optional
2250: -- Default = FND_API.G_FALSE
2251: -- p_commit IN VARCHAR2 Optional
2252: -- Default = FND_API.G_FALSE
2253: -- p_validation_level IN NUMBER Optional
2254: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 2252: -- Default = FND_API.G_FALSE

2248: -- IN : p_api_version IN NUMBER Required
2249: -- p_init_msg_list IN VARCHAR2 Optional
2250: -- Default = FND_API.G_FALSE
2251: -- p_commit IN VARCHAR2 Optional
2252: -- Default = FND_API.G_FALSE
2253: -- p_validation_level IN NUMBER Optional
2254: -- Default = FND_API.G_VALID_LEVEL_FULL
2255: -- p_rcv_transaction_id IN NUMBER Required
2256: -- p_direct_delivery_flag IN VARCHAR2 Optional

Line 2254: -- Default = FND_API.G_VALID_LEVEL_FULL

2250: -- Default = FND_API.G_FALSE
2251: -- p_commit IN VARCHAR2 Optional
2252: -- Default = FND_API.G_FALSE
2253: -- p_validation_level IN NUMBER Optional
2254: -- Default = FND_API.G_VALID_LEVEL_FULL
2255: -- p_rcv_transaction_id IN NUMBER Required
2256: -- p_direct_delivery_flag IN VARCHAR2 Optional
2257: --
2258: -- OUT : x_return_status OUT VARCHAR2(1)

Line 2284: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

2280: ) IS
2281: l_api_name CONSTANT VARCHAR2(30) := 'Create_RTREvents';
2282: l_api_version CONSTANT NUMBER := 1.0;
2283:
2284: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
2285: l_msg_count NUMBER := 0;
2286: l_msg_data VARCHAR2(8000) := '';
2287: l_stmt_num NUMBER := 0;
2288: l_api_message VARCHAR2(1000);

Line 2337: IF NOT FND_API.Compatible_API_Call (

2333: ,'Create_RTREvents <<');
2334: END IF;
2335:
2336: -- Standard call to check for call compatibility
2337: IF NOT FND_API.Compatible_API_Call (
2338: l_api_version,
2339: p_api_version,
2340: l_api_name,
2341: G_PKG_NAME ) THEN

Line 2342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2338: l_api_version,
2339: p_api_version,
2340: l_api_name,
2341: G_PKG_NAME ) THEN
2342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2343: END IF;
2344:
2345: -- Initialize message list if p_init_msg_list is set to TRUE
2346: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 2346: IF FND_API.to_Boolean(p_init_msg_list) THEN

2342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2343: END IF;
2344:
2345: -- Initialize message list if p_init_msg_list is set to TRUE
2346: IF FND_API.to_Boolean(p_init_msg_list) THEN
2347: FND_MSG_PUB.initialize;
2348: END IF;
2349:
2350: -- Initialize API return status to success

Line 2351: x_return_status := FND_API.G_RET_STS_SUCCESS;

2347: FND_MSG_PUB.initialize;
2348: END IF;
2349:
2350: -- Initialize API return status to success
2351: x_return_status := FND_API.G_RET_STS_SUCCESS;
2352:
2353: -- Unlike for RTV transactions, for RTR transactions, the po_distribution_id
2354: -- is always available.
2355: l_stmt_num := 20;

Line 2475: IF (l_return_status = FND_API.g_ret_sts_success) THEN

2471: p_qualifier_code_tbl => l_qualifier_code_tbl,
2472: p_qualifier_value_tbl => l_qualifier_value_tbl,
2473: p_transaction_date => l_rcv_trx_date,
2474: p_get_default_cost_group=> 'N');
2475: IF (l_return_status = FND_API.g_ret_sts_success) THEN
2476: l_procurement_org_flag := 'N';
2477: l_trx_flow_exists_flag := 1;
2478: l_trx_flow_header_id := l_transaction_flows_tbl(l_transaction_flows_tbl.FIRST).header_id;
2479: l_trx_flow_ctr := l_transaction_flows_tbl.COUNT;

Line 2504: p_init_msg_list =>FND_API.G_FALSE,

2500:
2501: PO_SHARED_PROC_GRP.check_shared_proc_scenario
2502: (
2503: p_api_version =>1.0,
2504: p_init_msg_list =>FND_API.G_FALSE,
2505: x_return_status =>l_return_status,
2506: p_destination_type_code =>l_destination_type,
2507: p_document_type_code =>l_po_document_type_code,
2508: p_project_id =>l_project_id,

Line 2515: IF l_return_status <> FND_API.g_ret_sts_success THEN

2511: p_transaction_flow_header_id =>l_trx_flow_header_id,
2512: x_is_shared_proc_scenario =>l_is_shared_proc
2513: );
2514:
2515: IF l_return_status <> FND_API.g_ret_sts_success THEN
2516: l_api_message := 'Error in API PO_SHARED_PROC_GRP.check_shared_proc_scenario';
2517: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2518: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2519: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 2521: RAISE FND_API.g_exc_unexpected_error;

2517: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2518: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2519: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
2520: END IF;
2521: RAISE FND_API.g_exc_unexpected_error;
2522: END IF;
2523:
2524: IF l_is_shared_proc IS NULL OR l_is_shared_proc = 'N' THEN
2525: l_is_shared_proc := 'N';

Line 2554: RAISE FND_API.g_exc_unexpected_error;

2550: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2551: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2552: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2553: END IF;
2554: RAISE FND_API.g_exc_unexpected_error;
2555: END IF;
2556:
2557: ELSE
2558: l_api_message := 'Error occurred in Transaction Flow API';

Line 2563: RAISE FND_API.g_exc_unexpected_error;

2559: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2560: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2561: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2562: END IF;
2563: RAISE FND_API.g_exc_unexpected_error;
2564: END IF;
2565: END IF;
2566:
2567: l_stmt_num := 50;

Line 2611: IF l_return_status <> FND_API.g_ret_sts_success THEN

2607:
2608: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
2609:
2610:
2611: IF l_return_status <> FND_API.g_ret_sts_success THEN
2612: l_api_message := 'Error creating event';
2613: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2614: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2615: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);

Line 2617: RAISE FND_API.g_exc_unexpected_error;

2613: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2614: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2615: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2616: END IF;
2617: RAISE FND_API.g_exc_unexpected_error;
2618: END IF;
2619:
2620: IF l_trx_flow_exists_flag = 0 THEN
2621: l_stmt_num := 70;

Line 2634: IF l_return_status <> FND_API.g_ret_sts_success THEN

2630: x_msg_data => l_msg_data,
2631: p_rcv_sob_id => l_rcv_sob_id,
2632: x_encumbrance_flag => l_encumbrance_flag,
2633: x_ussgl_option => l_ussgl_option);
2634: IF l_return_status <> FND_API.g_ret_sts_success THEN
2635: l_api_message := 'Error in checking for encumbrance flag ';
2636: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2637: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2638: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);

Line 2640: RAISE FND_API.g_exc_unexpected_error;

2636: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2637: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2638: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2639: END IF;
2640: RAISE FND_API.g_exc_unexpected_error;
2641: END IF;
2642:
2643: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2644: l_api_message := 'Encumbrance Flag : '||l_encumbrance_flag;

Line 2687: IF l_return_status = FND_API.g_ret_sts_success THEN

2683:
2684: /* Bug #3333610. In the case of encumbrance reversals, the quantity to unencumber
2685: may turn out to be zero if the quantity delivered is greater than the quantity
2686: ordered. In such a situation, we should not error out the event. */
2687: IF l_return_status = FND_API.g_ret_sts_success THEN
2688: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
2689: ELSIF l_return_status <> 'W' THEN
2690: l_api_message := 'Error in seeding encumbrance reversal event';
2691: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN

Line 2695: RAISE FND_API.g_exc_unexpected_error;

2691: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2692: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2693: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2694: END IF;
2695: RAISE FND_API.g_exc_unexpected_error;
2696: END IF;
2697: END IF;
2698: END IF;
2699:

Line 2713: IF l_return_status <> FND_API.g_ret_sts_success THEN

2709: x_msg_data => l_msg_data,
2710: p_rcv_events_tbl => l_rcv_events_tbl,
2711: /* Support for Landed Cost Management */
2712: p_lcm_flag => l_lcm_flag);
2713: IF l_return_status <> FND_API.g_ret_sts_success THEN
2714: l_api_message := 'Error inserting events into RAE';
2715: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2716: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2717: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);

Line 2719: RAISE FND_API.g_exc_unexpected_error;

2715: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2716: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2717: ,'Create_RTREvents : '||l_stmt_num||' : '||l_api_message);
2718: END IF;
2719: RAISE FND_API.g_exc_unexpected_error;
2720: END IF;
2721:
2722: -- Standard check of p_commit
2723: IF FND_API.to_Boolean(p_commit) THEN

Line 2723: IF FND_API.to_Boolean(p_commit) THEN

2719: RAISE FND_API.g_exc_unexpected_error;
2720: END IF;
2721:
2722: -- Standard check of p_commit
2723: IF FND_API.to_Boolean(p_commit) THEN
2724: COMMIT WORK;
2725: END IF;
2726:
2727: -- Standard Call to get message count and if count = 1, get message info

Line 2739: WHEN FND_API.g_exc_error THEN

2735: END IF;
2736:
2737:
2738: EXCEPTION
2739: WHEN FND_API.g_exc_error THEN
2740: ROLLBACK TO Create_RTREvents_PVT;
2741: x_return_status := FND_API.g_ret_sts_error;
2742: FND_MSG_PUB.count_and_get
2743: ( p_count => x_msg_count

Line 2741: x_return_status := FND_API.g_ret_sts_error;

2737:
2738: EXCEPTION
2739: WHEN FND_API.g_exc_error THEN
2740: ROLLBACK TO Create_RTREvents_PVT;
2741: x_return_status := FND_API.g_ret_sts_error;
2742: FND_MSG_PUB.count_and_get
2743: ( p_count => x_msg_count
2744: , p_data => x_msg_data
2745: );

Line 2746: WHEN FND_API.g_exc_unexpected_error THEN

2742: FND_MSG_PUB.count_and_get
2743: ( p_count => x_msg_count
2744: , p_data => x_msg_data
2745: );
2746: WHEN FND_API.g_exc_unexpected_error THEN
2747: ROLLBACK TO Create_RTREvents_PVT;
2748: x_return_status := FND_API.g_ret_sts_unexp_error ;
2749: FND_MSG_PUB.count_and_get
2750: ( p_count => x_msg_count

Line 2748: x_return_status := FND_API.g_ret_sts_unexp_error ;

2744: , p_data => x_msg_data
2745: );
2746: WHEN FND_API.g_exc_unexpected_error THEN
2747: ROLLBACK TO Create_RTREvents_PVT;
2748: x_return_status := FND_API.g_ret_sts_unexp_error ;
2749: FND_MSG_PUB.count_and_get
2750: ( p_count => x_msg_count
2751: , p_data => x_msg_data
2752: );

Line 2756: x_return_status := fnd_api.g_ret_sts_unexp_error ;

2752: );
2753:
2754: WHEN OTHERS THEN
2755: ROLLBACK TO Create_RTREvents_PVT;
2756: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2757:
2758: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
2759: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
2760: ,'Create_RTREvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 2786: -- Default = FND_API.G_FALSE

2782: -- Pre-reqs :
2783: -- Parameters :
2784: -- IN : p_api_version IN NUMBER Required
2785: -- p_init_msg_list IN VARCHAR2 Optional
2786: -- Default = FND_API.G_FALSE
2787: -- p_commit IN VARCHAR2 Optional
2788: -- Default = FND_API.G_FALSE
2789: -- p_validation_level IN NUMBER Optional
2790: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 2788: -- Default = FND_API.G_FALSE

2784: -- IN : p_api_version IN NUMBER Required
2785: -- p_init_msg_list IN VARCHAR2 Optional
2786: -- Default = FND_API.G_FALSE
2787: -- p_commit IN VARCHAR2 Optional
2788: -- Default = FND_API.G_FALSE
2789: -- p_validation_level IN NUMBER Optional
2790: -- Default = FND_API.G_VALID_LEVEL_FULL
2791: -- p_rcv_transaction_id IN NUMBER Required
2792: -- p_direct_delivery_flag IN VARCHAR2 Optional

Line 2790: -- Default = FND_API.G_VALID_LEVEL_FULL

2786: -- Default = FND_API.G_FALSE
2787: -- p_commit IN VARCHAR2 Optional
2788: -- Default = FND_API.G_FALSE
2789: -- p_validation_level IN NUMBER Optional
2790: -- Default = FND_API.G_VALID_LEVEL_FULL
2791: -- p_rcv_transaction_id IN NUMBER Required
2792: -- p_direct_delivery_flag IN VARCHAR2 Optional
2793: --
2794: -- OUT : x_return_status OUT VARCHAR2(1)

Line 2820: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

2816: ) IS
2817: l_api_name CONSTANT VARCHAR2(30) := 'Create_RTVEvents';
2818: l_api_version CONSTANT NUMBER := 1.0;
2819:
2820: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
2821: l_msg_count NUMBER := 0;
2822: l_msg_data VARCHAR2(8000) := '';
2823: l_stmt_num NUMBER := 0;
2824: l_api_message VARCHAR2(1000);

Line 2890: IF NOT FND_API.Compatible_API_Call (

2886: ,'Create_RTVEvents <<');
2887: END IF;
2888:
2889: -- Standard call to check for call compatibility
2890: IF NOT FND_API.Compatible_API_Call (
2891: l_api_version,
2892: p_api_version,
2893: l_api_name,
2894: G_PKG_NAME ) THEN

Line 2895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2891: l_api_version,
2892: p_api_version,
2893: l_api_name,
2894: G_PKG_NAME ) THEN
2895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2896: END IF;
2897:
2898: -- Initialize message list if p_init_msg_list is set to TRUE
2899: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 2899: IF FND_API.to_Boolean(p_init_msg_list) THEN

2895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2896: END IF;
2897:
2898: -- Initialize message list if p_init_msg_list is set to TRUE
2899: IF FND_API.to_Boolean(p_init_msg_list) THEN
2900: FND_MSG_PUB.initialize;
2901: END IF;
2902:
2903: -- Initialize API return status to success

Line 2904: x_return_status := FND_API.G_RET_STS_SUCCESS;

2900: FND_MSG_PUB.initialize;
2901: END IF;
2902:
2903: -- Initialize API return status to success
2904: x_return_status := FND_API.G_RET_STS_SUCCESS;
2905:
2906: l_stmt_num := 20;
2907: SELECT
2908: RT.po_header_id,

Line 3017: IF (l_return_status = FND_API.g_ret_sts_success) THEN

3013: p_qualifier_value_tbl => l_qualifier_value_tbl,
3014: p_transaction_date => l_rcv_trx_date,
3015: p_get_default_cost_group=> 'N');
3016:
3017: IF (l_return_status = FND_API.g_ret_sts_success) THEN
3018: l_trx_flow_exists_flag := 1;
3019: l_trx_flow_header_id := l_transaction_flows_tbl(l_transaction_flows_tbl.FIRST).header_id;
3020: -- Return Status of 'W' indicates that no transaction flow exists.
3021: ELSIF (l_return_status = 'W') THEN

Line 3036: RAISE FND_API.g_exc_unexpected_error;

3032: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3033: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3034: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3035: END IF;
3036: RAISE FND_API.g_exc_unexpected_error;
3037: END IF;
3038:
3039: ELSE
3040: l_api_message := 'Error occurred in Transaction Flow API';

Line 3045: RAISE FND_API.g_exc_unexpected_error;

3041: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3042: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3043: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3044: END IF;
3045: RAISE FND_API.g_exc_unexpected_error;
3046: END IF; -- IF l_return_status
3047: END IF; -- IF l_po_org_id
3048:
3049:

Line 3090: p_init_msg_list =>FND_API.G_FALSE,

3086:
3087: PO_SHARED_PROC_GRP.check_shared_proc_scenario
3088: (
3089: p_api_version =>1.0,
3090: p_init_msg_list =>FND_API.G_FALSE,
3091: x_return_status =>l_return_status,
3092: p_destination_type_code =>rec_pod.destination_type_code,
3093: p_document_type_code =>l_po_document_type_code,
3094: p_project_id =>rec_pod.project_id,

Line 3101: IF l_return_status <> FND_API.g_ret_sts_success THEN

3097: p_transaction_flow_header_id =>l_trx_flow_header_id,
3098: x_is_shared_proc_scenario =>l_is_shared_proc
3099: );
3100:
3101: IF l_return_status <> FND_API.g_ret_sts_success THEN
3102: l_api_message := 'Error in API PO_SHARED_PROC_GRP.check_shared_proc_scenario';
3103: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3104: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3105: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);

Line 3107: RAISE FND_API.g_exc_unexpected_error;

3103: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3104: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3105: ,'Create_ReceiveEvents : '||l_stmt_num||' : '||l_api_message);
3106: END IF;
3107: RAISE FND_API.g_exc_unexpected_error;
3108: END IF;
3109:
3110: IF l_is_shared_proc IS NULL OR l_is_shared_proc = 'N' THEN
3111: l_is_shared_proc := 'N';

Line 3189: IF l_return_status <> FND_API.g_ret_sts_success THEN

3185: /* Support for Landed Cost Management */
3186: p_lcm_flag => l_lcm_flag,
3187: x_rcv_event => l_rcv_event);
3188:
3189: IF l_return_status <> FND_API.g_ret_sts_success THEN
3190: l_api_message := 'Error creating event';
3191: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3192: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3193: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);

Line 3195: RAISE FND_API.g_exc_unexpected_error;

3191: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3192: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3193: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3194: END IF;
3195: RAISE FND_API.g_exc_unexpected_error;
3196: END IF;
3197:
3198: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
3199:

Line 3238: IF l_return_status <> FND_API.g_ret_sts_success THEN

3234: /* Support for Landed Cost Management */
3235: p_lcm_flag => l_lcm_flag,
3236: x_rcv_event => l_rcv_event);
3237:
3238: IF l_return_status <> FND_API.g_ret_sts_success THEN
3239: l_api_message := 'Error creating event';
3240: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3241: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3242: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);

Line 3244: RAISE FND_API.g_exc_unexpected_error;

3240: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3241: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3242: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3243: END IF;
3244: RAISE FND_API.g_exc_unexpected_error;
3245: END IF;
3246:
3247: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
3248: END IF;

Line 3313: IF l_return_status <> FND_API.g_ret_sts_success THEN

3309: p_prior_unit_price => NULL,
3310: /* Support for Landed Cost Management */
3311: p_lcm_flag => l_lcm_flag,
3312: x_rcv_event => l_rcv_event);
3313: IF l_return_status <> FND_API.g_ret_sts_success THEN
3314: l_api_message := 'Error creating event';
3315: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3316: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3317: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);

Line 3319: RAISE FND_API.g_exc_unexpected_error;

3315: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3316: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3317: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3318: END IF;
3319: RAISE FND_API.g_exc_unexpected_error;
3320: END IF;
3321:
3322: l_rcv_events_tbl(l_rcv_events_tbl.count + 1) := l_rcv_event;
3323:

Line 3339: IF l_return_status <> FND_API.g_ret_sts_success THEN

3335: x_msg_data => l_msg_data,
3336: p_rcv_events_tbl => l_rcv_events_tbl,
3337: /* Support for Landed Cost Management */
3338: p_lcm_flag => l_lcm_flag);
3339: IF l_return_status <> FND_API.g_ret_sts_success THEN
3340: l_api_message := 'Error inserting events into RAE';
3341: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3342: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3343: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);

Line 3345: RAISE FND_API.g_exc_unexpected_error;

3341: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3342: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3343: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3344: END IF;
3345: RAISE FND_API.g_exc_unexpected_error;
3346: END IF;
3347:
3348: IF(l_trx_flow_exists_flag = 1 and l_item_id IS NOT NULL) THEN
3349: l_stmt_num := 140;

Line 3360: IF l_return_status <> FND_API.g_ret_sts_success THEN

3356: x_return_status => l_return_status,
3357: x_msg_count => l_msg_count,
3358: x_msg_data => l_msg_data,
3359: p_rcv_events_tbl => l_rcv_events_tbl);
3360: IF l_return_status <> FND_API.g_ret_sts_success THEN
3361: l_api_message := 'Error inserting events into MMT';
3362: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3363: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3364: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);

Line 3366: RAISE FND_API.g_exc_unexpected_error;

3362: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3363: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3364: ,'Create_RTVEvents : '||l_stmt_num||' : '||l_api_message);
3365: END IF;
3366: RAISE FND_API.g_exc_unexpected_error;
3367: END IF;
3368: END IF;
3369:
3370: -- Standard check of p_commit

Line 3371: IF FND_API.to_Boolean(p_commit) THEN

3367: END IF;
3368: END IF;
3369:
3370: -- Standard check of p_commit
3371: IF FND_API.to_Boolean(p_commit) THEN
3372: COMMIT WORK;
3373: END IF;
3374:
3375: -- Standard Call to get message count and if count = 1, get message info

Line 3387: WHEN FND_API.g_exc_error THEN

3383: END IF;
3384:
3385:
3386: EXCEPTION
3387: WHEN FND_API.g_exc_error THEN
3388: ROLLBACK TO Create_RTVEvents_PVT;
3389: x_return_status := FND_API.g_ret_sts_error;
3390: FND_MSG_PUB.count_and_get
3391: ( p_count => x_msg_count

Line 3389: x_return_status := FND_API.g_ret_sts_error;

3385:
3386: EXCEPTION
3387: WHEN FND_API.g_exc_error THEN
3388: ROLLBACK TO Create_RTVEvents_PVT;
3389: x_return_status := FND_API.g_ret_sts_error;
3390: FND_MSG_PUB.count_and_get
3391: ( p_count => x_msg_count
3392: , p_data => x_msg_data
3393: );

Line 3394: WHEN FND_API.g_exc_unexpected_error THEN

3390: FND_MSG_PUB.count_and_get
3391: ( p_count => x_msg_count
3392: , p_data => x_msg_data
3393: );
3394: WHEN FND_API.g_exc_unexpected_error THEN
3395: ROLLBACK TO Create_RTVEvents_PVT;
3396: x_return_status := FND_API.g_ret_sts_unexp_error ;
3397: FND_MSG_PUB.count_and_get
3398: ( p_count => x_msg_count

Line 3396: x_return_status := FND_API.g_ret_sts_unexp_error ;

3392: , p_data => x_msg_data
3393: );
3394: WHEN FND_API.g_exc_unexpected_error THEN
3395: ROLLBACK TO Create_RTVEvents_PVT;
3396: x_return_status := FND_API.g_ret_sts_unexp_error ;
3397: FND_MSG_PUB.count_and_get
3398: ( p_count => x_msg_count
3399: , p_data => x_msg_data
3400: );

Line 3404: x_return_status := fnd_api.g_ret_sts_unexp_error ;

3400: );
3401:
3402: WHEN OTHERS THEN
3403: ROLLBACK TO Create_RTVEvents_PVT;
3404: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3405:
3406: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3407: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3408: ,'Create_RTVEvents : '||l_stmt_num||' : '||substr(SQLERRM,1,200));

Line 3434: -- Default = FND_API.G_FALSE

3430: -- global procurement and drop shipment scenarios.
3431: -- Parameters :
3432: -- IN : p_api_version IN NUMBER Required
3433: -- p_init_msg_list IN VARCHAR2 Optional
3434: -- Default = FND_API.G_FALSE
3435: -- p_commit IN VARCHAR2 Optional
3436: -- Default = FND_API.G_FALSE
3437: -- p_validation_level IN NUMBER Optional
3438: -- Default = FND_API.G_VALID_LEVEL_FULL

Line 3436: -- Default = FND_API.G_FALSE

3432: -- IN : p_api_version IN NUMBER Required
3433: -- p_init_msg_list IN VARCHAR2 Optional
3434: -- Default = FND_API.G_FALSE
3435: -- p_commit IN VARCHAR2 Optional
3436: -- Default = FND_API.G_FALSE
3437: -- p_validation_level IN NUMBER Optional
3438: -- Default = FND_API.G_VALID_LEVEL_FULL
3439: -- p_rcv_transaction_id IN NUMBER Required
3440: --

Line 3438: -- Default = FND_API.G_VALID_LEVEL_FULL

3434: -- Default = FND_API.G_FALSE
3435: -- p_commit IN VARCHAR2 Optional
3436: -- Default = FND_API.G_FALSE
3437: -- p_validation_level IN NUMBER Optional
3438: -- Default = FND_API.G_VALID_LEVEL_FULL
3439: -- p_rcv_transaction_id IN NUMBER Required
3440: --
3441: -- OUT : x_return_status OUT VARCHAR2(1)
3442: -- x_msg_count OUT NUMBER

Line 3493: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

3489: )IS
3490: l_api_name CONSTANT VARCHAR2(30) := 'Get_InvTransactionInfo';
3491: l_api_version CONSTANT NUMBER := 1.0;
3492:
3493: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
3494: l_msg_count NUMBER := 0;
3495: l_msg_data VARCHAR2(8000) := '';
3496: l_stmt_num NUMBER := 0;
3497: l_api_message VARCHAR2(1000);

Line 3557: IF NOT FND_API.Compatible_API_Call (

3553: ,'Get_InvTransactionInfo <<');
3554: END IF;
3555:
3556: -- Standard call to check for call compatibility
3557: IF NOT FND_API.Compatible_API_Call (
3558: l_api_version,
3559: p_api_version,
3560: l_api_name,
3561: G_PKG_NAME ) THEN

Line 3562: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3558: l_api_version,
3559: p_api_version,
3560: l_api_name,
3561: G_PKG_NAME ) THEN
3562: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3563: END IF;
3564:
3565: -- Initialize message list if p_init_msg_list is set to TRUE
3566: IF FND_API.to_Boolean(p_init_msg_list) THEN

Line 3566: IF FND_API.to_Boolean(p_init_msg_list) THEN

3562: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3563: END IF;
3564:
3565: -- Initialize message list if p_init_msg_list is set to TRUE
3566: IF FND_API.to_Boolean(p_init_msg_list) THEN
3567: FND_MSG_PUB.initialize;
3568: END IF;
3569:
3570: -- Initialize API return status to success

Line 3571: x_return_status := FND_API.G_RET_STS_SUCCESS;

3567: FND_MSG_PUB.initialize;
3568: END IF;
3569:
3570: -- Initialize API return status to success
3571: x_return_status := FND_API.G_RET_STS_SUCCESS;
3572:
3573: -- Initialize return variables
3574: x_intercompany_pricing_option := 1;
3575: x_transfer_price := 0;

Line 3728: IF (l_return_status = FND_API.g_ret_sts_success) THEN

3724: p_qualifier_value_tbl => l_qualifier_value_tbl,
3725: p_transaction_date => l_rcv_trx_date,
3726: p_get_default_cost_group=> 'N');
3727:
3728: IF (l_return_status = FND_API.g_ret_sts_success) THEN
3729: -- Populate dummy l_rcv_event record to pass to Get_UnitPrice function.
3730: l_counter := l_transaction_flows_tbl.COUNT;
3731: l_rcv_event.trx_flow_header_id := l_transaction_flows_tbl(l_counter).header_id;
3732: l_rcv_event.destination_type_code := l_destination_type;

Line 3767: IF l_return_status <> FND_API.g_ret_sts_success THEN

3763: x_unit_landed_cost => l_unit_landed_cost,
3764: x_currency_code => l_currency_code,
3765: x_incr_transfer_price => l_incr_transfer_price,
3766: x_incr_currency_code => l_incr_currency_code);
3767: IF l_return_status <> FND_API.g_ret_sts_success THEN
3768: l_api_message := 'Error getting unit price';
3769: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3770: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3771: ,'Get_InvInfo : '||l_stmt_num||' : '||l_api_message);

Line 3773: RAISE FND_API.g_exc_unexpected_error;

3769: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3770: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3771: ,'Get_InvInfo : '||l_stmt_num||' : '||l_api_message);
3772: END IF;
3773: RAISE FND_API.g_exc_unexpected_error;
3774: END IF;
3775:
3776: l_rcv_event.currency_code := l_currency_code;
3777:

Line 3798: IF l_return_status <> FND_API.g_ret_sts_success THEN

3794: x_currency_conversion_rate => l_currency_conversion_rate,
3795: x_currency_conversion_date => l_currency_conversion_date,
3796: x_currency_conversion_type => l_currency_conversion_type);
3797:
3798: IF l_return_status <> FND_API.g_ret_sts_success THEN
3799: l_api_message := 'Error Getting Currency';
3800: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3801: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3802: ,'Seed_RAEEvent : '||l_stmt_num||' : '||l_api_message);

Line 3804: RAISE FND_API.g_exc_unexpected_error;

3800: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3801: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3802: ,'Seed_RAEEvent : '||l_stmt_num||' : '||l_api_message);
3803: END IF;
3804: RAISE FND_API.g_exc_unexpected_error;
3805: END IF;
3806: END IF;
3807: ELSIF(l_return_status = FND_API.g_ret_sts_error) THEN
3808: l_api_message := 'Error occurred in Transaction Flow API';

Line 3807: ELSIF(l_return_status = FND_API.g_ret_sts_error) THEN

3803: END IF;
3804: RAISE FND_API.g_exc_unexpected_error;
3805: END IF;
3806: END IF;
3807: ELSIF(l_return_status = FND_API.g_ret_sts_error) THEN
3808: l_api_message := 'Error occurred in Transaction Flow API';
3809: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3810: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3811: ,'Get_InvTransaction_Info : '||l_stmt_num||' : '||l_api_message);

Line 3813: RAISE FND_API.g_exc_unexpected_error;

3809: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3810: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3811: ,'Get_InvTransaction_Info : '||l_stmt_num||' : '||l_api_message);
3812: END IF;
3813: RAISE FND_API.g_exc_unexpected_error;
3814: END IF;
3815: END IF;
3816:
3817: IF(l_drop_ship_flag IN (1,2)) THEN

Line 3851: IF FND_API.to_Boolean(p_commit) THEN

3847: ,l_api_message);
3848: END IF;
3849:
3850: --- Standard check of p_commit
3851: IF FND_API.to_Boolean(p_commit) THEN
3852: COMMIT WORK;
3853: END IF;
3854:
3855: -- Standard Call to get message count and if count = 1, get message info

Line 3867: WHEN FND_API.g_exc_error THEN

3863: END IF;
3864:
3865:
3866: EXCEPTION
3867: WHEN FND_API.g_exc_error THEN
3868: ROLLBACK TO Get_InvTransactionInfo_PVT;
3869: x_return_status := FND_API.g_ret_sts_error;
3870: FND_MSG_PUB.count_and_get
3871: ( p_count => x_msg_count

Line 3869: x_return_status := FND_API.g_ret_sts_error;

3865:
3866: EXCEPTION
3867: WHEN FND_API.g_exc_error THEN
3868: ROLLBACK TO Get_InvTransactionInfo_PVT;
3869: x_return_status := FND_API.g_ret_sts_error;
3870: FND_MSG_PUB.count_and_get
3871: ( p_count => x_msg_count
3872: , p_data => x_msg_data
3873: );

Line 3874: WHEN FND_API.g_exc_unexpected_error THEN

3870: FND_MSG_PUB.count_and_get
3871: ( p_count => x_msg_count
3872: , p_data => x_msg_data
3873: );
3874: WHEN FND_API.g_exc_unexpected_error THEN
3875: ROLLBACK TO Get_InvTransactionInfo_PVT;
3876: x_return_status := FND_API.g_ret_sts_unexp_error ;
3877: FND_MSG_PUB.count_and_get
3878: ( p_count => x_msg_count

Line 3876: x_return_status := FND_API.g_ret_sts_unexp_error ;

3872: , p_data => x_msg_data
3873: );
3874: WHEN FND_API.g_exc_unexpected_error THEN
3875: ROLLBACK TO Get_InvTransactionInfo_PVT;
3876: x_return_status := FND_API.g_ret_sts_unexp_error ;
3877: FND_MSG_PUB.count_and_get
3878: ( p_count => x_msg_count
3879: , p_data => x_msg_data
3880: );

Line 3884: x_return_status := fnd_api.g_ret_sts_unexp_error ;

3880: );
3881:
3882: WHEN OTHERS THEN
3883: ROLLBACK TO Get_InvTransactionInfo_PVT;
3884: x_return_status := fnd_api.g_ret_sts_unexp_error ;
3885:
3886: IF G_DEBUG = 'Y' AND FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
3887: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,G_LOG_HEAD || '.'||l_api_name||l_stmt_num
3888: ,'Get_InvTransactionInfo : '||l_stmt_num||' : '||substr(SQLERRM,1,200));