40: BEGIN
41: l_tmp_val := m4u_xml_extn_utils.g_glb_var_tab(a_elmt_rec.var);
42: EXCEPTION
43: WHEN NO_DATA_FOUND THEN
44: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
45: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
46: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.var);
47: x_ret_msg := FND_MESSAGE.GET;
48: x_ret_sts := g_err_code;
41: l_tmp_val := m4u_xml_extn_utils.g_glb_var_tab(a_elmt_rec.var);
42: EXCEPTION
43: WHEN NO_DATA_FOUND THEN
44: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
45: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
46: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.var);
47: x_ret_msg := FND_MESSAGE.GET;
48: x_ret_sts := g_err_code;
49: IF g_log_lvl <= 1 THEN
42: EXCEPTION
43: WHEN NO_DATA_FOUND THEN
44: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
45: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
46: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.var);
47: x_ret_msg := FND_MESSAGE.GET;
48: x_ret_sts := g_err_code;
49: IF g_log_lvl <= 1 THEN
50: cln_debug_pub.add('Fetch global variable error',1);
43: WHEN NO_DATA_FOUND THEN
44: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
45: FND_MESSAGE.SET_TOKEN('PARAM','Global variable');
46: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.var);
47: x_ret_msg := FND_MESSAGE.GET;
48: x_ret_sts := g_err_code;
49: IF g_log_lvl <= 1 THEN
50: cln_debug_pub.add('Fetch global variable error',1);
51: END IF;
70: -- return error
71: IF g_log_lvl <= 1 THEN
72: cln_debug_pub.add('Mapping type not-found',1);
73: END IF;
74: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
75: FND_MESSAGE.SET_TOKEN('PARAM','Element mapping type');
76: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.map_typ);
77: x_ret_msg := FND_MESSAGE.GET;
78: x_ret_sts := g_err_code;
71: IF g_log_lvl <= 1 THEN
72: cln_debug_pub.add('Mapping type not-found',1);
73: END IF;
74: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
75: FND_MESSAGE.SET_TOKEN('PARAM','Element mapping type');
76: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.map_typ);
77: x_ret_msg := FND_MESSAGE.GET;
78: x_ret_sts := g_err_code;
79: RAISE FND_API.G_EXC_ERROR;
72: cln_debug_pub.add('Mapping type not-found',1);
73: END IF;
74: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
75: FND_MESSAGE.SET_TOKEN('PARAM','Element mapping type');
76: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.map_typ);
77: x_ret_msg := FND_MESSAGE.GET;
78: x_ret_sts := g_err_code;
79: RAISE FND_API.G_EXC_ERROR;
80:
73: END IF;
74: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INV_PARAM');
75: FND_MESSAGE.SET_TOKEN('PARAM','Element mapping type');
76: FND_MESSAGE.SET_TOKEN('VALUE',a_elmt_rec.map_typ);
77: x_ret_msg := FND_MESSAGE.GET;
78: x_ret_sts := g_err_code;
79: RAISE FND_API.G_EXC_ERROR;
80:
81: END IF;
743: cln_debug_pub.add('l_progress - ' || l_progress ,6);
744: cln_debug_pub.add('x_ret_msg - ' || x_ret_msg ,6);
745: END IF;
746:
747: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_PROCESS_ERR');
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
744: cln_debug_pub.add('x_ret_msg - ' || x_ret_msg ,6);
745: END IF;
746:
747: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_PROCESS_ERR');
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
752: x_ret_msg := FND_MESSAGE.GET;
745: END IF;
746:
747: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_PROCESS_ERR');
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
752: x_ret_msg := FND_MESSAGE.GET;
753: x_ret_sts := g_err_code;
746:
747: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_PROCESS_ERR');
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
752: x_ret_msg := FND_MESSAGE.GET;
753: x_ret_sts := g_err_code;
754:
747: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_PROCESS_ERR');
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
752: x_ret_msg := FND_MESSAGE.GET;
753: x_ret_sts := g_err_code;
754:
755: WHEN HANDLED_EXCEPTION THEN
748: FND_MESSAGE.SET_TOKEN('LEVEL_ID' ,l_lvl_id);
749: FND_MESSAGE.SET_TOKEN('ELEMENT_IDX' ,l_cur_idx);
750: FND_MESSAGE.SET_TOKEN('ACTION' ,l_progress);
751: FND_MESSAGE.SET_TOKEN('ERROR' ,x_ret_msg);
752: x_ret_msg := FND_MESSAGE.GET;
753: x_ret_sts := g_err_code;
754:
755: WHEN HANDLED_EXCEPTION THEN
756: IF g_log_lvl <= 6 THEN
828: cln_debug_pub.add('x_ret_msg - ' || x_ret_msg,1);
829: END IF;
830:
831: IF x_ret_sts <> g_success_code THEN
832: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INIT_ERR');
833: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
834: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
835: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
836: RETURN;
829: END IF;
830:
831: IF x_ret_sts <> g_success_code THEN
832: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INIT_ERR');
833: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
834: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
835: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
836: RETURN;
837: END IF;
830:
831: IF x_ret_sts <> g_success_code THEN
832: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INIT_ERR');
833: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
834: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
835: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
836: RETURN;
837: END IF;
838:
831: IF x_ret_sts <> g_success_code THEN
832: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_INIT_ERR');
833: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
834: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
835: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
836: RETURN;
837: END IF;
838:
839: l_progress := 'XML fragment generation - Map processing';
847: IF x_ret_sts <> g_success_code THEN
848: IF g_log_lvl <= 1 THEN
849: cln_debug_pub.add('Returned from API m4u_xml_extn_utils.process_level Error',1);
850: END IF;
851: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_XMLGEN_ERR');
852: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
853: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
854: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
855: RETURN;
848: IF g_log_lvl <= 1 THEN
849: cln_debug_pub.add('Returned from API m4u_xml_extn_utils.process_level Error',1);
850: END IF;
851: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_XMLGEN_ERR');
852: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
853: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
854: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
855: RETURN;
856: END IF;
849: cln_debug_pub.add('Returned from API m4u_xml_extn_utils.process_level Error',1);
850: END IF;
851: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_XMLGEN_ERR');
852: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
853: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
854: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
855: RETURN;
856: END IF;
857:
850: END IF;
851: FND_MESSAGE.SET_NAME('CLN','M4U_XFWK_XMLGEN_ERR');
852: FND_MESSAGE.SET_TOKEN('EXTN_NAME',a_extn_name);
853: FND_MESSAGE.SET_TOKEN('TP_ID',a_tp_id);
854: x_ret_msg := FND_MESSAGE.GET || ' - ' || x_ret_msg;
855: RETURN;
856: END IF;
857:
858: l_progress := 'XML fragment generation - Logging';