621: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
622:
623: when OTHERS then
624:
625: if FND_MSG_PUB.Check_Msg_Level
626: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
627:
628: FND_MSG_PUB.Add_Exc_Msg
629: (p_pkg_name => G_PKG_NAME,
622:
623: when OTHERS then
624:
625: if FND_MSG_PUB.Check_Msg_Level
626: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
627:
628: FND_MSG_PUB.Add_Exc_Msg
629: (p_pkg_name => G_PKG_NAME,
630: p_procedure_name => l_api_name);
624:
625: if FND_MSG_PUB.Check_Msg_Level
626: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
627:
628: FND_MSG_PUB.Add_Exc_Msg
629: (p_pkg_name => G_PKG_NAME,
630: p_procedure_name => l_api_name);
631:
632: end if;
907: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
908:
909: when OTHERS then
910:
911: if FND_MSG_PUB.Check_Msg_Level
912: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
913:
914: FND_MSG_PUB.Add_Exc_Msg
915: (p_pkg_name => G_PKG_NAME,
908:
909: when OTHERS then
910:
911: if FND_MSG_PUB.Check_Msg_Level
912: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
913:
914: FND_MSG_PUB.Add_Exc_Msg
915: (p_pkg_name => G_PKG_NAME,
916: p_procedure_name => l_api_name);
910:
911: if FND_MSG_PUB.Check_Msg_Level
912: (p_message_level => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) then
913:
914: FND_MSG_PUB.Add_Exc_Msg
915: (p_pkg_name => G_PKG_NAME,
916: p_procedure_name => l_api_name);
917:
918: end if;
965: FND_MESSAGE.SET_TOKEN(msg_tok_names(i), msg_tok_val(i));
966: end loop;
967: end if;
968:
969: FND_MSG_PUB.Add;
970:
971: end if;
972:
973: -- Clear Message Token stack