eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_OSP_PO_PVT dependencies on FND_API

Line 231: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

227: -- Parameters :
228: --
229: -- Standard IN Parameters :
230: -- p_api_version IN NUMBER Required
231: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
232: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
233: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
234: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
235: -- p_module_type IN VARCHAR2 Default NULL.

Line 232: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

228: --
229: -- Standard IN Parameters :
230: -- p_api_version IN NUMBER Required
231: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
232: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
233: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
234: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
235: -- p_module_type IN VARCHAR2 Default NULL.
236: --

Line 233: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

229: -- Standard IN Parameters :
230: -- p_api_version IN NUMBER Required
231: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
232: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
233: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
234: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
235: -- p_module_type IN VARCHAR2 Default NULL.
236: --
237: -- Standard OUT Parameters :

Line 234: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

230: -- p_api_version IN NUMBER Required
231: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
232: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
233: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
234: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
235: -- p_module_type IN VARCHAR2 Default NULL.
236: --
237: -- Standard OUT Parameters :
238: -- x_return_status OUT VARCHAR2 Required

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

257:
258: PROCEDURE Create_Purchase_Order
259: (
260: p_api_version IN NUMBER,
261: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
262: p_commit IN VARCHAR2 := FND_API.G_FALSE,
263: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
264: p_default IN VARCHAR2 := FND_API.G_TRUE,
265: p_module_type IN VARCHAR2 := NULL,

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

258: PROCEDURE Create_Purchase_Order
259: (
260: p_api_version IN NUMBER,
261: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
262: p_commit IN VARCHAR2 := FND_API.G_FALSE,
263: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
264: p_default IN VARCHAR2 := FND_API.G_TRUE,
265: p_module_type IN VARCHAR2 := NULL,
266: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given

Line 263: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

259: (
260: p_api_version IN NUMBER,
261: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
262: p_commit IN VARCHAR2 := FND_API.G_FALSE,
263: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
264: p_default IN VARCHAR2 := FND_API.G_TRUE,
265: p_module_type IN VARCHAR2 := NULL,
266: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
267: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given

Line 264: p_default IN VARCHAR2 := FND_API.G_TRUE,

260: p_api_version IN NUMBER,
261: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
262: p_commit IN VARCHAR2 := FND_API.G_FALSE,
263: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
264: p_default IN VARCHAR2 := FND_API.G_TRUE,
265: p_module_type IN VARCHAR2 := NULL,
266: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
267: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given
268: x_batch_id OUT NOCOPY NUMBER,

Line 384: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

380: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
381: END IF;
382:
383: -- Standard call to check for call compatibility
384: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
385: G_PKG_NAME) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: END IF;
388:

Line 386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

382:
383: -- Standard call to check for call compatibility
384: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
385: G_PKG_NAME) THEN
386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: END IF;
388:
389: -- Initialize message list if p_init_msg_list is set to TRUE
390: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 390: IF FND_API.To_Boolean(p_init_msg_list) THEN

386: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
387: END IF;
388:
389: -- Initialize message list if p_init_msg_list is set to TRUE
390: IF FND_API.To_Boolean(p_init_msg_list) THEN
391: FND_MSG_PUB.Initialize;
392: END IF;
393:
394: -- Initialize API return status to success

Line 395: x_return_status := FND_API.G_RET_STS_SUCCESS;

391: FND_MSG_PUB.Initialize;
392: END IF;
393:
394: -- Initialize API return status to success
395: x_return_status := FND_API.G_RET_STS_SUCCESS;
396:
397: -- Begin Processing
398:
399: IF FND_API.to_boolean( p_default ) THEN

Line 399: IF FND_API.to_boolean( p_default ) THEN

395: x_return_status := FND_API.G_RET_STS_SUCCESS;
396:
397: -- Begin Processing
398:
399: IF FND_API.to_boolean( p_default ) THEN
400: -- No special default settings required in this API
401: NULL;
402: END IF;
403:

Line 486: RAISE FND_API.G_EXC_ERROR;

482: --dbms_output.put_line('Validated Lines Table ');
483: -- Check Error Message stack.
484: x_msg_count := FND_MSG_PUB.count_msg;
485: IF x_msg_count > 0 THEN
486: RAISE FND_API.G_EXC_ERROR;
487: END IF;
488: --dbms_output.put_line('no errors : going onto insert into po_headers_interface ');
489: -- Insert Row into PO_HEADERS_INTERFACE
490: Insert_PO_Header(p_po_header_rec => l_po_header,

Line 541: RAISE FND_API.G_EXC_ERROR;

537: FND_MSG_PUB.ADD;
538: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
539: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
540: END IF;
541: RAISE FND_API.G_EXC_ERROR;
542: END IF;
543:
544: --dbms_output.put_line('Recording OSP Submission... ');
545: -- Update OSP Table with batch id, request id and interface header id

Line 564: RAISE FND_API.G_EXC_ERROR;

560: END IF;
561: -- Check Error Message stack.
562: x_msg_count := FND_MSG_PUB.count_msg;
563: IF x_msg_count > 0 THEN
564: RAISE FND_API.G_EXC_ERROR;
565: END IF;
566:
567: -- Log this transaction in the Log Table
568: AHL_OSP_UTIL_PKG.Log_Transaction(p_trans_type_code => G_TXN_TYPE_PO_CREATION,

Line 575: IF FND_API.TO_BOOLEAN(p_commit) THEN

571: p_dest_doc_id => l_batch_id,
572: p_dest_doc_type_code => G_DOC_TYPE_PO);
573:
574: -- Standard check of p_commit
575: IF FND_API.TO_BOOLEAN(p_commit) THEN
576: --dbms_output.put_line('About to commit work ');
577: COMMIT WORK;
578: END IF;
579:

Line 584: p_encoded => fnd_api.g_false

580: -- Standard call to get message count and if count is 1, get message info
581: FND_MSG_PUB.Count_And_Get
582: ( p_count => x_msg_count,
583: p_data => x_msg_data,
584: p_encoded => fnd_api.g_false
585: );
586:
587: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
588: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 593: WHEN FND_API.G_EXC_ERROR THEN

589: END IF;
590:
591: --dbms_output.put_line('About to return from procedure ');
592: EXCEPTION
593: WHEN FND_API.G_EXC_ERROR THEN
594: ROLLBACK TO Create_Purchase_Order_pvt;
595: x_return_status := FND_API.G_RET_STS_ERROR;
596: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
597: p_data => x_msg_data,

Line 595: x_return_status := FND_API.G_RET_STS_ERROR;

591: --dbms_output.put_line('About to return from procedure ');
592: EXCEPTION
593: WHEN FND_API.G_EXC_ERROR THEN
594: ROLLBACK TO Create_Purchase_Order_pvt;
595: x_return_status := FND_API.G_RET_STS_ERROR;
596: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
597: p_data => x_msg_data,
598: p_encoded => fnd_api.g_false);
599: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);

Line 598: p_encoded => fnd_api.g_false);

594: ROLLBACK TO Create_Purchase_Order_pvt;
595: x_return_status := FND_API.G_RET_STS_ERROR;
596: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
597: p_data => x_msg_data,
598: p_encoded => fnd_api.g_false);
599: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO Create_Purchase_Order_pvt;

Line 601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

597: p_data => x_msg_data,
598: p_encoded => fnd_api.g_false);
599: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO Create_Purchase_Order_pvt;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
604: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
605: p_data => x_msg_data,

Line 603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

599: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
600:
601: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
602: ROLLBACK TO Create_Purchase_Order_pvt;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
604: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
605: p_data => x_msg_data,
606: p_encoded => fnd_api.g_false);
607: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);

Line 606: p_encoded => fnd_api.g_false);

602: ROLLBACK TO Create_Purchase_Order_pvt;
603: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
604: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
605: p_data => x_msg_data,
606: p_encoded => fnd_api.g_false);
607: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
608:
609: WHEN OTHERS THEN
610: ROLLBACK TO Create_Purchase_Order_pvt;

Line 611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

607: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
608:
609: WHEN OTHERS THEN
610: ROLLBACK TO Create_Purchase_Order_pvt;
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
613: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
614: p_procedure_name => 'Create_Purchase_Order',
615: p_error_text => SUBSTR(SQLERRM,1,240));

Line 619: p_encoded => fnd_api.g_false);

615: p_error_text => SUBSTR(SQLERRM,1,240));
616: END IF;
617: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
618: p_data => x_msg_data,
619: p_encoded => fnd_api.g_false);
620: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
621:
622: END Create_Purchase_Order;
623:

Line 639: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

635: -- Parameters :
636: --
637: -- Standard IN Parameters :
638: -- p_api_version IN NUMBER Required
639: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
640: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
641: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
642: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
643: -- p_module_type IN VARCHAR2 Default NULL.

Line 640: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

636: --
637: -- Standard IN Parameters :
638: -- p_api_version IN NUMBER Required
639: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
640: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
641: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
642: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
643: -- p_module_type IN VARCHAR2 Default NULL.
644: --

Line 641: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

637: -- Standard IN Parameters :
638: -- p_api_version IN NUMBER Required
639: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
640: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
641: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
642: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
643: -- p_module_type IN VARCHAR2 Default NULL.
644: --
645: -- Standard OUT Parameters :

Line 642: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

638: -- p_api_version IN NUMBER Required
639: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
640: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
641: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
642: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
643: -- p_module_type IN VARCHAR2 Default NULL.
644: --
645: -- Standard OUT Parameters :
646: -- x_return_status OUT VARCHAR2 Required

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

660: -- End of Comments.
661: PROCEDURE Associate_OSP_With_PO
662: (
663: p_api_version IN NUMBER,
664: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
665: p_commit IN VARCHAR2 := FND_API.G_FALSE,
666: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
667: p_default IN VARCHAR2 := FND_API.G_TRUE,
668: p_module_type IN VARCHAR2 := NULL,

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

661: PROCEDURE Associate_OSP_With_PO
662: (
663: p_api_version IN NUMBER,
664: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
665: p_commit IN VARCHAR2 := FND_API.G_FALSE,
666: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
667: p_default IN VARCHAR2 := FND_API.G_TRUE,
668: p_module_type IN VARCHAR2 := NULL,
669: p_osp_order_id IN NUMBER,

Line 666: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

662: (
663: p_api_version IN NUMBER,
664: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
665: p_commit IN VARCHAR2 := FND_API.G_FALSE,
666: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
667: p_default IN VARCHAR2 := FND_API.G_TRUE,
668: p_module_type IN VARCHAR2 := NULL,
669: p_osp_order_id IN NUMBER,
670: x_po_header_id OUT NOCOPY NUMBER,

Line 667: p_default IN VARCHAR2 := FND_API.G_TRUE,

663: p_api_version IN NUMBER,
664: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
665: p_commit IN VARCHAR2 := FND_API.G_FALSE,
666: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
667: p_default IN VARCHAR2 := FND_API.G_TRUE,
668: p_module_type IN VARCHAR2 := NULL,
669: p_osp_order_id IN NUMBER,
670: x_po_header_id OUT NOCOPY NUMBER,
671: x_return_status OUT NOCOPY VARCHAR2,

Line 697: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

693: -- Standard start of API savepoint
694: SAVEPOINT Associate_OSP_With_PO_pvt;
695:
696: -- Standard call to check for call compatibility
697: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
698: G_PKG_NAME) THEN
699: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
700: END IF;
701:

Line 699: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

695:
696: -- Standard call to check for call compatibility
697: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
698: G_PKG_NAME) THEN
699: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
700: END IF;
701:
702: -- Initialize message list if p_init_msg_list is set to TRUE
703: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 703: IF FND_API.To_Boolean(p_init_msg_list) THEN

699: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
700: END IF;
701:
702: -- Initialize message list if p_init_msg_list is set to TRUE
703: IF FND_API.To_Boolean(p_init_msg_list) THEN
704: FND_MSG_PUB.Initialize;
705: END IF;
706:
707: -- Initialize API return status to success

Line 708: x_return_status := FND_API.G_RET_STS_SUCCESS;

704: FND_MSG_PUB.Initialize;
705: END IF;
706:
707: -- Initialize API return status to success
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
709:
710: IF FND_API.to_boolean( p_default ) THEN
711: -- No special default settings required in this API
712: NULL;

Line 710: IF FND_API.to_boolean( p_default ) THEN

706:
707: -- Initialize API return status to success
708: x_return_status := FND_API.G_RET_STS_SUCCESS;
709:
710: IF FND_API.to_boolean( p_default ) THEN
711: -- No special default settings required in this API
712: NULL;
713: END IF;
714:

Line 717: IF (p_osp_order_id IS NULL OR p_osp_order_id = FND_API.G_MISS_NUM) THEN

713: END IF;
714:
715: --dbms_output.put_line('Beginning Processing... ');
716: -- Validate OSP Order Id
717: IF (p_osp_order_id IS NULL OR p_osp_order_id = FND_API.G_MISS_NUM) THEN
718: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_OSP_ID_NULL');
719: FND_MSG_PUB.ADD;
720: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
721: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 724: RAISE FND_API.G_EXC_ERROR;

720: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
721: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
722: END IF;
723: --dbms_output.put_line('OSP Order Id is null');
724: RAISE FND_API.G_EXC_ERROR;
725: ELSE
726: OPEN l_validate_osp_csr(p_osp_order_id);
727: FETCH l_validate_osp_csr INTO l_po_header_id;
728: IF (l_validate_osp_csr%NOTFOUND) THEN

Line 737: RAISE FND_API.G_EXC_ERROR;

733: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
734: END IF;
735: CLOSE l_validate_osp_csr;
736: --dbms_output.put_line('OSP Order Id ' || p_osp_order_id || ' is invalid');
737: RAISE FND_API.G_EXC_ERROR;
738: ELSIF (l_po_header_id IS NOT NULL) THEN
739: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
740: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'OSP Order Id ' || p_osp_order_id || ' is already associated with PO ' || l_po_header_id);
741: END IF;

Line 749: RAISE FND_API.G_EXC_ERROR;

745: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_PO_HDR_ASSCTD');
746: FND_MESSAGE.Set_Token('OSP_ID', p_osp_order_id);
747: FND_MSG_PUB.ADD;
748: CLOSE l_validate_osp_csr;
749: RAISE FND_API.G_EXC_ERROR;
750: */
751: ELSE
752: -- Make the association
753: --dbms_output.put_line('About to Make Association ');

Line 768: RAISE FND_API.G_EXC_ERROR;

764: --dbms_output.put_line('Completed Processing. Checking for errors ');
765: -- Check Error Message stack.
766: x_msg_count := FND_MSG_PUB.count_msg;
767: IF x_msg_count > 0 THEN
768: RAISE FND_API.G_EXC_ERROR;
769: END IF;
770:
771: -- Standard check of p_commit
772: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 772: IF FND_API.TO_BOOLEAN(p_commit) THEN

768: RAISE FND_API.G_EXC_ERROR;
769: END IF;
770:
771: -- Standard check of p_commit
772: IF FND_API.TO_BOOLEAN(p_commit) THEN
773: --dbms_output.put_line('About to commit');
774: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
775: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to commit');
776: END IF;

Line 784: p_encoded => fnd_api.g_false

780: -- Standard call to get message count and if count is 1, get message info
781: FND_MSG_PUB.Count_And_Get
782: ( p_count => x_msg_count,
783: p_data => x_msg_data,
784: p_encoded => fnd_api.g_false
785: );
786:
787: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
788: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 792: WHEN FND_API.G_EXC_ERROR THEN

788: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
789: END IF;
790: --dbms_output.put_line('About to return ');
791: EXCEPTION
792: WHEN FND_API.G_EXC_ERROR THEN
793: ROLLBACK TO Associate_OSP_With_PO_pvt;
794: x_return_status := FND_API.G_RET_STS_ERROR;
795: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
796: p_data => x_msg_data,

Line 794: x_return_status := FND_API.G_RET_STS_ERROR;

790: --dbms_output.put_line('About to return ');
791: EXCEPTION
792: WHEN FND_API.G_EXC_ERROR THEN
793: ROLLBACK TO Associate_OSP_With_PO_pvt;
794: x_return_status := FND_API.G_RET_STS_ERROR;
795: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
796: p_data => x_msg_data,
797: p_encoded => fnd_api.g_false);
798:

Line 797: p_encoded => fnd_api.g_false);

793: ROLLBACK TO Associate_OSP_With_PO_pvt;
794: x_return_status := FND_API.G_RET_STS_ERROR;
795: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
796: p_data => x_msg_data,
797: p_encoded => fnd_api.g_false);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: ROLLBACK TO Associate_OSP_With_PO_pvt;
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

795: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
796: p_data => x_msg_data,
797: p_encoded => fnd_api.g_false);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: ROLLBACK TO Associate_OSP_With_PO_pvt;
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
803: p_data => x_msg_data,

Line 801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

797: p_encoded => fnd_api.g_false);
798:
799: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
800: ROLLBACK TO Associate_OSP_With_PO_pvt;
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
803: p_data => x_msg_data,
804: p_encoded => fnd_api.g_false);
805:

Line 804: p_encoded => fnd_api.g_false);

800: ROLLBACK TO Associate_OSP_With_PO_pvt;
801: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
802: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
803: p_data => x_msg_data,
804: p_encoded => fnd_api.g_false);
805:
806: WHEN OTHERS THEN
807: ROLLBACK TO Associate_OSP_With_PO_pvt;
808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

804: p_encoded => fnd_api.g_false);
805:
806: WHEN OTHERS THEN
807: ROLLBACK TO Associate_OSP_With_PO_pvt;
808: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
809: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
810: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
811: p_procedure_name => 'Associate_OSP_With_PO',
812: p_error_text => SUBSTR(SQLERRM,1,240));

Line 816: p_encoded => fnd_api.g_false);

812: p_error_text => SUBSTR(SQLERRM,1,240));
813: END IF;
814: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
815: p_data => x_msg_data,
816: p_encoded => fnd_api.g_false);
817:
818: END Associate_OSP_With_PO;
819:
820: ----------------------------------------

Line 833: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

829: -- Parameters :
830: --
831: -- Standard IN Parameters :
832: -- p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
834: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
835: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
836: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
837: -- p_module_type IN VARCHAR2 Default NULL.

Line 834: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

830: --
831: -- Standard IN Parameters :
832: -- p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
834: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
835: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
836: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
837: -- p_module_type IN VARCHAR2 Default NULL.
838: --

Line 835: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

831: -- Standard IN Parameters :
832: -- p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
834: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
835: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
836: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
837: -- p_module_type IN VARCHAR2 Default NULL.
838: --
839: -- Standard OUT Parameters :

Line 836: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

832: -- p_api_version IN NUMBER Required
833: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
834: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
835: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
836: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
837: -- p_module_type IN VARCHAR2 Default NULL.
838: --
839: -- Standard OUT Parameters :
840: -- x_return_status OUT VARCHAR2 Required

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

847: -- End of Comments.
848: PROCEDURE Associate_All_OSP_POs
849: (
850: p_api_version IN NUMBER,
851: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
852: p_commit IN VARCHAR2 := FND_API.G_FALSE,
853: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
854: p_default IN VARCHAR2 := FND_API.G_TRUE,
855: p_module_type IN VARCHAR2 := NULL,

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

848: PROCEDURE Associate_All_OSP_POs
849: (
850: p_api_version IN NUMBER,
851: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
852: p_commit IN VARCHAR2 := FND_API.G_FALSE,
853: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
854: p_default IN VARCHAR2 := FND_API.G_TRUE,
855: p_module_type IN VARCHAR2 := NULL,
856: x_return_status OUT NOCOPY VARCHAR2,

Line 853: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

849: (
850: p_api_version IN NUMBER,
851: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
852: p_commit IN VARCHAR2 := FND_API.G_FALSE,
853: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
854: p_default IN VARCHAR2 := FND_API.G_TRUE,
855: p_module_type IN VARCHAR2 := NULL,
856: x_return_status OUT NOCOPY VARCHAR2,
857: x_msg_count OUT NOCOPY NUMBER,

Line 854: p_default IN VARCHAR2 := FND_API.G_TRUE,

850: p_api_version IN NUMBER,
851: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
852: p_commit IN VARCHAR2 := FND_API.G_FALSE,
853: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
854: p_default IN VARCHAR2 := FND_API.G_TRUE,
855: p_module_type IN VARCHAR2 := NULL,
856: x_return_status OUT NOCOPY VARCHAR2,
857: x_msg_count OUT NOCOPY NUMBER,
858: x_msg_data OUT NOCOPY VARCHAR2) IS

Line 885: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

881: -- Standard start of API savepoint
882: SAVEPOINT Associate_All_OSP_POs_pvt;
883:
884: -- Standard call to check for call compatibility
885: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
886: G_PKG_NAME) THEN
887: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
888: END IF;
889:

Line 887: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

883:
884: -- Standard call to check for call compatibility
885: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
886: G_PKG_NAME) THEN
887: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
888: END IF;
889:
890: -- Initialize message list if p_init_msg_list is set to TRUE
891: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 891: IF FND_API.To_Boolean(p_init_msg_list) THEN

887: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
888: END IF;
889:
890: -- Initialize message list if p_init_msg_list is set to TRUE
891: IF FND_API.To_Boolean(p_init_msg_list) THEN
892: FND_MSG_PUB.Initialize;
893: END IF;
894:
895: -- Initialize API return status to success

Line 896: x_return_status := FND_API.G_RET_STS_SUCCESS;

892: FND_MSG_PUB.Initialize;
893: END IF;
894:
895: -- Initialize API return status to success
896: x_return_status := FND_API.G_RET_STS_SUCCESS;
897:
898: IF FND_API.to_boolean( p_default ) THEN
899: -- No special default settings required in this API
900: NULL;

Line 898: IF FND_API.to_boolean( p_default ) THEN

894:
895: -- Initialize API return status to success
896: x_return_status := FND_API.G_RET_STS_SUCCESS;
897:
898: IF FND_API.to_boolean( p_default ) THEN
899: -- No special default settings required in this API
900: NULL;
901: END IF;
902:

Line 925: RAISE FND_API.G_EXC_ERROR;

921: END IF;
922: -- Check Error Message stack.
923: x_msg_count := FND_MSG_PUB.count_msg;
924: IF x_msg_count > 0 THEN
925: RAISE FND_API.G_EXC_ERROR;
926: END IF;
927:
928: -- Standard check of p_commit
929: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 929: IF FND_API.TO_BOOLEAN(p_commit) THEN

925: RAISE FND_API.G_EXC_ERROR;
926: END IF;
927:
928: -- Standard check of p_commit
929: IF FND_API.TO_BOOLEAN(p_commit) THEN
930: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
931: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
932: END IF;
933: COMMIT WORK;

Line 940: p_encoded => fnd_api.g_false

936: -- Standard call to get message count and if count is 1, get message info
937: FND_MSG_PUB.Count_And_Get
938: ( p_count => x_msg_count,
939: p_data => x_msg_data,
940: p_encoded => fnd_api.g_false
941: );
942:
943: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
944: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 948: WHEN FND_API.G_EXC_ERROR THEN

944: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
945: END IF;
946:
947: EXCEPTION
948: WHEN FND_API.G_EXC_ERROR THEN
949: ROLLBACK TO Associate_All_OSP_POs_pvt;
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
952: p_data => x_msg_data,

Line 950: x_return_status := FND_API.G_RET_STS_ERROR;

946:
947: EXCEPTION
948: WHEN FND_API.G_EXC_ERROR THEN
949: ROLLBACK TO Associate_All_OSP_POs_pvt;
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
952: p_data => x_msg_data,
953: p_encoded => fnd_api.g_false);
954:

Line 953: p_encoded => fnd_api.g_false);

949: ROLLBACK TO Associate_All_OSP_POs_pvt;
950: x_return_status := FND_API.G_RET_STS_ERROR;
951: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
952: p_data => x_msg_data,
953: p_encoded => fnd_api.g_false);
954:
955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
956: ROLLBACK TO Associate_All_OSP_POs_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

951: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
952: p_data => x_msg_data,
953: p_encoded => fnd_api.g_false);
954:
955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
956: ROLLBACK TO Associate_All_OSP_POs_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
959: p_data => x_msg_data,

Line 957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

953: p_encoded => fnd_api.g_false);
954:
955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
956: ROLLBACK TO Associate_All_OSP_POs_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
959: p_data => x_msg_data,
960: p_encoded => fnd_api.g_false);
961:

Line 960: p_encoded => fnd_api.g_false);

956: ROLLBACK TO Associate_All_OSP_POs_pvt;
957: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
958: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
959: p_data => x_msg_data,
960: p_encoded => fnd_api.g_false);
961:
962: WHEN OTHERS THEN
963: ROLLBACK TO Associate_All_OSP_POs_pvt;
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

960: p_encoded => fnd_api.g_false);
961:
962: WHEN OTHERS THEN
963: ROLLBACK TO Associate_All_OSP_POs_pvt;
964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
965: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
966: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
967: p_procedure_name => 'Associate_All_OSP_POs',
968: p_error_text => SUBSTR(SQLERRM,1,240));

Line 972: p_encoded => fnd_api.g_false);

968: p_error_text => SUBSTR(SQLERRM,1,240));
969: END IF;
970: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
971: p_data => x_msg_data,
972: p_encoded => fnd_api.g_false);
973:
974: END Associate_All_OSP_POs;
975:
976: -- Start of Comments --

Line 990: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

986: -- Parameters :
987: --
988: -- Standard IN Parameters :
989: -- p_api_version IN NUMBER Required
990: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
991: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
992: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
993: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
994: -- p_module_type IN VARCHAR2 Default NULL.

Line 991: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

987: --
988: -- Standard IN Parameters :
989: -- p_api_version IN NUMBER Required
990: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
991: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
992: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
993: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
994: -- p_module_type IN VARCHAR2 Default NULL.
995: --

Line 992: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

988: -- Standard IN Parameters :
989: -- p_api_version IN NUMBER Required
990: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
991: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
992: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
993: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
994: -- p_module_type IN VARCHAR2 Default NULL.
995: --
996: -- Standard OUT Parameters :

Line 993: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

989: -- p_api_version IN NUMBER Required
990: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
991: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
992: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
993: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
994: -- p_module_type IN VARCHAR2 Default NULL.
995: --
996: -- Standard OUT Parameters :
997: -- x_return_status OUT VARCHAR2 Required

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

1009:
1010: PROCEDURE PO_Synch_All_OSPs
1011: (
1012: p_api_version IN NUMBER,
1013: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1014: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1015: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1016: p_default IN VARCHAR2 := FND_API.G_TRUE,
1017: p_module_type IN VARCHAR2 := NULL,

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

1010: PROCEDURE PO_Synch_All_OSPs
1011: (
1012: p_api_version IN NUMBER,
1013: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1014: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1015: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1016: p_default IN VARCHAR2 := FND_API.G_TRUE,
1017: p_module_type IN VARCHAR2 := NULL,
1018: p_concurrent_flag IN VARCHAR2 := 'N',

Line 1015: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

1011: (
1012: p_api_version IN NUMBER,
1013: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1014: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1015: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1016: p_default IN VARCHAR2 := FND_API.G_TRUE,
1017: p_module_type IN VARCHAR2 := NULL,
1018: p_concurrent_flag IN VARCHAR2 := 'N',
1019: x_return_status OUT NOCOPY VARCHAR2,

Line 1016: p_default IN VARCHAR2 := FND_API.G_TRUE,

1012: p_api_version IN NUMBER,
1013: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1014: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1015: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1016: p_default IN VARCHAR2 := FND_API.G_TRUE,
1017: p_module_type IN VARCHAR2 := NULL,
1018: p_concurrent_flag IN VARCHAR2 := 'N',
1019: x_return_status OUT NOCOPY VARCHAR2,
1020: x_msg_count OUT NOCOPY NUMBER,

Line 1038: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,

1034: -- Standard start of API savepoint
1035: --SAVEPOINT PO_Synch_All_OSPs_pvt;
1036:
1037: -- Standard call to check for call compatibility
1038: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1039: G_PKG_NAME) THEN
1040: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END IF;
1042:

Line 1040: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1036:
1037: -- Standard call to check for call compatibility
1038: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1039: G_PKG_NAME) THEN
1040: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END IF;
1042:
1043: -- Initialize message list if p_init_msg_list is set to TRUE
1044: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1044: IF FND_API.To_Boolean(p_init_msg_list) THEN

1040: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1041: END IF;
1042:
1043: -- Initialize message list if p_init_msg_list is set to TRUE
1044: IF FND_API.To_Boolean(p_init_msg_list) THEN
1045: FND_MSG_PUB.Initialize;
1046: END IF;
1047:
1048: -- Initialize API return status to success

Line 1049: x_return_status := FND_API.G_RET_STS_SUCCESS;

1045: FND_MSG_PUB.Initialize;
1046: END IF;
1047:
1048: -- Initialize API return status to success
1049: x_return_status := FND_API.G_RET_STS_SUCCESS;
1050:
1051: IF FND_API.to_boolean( p_default ) THEN
1052: -- No special default settings required in this API
1053: NULL;

Line 1051: IF FND_API.to_boolean( p_default ) THEN

1047:
1048: -- Initialize API return status to success
1049: x_return_status := FND_API.G_RET_STS_SUCCESS;
1050:
1051: IF FND_API.to_boolean( p_default ) THEN
1052: -- No special default settings required in this API
1053: NULL;
1054: END IF;
1055:

Line 1141: p_init_msg_list => FND_API.G_FALSE,

1137: IF (p_concurrent_flag = 'Y') THEN
1138: fnd_file.put_line(fnd_file.log, 'Completed PO Synch Process. About to start processing Requisitions by calling AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions.');
1139: END IF;
1140: AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions(p_api_version => 1.0,
1141: p_init_msg_list => FND_API.G_FALSE,
1142: p_commit => p_commit, --Commit this independent of other operations
1143: p_validation_level => p_validation_level,
1144: p_default => p_default,
1145: p_module_type => p_module_type,

Line 1158: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1154: END IF;
1155: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1156: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Returned from AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions, Return Status = ' || x_return_status);
1157: END IF;
1158: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1159: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1160: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1161: END IF;
1162: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

Line 1162: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

1158: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1159: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1160: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1161: END IF;
1162: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1163: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1164: ELSE
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1166: END IF;

Line 1163: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

1159: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1160: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1161: END IF;
1162: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1163: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1164: ELSE
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1166: END IF;
1167: END IF;

Line 1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error

1161: END IF;
1162: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1163: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1164: ELSE
1165: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1166: END IF;
1167: END IF;
1168: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1169: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Completed Processing Requisitions. About to check for errors.');

Line 1178: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place

1174: -- End changes by jaramana on January 7, 2008 for the Requisition ER 6034236
1175: -- Check Error Message stack.
1176: x_msg_count := FND_MSG_PUB.count_msg;
1177: IF x_msg_count > 0 THEN
1178: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place
1179: END IF;
1180:
1181: -- Standard check of p_commit
1182: -- No need to commit: Individual procedures commit or rollback

Line 1184: -- IF FND_API.TO_BOOLEAN(p_commit) THEN

1180:
1181: -- Standard check of p_commit
1182: -- No need to commit: Individual procedures commit or rollback
1183: -- within themselves.
1184: -- IF FND_API.TO_BOOLEAN(p_commit) THEN
1185: -- COMMIT WORK; --Note that commit might already have taken place
1186: -- END IF;
1187:
1188: -- Standard call to get message count and if count is 1, get message info

Line 1192: p_encoded => fnd_api.g_false

1188: -- Standard call to get message count and if count is 1, get message info
1189: FND_MSG_PUB.Count_And_Get
1190: ( p_count => x_msg_count,
1191: p_data => x_msg_data,
1192: p_encoded => fnd_api.g_false
1193: );
1194:
1195: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1196: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 1200: WHEN FND_API.G_EXC_ERROR THEN

1196: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
1197: END IF;
1198:
1199: EXCEPTION
1200: WHEN FND_API.G_EXC_ERROR THEN
1201: -- No need to rollback: Individual procedures commit or rollback
1202: -- within themselves.
1203: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1204: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1204: x_return_status := FND_API.G_RET_STS_ERROR;

1200: WHEN FND_API.G_EXC_ERROR THEN
1201: -- No need to rollback: Individual procedures commit or rollback
1202: -- within themselves.
1203: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1206: p_data => x_msg_data,
1207: p_encoded => fnd_api.g_false);
1208: IF (p_concurrent_flag = 'Y') THEN

Line 1207: p_encoded => fnd_api.g_false);

1203: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1204: x_return_status := FND_API.G_RET_STS_ERROR;
1205: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1206: p_data => x_msg_data,
1207: p_encoded => fnd_api.g_false);
1208: IF (p_concurrent_flag = 'Y') THEN
1209: fnd_file.put_line(fnd_file.log, 'Caught Execution Exception: ' || x_msg_data);
1210: END IF;
1211: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1211: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1212: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Caught Execution Exception: ' || x_msg_data);
1213: END IF;
1214:
1215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1216: -- No need to rollback: Individual procedures commit or rollback
1217: -- within themselves.
1218: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1215: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1216: -- No need to rollback: Individual procedures commit or rollback
1217: -- within themselves.
1218: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1220: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1221: p_data => x_msg_data,
1222: p_encoded => fnd_api.g_false);
1223: IF (p_concurrent_flag = 'Y') THEN

Line 1222: p_encoded => fnd_api.g_false);

1218: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1220: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1221: p_data => x_msg_data,
1222: p_encoded => fnd_api.g_false);
1223: IF (p_concurrent_flag = 'Y') THEN
1224: fnd_file.put_line(fnd_file.log, 'Caught Unexpected Exception: ' || x_msg_data);
1225: END IF;
1226: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1230: WHEN OTHERS THEN
1231: -- No need to rollback: Individual procedures commit or rollback
1232: -- within themselves.
1233: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1234: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1235: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1236: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1237: p_procedure_name => 'PO_Synch_All_OSPs',
1238: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1242: p_encoded => fnd_api.g_false);

1238: p_error_text => SUBSTR(SQLERRM,1,240));
1239: END IF;
1240: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1241: p_data => x_msg_data,
1242: p_encoded => fnd_api.g_false);
1243: IF (p_concurrent_flag = 'Y') THEN
1244: fnd_file.put_line(fnd_file.log, 'Caught Unknown Exception: ' || x_msg_data);
1245: END IF;
1246: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1274: IF (p_po_header_id IS NULL OR p_po_header_id = FND_API.G_MISS_NUM) THEN

1270: l_closed_status VARCHAR2(30);
1271: l_cancel_flag VARCHAR2(1);
1272:
1273: BEGIN
1274: IF (p_po_header_id IS NULL OR p_po_header_id = FND_API.G_MISS_NUM) THEN
1275: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_PO_ID_NULL');
1276: FND_MSG_PUB.ADD;
1277: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1278: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1396: IF (p_po_header_rec.OSP_ORDER_ID IS NULL OR p_po_header_rec.OSP_ORDER_ID = FND_API.G_MISS_NUM) THEN

1392: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1393: END IF;
1394:
1395: -- OSP Order Id
1396: IF (p_po_header_rec.OSP_ORDER_ID IS NULL OR p_po_header_rec.OSP_ORDER_ID = FND_API.G_MISS_NUM) THEN
1397: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_OSP_ID_NULL');
1398: FND_MSG_PUB.ADD;
1399: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1400: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1417: IF (p_po_header_rec.VENDOR_ID IS NULL OR p_po_header_rec.VENDOR_ID = FND_API.G_MISS_NUM) THEN

1413: CLOSE l_validate_osp_csr;
1414: END IF;
1415:
1416: -- Supplier
1417: IF (p_po_header_rec.VENDOR_ID IS NULL OR p_po_header_rec.VENDOR_ID = FND_API.G_MISS_NUM) THEN
1418: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SUPPLIER_ID_NULL');
1419: FND_MSG_PUB.ADD;
1420: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1421: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1438: IF (p_po_header_rec.VENDOR_SITE_ID IS NULL OR p_po_header_rec.VENDOR_SITE_ID = FND_API.G_MISS_NUM) THEN

1434: CLOSE l_validate_supplier_csr;
1435: END IF;
1436:
1437: -- Supplier Site
1438: IF (p_po_header_rec.VENDOR_SITE_ID IS NULL OR p_po_header_rec.VENDOR_SITE_ID = FND_API.G_MISS_NUM) THEN
1439: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SSITE_ID_NULL');
1440: FND_MSG_PUB.ADD;
1441: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1442: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1460: IF (p_po_header_rec.VENDOR_CONTACT_ID IS NOT NULL AND p_po_header_rec.VENDOR_CONTACT_ID <> FND_API.G_MISS_NUM) THEN

1456: END IF;
1457:
1458: -- Added by jaramana on May 27, 2005 for Inventory Service Order
1459: -- Vendor Contact (Optional)
1460: IF (p_po_header_rec.VENDOR_CONTACT_ID IS NOT NULL AND p_po_header_rec.VENDOR_CONTACT_ID <> FND_API.G_MISS_NUM) THEN
1461: OPEN l_validate_vendor_contact_csr(p_po_header_rec.VENDOR_CONTACT_ID, p_po_header_rec.VENDOR_SITE_ID);
1462: FETCH l_validate_vendor_contact_csr INTO l_dummy;
1463: IF (l_validate_vendor_contact_csr%NOTFOUND) THEN
1464: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_VCONTACT_INVALID');

Line 1476: IF (p_po_header_rec.BUYER_ID IS NULL OR p_po_header_rec.BUYER_ID = FND_API.G_MISS_NUM) THEN

1472: END IF;
1473: -- End Change for Inventory Service Order
1474:
1475: -- Buyer
1476: IF (p_po_header_rec.BUYER_ID IS NULL OR p_po_header_rec.BUYER_ID = FND_API.G_MISS_NUM) THEN
1477: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_BUYER_ID_NULL');
1478: FND_MSG_PUB.ADD;
1479: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1480: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1541: FND_MSG_PUB.ADD;
1542: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1543: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
1544: END IF;
1545: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1546: END IF;
1547:
1548: --dbms_output.put_line('p_po_line_tbl.COUNT = ' || p_po_line_tbl.COUNT);
1549: -- Non zero count

Line 1561: IF (p_po_line_tbl(i).ITEM_ID IS NOT NULL AND p_po_line_tbl(i).ITEM_ID <> FND_API.G_MISS_NUM) THEN

1557: END IF;
1558:
1559: FOR i IN p_po_line_tbl.FIRST..p_po_line_tbl.LAST LOOP
1560: -- Item
1561: IF (p_po_line_tbl(i).ITEM_ID IS NOT NULL AND p_po_line_tbl(i).ITEM_ID <> FND_API.G_MISS_NUM) THEN
1562: -- Non One-time Item
1563: -- Changed by jaramana on May 26, 2005 to fix Bug 4393374
1564: -- OPEN l_validate_item_csr(p_po_line_tbl(i).ITEM_ID, l_org_id);
1565: OPEN l_validate_item_csr(p_po_line_tbl(i).ITEM_ID, p_po_line_tbl(i).SHIP_TO_ORG_ID);

Line 1578: IF (TRIM(p_po_line_tbl(i).ITEM_DESCRIPTION) IS NULL OR p_po_line_tbl(i).ITEM_DESCRIPTION = FND_API.G_MISS_CHAR) THEN

1574: END IF;
1575: CLOSE l_validate_item_csr;
1576: ELSE
1577: -- One-time Item: Description is mandatory
1578: IF (TRIM(p_po_line_tbl(i).ITEM_DESCRIPTION) IS NULL OR p_po_line_tbl(i).ITEM_DESCRIPTION = FND_API.G_MISS_CHAR) THEN
1579: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_IDESC_NULL');
1580: FND_MSG_PUB.ADD;
1581: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1582: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1586: IF (TRIM(p_po_line_tbl(i).UOM_CODE) IS NULL OR p_po_line_tbl(i).UOM_CODE = FND_API.G_MISS_CHAR) THEN

1582: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1583: END IF;
1584: END IF;
1585: -- One-time Item: UOM is mandatory
1586: IF (TRIM(p_po_line_tbl(i).UOM_CODE) IS NULL OR p_po_line_tbl(i).UOM_CODE = FND_API.G_MISS_CHAR) THEN
1587: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_UOM_CODE_NULL');
1588: FND_MSG_PUB.ADD;
1589: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1590: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1596: IF (p_po_line_tbl(i).QUANTITY IS NULL OR p_po_line_tbl(i).QUANTITY = FND_API.G_MISS_NUM) THEN

1592: END IF;
1593: END IF;
1594:
1595: -- Quantity
1596: IF (p_po_line_tbl(i).QUANTITY IS NULL OR p_po_line_tbl(i).QUANTITY = FND_API.G_MISS_NUM) THEN
1597: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_QUANTITY_NULL');
1598: FND_MSG_PUB.ADD;
1599: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1600: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1614: IF (p_po_line_tbl(i).NEED_BY_DATE IS NULL OR p_po_line_tbl(i).NEED_BY_DATE = FND_API.G_MISS_DATE) THEN

1610: END IF;
1611: END IF;
1612:
1613: -- Need By Date
1614: IF (p_po_line_tbl(i).NEED_BY_DATE IS NULL OR p_po_line_tbl(i).NEED_BY_DATE = FND_API.G_MISS_DATE) THEN
1615: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_NEED_BY_DATE_NULL');
1616: FND_MSG_PUB.ADD;
1617: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1618: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1632: IF (p_po_line_tbl(i).SHIP_TO_ORG_ID IS NULL OR p_po_line_tbl(i).SHIP_TO_ORG_ID = FND_API.G_MISS_NUM) THEN

1628: END IF;
1629: END IF;
1630:
1631: -- Ship To Organization
1632: IF (p_po_line_tbl(i).SHIP_TO_ORG_ID IS NULL OR p_po_line_tbl(i).SHIP_TO_ORG_ID = FND_API.G_MISS_NUM) THEN
1633: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SHIP_TO_ORG_NULL');
1634: FND_MSG_PUB.ADD;
1635: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1636: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1646: IF (p_po_line_tbl(i).SHIP_TO_LOC_ID IS NULL OR p_po_line_tbl(i).SHIP_TO_LOC_ID = FND_API.G_MISS_NUM) THEN

1642: -- For workorder based lines, we get this from the workorder Department.
1643: -- Need to check if this field is mandatory for PO creation.
1644: -- Ship To Location
1645: /***
1646: IF (p_po_line_tbl(i).SHIP_TO_LOC_ID IS NULL OR p_po_line_tbl(i).SHIP_TO_LOC_ID = FND_API.G_MISS_NUM) THEN
1647: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SHIP_TO_LOC_NULL');
1648: FND_MSG_PUB.ADD;
1649: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1650: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1655: IF (p_po_line_tbl(i).PO_LINE_TYPE_ID IS NULL OR p_po_line_tbl(i).PO_LINE_TYPE_ID = FND_API.G_MISS_NUM) THEN

1651: END IF;
1652: END IF;
1653: ***/
1654: -- Line Type
1655: IF (p_po_line_tbl(i).PO_LINE_TYPE_ID IS NULL OR p_po_line_tbl(i).PO_LINE_TYPE_ID = FND_API.G_MISS_NUM) THEN
1656: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_LN_TYPE_ID_NULL');
1657: FND_MSG_PUB.ADD;
1658: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1659: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 2264: x_return_status := FND_API.G_RET_STS_SUCCESS;

2260: -- Standard start of API savepoint
2261: SAVEPOINT Handle_Cancelled_PO_Lines_pvt;
2262:
2263: -- Initialize API return status to success
2264: x_return_status := FND_API.G_RET_STS_SUCCESS;
2265:
2266: OPEN l_get_cancelled_po_lines_csr;
2267: LOOP
2268: FETCH l_get_cancelled_po_lines_csr INTO l_po_line_id,

Line 2281: p_init_msg_list => FND_API.G_FALSE,

2277: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2278: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2279: END IF;
2280: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2281: p_init_msg_list => FND_API.G_FALSE,
2282: p_commit => FND_API.G_FALSE,
2283: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2284: p_x_osp_order_rec => l_osp_order_rec,
2285: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2282: p_commit => FND_API.G_FALSE,

2278: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2279: END IF;
2280: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2281: p_init_msg_list => FND_API.G_FALSE,
2282: p_commit => FND_API.G_FALSE,
2283: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2284: p_x_osp_order_rec => l_osp_order_rec,
2285: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2286: x_return_status => l_return_status,

Line 2283: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2279: END IF;
2280: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2281: p_init_msg_list => FND_API.G_FALSE,
2282: p_commit => FND_API.G_FALSE,
2283: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2284: p_x_osp_order_rec => l_osp_order_rec,
2285: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2286: x_return_status => l_return_status,
2287: x_msg_count => l_msg_count,

Line 2289: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2285: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2286: x_return_status => l_return_status,
2287: x_msg_count => l_msg_count,
2288: x_msg_data => l_msg_data);
2289: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2290: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2291: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2292: END IF;
2293: l_commit_flag := false;

Line 2322: p_init_msg_list => FND_API.G_FALSE,

2318: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2319: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2320: END IF;
2321: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2322: p_init_msg_list => FND_API.G_FALSE,
2323: p_commit => FND_API.G_FALSE,
2324: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2325: p_x_osp_order_rec => l_osp_order_rec,
2326: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2323: p_commit => FND_API.G_FALSE,

2319: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2320: END IF;
2321: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2322: p_init_msg_list => FND_API.G_FALSE,
2323: p_commit => FND_API.G_FALSE,
2324: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2325: p_x_osp_order_rec => l_osp_order_rec,
2326: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2327: x_return_status => l_return_status,

Line 2324: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2320: END IF;
2321: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2322: p_init_msg_list => FND_API.G_FALSE,
2323: p_commit => FND_API.G_FALSE,
2324: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2325: p_x_osp_order_rec => l_osp_order_rec,
2326: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2327: x_return_status => l_return_status,
2328: x_msg_count => l_msg_count,

Line 2330: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2326: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2327: x_return_status => l_return_status,
2328: x_msg_count => l_msg_count,
2329: x_msg_data => l_msg_data);
2330: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2331: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2332: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2333: END IF;
2334: l_commit_flag := false;

Line 2338: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

2334: l_commit_flag := false;
2335: END IF;
2336: END IF;
2337: IF (l_commit_flag = false) THEN
2338: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2339: END IF;
2340: -- No errors in current procedure: Check only passed in flag
2341: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2342: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2341: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2337: IF (l_commit_flag = false) THEN
2338: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2339: END IF;
2340: -- No errors in current procedure: Check only passed in flag
2341: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2342: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2343: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2344: END IF;
2345: COMMIT WORK;

Line 2351: WHEN FND_API.G_EXC_ERROR THEN

2347: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2348: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2349: END IF;
2350: EXCEPTION
2351: WHEN FND_API.G_EXC_ERROR THEN
2352: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2353: x_return_status := FND_API.G_RET_STS_ERROR;
2354:
2355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2353: x_return_status := FND_API.G_RET_STS_ERROR;

2349: END IF;
2350: EXCEPTION
2351: WHEN FND_API.G_EXC_ERROR THEN
2352: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2353: x_return_status := FND_API.G_RET_STS_ERROR;
2354:
2355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2356: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2351: WHEN FND_API.G_EXC_ERROR THEN
2352: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2353: x_return_status := FND_API.G_RET_STS_ERROR;
2354:
2355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2356: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2358:
2359: WHEN OTHERS THEN

Line 2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2353: x_return_status := FND_API.G_RET_STS_ERROR;
2354:
2355: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2356: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2358:
2359: WHEN OTHERS THEN
2360: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2358:
2359: WHEN OTHERS THEN
2360: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2361: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2362: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2363: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2364: p_procedure_name => 'Handle_Cancelled_PO_Lines',
2365: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2414: x_return_status := FND_API.G_RET_STS_SUCCESS;

2410: -- Standard start of API savepoint
2411: SAVEPOINT Handle_Deleted_PO_Lines_pvt;
2412:
2413: -- Initialize API return status to success
2414: x_return_status := FND_API.G_RET_STS_SUCCESS;
2415:
2416: OPEN l_get_deleted_po_lines_csr;
2417: LOOP
2418: FETCH l_get_deleted_po_lines_csr INTO l_osp_order_id,

Line 2430: p_init_msg_list => FND_API.G_FALSE,

2426: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2427: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2428: END IF;
2429: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2430: p_init_msg_list => FND_API.G_FALSE,
2431: p_commit => FND_API.G_FALSE,
2432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2433: p_x_osp_order_rec => l_osp_order_rec,
2434: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2431: p_commit => FND_API.G_FALSE,

2427: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2428: END IF;
2429: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2430: p_init_msg_list => FND_API.G_FALSE,
2431: p_commit => FND_API.G_FALSE,
2432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2433: p_x_osp_order_rec => l_osp_order_rec,
2434: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2435: x_return_status => l_return_status,

Line 2432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2428: END IF;
2429: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2430: p_init_msg_list => FND_API.G_FALSE,
2431: p_commit => FND_API.G_FALSE,
2432: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2433: p_x_osp_order_rec => l_osp_order_rec,
2434: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2435: x_return_status => l_return_status,
2436: x_msg_count => l_msg_count,

Line 2438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2434: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2435: x_return_status => l_return_status,
2436: x_msg_count => l_msg_count,
2437: x_msg_data => l_msg_data);
2438: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2439: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2440: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2441: END IF;
2442: l_commit_flag := false;

Line 2470: p_init_msg_list => FND_API.G_FALSE,

2466: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2467: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2468: END IF;
2469: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2470: p_init_msg_list => FND_API.G_FALSE,
2471: p_commit => FND_API.G_FALSE,
2472: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2473: p_x_osp_order_rec => l_osp_order_rec,
2474: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2471: p_commit => FND_API.G_FALSE,

2467: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2468: END IF;
2469: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2470: p_init_msg_list => FND_API.G_FALSE,
2471: p_commit => FND_API.G_FALSE,
2472: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2473: p_x_osp_order_rec => l_osp_order_rec,
2474: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2475: x_return_status => l_return_status,

Line 2472: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2468: END IF;
2469: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2470: p_init_msg_list => FND_API.G_FALSE,
2471: p_commit => FND_API.G_FALSE,
2472: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2473: p_x_osp_order_rec => l_osp_order_rec,
2474: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2475: x_return_status => l_return_status,
2476: x_msg_count => l_msg_count,

Line 2478: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2474: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2475: x_return_status => l_return_status,
2476: x_msg_count => l_msg_count,
2477: x_msg_data => l_msg_data);
2478: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2479: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2480: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2481: END IF;
2482: l_commit_flag := false;

Line 2487: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

2483: END IF;
2484: END IF;
2485:
2486: IF (l_commit_flag = false) THEN
2487: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2488: END IF;
2489: -- No errors in current procedure: Check only passed in flag
2490: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2491: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2490: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2486: IF (l_commit_flag = false) THEN
2487: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2488: END IF;
2489: -- No errors in current procedure: Check only passed in flag
2490: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2491: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2492: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2493: END IF;
2494: COMMIT WORK;

Line 2500: WHEN FND_API.G_EXC_ERROR THEN

2496: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2497: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2498: END IF;
2499: EXCEPTION
2500: WHEN FND_API.G_EXC_ERROR THEN
2501: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2502: x_return_status := FND_API.G_RET_STS_ERROR;
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2502: x_return_status := FND_API.G_RET_STS_ERROR;

2498: END IF;
2499: EXCEPTION
2500: WHEN FND_API.G_EXC_ERROR THEN
2501: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2502: x_return_status := FND_API.G_RET_STS_ERROR;
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2500: WHEN FND_API.G_EXC_ERROR THEN
2501: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2502: x_return_status := FND_API.G_RET_STS_ERROR;
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2507:
2508: WHEN OTHERS THEN

Line 2506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2502: x_return_status := FND_API.G_RET_STS_ERROR;
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2507:
2508: WHEN OTHERS THEN
2509: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2506: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2507:
2508: WHEN OTHERS THEN
2509: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2510: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2511: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2512: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2513: p_procedure_name => 'Handle_Deleted_PO_Lines',
2514: p_error_text => SUBSTR(SQLERRM,1,240));

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

2541: l_osp_order_id NUMBER;
2542: l_po_header_id NUMBER;
2543: l_oe_header_id NUMBER;
2544: l_temp_num NUMBER := 0;
2545: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2546: l_msg_count NUMBER;
2547: l_msg_data VARCHAR2(1000);
2548:
2549: l_shipment_IDs_Tbl AHL_OSP_SHIPMENT_PUB.Ship_ID_Tbl_Type;

Line 2559: x_return_status := FND_API.G_RET_STS_SUCCESS;

2555: -- Standard start of API savepoint
2556: SAVEPOINT Handle_Approved_POs_pvt;
2557:
2558: -- Initialize API return status to success
2559: x_return_status := FND_API.G_RET_STS_SUCCESS;
2560:
2561: OPEN l_get_approved_pos_csr;
2562: LOOP
2563: FETCH l_get_approved_POs_csr INTO l_osp_order_id,

Line 2584: p_init_msg_list => FND_API.G_FALSE,

2580: IF (l_temp_num > 0) THEN
2581: -- Call Shipment API. This API will not throw an error or
2582: -- re-book if the shipment is already booked
2583: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2584: p_init_msg_list => FND_API.G_FALSE,
2585: p_commit => FND_API.G_FALSE,
2586: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2587: p_oe_header_tbl => l_shipment_IDs_Tbl,
2588: x_return_status => l_return_status,

Line 2585: p_commit => FND_API.G_FALSE,

2581: -- Call Shipment API. This API will not throw an error or
2582: -- re-book if the shipment is already booked
2583: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2584: p_init_msg_list => FND_API.G_FALSE,
2585: p_commit => FND_API.G_FALSE,
2586: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2587: p_oe_header_tbl => l_shipment_IDs_Tbl,
2588: x_return_status => l_return_status,
2589: x_msg_count => l_msg_count,

Line 2586: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2582: -- re-book if the shipment is already booked
2583: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2584: p_init_msg_list => FND_API.G_FALSE,
2585: p_commit => FND_API.G_FALSE,
2586: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2587: p_oe_header_tbl => l_shipment_IDs_Tbl,
2588: x_return_status => l_return_status,
2589: x_msg_count => l_msg_count,
2590: x_msg_data => l_msg_data);

Line 2594: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2590: x_msg_data => l_msg_data);
2591: END IF;
2592:
2593: x_return_status := l_return_status;
2594: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2595: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2596: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Did not succeed');
2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

Line 2598: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

2594: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2595: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2596: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Did not succeed');
2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2599: END IF;
2600: -- No errors in current procedure: Check only passed in flag
2601: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2602: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 2601: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2597: END IF;
2598: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2599: END IF;
2600: -- No errors in current procedure: Check only passed in flag
2601: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2602: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2603: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Succeeded. About to COMMIT work.');
2604: END IF;
2605: COMMIT WORK;

Line 2611: WHEN FND_API.G_EXC_ERROR THEN

2607: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2608: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2609: END IF;
2610: EXCEPTION
2611: WHEN FND_API.G_EXC_ERROR THEN
2612: ROLLBACK TO Handle_Approved_POs_pvt;
2613: x_return_status := FND_API.G_RET_STS_ERROR;
2614:
2615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2613: x_return_status := FND_API.G_RET_STS_ERROR;

2609: END IF;
2610: EXCEPTION
2611: WHEN FND_API.G_EXC_ERROR THEN
2612: ROLLBACK TO Handle_Approved_POs_pvt;
2613: x_return_status := FND_API.G_RET_STS_ERROR;
2614:
2615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2616: ROLLBACK TO Handle_Approved_POs_pvt;
2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2611: WHEN FND_API.G_EXC_ERROR THEN
2612: ROLLBACK TO Handle_Approved_POs_pvt;
2613: x_return_status := FND_API.G_RET_STS_ERROR;
2614:
2615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2616: ROLLBACK TO Handle_Approved_POs_pvt;
2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2618:
2619: WHEN OTHERS THEN

Line 2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2613: x_return_status := FND_API.G_RET_STS_ERROR;
2614:
2615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2616: ROLLBACK TO Handle_Approved_POs_pvt;
2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2618:
2619: WHEN OTHERS THEN
2620: ROLLBACK TO Handle_Approved_POs_pvt;
2621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2617: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2618:
2619: WHEN OTHERS THEN
2620: ROLLBACK TO Handle_Approved_POs_pvt;
2621: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2622: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2623: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2624: p_procedure_name => 'Handle_Approved_POs',
2625: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2688: x_return_status := FND_API.G_RET_STS_SUCCESS;

2684: -- Standard start of API savepoint
2685: SAVEPOINT Handle_Deleted_PO_Headers_pvt;
2686:
2687: -- Initialize API return status to success
2688: x_return_status := FND_API.G_RET_STS_SUCCESS;
2689: -- Get all OSP Orders for which the PO Header has been deleted
2690: OPEN get_po_deleted_osps_csr;
2691: LOOP
2692: FETCH get_po_deleted_osps_csr into l_osp_details_rec;

Line 2742: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2738: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2739: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Processed PO Deletion for ' || l_temp_num || ' OSP Orders');
2740: END IF;
2741:
2742: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2743: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2744: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2745: END IF;
2746: COMMIT WORK;

Line 2752: WHEN FND_API.G_EXC_ERROR THEN

2748: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2749: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2750: END IF;
2751: EXCEPTION
2752: WHEN FND_API.G_EXC_ERROR THEN
2753: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2754: x_return_status := FND_API.G_RET_STS_ERROR;
2755:
2756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2754: x_return_status := FND_API.G_RET_STS_ERROR;

2750: END IF;
2751: EXCEPTION
2752: WHEN FND_API.G_EXC_ERROR THEN
2753: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2754: x_return_status := FND_API.G_RET_STS_ERROR;
2755:
2756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2757: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2752: WHEN FND_API.G_EXC_ERROR THEN
2753: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2754: x_return_status := FND_API.G_RET_STS_ERROR;
2755:
2756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2757: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759:
2760: WHEN OTHERS THEN

Line 2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2754: x_return_status := FND_API.G_RET_STS_ERROR;
2755:
2756: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2757: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759:
2760: WHEN OTHERS THEN
2761: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2759:
2760: WHEN OTHERS THEN
2761: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2762: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2763: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2764: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2765: p_procedure_name => 'Handle_Deleted_PO_Headers',
2766: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2825: x_return_status := FND_API.G_RET_STS_SUCCESS;

2821: -- Standard start of API savepoint
2822: SAVEPOINT Handle_Deleted_SOs_pvt;
2823:
2824: -- Initialize API return status to success
2825: x_return_status := FND_API.G_RET_STS_SUCCESS;
2826:
2827: -- Get all OSP Orders for which the PO Header has been deleted
2828: OPEN get_so_deleted_osps_csr;
2829: LOOP

Line 2868: IF (FND_API.TO_BOOLEAN(p_commit)) THEN

2864: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Processed SO Deletion for ' || l_temp_num || ' OSP Orders');
2865: END IF;
2866:
2867: -- No errors in current procedure: Check only passed in flag
2868: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2869: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2870: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2871: END IF;
2872: COMMIT WORK;

Line 2878: WHEN FND_API.G_EXC_ERROR THEN

2874: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2875: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2876: END IF;
2877: EXCEPTION
2878: WHEN FND_API.G_EXC_ERROR THEN
2879: ROLLBACK TO Handle_Deleted_SOs_pvt;
2880: x_return_status := FND_API.G_RET_STS_ERROR;
2881:
2882: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2880: x_return_status := FND_API.G_RET_STS_ERROR;

2876: END IF;
2877: EXCEPTION
2878: WHEN FND_API.G_EXC_ERROR THEN
2879: ROLLBACK TO Handle_Deleted_SOs_pvt;
2880: x_return_status := FND_API.G_RET_STS_ERROR;
2881:
2882: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2883: ROLLBACK TO Handle_Deleted_SOs_pvt;
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2882: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2878: WHEN FND_API.G_EXC_ERROR THEN
2879: ROLLBACK TO Handle_Deleted_SOs_pvt;
2880: x_return_status := FND_API.G_RET_STS_ERROR;
2881:
2882: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2883: ROLLBACK TO Handle_Deleted_SOs_pvt;
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2885:
2886: WHEN OTHERS THEN

Line 2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2880: x_return_status := FND_API.G_RET_STS_ERROR;
2881:
2882: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2883: ROLLBACK TO Handle_Deleted_SOs_pvt;
2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2885:
2886: WHEN OTHERS THEN
2887: ROLLBACK TO Handle_Deleted_SOs_pvt;
2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2884: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2885:
2886: WHEN OTHERS THEN
2887: ROLLBACK TO Handle_Deleted_SOs_pvt;
2888: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2889: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2890: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2891: p_procedure_name => 'Handle_Deleted_Sales_Orders',
2892: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3007: RAISE FND_API.G_EXC_ERROR;

3003: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3004: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3005: END IF;
3006: CLOSE l_osp_line_dtls_csr;
3007: RAISE FND_API.G_EXC_ERROR;
3008: END IF;
3009: CLOSE l_osp_line_dtls_csr;
3010:
3011: -- Update cursor variable's PO Line ID

Line 3143: RAISE FND_API.G_EXC_ERROR;

3139: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3140: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3141: END IF;
3142: CLOSE l_osp_dtls_csr;
3143: RAISE FND_API.G_EXC_ERROR;
3144: END IF;
3145: CLOSE l_osp_dtls_csr;
3146:
3147: -- Update non-null local variables into cursor variable