34: l_api_name CONSTANT VARCHAR2(30) := 'coa_segment_val_imp';
35: l_api_version CONSTANT NUMBER := 1.0;
36: l_err_msg VARCHAR2(2000);
37: l_appl_name VARCHAR2(30);
38: l_c_msg_name fnd_new_messages.message_name%TYPE;
39: l_n_msg_num fnd_new_messages.message_number%TYPE;
40: l_c_msg_txt fnd_new_messages.message_text%TYPE;
41: l_user_id NUMBER;
42: l_resp_id NUMBER;
35: l_api_version CONSTANT NUMBER := 1.0;
36: l_err_msg VARCHAR2(2000);
37: l_appl_name VARCHAR2(30);
38: l_c_msg_name fnd_new_messages.message_name%TYPE;
39: l_n_msg_num fnd_new_messages.message_number%TYPE;
40: l_c_msg_txt fnd_new_messages.message_text%TYPE;
41: l_user_id NUMBER;
42: l_resp_id NUMBER;
43: l_apps_id NUMBER;
36: l_err_msg VARCHAR2(2000);
37: l_appl_name VARCHAR2(30);
38: l_c_msg_name fnd_new_messages.message_name%TYPE;
39: l_n_msg_num fnd_new_messages.message_number%TYPE;
40: l_c_msg_txt fnd_new_messages.message_text%TYPE;
41: l_user_id NUMBER;
42: l_resp_id NUMBER;
43: l_apps_id NUMBER;
44: l_acc_set_id NUMBER;
44: l_acc_set_id NUMBER;
45: l_req_id NUMBER;
46:
47: PROCEDURE get_message(p_c_msg_name VARCHAR2,p_n_msg_num OUT NOCOPY NUMBER,p_c_msg_txt OUT NOCOPY VARCHAR2) AS
48: CURSOR c_msg(cp_c_msg_name fnd_new_messages.message_name%TYPE ) IS
49: SELECT
50: message_number,
51: message_text
52: FROM fnd_new_messages
48: CURSOR c_msg(cp_c_msg_name fnd_new_messages.message_name%TYPE ) IS
49: SELECT
50: message_number,
51: message_text
52: FROM fnd_new_messages
53: WHERE application_id=101
54: AND language_code = USERENV('LANG')
55: AND message_name=cp_c_msg_name;
56:
70: /* Get message from Message Stack */
71:
72: FUNCTION get_msg_from_stack(l_n_msg_count NUMBER) RETURN VARCHAR2 AS
73: l_c_msg VARCHAR2(3000);
74: l_c_msg_name fnd_new_messages.message_name%TYPE;
75: BEGIN
76: l_c_msg := FND_MSG_PUB.GET(p_msg_index => l_n_msg_count, p_encoded => 'T');
77: FND_MESSAGE.SET_ENCODED (l_c_msg);
78: FND_MESSAGE.PARSE_ENCODED(FND_MESSAGE.GET_ENCODED,l_appl_name, l_c_msg_name);