673: WHERE person_id = l_approver_id
674: AND rownum <2;
675: EXCEPTION
676: WHEN NO_DATA_FOUND THEN
677: FND_MESSAGE.set_name('DPP', 'DPP_AME_NO_APP');
678: FND_MSG_PUB.add;
679: RAISE FND_API.G_EXC_ERROR;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
677: FND_MESSAGE.set_name('DPP', 'DPP_AME_NO_APP');
678: FND_MSG_PUB.add;
679: RAISE FND_API.G_EXC_ERROR;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);
684: fnd_message.set_token('REASON', sqlerrm);
685: FND_MSG_PUB.add;
678: FND_MSG_PUB.add;
679: RAISE FND_API.G_EXC_ERROR;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);
684: fnd_message.set_token('REASON', sqlerrm);
685: FND_MSG_PUB.add;
686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
679: RAISE FND_API.G_EXC_ERROR;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);
684: fnd_message.set_token('REASON', sqlerrm);
685: FND_MSG_PUB.add;
686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
687: END;
680: WHEN OTHERS THEN
681: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
682: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
683: fnd_message.set_token('ERRNO', sqlcode);
684: fnd_message.set_token('REASON', sqlerrm);
685: FND_MSG_PUB.add;
686: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
687: END;
688: p_approversOut(1).first_name := l_first_name;
687: END;
688: p_approversOut(1).first_name := l_first_name;
689: p_approversOut(1).last_name := l_last_name;
690: ELSE
691: FND_MESSAGE.set_name('DPP', 'DPP_AME_NO_APP');
692: FND_MSG_PUB.add;
693:
694: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'No default approver set for the object type : '||p_approval_rec.object_type);
695:
717:
718: EXCEPTION
719: WHEN NO_DATA_FOUND THEN
720: l_approver_email := NULL;
721: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_DETAIL');
722: FND_MSG_PUB.add;
723: RAISE FND_API.G_EXC_ERROR;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
721: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_DETAIL');
722: FND_MSG_PUB.add;
723: RAISE FND_API.G_EXC_ERROR;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);
728: fnd_message.set_token('REASON', sqlerrm);
729: FND_MSG_PUB.add;
722: FND_MSG_PUB.add;
723: RAISE FND_API.G_EXC_ERROR;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);
728: fnd_message.set_token('REASON', sqlerrm);
729: FND_MSG_PUB.add;
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
723: RAISE FND_API.G_EXC_ERROR;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);
728: fnd_message.set_token('REASON', sqlerrm);
729: FND_MSG_PUB.add;
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END;
724: WHEN OTHERS THEN
725: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
726: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
727: fnd_message.set_token('ERRNO', sqlcode);
728: fnd_message.set_token('REASON', sqlerrm);
729: FND_MSG_PUB.add;
730: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
731: END;
732: ELSE -- Both the person id and the user id are null
732: ELSE -- Both the person id and the user id are null
733:
734: dpp_utility_pvt.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'No details retrieved for the Approver ');
735:
736: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_DETAIL');
737: FND_MSG_PUB.add;
738: l_approver_email := NULL;
739: END IF; --l_approversOut(i).person_id IS NOT NULL
740: --Retrieve the approval group name
744: FROM ame_approval_groups
745: WHERE approval_group_id = l_approversOut(i).group_or_chain_id;
746: EXCEPTION
747: WHEN NO_DATA_FOUND THEN
748: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_GRP_DETAIL');
749: FND_MSG_PUB.add;
750: RAISE FND_API.G_EXC_ERROR;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
748: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_GRP_DETAIL');
749: FND_MSG_PUB.add;
750: RAISE FND_API.G_EXC_ERROR;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);
755: fnd_message.set_token('REASON', sqlerrm);
756: FND_MSG_PUB.add;
749: FND_MSG_PUB.add;
750: RAISE FND_API.G_EXC_ERROR;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);
755: fnd_message.set_token('REASON', sqlerrm);
756: FND_MSG_PUB.add;
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
750: RAISE FND_API.G_EXC_ERROR;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);
755: fnd_message.set_token('REASON', sqlerrm);
756: FND_MSG_PUB.add;
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END;
751: WHEN OTHERS THEN
752: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
753: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
754: fnd_message.set_token('ERRNO', sqlcode);
755: fnd_message.set_token('REASON', sqlerrm);
756: FND_MSG_PUB.add;
757: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
758: END;
759: --Retrieve the order number
764: WHERE approval_group_id = l_approversOut(i).group_or_chain_id
765: AND orig_system_id = l_approversOut(i).orig_system_id; --nvl(l_approversOut(i).orig_system_id,l_approversOut(i).user_id);
766: EXCEPTION
767: WHEN NO_DATA_FOUND THEN
768: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_SEQ');
769: FND_MSG_PUB.add;
770: RAISE FND_API.G_EXC_ERROR;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
768: FND_MESSAGE.set_name('DPP', 'DPP_NO_APP_SEQ');
769: FND_MSG_PUB.add;
770: RAISE FND_API.G_EXC_ERROR;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);
775: fnd_message.set_token('REASON', sqlerrm);
776: FND_MSG_PUB.add;
769: FND_MSG_PUB.add;
770: RAISE FND_API.G_EXC_ERROR;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);
775: fnd_message.set_token('REASON', sqlerrm);
776: FND_MSG_PUB.add;
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
770: RAISE FND_API.G_EXC_ERROR;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);
775: fnd_message.set_token('REASON', sqlerrm);
776: FND_MSG_PUB.add;
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
778: END;
771: WHEN OTHERS THEN
772: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
773: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
774: fnd_message.set_token('ERRNO', sqlcode);
775: fnd_message.set_token('REASON', sqlerrm);
776: FND_MSG_PUB.add;
777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
778: END;
779: --Assign the approver details to the out variable
1235: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1236: END IF;
1237: -- Debug Message
1238: IF G_DEBUG THEN
1239: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1240: FND_MESSAGE.Set_Token('TEXT',l_api_name||': Start');
1241: FND_MSG_PUB.Add;
1242: END IF;
1243: --Initialize message list if p_init_msg_list is TRUE.
1236: END IF;
1237: -- Debug Message
1238: IF G_DEBUG THEN
1239: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1240: FND_MESSAGE.Set_Token('TEXT',l_api_name||': Start');
1241: FND_MSG_PUB.Add;
1242: END IF;
1243: --Initialize message list if p_init_msg_list is TRUE.
1244: IF FND_API.To_Boolean (p_init_msg_list) THEN
1914: FROM dpp_transaction_headers_all
1915: WHERE transaction_header_id = p_approval_rec.object_id;
1916: EXCEPTION
1917: WHEN NO_DATA_FOUND THEN
1918: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1919: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1920: fnd_message.set_token('ERRNO', sqlcode);
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1915: WHERE transaction_header_id = p_approval_rec.object_id;
1916: EXCEPTION
1917: WHEN NO_DATA_FOUND THEN
1918: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1919: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1920: fnd_message.set_token('ERRNO', sqlcode);
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1916: EXCEPTION
1917: WHEN NO_DATA_FOUND THEN
1918: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1919: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1920: fnd_message.set_token('ERRNO', sqlcode);
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1917: WHEN NO_DATA_FOUND THEN
1918: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1919: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1920: fnd_message.set_token('ERRNO', sqlcode);
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1921: fnd_message.set_token('REASON', 'Invalid Transaction Header ID');
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);
1928: fnd_message.set_token('REASON', sqlerrm);
1929: FND_MSG_PUB.add;
1922: FND_MSG_PUB.add;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);
1928: fnd_message.set_token('REASON', sqlerrm);
1929: FND_MSG_PUB.add;
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1923: RAISE FND_API.G_EXC_ERROR;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);
1928: fnd_message.set_token('REASON', sqlerrm);
1929: FND_MSG_PUB.add;
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: END;
1924: WHEN OTHERS THEN
1925: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1926: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
1927: fnd_message.set_token('ERRNO', sqlcode);
1928: fnd_message.set_token('REASON', sqlerrm);
1929: FND_MSG_PUB.add;
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: END;
1932: -- Update AME/approval tbl of users action and revoke access to existing approvers
2102: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
2108: fnd_message.set_token('ERRNO', sqlcode);
2109: fnd_message.set_token('REASON', sqlerrm);
2110: FND_MSG_PUB.add;
2103: RAISE Fnd_Api.g_exc_unexpected_error;
2104: WHEN OTHERS THEN
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
2108: fnd_message.set_token('ERRNO', sqlcode);
2109: fnd_message.set_token('REASON', sqlerrm);
2110: FND_MSG_PUB.add;
2111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2104: WHEN OTHERS THEN
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
2108: fnd_message.set_token('ERRNO', sqlcode);
2109: fnd_message.set_token('REASON', sqlerrm);
2110: FND_MSG_PUB.add;
2111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2112: END;
2105: ROLLBACK;
2106: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2107: fnd_message.set_token('ROUTINE', 'DPP_APPROVAL_PVT');
2108: fnd_message.set_token('ERRNO', sqlcode);
2109: fnd_message.set_token('REASON', sqlerrm);
2110: FND_MSG_PUB.add;
2111: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2112: END;
2113: --Call the Initiate execution process program to make the transaction Active