1796: p_token10 IN VARCHAR2,
1797: p_token10_value IN VARCHAR2
1798: ) RETURN VARCHAR2 IS
1799: BEGIN
1800: Fnd_Message.Set_Name( p_app_name, p_msg_name );
1801: IF (p_token1 IS NOT NULL) AND (p_token1_value IS NOT NULL) THEN
1802: Fnd_Message.Set_Token( token => p_token1, value => p_token1_value);
1803: END IF;
1804: IF (p_token2 IS NOT NULL) AND (p_token2_value IS NOT NULL) THEN
1798: ) RETURN VARCHAR2 IS
1799: BEGIN
1800: Fnd_Message.Set_Name( p_app_name, p_msg_name );
1801: IF (p_token1 IS NOT NULL) AND (p_token1_value IS NOT NULL) THEN
1802: Fnd_Message.Set_Token( token => p_token1, value => p_token1_value);
1803: END IF;
1804: IF (p_token2 IS NOT NULL) AND (p_token2_value IS NOT NULL) THEN
1805: Fnd_Message.Set_Token( token => p_token2, value => p_token2_value);
1806: END IF;
1801: IF (p_token1 IS NOT NULL) AND (p_token1_value IS NOT NULL) THEN
1802: Fnd_Message.Set_Token( token => p_token1, value => p_token1_value);
1803: END IF;
1804: IF (p_token2 IS NOT NULL) AND (p_token2_value IS NOT NULL) THEN
1805: Fnd_Message.Set_Token( token => p_token2, value => p_token2_value);
1806: END IF;
1807: IF (p_token3 IS NOT NULL) AND (p_token3_value IS NOT NULL) THEN
1808: Fnd_Message.Set_Token( token => p_token3, value => p_token3_value);
1809: END IF;
1804: IF (p_token2 IS NOT NULL) AND (p_token2_value IS NOT NULL) THEN
1805: Fnd_Message.Set_Token( token => p_token2, value => p_token2_value);
1806: END IF;
1807: IF (p_token3 IS NOT NULL) AND (p_token3_value IS NOT NULL) THEN
1808: Fnd_Message.Set_Token( token => p_token3, value => p_token3_value);
1809: END IF;
1810: IF (p_token4 IS NOT NULL) AND (p_token4_value IS NOT NULL) THEN
1811: Fnd_Message.Set_Token( token => p_token4, value => p_token4_value);
1812: END IF;
1807: IF (p_token3 IS NOT NULL) AND (p_token3_value IS NOT NULL) THEN
1808: Fnd_Message.Set_Token( token => p_token3, value => p_token3_value);
1809: END IF;
1810: IF (p_token4 IS NOT NULL) AND (p_token4_value IS NOT NULL) THEN
1811: Fnd_Message.Set_Token( token => p_token4, value => p_token4_value);
1812: END IF;
1813: IF (p_token5 IS NOT NULL) AND (p_token5_value IS NOT NULL) THEN
1814: Fnd_Message.Set_Token( token => p_token5, value => p_token5_value);
1815: END IF;
1810: IF (p_token4 IS NOT NULL) AND (p_token4_value IS NOT NULL) THEN
1811: Fnd_Message.Set_Token( token => p_token4, value => p_token4_value);
1812: END IF;
1813: IF (p_token5 IS NOT NULL) AND (p_token5_value IS NOT NULL) THEN
1814: Fnd_Message.Set_Token( token => p_token5, value => p_token5_value);
1815: END IF;
1816: IF (p_token6 IS NOT NULL) AND (p_token6_value IS NOT NULL) THEN
1817: Fnd_Message.Set_Token( token => p_token6, value => p_token6_value);
1818: END IF;
1813: IF (p_token5 IS NOT NULL) AND (p_token5_value IS NOT NULL) THEN
1814: Fnd_Message.Set_Token( token => p_token5, value => p_token5_value);
1815: END IF;
1816: IF (p_token6 IS NOT NULL) AND (p_token6_value IS NOT NULL) THEN
1817: Fnd_Message.Set_Token( token => p_token6, value => p_token6_value);
1818: END IF;
1819: IF (p_token7 IS NOT NULL) AND (p_token7_value IS NOT NULL) THEN
1820: Fnd_Message.Set_Token( token => p_token7, value => p_token7_value);
1821: END IF;
1816: IF (p_token6 IS NOT NULL) AND (p_token6_value IS NOT NULL) THEN
1817: Fnd_Message.Set_Token( token => p_token6, value => p_token6_value);
1818: END IF;
1819: IF (p_token7 IS NOT NULL) AND (p_token7_value IS NOT NULL) THEN
1820: Fnd_Message.Set_Token( token => p_token7, value => p_token7_value);
1821: END IF;
1822: IF (p_token8 IS NOT NULL) AND (p_token8_value IS NOT NULL) THEN
1823: Fnd_Message.Set_Token( token => p_token8, value => p_token8_value);
1824: END IF;
1819: IF (p_token7 IS NOT NULL) AND (p_token7_value IS NOT NULL) THEN
1820: Fnd_Message.Set_Token( token => p_token7, value => p_token7_value);
1821: END IF;
1822: IF (p_token8 IS NOT NULL) AND (p_token8_value IS NOT NULL) THEN
1823: Fnd_Message.Set_Token( token => p_token8, value => p_token8_value);
1824: END IF;
1825: IF (p_token9 IS NOT NULL) AND (p_token9_value IS NOT NULL) THEN
1826: Fnd_Message.Set_Token( token => p_token9, value => p_token9_value);
1827: END IF;
1822: IF (p_token8 IS NOT NULL) AND (p_token8_value IS NOT NULL) THEN
1823: Fnd_Message.Set_Token( token => p_token8, value => p_token8_value);
1824: END IF;
1825: IF (p_token9 IS NOT NULL) AND (p_token9_value IS NOT NULL) THEN
1826: Fnd_Message.Set_Token( token => p_token9, value => p_token9_value);
1827: END IF;
1828: IF (p_token10 IS NOT NULL) AND (p_token10_value IS NOT NULL) THEN
1829: Fnd_Message.Set_Token( token => p_token10, value => p_token10_value);
1830: END IF;
1825: IF (p_token9 IS NOT NULL) AND (p_token9_value IS NOT NULL) THEN
1826: Fnd_Message.Set_Token( token => p_token9, value => p_token9_value);
1827: END IF;
1828: IF (p_token10 IS NOT NULL) AND (p_token10_value IS NOT NULL) THEN
1829: Fnd_Message.Set_Token( token => p_token10, value => p_token10_value);
1830: END IF;
1831: RETURN Fnd_Message.Get;
1832:
1833: END Get_Message;
1827: END IF;
1828: IF (p_token10 IS NOT NULL) AND (p_token10_value IS NOT NULL) THEN
1829: Fnd_Message.Set_Token( token => p_token10, value => p_token10_value);
1830: END IF;
1831: RETURN Fnd_Message.Get;
1832:
1833: END Get_Message;
1834:
1835: /* Modified Cursor for Bug 4956969 */
5496:
5497: l_variable_value_id := NULL;
5498:
5499: IF p_output_error = FND_API.G_TRUE THEN
5500: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_EXEC');
5501: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5502: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5503: FND_MSG_PUB.ADD;
5504: END IF;
5497: l_variable_value_id := NULL;
5498:
5499: IF p_output_error = FND_API.G_TRUE THEN
5500: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_EXEC');
5501: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5502: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5503: FND_MSG_PUB.ADD;
5504: END IF;
5505: ELSIF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
5498:
5499: IF p_output_error = FND_API.G_TRUE THEN
5500: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_EXEC');
5501: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5502: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5503: FND_MSG_PUB.ADD;
5504: END IF;
5505: ELSIF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
5506:
5506:
5507: l_variable_value_id := NULL;
5508:
5509: IF p_output_error = FND_API.G_TRUE THEN
5510: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_UNEXP');
5511: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5512: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5513: FND_MSG_PUB.ADD;
5514: END IF;
5507: l_variable_value_id := NULL;
5508:
5509: IF p_output_error = FND_API.G_TRUE THEN
5510: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_UNEXP');
5511: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5512: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5513: FND_MSG_PUB.ADD;
5514: END IF;
5515: END IF;
5508:
5509: IF p_output_error = FND_API.G_TRUE THEN
5510: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_UNEXP');
5511: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5512: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5513: FND_MSG_PUB.ADD;
5514: END IF;
5515: END IF;
5516:
5539: CLOSE csr_check_proc_spec_status;
5540: CLOSE csr_check_proc_body_status;
5541:
5542: IF l_dummy <> 'X' THEN
5543: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_NOT_EXIST');
5544: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5545: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5540: CLOSE csr_check_proc_body_status;
5541:
5542: IF l_dummy <> 'X' THEN
5543: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_NOT_EXIST');
5544: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5545: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5548: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_INVALID');
5541:
5542: IF l_dummy <> 'X' THEN
5543: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_NOT_EXIST');
5544: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5545: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5548: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_INVALID');
5549: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5544: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5545: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5548: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_INVALID');
5549: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5550: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5551: FND_MSG_PUB.ADD;
5552: END IF;
5545: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5548: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_INVALID');
5549: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5550: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5551: FND_MSG_PUB.ADD;
5552: END IF;
5553: END IF;
5546: FND_MSG_PUB.ADD;
5547: ELSIF l_procedure_spec_status = 'INVALID' OR l_procedure_body_status = 'INVALID' THEN
5548: FND_MESSAGE.set_name('OKC','OKC_UDV_PROC_INVALID');
5549: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5550: FND_MESSAGE.set_token('PROC_NAME', l_procedure_name);
5551: FND_MSG_PUB.ADD;
5552: END IF;
5553: END IF;
5554:
5615: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'500: Error while fetching value from valueset:'||sqlerrm);
5616: END IF;
5617:
5618: IF p_output_error = FND_API.G_TRUE THEN
5619: FND_MESSAGE.set_name('OKC','OKC_UDV_VSET_INVALID');
5620: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5621: FND_MSG_PUB.ADD;
5622: END IF;
5623: END;
5616: END IF;
5617:
5618: IF p_output_error = FND_API.G_TRUE THEN
5619: FND_MESSAGE.set_name('OKC','OKC_UDV_VSET_INVALID');
5620: FND_MESSAGE.set_token('VAR_NAME', l_variable_name);
5621: FND_MSG_PUB.ADD;
5622: END IF;
5623: END;
5624: