DBA Data[Home] [Help]

APPS.M4U_GET_CIN_EXTN dependencies on M4U_GET_CIN_EXTN

Line 1: PACKAGE BODY m4u_get_cin_extn AS

1: PACKAGE BODY m4u_get_cin_extn AS
2: /* $Header: M4UCINXB.pls 120.0 2006/05/25 12:45:09 bsaratna noship $ */
3:
4: g_debug_level NUMBER;
5: g_success_code VARCHAR2(30);

Line 63: cln_debug_pub.add('Entering m4u_get_cin_extn.update_cln_history',2);

59: l_cln_params wf_parameter_list_t;
60: l_key VARCHAR2(100);
61: BEGIN
62: IF g_debug_level <= 2 THEN
63: cln_debug_pub.add('Entering m4u_get_cin_extn.update_cln_history',2);
64: cln_debug_pub.add('a_cln_id - ' || a_cln_id,1);
65: cln_debug_pub.add('a_sts - ' || a_sts,1);
66: cln_debug_pub.add('a_msg - ' || a_msg,1);
67: END IF;

Line 112: cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Normal',2);

108:
109: commit;
110:
111: IF g_debug_level <= 2 THEN
112: cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Normal',2);
113: END IF;
114:
115: RETURN;
116: EXCEPTION

Line 120: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.update_cln_history',6);

116: EXCEPTION
117: WHEN OTHERS THEN
118: -- ignore exceptions - log and continue
119: IF g_debug_level <= 6 THEN
120: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.update_cln_history',6);
121: cln_debug_pub.add(SQLCODE || ':' || substr(SQLERRM,1,255),6);
122: cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Exception',6);
123: END IF;
124: END;

Line 122: cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Exception',6);

118: -- ignore exceptions - log and continue
119: IF g_debug_level <= 6 THEN
120: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.update_cln_history',6);
121: cln_debug_pub.add(SQLCODE || ':' || substr(SQLERRM,1,255),6);
122: cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Exception',6);
123: END IF;
124: END;
125:
126: -- Add any more validation here

Line 145: cln_debug_pub.add('Entering m4u_get_cin_extn.read_and_validate_inputs',2);

141: BEGIN
142: l_param := NULL;
143:
144: IF g_debug_level <= 2 THEN
145: cln_debug_pub.add('Entering m4u_get_cin_extn.read_and_validate_inputs',2);
146: END IF;
147:
148:
149: l_param_list := a_evnt.getParameterList();

Line 184: cln_debug_pub.add('Exiting m4u_get_cin_extn.read_and_validate_inputs - Normal',2);

180: x_ret_sts := g_success_code;
181: x_ret_msg := NULL;
182:
183: IF g_debug_level <= 2 THEN
184: cln_debug_pub.add('Exiting m4u_get_cin_extn.read_and_validate_inputs - Normal',2);
185: END IF;
186: END;
187:
188:

Line 213: cln_debug_pub.add('Entering m4u_get_cin_extn.get_xml_fragment',2);

209: l_upd_col BOOLEAN;
210: handled_exception exception;
211: BEGIN
212: IF g_debug_level <= 2 THEN
213: cln_debug_pub.add('Entering m4u_get_cin_extn.get_xml_fragment',2);
214: END IF;
215:
216: l_upd_col := false;
217: l_ret_sts := g_success_code;

Line 350: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Normal',2);

346: RAISE handled_exception;
347: END IF;
348:
349: IF g_debug_level <= 2 THEN
350: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Normal',2);
351: END IF;
352: RETURN;
353: EXCEPTION
354: -- all handled errors reach here

Line 358: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);

354: -- all handled errors reach here
355: -- raise exception to stop M4USTD workflow
356: WHEN handled_exception THEN
357: IF g_debug_level <= 6 THEN
358: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);
359: cln_debug_pub.add(g_err,6);
360: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);
361: END IF;
362: RAISE;

Line 360: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);

356: WHEN handled_exception THEN
357: IF g_debug_level <= 6 THEN
358: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);
359: cln_debug_pub.add(g_err,6);
360: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);
361: END IF;
362: RAISE;
363: -- all unhandled errors reach here
364: -- 1. update cln

Line 368: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);

364: -- 1. update cln
365: -- 2. raise exception to stop M4USTD workflow
366: WHEN OTHERS THEN
367: IF g_debug_level <= 6 THEN
368: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);
369: cln_debug_pub.add(SQLCODE || ':' || SQLERRM,6);
370: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);
371: END IF;
372: update_cln_history(l_cln_id,g_error_code,SQLCODE || SQLERRM);

Line 370: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);

366: WHEN OTHERS THEN
367: IF g_debug_level <= 6 THEN
368: cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.get_xml_fragment',6);
369: cln_debug_pub.add(SQLCODE || ':' || SQLERRM,6);
370: cln_debug_pub.add('Exiting m4u_get_cin_extn.get_xml_fragment - Exception',6);
371: END IF;
372: update_cln_history(l_cln_id,g_error_code,SQLCODE || SQLERRM);
373: RAISE;
374: END get_xml_fragment;

Line 382: END m4u_get_cin_extn;

378: g_debug_level := NVL(FND_PROFILE.VALUE('CLN_DEBUG_LEVEL'), 5);
379: g_success_code := FND_API.G_RET_STS_SUCCESS;
380: g_error_code := FND_API.G_RET_STS_ERROR;
381: g_unexp_err_code:= FND_API.G_RET_STS_UNEXP_ERROR;
382: END m4u_get_cin_extn;