[Home] [Help]
545: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
546: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, L_DEBUG_KEY || '.begin', 'Entering Procedure');
547: END IF;
548:
549: -- No need of a Savepoint: Individual procedures commit or rollback
550: -- within themselves.
551:
552: -- Standard call to check for call compatibility
553: IF NOT FND_API.Compatible_API_Call(l_api_version, p_api_version, l_api_name,
633: RAISE FND_API.G_EXC_ERROR; --Note that commit might already have taken place
634: END IF;
635:
636: -- Standard check of p_commit
637: -- No need to commit: Individual procedures commit or rollback
638: -- within themselves.
639: -- IF FND_API.TO_BOOLEAN(p_commit) THEN
640: -- COMMIT WORK; --Note that commit might already have taken place
641: -- END IF;
652: END IF;
653:
654: EXCEPTION
655: WHEN FND_API.G_EXC_ERROR THEN
656: -- No need to rollback: Individual procedures commit or rollback
657: -- within themselves.
658: -- ROLLBACK TO PO_Synch_All_OSPs_pvt; --Note that commit might already have taken place
659: x_return_status := FND_API.G_RET_STS_ERROR;
660: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
667: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Caught Execution Exception: ' || x_msg_data);
668: END IF;
669:
670: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
671: -- No need to rollback: Individual procedures commit or rollback
672: -- within themselves.
673:
674: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
675: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
682: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED, L_DEBUG_KEY, 'Caught Unexpected Exception: ' || x_msg_data);
683: END IF;
684:
685: WHEN OTHERS THEN
686: -- No need to rollback: Individual procedures commit or rollback
687: -- within themselves.
688: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
689: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
690: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1574: SELECT PO_REQUEST_ID FROM AHL_OSP_ORDERS_B
1575: WHERE OSP_ORDER_ID = p_osp_order_id;
1576:
1577: CURSOR check_req_completeness_csr(c_po_req_header_id IN NUMBER) IS
1578: select 1 from dual where
1579: (select count(*) from AHL_OSP_ORDER_LINES where OSP_ORDER_ID = p_osp_order_id) =
1580: (select count(*) from
1581: PO_REQUISITION_LINES_ALL REQL, AHL_OSP_ORDER_LINES OSPL
1582: where OSPL.OSP_ORDER_ID = p_osp_order_id