1: PACKAGE BODY PA_SYSTEM_NUMBERS_PKG AS
2: --$Header: PASNUMTB.pls 120.0 2005/05/30 07:05:56 appldev noship $
3:
4: procedure GET_NEXT_NUMBER (
5: p_system_number_id IN NUMBER := NULL
44: cp_next_obj_num c_next_obj_num%ROWTYPE;
45:
46: BEGIN
47:
48: pa_debug.init_err_stack('PA_SYSTEM_NUMBERS_PKG:GET_NEXT_NUMBER');
49:
50: x_return_status := FND_API.G_RET_STS_SUCCESS;
51:
52: if p_system_number_id is null then
280: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
281: RAISE;
282: end DELETE_ROW;
283:
284: END PA_SYSTEM_NUMBERS_PKG;