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 239: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

235: -- Parameters :
236: --
237: -- Standard IN Parameters :
238: -- p_api_version IN NUMBER Required
239: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
240: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
241: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
242: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
243: -- p_module_type IN VARCHAR2 Default NULL.

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

236: --
237: -- Standard IN Parameters :
238: -- p_api_version IN NUMBER Required
239: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
240: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
241: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
242: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
243: -- p_module_type IN VARCHAR2 Default NULL.
244: --

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

237: -- Standard IN Parameters :
238: -- p_api_version IN NUMBER Required
239: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
240: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
241: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
242: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
243: -- p_module_type IN VARCHAR2 Default NULL.
244: --
245: -- Standard OUT Parameters :

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

238: -- p_api_version IN NUMBER Required
239: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
240: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
241: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
242: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
243: -- p_module_type IN VARCHAR2 Default NULL.
244: --
245: -- Standard OUT Parameters :
246: -- x_return_status OUT VARCHAR2 Required

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

265:
266: PROCEDURE Create_Purchase_Order
267: (
268: p_api_version IN NUMBER,
269: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
270: p_commit IN VARCHAR2 := FND_API.G_FALSE,
271: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
272: p_default IN VARCHAR2 := FND_API.G_TRUE,
273: p_module_type IN VARCHAR2 := NULL,

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

266: PROCEDURE Create_Purchase_Order
267: (
268: p_api_version IN NUMBER,
269: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
270: p_commit IN VARCHAR2 := FND_API.G_FALSE,
271: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
272: p_default IN VARCHAR2 := FND_API.G_TRUE,
273: p_module_type IN VARCHAR2 := NULL,
274: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given

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

267: (
268: p_api_version IN NUMBER,
269: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
270: p_commit IN VARCHAR2 := FND_API.G_FALSE,
271: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
272: p_default IN VARCHAR2 := FND_API.G_TRUE,
273: p_module_type IN VARCHAR2 := NULL,
274: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
275: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given

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

268: p_api_version IN NUMBER,
269: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
270: p_commit IN VARCHAR2 := FND_API.G_FALSE,
271: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
272: p_default IN VARCHAR2 := FND_API.G_TRUE,
273: p_module_type IN VARCHAR2 := NULL,
274: p_osp_order_id IN NUMBER := NULL, -- Required if Number is not given
275: p_osp_order_number IN NUMBER := NULL, -- Required if Id is not given
276: x_batch_id OUT NOCOPY NUMBER,

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

388: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
389: END IF;
390:
391: -- Standard call to check for call compatibility
392: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
393: G_PKG_NAME) THEN
394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:

Line 394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

390:
391: -- Standard call to check for call compatibility
392: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
393: G_PKG_NAME) THEN
394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
397: -- Initialize message list if p_init_msg_list is set to TRUE
398: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 398: IF FND_API.To_Boolean(p_init_msg_list) THEN

394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
395: END IF;
396:
397: -- Initialize message list if p_init_msg_list is set to TRUE
398: IF FND_API.To_Boolean(p_init_msg_list) THEN
399: FND_MSG_PUB.Initialize;
400: END IF;
401:
402: -- Initialize API return status to success

Line 403: x_return_status := FND_API.G_RET_STS_SUCCESS;

399: FND_MSG_PUB.Initialize;
400: END IF;
401:
402: -- Initialize API return status to success
403: x_return_status := FND_API.G_RET_STS_SUCCESS;
404:
405: -- Begin Processing
406:
407: IF FND_API.to_boolean( p_default ) THEN

Line 407: IF FND_API.to_boolean( p_default ) THEN

403: x_return_status := FND_API.G_RET_STS_SUCCESS;
404:
405: -- Begin Processing
406:
407: IF FND_API.to_boolean( p_default ) THEN
408: -- No special default settings required in this API
409: NULL;
410: END IF;
411:

Line 494: RAISE FND_API.G_EXC_ERROR;

490: --dbms_output.put_line('Validated Lines Table ');
491: -- Check Error Message stack.
492: x_msg_count := FND_MSG_PUB.count_msg;
493: IF x_msg_count > 0 THEN
494: RAISE FND_API.G_EXC_ERROR;
495: END IF;
496: --dbms_output.put_line('no errors : going onto insert into po_headers_interface ');
497: -- Insert Row into PO_HEADERS_INTERFACE
498: Insert_PO_Header(p_po_header_rec => l_po_header,

Line 549: RAISE FND_API.G_EXC_ERROR;

545: FND_MSG_PUB.ADD;
546: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
547: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
548: END IF;
549: RAISE FND_API.G_EXC_ERROR;
550: END IF;
551:
552: --dbms_output.put_line('Recording OSP Submission... ');
553: -- Update OSP Table with batch id, request id and interface header id

Line 572: RAISE FND_API.G_EXC_ERROR;

568: END IF;
569: -- Check Error Message stack.
570: x_msg_count := FND_MSG_PUB.count_msg;
571: IF x_msg_count > 0 THEN
572: RAISE FND_API.G_EXC_ERROR;
573: END IF;
574:
575: -- Log this transaction in the Log Table
576: AHL_OSP_UTIL_PKG.Log_Transaction(p_trans_type_code => G_TXN_TYPE_PO_CREATION,

Line 583: IF FND_API.TO_BOOLEAN(p_commit) THEN

579: p_dest_doc_id => l_batch_id,
580: p_dest_doc_type_code => G_DOC_TYPE_PO);
581:
582: -- Standard check of p_commit
583: IF FND_API.TO_BOOLEAN(p_commit) THEN
584: --dbms_output.put_line('About to commit work ');
585: COMMIT WORK;
586: END IF;
587:

Line 592: p_encoded => fnd_api.g_false

588: -- Standard call to get message count and if count is 1, get message info
589: FND_MSG_PUB.Count_And_Get
590: ( p_count => x_msg_count,
591: p_data => x_msg_data,
592: p_encoded => fnd_api.g_false
593: );
594:
595: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
596: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 601: WHEN FND_API.G_EXC_ERROR THEN

597: END IF;
598:
599: --dbms_output.put_line('About to return from procedure ');
600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN
602: ROLLBACK TO Create_Purchase_Order_pvt;
603: x_return_status := FND_API.G_RET_STS_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_ERROR;

599: --dbms_output.put_line('About to return from procedure ');
600: EXCEPTION
601: WHEN FND_API.G_EXC_ERROR THEN
602: ROLLBACK TO Create_Purchase_Order_pvt;
603: x_return_status := FND_API.G_RET_STS_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_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 FND_API.G_EXC_UNEXPECTED_ERROR THEN
610: ROLLBACK TO Create_Purchase_Order_pvt;

Line 609: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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 FND_API.G_EXC_UNEXPECTED_ERROR THEN
610: ROLLBACK TO Create_Purchase_Order_pvt;
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
613: p_data => x_msg_data,

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 FND_API.G_EXC_UNEXPECTED_ERROR THEN
610: ROLLBACK TO Create_Purchase_Order_pvt;
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
613: p_data => x_msg_data,
614: p_encoded => fnd_api.g_false);
615: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);

Line 614: p_encoded => fnd_api.g_false);

610: ROLLBACK TO Create_Purchase_Order_pvt;
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
613: p_data => x_msg_data,
614: p_encoded => fnd_api.g_false);
615: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
616:
617: WHEN OTHERS THEN
618: ROLLBACK TO Create_Purchase_Order_pvt;

Line 619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

615: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
616:
617: WHEN OTHERS THEN
618: ROLLBACK TO Create_Purchase_Order_pvt;
619: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
620: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
621: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
622: p_procedure_name => 'Create_Purchase_Order',
623: p_error_text => SUBSTR(SQLERRM,1,240));

Line 627: p_encoded => fnd_api.g_false);

623: p_error_text => SUBSTR(SQLERRM,1,240));
624: END IF;
625: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
626: p_data => x_msg_data,
627: p_encoded => fnd_api.g_false);
628: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
629:
630: END Create_Purchase_Order;
631:

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

643: -- Parameters :
644: --
645: -- Standard IN Parameters :
646: -- p_api_version IN NUMBER Required
647: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
648: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
649: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
650: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
651: -- p_module_type IN VARCHAR2 Default NULL.

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

644: --
645: -- Standard IN Parameters :
646: -- p_api_version IN NUMBER Required
647: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
648: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
649: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
650: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
651: -- p_module_type IN VARCHAR2 Default NULL.
652: --

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

645: -- Standard IN Parameters :
646: -- p_api_version IN NUMBER Required
647: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
648: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
649: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
650: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
651: -- p_module_type IN VARCHAR2 Default NULL.
652: --
653: -- Standard OUT Parameters :

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

646: -- p_api_version IN NUMBER Required
647: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
648: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
649: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
650: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
651: -- p_module_type IN VARCHAR2 Default NULL.
652: --
653: -- Standard OUT Parameters :
654: -- x_return_status OUT VARCHAR2 Required

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

668: -- End of Comments.
669: PROCEDURE Associate_OSP_With_PO
670: (
671: p_api_version IN NUMBER,
672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
673: p_commit IN VARCHAR2 := FND_API.G_FALSE,
674: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
675: p_default IN VARCHAR2 := FND_API.G_TRUE,
676: p_module_type IN VARCHAR2 := NULL,

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

669: PROCEDURE Associate_OSP_With_PO
670: (
671: p_api_version IN NUMBER,
672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
673: p_commit IN VARCHAR2 := FND_API.G_FALSE,
674: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
675: p_default IN VARCHAR2 := FND_API.G_TRUE,
676: p_module_type IN VARCHAR2 := NULL,
677: p_osp_order_id IN NUMBER,

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

670: (
671: p_api_version IN NUMBER,
672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
673: p_commit IN VARCHAR2 := FND_API.G_FALSE,
674: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
675: p_default IN VARCHAR2 := FND_API.G_TRUE,
676: p_module_type IN VARCHAR2 := NULL,
677: p_osp_order_id IN NUMBER,
678: x_po_header_id OUT NOCOPY NUMBER,

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

671: p_api_version IN NUMBER,
672: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
673: p_commit IN VARCHAR2 := FND_API.G_FALSE,
674: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
675: p_default IN VARCHAR2 := FND_API.G_TRUE,
676: p_module_type IN VARCHAR2 := NULL,
677: p_osp_order_id IN NUMBER,
678: x_po_header_id OUT NOCOPY NUMBER,
679: x_return_status OUT NOCOPY VARCHAR2,

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

701: -- Standard start of API savepoint
702: SAVEPOINT Associate_OSP_With_PO_pvt;
703:
704: -- Standard call to check for call compatibility
705: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
706: G_PKG_NAME) THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:

Line 707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

703:
704: -- Standard call to check for call compatibility
705: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
706: G_PKG_NAME) THEN
707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:
710: -- Initialize message list if p_init_msg_list is set to TRUE
711: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 711: IF FND_API.To_Boolean(p_init_msg_list) THEN

707: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
708: END IF;
709:
710: -- Initialize message list if p_init_msg_list is set to TRUE
711: IF FND_API.To_Boolean(p_init_msg_list) THEN
712: FND_MSG_PUB.Initialize;
713: END IF;
714:
715: -- Initialize API return status to success

Line 716: x_return_status := FND_API.G_RET_STS_SUCCESS;

712: FND_MSG_PUB.Initialize;
713: END IF;
714:
715: -- Initialize API return status to success
716: x_return_status := FND_API.G_RET_STS_SUCCESS;
717:
718: IF FND_API.to_boolean( p_default ) THEN
719: -- No special default settings required in this API
720: NULL;

Line 718: IF FND_API.to_boolean( p_default ) THEN

714:
715: -- Initialize API return status to success
716: x_return_status := FND_API.G_RET_STS_SUCCESS;
717:
718: IF FND_API.to_boolean( p_default ) THEN
719: -- No special default settings required in this API
720: NULL;
721: END IF;
722:

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

721: END IF;
722:
723: --dbms_output.put_line('Beginning Processing... ');
724: -- Validate OSP Order Id
725: IF (p_osp_order_id IS NULL OR p_osp_order_id = FND_API.G_MISS_NUM) THEN
726: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_OSP_ID_NULL');
727: FND_MSG_PUB.ADD;
728: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
729: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 732: RAISE FND_API.G_EXC_ERROR;

728: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
729: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
730: END IF;
731: --dbms_output.put_line('OSP Order Id is null');
732: RAISE FND_API.G_EXC_ERROR;
733: ELSE
734: OPEN l_validate_osp_csr(p_osp_order_id);
735: FETCH l_validate_osp_csr INTO l_po_header_id;
736: IF (l_validate_osp_csr%NOTFOUND) THEN

Line 745: RAISE FND_API.G_EXC_ERROR;

741: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
742: END IF;
743: CLOSE l_validate_osp_csr;
744: --dbms_output.put_line('OSP Order Id ' || p_osp_order_id || ' is invalid');
745: RAISE FND_API.G_EXC_ERROR;
746: ELSIF (l_po_header_id IS NOT NULL) THEN
747: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
748: 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);
749: END IF;

Line 757: RAISE FND_API.G_EXC_ERROR;

753: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_PO_HDR_ASSCTD');
754: FND_MESSAGE.Set_Token('OSP_ID', p_osp_order_id);
755: FND_MSG_PUB.ADD;
756: CLOSE l_validate_osp_csr;
757: RAISE FND_API.G_EXC_ERROR;
758: */
759: ELSE
760: -- Make the association
761: --dbms_output.put_line('About to Make Association ');

Line 776: RAISE FND_API.G_EXC_ERROR;

772: --dbms_output.put_line('Completed Processing. Checking for errors ');
773: -- Check Error Message stack.
774: x_msg_count := FND_MSG_PUB.count_msg;
775: IF x_msg_count > 0 THEN
776: RAISE FND_API.G_EXC_ERROR;
777: END IF;
778:
779: -- Standard check of p_commit
780: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 780: IF FND_API.TO_BOOLEAN(p_commit) THEN

776: RAISE FND_API.G_EXC_ERROR;
777: END IF;
778:
779: -- Standard check of p_commit
780: IF FND_API.TO_BOOLEAN(p_commit) THEN
781: --dbms_output.put_line('About to commit');
782: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
783: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to commit');
784: END IF;

Line 792: p_encoded => fnd_api.g_false

788: -- Standard call to get message count and if count is 1, get message info
789: FND_MSG_PUB.Count_And_Get
790: ( p_count => x_msg_count,
791: p_data => x_msg_data,
792: p_encoded => fnd_api.g_false
793: );
794:
795: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
796: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 800: WHEN FND_API.G_EXC_ERROR THEN

796: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
797: END IF;
798: --dbms_output.put_line('About to return ');
799: EXCEPTION
800: WHEN FND_API.G_EXC_ERROR THEN
801: ROLLBACK TO Associate_OSP_With_PO_pvt;
802: x_return_status := FND_API.G_RET_STS_ERROR;
803: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
804: p_data => x_msg_data,

Line 802: x_return_status := FND_API.G_RET_STS_ERROR;

798: --dbms_output.put_line('About to return ');
799: EXCEPTION
800: WHEN FND_API.G_EXC_ERROR THEN
801: ROLLBACK TO Associate_OSP_With_PO_pvt;
802: x_return_status := FND_API.G_RET_STS_ERROR;
803: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
804: p_data => x_msg_data,
805: p_encoded => fnd_api.g_false);
806:

Line 805: p_encoded => fnd_api.g_false);

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

Line 807: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

803: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
804: p_data => x_msg_data,
805: p_encoded => fnd_api.g_false);
806:
807: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
808: ROLLBACK TO Associate_OSP_With_PO_pvt;
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
811: p_data => x_msg_data,

Line 809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

805: p_encoded => fnd_api.g_false);
806:
807: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
808: ROLLBACK TO Associate_OSP_With_PO_pvt;
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
811: p_data => x_msg_data,
812: p_encoded => fnd_api.g_false);
813:

Line 812: p_encoded => fnd_api.g_false);

808: ROLLBACK TO Associate_OSP_With_PO_pvt;
809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
810: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
811: p_data => x_msg_data,
812: p_encoded => fnd_api.g_false);
813:
814: WHEN OTHERS THEN
815: ROLLBACK TO Associate_OSP_With_PO_pvt;
816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

812: p_encoded => fnd_api.g_false);
813:
814: WHEN OTHERS THEN
815: ROLLBACK TO Associate_OSP_With_PO_pvt;
816: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
817: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
818: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
819: p_procedure_name => 'Associate_OSP_With_PO',
820: p_error_text => SUBSTR(SQLERRM,1,240));

Line 824: p_encoded => fnd_api.g_false);

820: p_error_text => SUBSTR(SQLERRM,1,240));
821: END IF;
822: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
823: p_data => x_msg_data,
824: p_encoded => fnd_api.g_false);
825:
826: END Associate_OSP_With_PO;
827:
828: ----------------------------------------

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

837: -- Parameters :
838: --
839: -- Standard IN Parameters :
840: -- p_api_version IN NUMBER Required
841: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
842: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
843: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
844: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
845: -- p_module_type IN VARCHAR2 Default NULL.

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

838: --
839: -- Standard IN Parameters :
840: -- p_api_version IN NUMBER Required
841: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
842: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
843: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
844: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
845: -- p_module_type IN VARCHAR2 Default NULL.
846: --

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

839: -- Standard IN Parameters :
840: -- p_api_version IN NUMBER Required
841: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
842: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
843: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
844: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
845: -- p_module_type IN VARCHAR2 Default NULL.
846: --
847: -- Standard OUT Parameters :

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

840: -- p_api_version IN NUMBER Required
841: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
842: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
843: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
844: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
845: -- p_module_type IN VARCHAR2 Default NULL.
846: --
847: -- Standard OUT Parameters :
848: -- x_return_status OUT VARCHAR2 Required

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

855: -- End of Comments.
856: PROCEDURE Associate_All_OSP_POs
857: (
858: p_api_version IN NUMBER,
859: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
860: p_commit IN VARCHAR2 := FND_API.G_FALSE,
861: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
862: p_default IN VARCHAR2 := FND_API.G_TRUE,
863: p_module_type IN VARCHAR2 := NULL,

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

856: PROCEDURE Associate_All_OSP_POs
857: (
858: p_api_version IN NUMBER,
859: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
860: p_commit IN VARCHAR2 := FND_API.G_FALSE,
861: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
862: p_default IN VARCHAR2 := FND_API.G_TRUE,
863: p_module_type IN VARCHAR2 := NULL,
864: x_return_status OUT NOCOPY VARCHAR2,

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

857: (
858: p_api_version IN NUMBER,
859: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
860: p_commit IN VARCHAR2 := FND_API.G_FALSE,
861: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
862: p_default IN VARCHAR2 := FND_API.G_TRUE,
863: p_module_type IN VARCHAR2 := NULL,
864: x_return_status OUT NOCOPY VARCHAR2,
865: x_msg_count OUT NOCOPY NUMBER,

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

858: p_api_version IN NUMBER,
859: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
860: p_commit IN VARCHAR2 := FND_API.G_FALSE,
861: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
862: p_default IN VARCHAR2 := FND_API.G_TRUE,
863: p_module_type IN VARCHAR2 := NULL,
864: x_return_status OUT NOCOPY VARCHAR2,
865: x_msg_count OUT NOCOPY NUMBER,
866: x_msg_data OUT NOCOPY VARCHAR2) IS

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

889: -- Standard start of API savepoint
890: SAVEPOINT Associate_All_OSP_POs_pvt;
891:
892: -- Standard call to check for call compatibility
893: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
894: G_PKG_NAME) THEN
895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
896: END IF;
897:

Line 895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

891:
892: -- Standard call to check for call compatibility
893: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
894: G_PKG_NAME) THEN
895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
896: END IF;
897:
898: -- Initialize message list if p_init_msg_list is set to TRUE
899: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 899: IF FND_API.To_Boolean(p_init_msg_list) THEN

895: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
896: END IF;
897:
898: -- Initialize message list if p_init_msg_list is set to TRUE
899: IF FND_API.To_Boolean(p_init_msg_list) THEN
900: FND_MSG_PUB.Initialize;
901: END IF;
902:
903: -- Initialize API return status to success

Line 904: x_return_status := FND_API.G_RET_STS_SUCCESS;

900: FND_MSG_PUB.Initialize;
901: END IF;
902:
903: -- Initialize API return status to success
904: x_return_status := FND_API.G_RET_STS_SUCCESS;
905:
906: IF FND_API.to_boolean( p_default ) THEN
907: -- No special default settings required in this API
908: NULL;

Line 906: IF FND_API.to_boolean( p_default ) THEN

902:
903: -- Initialize API return status to success
904: x_return_status := FND_API.G_RET_STS_SUCCESS;
905:
906: IF FND_API.to_boolean( p_default ) THEN
907: -- No special default settings required in this API
908: NULL;
909: END IF;
910:

Line 933: RAISE FND_API.G_EXC_ERROR;

929: END IF;
930: -- Check Error Message stack.
931: x_msg_count := FND_MSG_PUB.count_msg;
932: IF x_msg_count > 0 THEN
933: RAISE FND_API.G_EXC_ERROR;
934: END IF;
935:
936: -- Standard check of p_commit
937: IF FND_API.TO_BOOLEAN(p_commit) THEN

Line 937: IF FND_API.TO_BOOLEAN(p_commit) THEN

933: RAISE FND_API.G_EXC_ERROR;
934: END IF;
935:
936: -- Standard check of p_commit
937: IF FND_API.TO_BOOLEAN(p_commit) THEN
938: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
939: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
940: END IF;
941: COMMIT WORK;

Line 948: p_encoded => fnd_api.g_false

944: -- Standard call to get message count and if count is 1, get message info
945: FND_MSG_PUB.Count_And_Get
946: ( p_count => x_msg_count,
947: p_data => x_msg_data,
948: p_encoded => fnd_api.g_false
949: );
950:
951: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
952: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 956: WHEN FND_API.G_EXC_ERROR THEN

952: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
953: END IF;
954:
955: EXCEPTION
956: WHEN FND_API.G_EXC_ERROR THEN
957: ROLLBACK TO Associate_All_OSP_POs_pvt;
958: x_return_status := FND_API.G_RET_STS_ERROR;
959: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
960: p_data => x_msg_data,

Line 958: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 961: p_encoded => fnd_api.g_false);

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

Line 963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

959: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
960: p_data => x_msg_data,
961: p_encoded => fnd_api.g_false);
962:
963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
964: ROLLBACK TO Associate_All_OSP_POs_pvt;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
967: p_data => x_msg_data,

Line 965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

961: p_encoded => fnd_api.g_false);
962:
963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
964: ROLLBACK TO Associate_All_OSP_POs_pvt;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
967: p_data => x_msg_data,
968: p_encoded => fnd_api.g_false);
969:

Line 968: p_encoded => fnd_api.g_false);

964: ROLLBACK TO Associate_All_OSP_POs_pvt;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
967: p_data => x_msg_data,
968: p_encoded => fnd_api.g_false);
969:
970: WHEN OTHERS THEN
971: ROLLBACK TO Associate_All_OSP_POs_pvt;
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

968: p_encoded => fnd_api.g_false);
969:
970: WHEN OTHERS THEN
971: ROLLBACK TO Associate_All_OSP_POs_pvt;
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
974: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
975: p_procedure_name => 'Associate_All_OSP_POs',
976: p_error_text => SUBSTR(SQLERRM,1,240));

Line 980: p_encoded => fnd_api.g_false);

976: p_error_text => SUBSTR(SQLERRM,1,240));
977: END IF;
978: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
979: p_data => x_msg_data,
980: p_encoded => fnd_api.g_false);
981:
982: END Associate_All_OSP_POs;
983:
984: -- Start of Comments --

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

994: -- Parameters :
995: --
996: -- Standard IN Parameters :
997: -- p_api_version IN NUMBER Required
998: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1000: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1001: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1002: -- p_module_type IN VARCHAR2 Default NULL.

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

995: --
996: -- Standard IN Parameters :
997: -- p_api_version IN NUMBER Required
998: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1000: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1001: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1002: -- p_module_type IN VARCHAR2 Default NULL.
1003: --

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

996: -- Standard IN Parameters :
997: -- p_api_version IN NUMBER Required
998: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1000: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1001: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1002: -- p_module_type IN VARCHAR2 Default NULL.
1003: --
1004: -- Standard OUT Parameters :

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

997: -- p_api_version IN NUMBER Required
998: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
999: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1000: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1001: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1002: -- p_module_type IN VARCHAR2 Default NULL.
1003: --
1004: -- Standard OUT Parameters :
1005: -- x_return_status OUT VARCHAR2 Required

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

1017:
1018: PROCEDURE PO_Synch_All_OSPs
1019: (
1020: p_api_version IN NUMBER,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1023: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1024: p_default IN VARCHAR2 := FND_API.G_TRUE,
1025: p_module_type IN VARCHAR2 := NULL,

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

1018: PROCEDURE PO_Synch_All_OSPs
1019: (
1020: p_api_version IN NUMBER,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1023: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1024: p_default IN VARCHAR2 := FND_API.G_TRUE,
1025: p_module_type IN VARCHAR2 := NULL,
1026: p_concurrent_flag IN VARCHAR2 := 'N',

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

1019: (
1020: p_api_version IN NUMBER,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1023: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1024: p_default IN VARCHAR2 := FND_API.G_TRUE,
1025: p_module_type IN VARCHAR2 := NULL,
1026: p_concurrent_flag IN VARCHAR2 := 'N',
1027: x_return_status OUT NOCOPY VARCHAR2,

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

1020: p_api_version IN NUMBER,
1021: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1022: p_commit IN VARCHAR2 := FND_API.G_FALSE,
1023: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1024: p_default IN VARCHAR2 := FND_API.G_TRUE,
1025: p_module_type IN VARCHAR2 := NULL,
1026: p_concurrent_flag IN VARCHAR2 := 'N',
1027: x_return_status OUT NOCOPY VARCHAR2,
1028: x_msg_count OUT NOCOPY NUMBER,

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

1042: -- Standard start of API savepoint
1043: --SAVEPOINT PO_Synch_All_OSPs_pvt;
1044:
1045: -- Standard call to check for call compatibility
1046: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1047: G_PKG_NAME) THEN
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050:

Line 1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1044:
1045: -- Standard call to check for call compatibility
1046: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
1047: G_PKG_NAME) THEN
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050:
1051: -- Initialize message list if p_init_msg_list is set to TRUE
1052: IF FND_API.To_Boolean(p_init_msg_list) THEN

Line 1052: IF FND_API.To_Boolean(p_init_msg_list) THEN

1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050:
1051: -- Initialize message list if p_init_msg_list is set to TRUE
1052: IF FND_API.To_Boolean(p_init_msg_list) THEN
1053: FND_MSG_PUB.Initialize;
1054: END IF;
1055:
1056: -- Initialize API return status to success

Line 1057: x_return_status := FND_API.G_RET_STS_SUCCESS;

1053: FND_MSG_PUB.Initialize;
1054: END IF;
1055:
1056: -- Initialize API return status to success
1057: x_return_status := FND_API.G_RET_STS_SUCCESS;
1058:
1059: IF FND_API.to_boolean( p_default ) THEN
1060: -- No special default settings required in this API
1061: NULL;

Line 1059: IF FND_API.to_boolean( p_default ) THEN

1055:
1056: -- Initialize API return status to success
1057: x_return_status := FND_API.G_RET_STS_SUCCESS;
1058:
1059: IF FND_API.to_boolean( p_default ) THEN
1060: -- No special default settings required in this API
1061: NULL;
1062: END IF;
1063:

Line 1149: p_init_msg_list => FND_API.G_FALSE,

1145: IF (p_concurrent_flag = 'Y') THEN
1146: 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.');
1147: END IF;
1148: AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions(p_api_version => 1.0,
1149: p_init_msg_list => FND_API.G_FALSE,
1150: p_commit => p_commit, --Commit this independent of other operations
1151: p_validation_level => p_validation_level,
1152: p_default => p_default,
1153: p_module_type => p_module_type,

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

1162: END IF;
1163: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1164: 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);
1165: END IF;
1166: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1167: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1169: END IF;
1170: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN

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

1166: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1167: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1169: END IF;
1170: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1171: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1172: ELSE
1173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1174: END IF;

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

1167: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_PO_REQ_PVT.PO_Synch_All_Requisitions Did not succeed');
1169: END IF;
1170: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1171: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1172: ELSE
1173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1174: END IF;
1175: END IF;

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

1169: END IF;
1170: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1171: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
1172: ELSE
1173: RAISE FND_API.G_EXC_UNEXPECTED_ERROR; -- Rollback and return error
1174: END IF;
1175: END IF;
1176: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1177: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Completed Processing Requisitions. About to check for errors.');

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

1182: -- End changes by jaramana on January 7, 2008 for the Requisition ER 6034236
1183: -- Check Error Message stack.
1184: x_msg_count := FND_MSG_PUB.count_msg;
1185: IF x_msg_count > 0 THEN
1186: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place
1187: END IF;
1188:
1189: -- Standard check of p_commit
1190: -- No need to commit: Individual procedures commit or rollback

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

1188:
1189: -- Standard check of p_commit
1190: -- No need to commit: Individual procedures commit or rollback
1191: -- within themselves.
1192: -- IF FND_API.TO_BOOLEAN(p_commit) THEN
1193: -- COMMIT WORK; --Note that commit might already have taken place
1194: -- END IF;
1195:
1196: -- Standard call to get message count and if count is 1, get message info

Line 1200: p_encoded => fnd_api.g_false

1196: -- Standard call to get message count and if count is 1, get message info
1197: FND_MSG_PUB.Count_And_Get
1198: ( p_count => x_msg_count,
1199: p_data => x_msg_data,
1200: p_encoded => fnd_api.g_false
1201: );
1202:
1203: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1204: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');

Line 1208: WHEN FND_API.G_EXC_ERROR THEN

1204: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
1205: END IF;
1206:
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: -- No need to rollback: Individual procedures commit or rollback
1210: -- within themselves.
1211: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1212: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1212: x_return_status := FND_API.G_RET_STS_ERROR;

1208: WHEN FND_API.G_EXC_ERROR THEN
1209: -- No need to rollback: Individual procedures commit or rollback
1210: -- within themselves.
1211: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1214: p_data => x_msg_data,
1215: p_encoded => fnd_api.g_false);
1216: IF (p_concurrent_flag = 'Y') THEN

Line 1215: p_encoded => fnd_api.g_false);

1211: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1212: x_return_status := FND_API.G_RET_STS_ERROR;
1213: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1214: p_data => x_msg_data,
1215: p_encoded => fnd_api.g_false);
1216: IF (p_concurrent_flag = 'Y') THEN
1217: fnd_file.put_line(fnd_file.log, 'Caught Execution Exception: ' || x_msg_data);
1218: END IF;
1219: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1219: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1220: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Caught Execution Exception: ' || x_msg_data);
1221: END IF;
1222:
1223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1224: -- No need to rollback: Individual procedures commit or rollback
1225: -- within themselves.
1226: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1223: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1224: -- No need to rollback: Individual procedures commit or rollback
1225: -- within themselves.
1226: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1228: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1229: p_data => x_msg_data,
1230: p_encoded => fnd_api.g_false);
1231: IF (p_concurrent_flag = 'Y') THEN

Line 1230: p_encoded => fnd_api.g_false);

1226: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1228: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1229: p_data => x_msg_data,
1230: p_encoded => fnd_api.g_false);
1231: IF (p_concurrent_flag = 'Y') THEN
1232: fnd_file.put_line(fnd_file.log, 'Caught Unexpected Exception: ' || x_msg_data);
1233: END IF;
1234: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

Line 1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1238: WHEN OTHERS THEN
1239: -- No need to rollback: Individual procedures commit or rollback
1240: -- within themselves.
1241: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
1242: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1243: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1244: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1245: p_procedure_name => 'PO_Synch_All_OSPs',
1246: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1250: p_encoded => fnd_api.g_false);

1246: p_error_text => SUBSTR(SQLERRM,1,240));
1247: END IF;
1248: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1249: p_data => x_msg_data,
1250: p_encoded => fnd_api.g_false);
1251: IF (p_concurrent_flag = 'Y') THEN
1252: fnd_file.put_line(fnd_file.log, 'Caught Unknown Exception: ' || x_msg_data);
1253: END IF;
1254: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

1278: l_closed_status VARCHAR2(30);
1279: l_cancel_flag VARCHAR2(1);
1280:
1281: BEGIN
1282: IF (p_po_header_id IS NULL OR p_po_header_id = FND_API.G_MISS_NUM) THEN
1283: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_PO_ID_NULL');
1284: FND_MSG_PUB.ADD;
1285: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1286: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

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

1400: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
1401: END IF;
1402:
1403: -- OSP Order Id
1404: IF (p_po_header_rec.OSP_ORDER_ID IS NULL OR p_po_header_rec.OSP_ORDER_ID = FND_API.G_MISS_NUM) THEN
1405: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_OSP_ID_NULL');
1406: FND_MSG_PUB.ADD;
1407: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1408: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

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

1421: CLOSE l_validate_osp_csr;
1422: END IF;
1423:
1424: -- Supplier
1425: IF (p_po_header_rec.VENDOR_ID IS NULL OR p_po_header_rec.VENDOR_ID = FND_API.G_MISS_NUM) THEN
1426: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SUPPLIER_ID_NULL');
1427: FND_MSG_PUB.ADD;
1428: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1429: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

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

1442: CLOSE l_validate_supplier_csr;
1443: END IF;
1444:
1445: -- Supplier Site
1446: IF (p_po_header_rec.VENDOR_SITE_ID IS NULL OR p_po_header_rec.VENDOR_SITE_ID = FND_API.G_MISS_NUM) THEN
1447: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SSITE_ID_NULL');
1448: FND_MSG_PUB.ADD;
1449: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1450: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1468: 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

1464: END IF;
1465:
1466: -- Added by jaramana on May 27, 2005 for Inventory Service Order
1467: -- Vendor Contact (Optional)
1468: 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
1469: OPEN l_validate_vendor_contact_csr(p_po_header_rec.VENDOR_CONTACT_ID, p_po_header_rec.VENDOR_SITE_ID);
1470: FETCH l_validate_vendor_contact_csr INTO l_dummy;
1471: IF (l_validate_vendor_contact_csr%NOTFOUND) THEN
1472: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_VCONTACT_INVALID');

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

1480: END IF;
1481: -- End Change for Inventory Service Order
1482:
1483: -- Buyer
1484: IF (p_po_header_rec.BUYER_ID IS NULL OR p_po_header_rec.BUYER_ID = FND_API.G_MISS_NUM) THEN
1485: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_BUYER_ID_NULL');
1486: FND_MSG_PUB.ADD;
1487: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1488: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1549: FND_MSG_PUB.ADD;
1550: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1551: FND_LOG.MESSAGE(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, FALSE);
1552: END IF;
1553: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1554: END IF;
1555:
1556: --dbms_output.put_line('p_po_line_tbl.COUNT = ' || p_po_line_tbl.COUNT);
1557: -- Non zero count

Line 1569: 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

1565: END IF;
1566:
1567: FOR i IN p_po_line_tbl.FIRST..p_po_line_tbl.LAST LOOP
1568: -- Item
1569: 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
1570: -- Non One-time Item
1571: -- Changed by jaramana on May 26, 2005 to fix Bug 4393374
1572: -- OPEN l_validate_item_csr(p_po_line_tbl(i).ITEM_ID, l_org_id);
1573: OPEN l_validate_item_csr(p_po_line_tbl(i).ITEM_ID, p_po_line_tbl(i).SHIP_TO_ORG_ID);

Line 1586: 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

1582: END IF;
1583: CLOSE l_validate_item_csr;
1584: ELSE
1585: -- One-time Item: Description is mandatory
1586: 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
1587: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_IDESC_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 1594: 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

1590: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
1591: END IF;
1592: END IF;
1593: -- One-time Item: UOM is mandatory
1594: 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
1595: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_UOM_CODE_NULL');
1596: FND_MSG_PUB.ADD;
1597: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1598: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

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

1600: END IF;
1601: END IF;
1602:
1603: -- Quantity
1604: IF (p_po_line_tbl(i).QUANTITY IS NULL OR p_po_line_tbl(i).QUANTITY = FND_API.G_MISS_NUM) THEN
1605: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_QUANTITY_NULL');
1606: FND_MSG_PUB.ADD;
1607: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1608: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1622: 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

1618: END IF;
1619: END IF;
1620:
1621: -- Need By Date
1622: 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
1623: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_NEED_BY_DATE_NULL');
1624: FND_MSG_PUB.ADD;
1625: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1626: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1640: 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

1636: END IF;
1637: END IF;
1638:
1639: -- Ship To Organization
1640: 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
1641: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SHIP_TO_ORG_NULL');
1642: FND_MSG_PUB.ADD;
1643: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1644: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1654: 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

1650: -- For workorder based lines, we get this from the workorder Department.
1651: -- Need to check if this field is mandatory for PO creation.
1652: -- Ship To Location
1653: /***
1654: 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
1655: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_SHIP_TO_LOC_NULL');
1656: FND_MSG_PUB.ADD;
1657: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1658: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 1663: 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

1659: END IF;
1660: END IF;
1661: ***/
1662: -- Line Type
1663: 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
1664: FND_MESSAGE.Set_Name('AHL', 'AHL_OSP_LN_TYPE_ID_NULL');
1665: FND_MSG_PUB.ADD;
1666: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1667: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);

Line 2297: x_return_status := FND_API.G_RET_STS_SUCCESS;

2293: -- Standard start of API savepoint
2294: SAVEPOINT Handle_Cancelled_PO_Lines_pvt;
2295:
2296: -- Initialize API return status to success
2297: x_return_status := FND_API.G_RET_STS_SUCCESS;
2298:
2299: OPEN l_get_cancelled_po_lines_csr;
2300: LOOP
2301: FETCH l_get_cancelled_po_lines_csr INTO l_po_line_id,

Line 2314: p_init_msg_list => FND_API.G_FALSE,

2310: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2311: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2312: END IF;
2313: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2314: p_init_msg_list => FND_API.G_FALSE,
2315: p_commit => FND_API.G_FALSE,
2316: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2317: p_x_osp_order_rec => l_osp_order_rec,
2318: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2315: p_commit => FND_API.G_FALSE,

2311: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2312: END IF;
2313: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2314: p_init_msg_list => FND_API.G_FALSE,
2315: p_commit => FND_API.G_FALSE,
2316: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2317: p_x_osp_order_rec => l_osp_order_rec,
2318: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2319: x_return_status => l_return_status,

Line 2316: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2312: END IF;
2313: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2314: p_init_msg_list => FND_API.G_FALSE,
2315: p_commit => FND_API.G_FALSE,
2316: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2317: p_x_osp_order_rec => l_osp_order_rec,
2318: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2319: x_return_status => l_return_status,
2320: x_msg_count => l_msg_count,

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

2318: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2319: x_return_status => l_return_status,
2320: x_msg_count => l_msg_count,
2321: x_msg_data => l_msg_data);
2322: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2323: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2324: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2325: END IF;
2326: l_commit_flag := false;

Line 2355: p_init_msg_list => FND_API.G_FALSE,

2351: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2352: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2353: END IF;
2354: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2355: p_init_msg_list => FND_API.G_FALSE,
2356: p_commit => FND_API.G_FALSE,
2357: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2358: p_x_osp_order_rec => l_osp_order_rec,
2359: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2356: p_commit => FND_API.G_FALSE,

2352: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Cancelling OSP Line for Order ' || l_prev_osp_order_id);
2353: END IF;
2354: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2355: p_init_msg_list => FND_API.G_FALSE,
2356: p_commit => FND_API.G_FALSE,
2357: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2358: p_x_osp_order_rec => l_osp_order_rec,
2359: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2360: x_return_status => l_return_status,

Line 2357: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2353: END IF;
2354: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2355: p_init_msg_list => FND_API.G_FALSE,
2356: p_commit => FND_API.G_FALSE,
2357: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2358: p_x_osp_order_rec => l_osp_order_rec,
2359: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2360: x_return_status => l_return_status,
2361: x_msg_count => l_msg_count,

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

2359: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2360: x_return_status => l_return_status,
2361: x_msg_count => l_msg_count,
2362: x_msg_data => l_msg_data);
2363: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2364: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2365: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Cancelling OSP Line for OSP Order ' || l_prev_osp_order_id);
2366: END IF;
2367: l_commit_flag := false;

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

2367: l_commit_flag := false;
2368: END IF;
2369: END IF;
2370: IF (l_commit_flag = false) THEN
2371: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2372: END IF;
2373: -- No errors in current procedure: Check only passed in flag
2374: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2375: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

2370: IF (l_commit_flag = false) THEN
2371: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2372: END IF;
2373: -- No errors in current procedure: Check only passed in flag
2374: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2375: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2376: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2377: END IF;
2378: COMMIT WORK;

Line 2384: WHEN FND_API.G_EXC_ERROR THEN

2380: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2381: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2382: END IF;
2383: EXCEPTION
2384: WHEN FND_API.G_EXC_ERROR THEN
2385: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2386: x_return_status := FND_API.G_RET_STS_ERROR;
2387:
2388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2386: x_return_status := FND_API.G_RET_STS_ERROR;

2382: END IF;
2383: EXCEPTION
2384: WHEN FND_API.G_EXC_ERROR THEN
2385: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2386: x_return_status := FND_API.G_RET_STS_ERROR;
2387:
2388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2389: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2384: WHEN FND_API.G_EXC_ERROR THEN
2385: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2386: x_return_status := FND_API.G_RET_STS_ERROR;
2387:
2388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2389: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2391:
2392: WHEN OTHERS THEN

Line 2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2386: x_return_status := FND_API.G_RET_STS_ERROR;
2387:
2388: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2389: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2391:
2392: WHEN OTHERS THEN
2393: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2390: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2391:
2392: WHEN OTHERS THEN
2393: ROLLBACK TO Handle_Cancelled_PO_Lines_pvt;
2394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2395: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2396: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2397: p_procedure_name => 'Handle_Cancelled_PO_Lines',
2398: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2447: x_return_status := FND_API.G_RET_STS_SUCCESS;

2443: -- Standard start of API savepoint
2444: SAVEPOINT Handle_Deleted_PO_Lines_pvt;
2445:
2446: -- Initialize API return status to success
2447: x_return_status := FND_API.G_RET_STS_SUCCESS;
2448:
2449: OPEN l_get_deleted_po_lines_csr;
2450: LOOP
2451: FETCH l_get_deleted_po_lines_csr INTO l_osp_order_id,

Line 2463: p_init_msg_list => FND_API.G_FALSE,

2459: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2460: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2461: END IF;
2462: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2463: p_init_msg_list => FND_API.G_FALSE,
2464: p_commit => FND_API.G_FALSE,
2465: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2466: p_x_osp_order_rec => l_osp_order_rec,
2467: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2464: p_commit => FND_API.G_FALSE,

2460: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2461: END IF;
2462: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2463: p_init_msg_list => FND_API.G_FALSE,
2464: p_commit => FND_API.G_FALSE,
2465: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2466: p_x_osp_order_rec => l_osp_order_rec,
2467: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2468: x_return_status => l_return_status,

Line 2465: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2461: END IF;
2462: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2463: p_init_msg_list => FND_API.G_FALSE,
2464: p_commit => FND_API.G_FALSE,
2465: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2466: p_x_osp_order_rec => l_osp_order_rec,
2467: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2468: x_return_status => l_return_status,
2469: x_msg_count => l_msg_count,

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

2467: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2468: x_return_status => l_return_status,
2469: x_msg_count => l_msg_count,
2470: x_msg_data => l_msg_data);
2471: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2472: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2473: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2474: END IF;
2475: l_commit_flag := false;

Line 2503: p_init_msg_list => FND_API.G_FALSE,

2499: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2501: END IF;
2502: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2503: p_init_msg_list => FND_API.G_FALSE,
2504: p_commit => FND_API.G_FALSE,
2505: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2506: p_x_osp_order_rec => l_osp_order_rec,
2507: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,

Line 2504: p_commit => FND_API.G_FALSE,

2500: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Deleting OSP Line for Order ' || l_prev_osp_order_id);
2501: END IF;
2502: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2503: p_init_msg_list => FND_API.G_FALSE,
2504: p_commit => FND_API.G_FALSE,
2505: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2506: p_x_osp_order_rec => l_osp_order_rec,
2507: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2508: x_return_status => l_return_status,

Line 2505: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2501: END IF;
2502: AHL_OSP_ORDERS_PVT.process_osp_order(p_api_version => 1.0,
2503: p_init_msg_list => FND_API.G_FALSE,
2504: p_commit => FND_API.G_FALSE,
2505: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2506: p_x_osp_order_rec => l_osp_order_rec,
2507: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2508: x_return_status => l_return_status,
2509: x_msg_count => l_msg_count,

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

2507: p_x_osp_order_lines_tbl => l_osp_order_lines_tbl,
2508: x_return_status => l_return_status,
2509: x_msg_count => l_msg_count,
2510: x_msg_data => l_msg_data);
2511: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2512: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2513: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Error while Deleting OSP Line for OSP Order ' || l_prev_osp_order_id);
2514: END IF;
2515: l_commit_flag := false;

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

2516: END IF;
2517: END IF;
2518:
2519: IF (l_commit_flag = false) THEN
2520: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2521: END IF;
2522: -- No errors in current procedure: Check only passed in flag
2523: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2524: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

2519: IF (l_commit_flag = false) THEN
2520: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2521: END IF;
2522: -- No errors in current procedure: Check only passed in flag
2523: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2524: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2525: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2526: END IF;
2527: COMMIT WORK;

Line 2533: WHEN FND_API.G_EXC_ERROR THEN

2529: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2530: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2531: END IF;
2532: EXCEPTION
2533: WHEN FND_API.G_EXC_ERROR THEN
2534: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2535: x_return_status := FND_API.G_RET_STS_ERROR;
2536:
2537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2535: x_return_status := FND_API.G_RET_STS_ERROR;

2531: END IF;
2532: EXCEPTION
2533: WHEN FND_API.G_EXC_ERROR THEN
2534: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2535: x_return_status := FND_API.G_RET_STS_ERROR;
2536:
2537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2538: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2533: WHEN FND_API.G_EXC_ERROR THEN
2534: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2535: x_return_status := FND_API.G_RET_STS_ERROR;
2536:
2537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2538: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2540:
2541: WHEN OTHERS THEN

Line 2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2535: x_return_status := FND_API.G_RET_STS_ERROR;
2536:
2537: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2538: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2540:
2541: WHEN OTHERS THEN
2542: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2539: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2540:
2541: WHEN OTHERS THEN
2542: ROLLBACK TO Handle_Deleted_PO_Lines_pvt;
2543: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2544: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2545: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2546: p_procedure_name => 'Handle_Deleted_PO_Lines',
2547: p_error_text => SUBSTR(SQLERRM,1,240));

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

2574: l_osp_order_id NUMBER;
2575: l_po_header_id NUMBER;
2576: l_oe_header_id NUMBER;
2577: l_temp_num NUMBER := 0;
2578: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2579: l_msg_count NUMBER;
2580: l_msg_data VARCHAR2(1000);
2581:
2582: l_shipment_IDs_Tbl AHL_OSP_SHIPMENT_PUB.Ship_ID_Tbl_Type;

Line 2592: x_return_status := FND_API.G_RET_STS_SUCCESS;

2588: -- Standard start of API savepoint
2589: SAVEPOINT Handle_Approved_POs_pvt;
2590:
2591: -- Initialize API return status to success
2592: x_return_status := FND_API.G_RET_STS_SUCCESS;
2593:
2594: OPEN l_get_approved_pos_csr;
2595: LOOP
2596: FETCH l_get_approved_POs_csr INTO l_osp_order_id,

Line 2617: p_init_msg_list => FND_API.G_FALSE,

2613: IF (l_temp_num > 0) THEN
2614: -- Call Shipment API. This API will not throw an error or
2615: -- re-book if the shipment is already booked
2616: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2617: p_init_msg_list => FND_API.G_FALSE,
2618: p_commit => FND_API.G_FALSE,
2619: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2620: p_oe_header_tbl => l_shipment_IDs_Tbl,
2621: x_return_status => l_return_status,

Line 2618: p_commit => FND_API.G_FALSE,

2614: -- Call Shipment API. This API will not throw an error or
2615: -- re-book if the shipment is already booked
2616: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2617: p_init_msg_list => FND_API.G_FALSE,
2618: p_commit => FND_API.G_FALSE,
2619: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2620: p_oe_header_tbl => l_shipment_IDs_Tbl,
2621: x_return_status => l_return_status,
2622: x_msg_count => l_msg_count,

Line 2619: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2615: -- re-book if the shipment is already booked
2616: AHL_OSP_SHIPMENT_PUB.Book_Order(p_api_version => 1.0,
2617: p_init_msg_list => FND_API.G_FALSE,
2618: p_commit => FND_API.G_FALSE,
2619: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2620: p_oe_header_tbl => l_shipment_IDs_Tbl,
2621: x_return_status => l_return_status,
2622: x_msg_count => l_msg_count,
2623: x_msg_data => l_msg_data);

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

2623: x_msg_data => l_msg_data);
2624: END IF;
2625:
2626: x_return_status := l_return_status;
2627: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2628: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Did not succeed');
2630: END IF;
2631: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error

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

2627: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2628: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2629: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Did not succeed');
2630: END IF;
2631: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2632: END IF;
2633: -- No errors in current procedure: Check only passed in flag
2634: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2635: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN

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

2630: END IF;
2631: RAISE FND_API.G_EXC_ERROR; -- Rollback and return error
2632: END IF;
2633: -- No errors in current procedure: Check only passed in flag
2634: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2635: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2636: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'AHL_OSP_SHIPMENT_PUB.Book_Order Succeeded. About to COMMIT work.');
2637: END IF;
2638: COMMIT WORK;

Line 2644: WHEN FND_API.G_EXC_ERROR THEN

2640: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2641: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2642: END IF;
2643: EXCEPTION
2644: WHEN FND_API.G_EXC_ERROR THEN
2645: ROLLBACK TO Handle_Approved_POs_pvt;
2646: x_return_status := FND_API.G_RET_STS_ERROR;
2647:
2648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2646: x_return_status := FND_API.G_RET_STS_ERROR;

2642: END IF;
2643: EXCEPTION
2644: WHEN FND_API.G_EXC_ERROR THEN
2645: ROLLBACK TO Handle_Approved_POs_pvt;
2646: x_return_status := FND_API.G_RET_STS_ERROR;
2647:
2648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2649: ROLLBACK TO Handle_Approved_POs_pvt;
2650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2644: WHEN FND_API.G_EXC_ERROR THEN
2645: ROLLBACK TO Handle_Approved_POs_pvt;
2646: x_return_status := FND_API.G_RET_STS_ERROR;
2647:
2648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2649: ROLLBACK TO Handle_Approved_POs_pvt;
2650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2651:
2652: WHEN OTHERS THEN

Line 2650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2646: x_return_status := FND_API.G_RET_STS_ERROR;
2647:
2648: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2649: ROLLBACK TO Handle_Approved_POs_pvt;
2650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2651:
2652: WHEN OTHERS THEN
2653: ROLLBACK TO Handle_Approved_POs_pvt;
2654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2651:
2652: WHEN OTHERS THEN
2653: ROLLBACK TO Handle_Approved_POs_pvt;
2654: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2655: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2656: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2657: p_procedure_name => 'Handle_Approved_POs',
2658: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2721: x_return_status := FND_API.G_RET_STS_SUCCESS;

2717: -- Standard start of API savepoint
2718: SAVEPOINT Handle_Deleted_PO_Headers_pvt;
2719:
2720: -- Initialize API return status to success
2721: x_return_status := FND_API.G_RET_STS_SUCCESS;
2722: -- Get all OSP Orders for which the PO Header has been deleted
2723: OPEN get_po_deleted_osps_csr;
2724: LOOP
2725: FETCH get_po_deleted_osps_csr into l_osp_details_rec;

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

2771: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2772: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Processed PO Deletion for ' || l_temp_num || ' OSP Orders');
2773: END IF;
2774:
2775: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2776: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2777: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2778: END IF;
2779: COMMIT WORK;

Line 2785: WHEN FND_API.G_EXC_ERROR THEN

2781: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2782: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2783: END IF;
2784: EXCEPTION
2785: WHEN FND_API.G_EXC_ERROR THEN
2786: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2787: x_return_status := FND_API.G_RET_STS_ERROR;
2788:
2789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2787: x_return_status := FND_API.G_RET_STS_ERROR;

2783: END IF;
2784: EXCEPTION
2785: WHEN FND_API.G_EXC_ERROR THEN
2786: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2787: x_return_status := FND_API.G_RET_STS_ERROR;
2788:
2789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2790: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2785: WHEN FND_API.G_EXC_ERROR THEN
2786: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2787: x_return_status := FND_API.G_RET_STS_ERROR;
2788:
2789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2790: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2792:
2793: WHEN OTHERS THEN

Line 2791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2787: x_return_status := FND_API.G_RET_STS_ERROR;
2788:
2789: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2790: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2792:
2793: WHEN OTHERS THEN
2794: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2791: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2792:
2793: WHEN OTHERS THEN
2794: ROLLBACK TO Handle_Deleted_PO_Headers_pvt;
2795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2797: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2798: p_procedure_name => 'Handle_Deleted_PO_Headers',
2799: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2858: x_return_status := FND_API.G_RET_STS_SUCCESS;

2854: -- Standard start of API savepoint
2855: SAVEPOINT Handle_Deleted_SOs_pvt;
2856:
2857: -- Initialize API return status to success
2858: x_return_status := FND_API.G_RET_STS_SUCCESS;
2859:
2860: -- Get all OSP Orders for which the PO Header has been deleted
2861: OPEN get_so_deleted_osps_csr;
2862: LOOP

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

2897: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'Processed SO Deletion for ' || l_temp_num || ' OSP Orders');
2898: END IF;
2899:
2900: -- No errors in current procedure: Check only passed in flag
2901: IF (FND_API.TO_BOOLEAN(p_commit)) THEN
2902: IF (FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2903: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, L_DEBUG_KEY, 'About to COMMIT work.');
2904: END IF;
2905: COMMIT WORK;

Line 2911: WHEN FND_API.G_EXC_ERROR THEN

2907: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2908: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.end', 'Exiting Procedure');
2909: END IF;
2910: EXCEPTION
2911: WHEN FND_API.G_EXC_ERROR THEN
2912: ROLLBACK TO Handle_Deleted_SOs_pvt;
2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 2913: x_return_status := FND_API.G_RET_STS_ERROR;

2909: END IF;
2910: EXCEPTION
2911: WHEN FND_API.G_EXC_ERROR THEN
2912: ROLLBACK TO Handle_Deleted_SOs_pvt;
2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2916: ROLLBACK TO Handle_Deleted_SOs_pvt;
2917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2911: WHEN FND_API.G_EXC_ERROR THEN
2912: ROLLBACK TO Handle_Deleted_SOs_pvt;
2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2916: ROLLBACK TO Handle_Deleted_SOs_pvt;
2917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2918:
2919: WHEN OTHERS THEN

Line 2917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2913: x_return_status := FND_API.G_RET_STS_ERROR;
2914:
2915: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2916: ROLLBACK TO Handle_Deleted_SOs_pvt;
2917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2918:
2919: WHEN OTHERS THEN
2920: ROLLBACK TO Handle_Deleted_SOs_pvt;
2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2917: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2918:
2919: WHEN OTHERS THEN
2920: ROLLBACK TO Handle_Deleted_SOs_pvt;
2921: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2922: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2923: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2924: p_procedure_name => 'Handle_Deleted_Sales_Orders',
2925: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3040: RAISE FND_API.G_EXC_ERROR;

3036: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3037: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3038: END IF;
3039: CLOSE l_osp_line_dtls_csr;
3040: RAISE FND_API.G_EXC_ERROR;
3041: END IF;
3042: CLOSE l_osp_line_dtls_csr;
3043:
3044: -- Update cursor variable's PO Line ID

Line 3176: RAISE FND_API.G_EXC_ERROR;

3172: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3173: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR, L_DEBUG_KEY, FALSE);
3174: END IF;
3175: CLOSE l_osp_dtls_csr;
3176: RAISE FND_API.G_EXC_ERROR;
3177: END IF;
3178: CLOSE l_osp_dtls_csr;
3179:
3180: -- Update non-null local variables into cursor variable