2638: p_return_status := fnd_api.g_ret_sts_unexp_error;
2639: END;
2640:
2641: -- ##########################################################################
2642: -- This procedure retrieves the user_je_category_name from gl_je_categories
2643: -- ##########################################################################
2644:
2645: PROCEDURE gl_je_cat( P_USER_JE_CATEGORY_NAME OUT NOCOPY VARCHAR2,
2646: P_RETURN_STATUS OUT NOCOPY VARCHAR2) IS
2648: l_product VARCHAR2(3);
2649: BEGIN
2650: SELECT user_je_category_name
2651: INTO p_user_je_category_name
2652: FROM gl_je_categories
2653: WHERE je_category_name = 'OLD';
2654: EXCEPTION
2655: WHEN NO_DATA_FOUND THEN
2656: l_error := 'JE CATEGORY = OLD';