205: x_msg_data OUT NOCOPY VARCHAR2,
206: x_result IN OUT NOCOPY Result_rec_type
207: )
208: IS
209: l_msg_name iby_result_codes.message_name%TYPE;
210: l_category iby_result_codes.result_category%TYPE;
211: l_msg_stack_size NUMBER;
212:
213: l_module VARCHAR2(30) := 'Prepare_Result(7 ARG)';
206: x_result IN OUT NOCOPY Result_rec_type
207: )
208: IS
209: l_msg_name iby_result_codes.message_name%TYPE;
210: l_category iby_result_codes.result_category%TYPE;
211: l_msg_stack_size NUMBER;
212:
213: l_module VARCHAR2(30) := 'Prepare_Result(7 ARG)';
214: l_dbg_mod VARCHAR2(100) := G_DEBUG_MODULE || '.' || l_module;
213: l_module VARCHAR2(30) := 'Prepare_Result(7 ARG)';
214: l_dbg_mod VARCHAR2(100) := G_DEBUG_MODULE || '.' || l_module;
215:
216: CURSOR c_result
217: (ci_result_code IN iby_result_codes.result_code%TYPE)
218: IS
219: SELECT result_category, message_name
220: FROM iby_result_codes
221: WHERE (result_code = ci_result_code)
216: CURSOR c_result
217: (ci_result_code IN iby_result_codes.result_code%TYPE)
218: IS
219: SELECT result_category, message_name
220: FROM iby_result_codes
221: WHERE (result_code = ci_result_code)
222: AND (request_interface_code = 'FNDCPT_PUB');
223: BEGIN
224: iby_debug_pub.add('Enter',iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
314: iby_debug_pub.add('Exit',iby_debug_pub.G_LEVEL_PROCEDURE,l_dbg_mod);
315: END Prepare_Result;
316:
317: FUNCTION Get_Result_Category
318: (p_result IN iby_result_codes.result_code%TYPE,
319: p_interface IN iby_result_codes.request_interface_code%TYPE)
320: RETURN iby_result_codes.result_category%TYPE
321: IS
322: l_category iby_result_codes.result_category%TYPE;
315: END Prepare_Result;
316:
317: FUNCTION Get_Result_Category
318: (p_result IN iby_result_codes.result_code%TYPE,
319: p_interface IN iby_result_codes.request_interface_code%TYPE)
320: RETURN iby_result_codes.result_category%TYPE
321: IS
322: l_category iby_result_codes.result_category%TYPE;
323:
316:
317: FUNCTION Get_Result_Category
318: (p_result IN iby_result_codes.result_code%TYPE,
319: p_interface IN iby_result_codes.request_interface_code%TYPE)
320: RETURN iby_result_codes.result_category%TYPE
321: IS
322: l_category iby_result_codes.result_category%TYPE;
323:
324: CURSOR c_category
318: (p_result IN iby_result_codes.result_code%TYPE,
319: p_interface IN iby_result_codes.request_interface_code%TYPE)
320: RETURN iby_result_codes.result_category%TYPE
321: IS
322: l_category iby_result_codes.result_category%TYPE;
323:
324: CURSOR c_category
325: (ci_result IN iby_result_codes.result_code%TYPE,
326: ci_interface IN iby_result_codes.request_interface_code%TYPE)
321: IS
322: l_category iby_result_codes.result_category%TYPE;
323:
324: CURSOR c_category
325: (ci_result IN iby_result_codes.result_code%TYPE,
326: ci_interface IN iby_result_codes.request_interface_code%TYPE)
327: IS
328: SELECT result_category
329: FROM iby_result_codes
322: l_category iby_result_codes.result_category%TYPE;
323:
324: CURSOR c_category
325: (ci_result IN iby_result_codes.result_code%TYPE,
326: ci_interface IN iby_result_codes.request_interface_code%TYPE)
327: IS
328: SELECT result_category
329: FROM iby_result_codes
330: WHERE (result_code = ci_result)
325: (ci_result IN iby_result_codes.result_code%TYPE,
326: ci_interface IN iby_result_codes.request_interface_code%TYPE)
327: IS
328: SELECT result_category
329: FROM iby_result_codes
330: WHERE (result_code = ci_result)
331: AND (request_interface_code = ci_interface);
332: BEGIN
333: IF (c_category%ISOPEN) THEN CLOSE c_category; END IF;