APPS.ARCM_EXTRACT_XML_CF dependencies on ARCM_EXTRACT_XML_CF

Line 1: PACKAGE BODY ARCM_EXTRACT_XML_CF AS

1: PACKAGE BODY ARCM_EXTRACT_XML_CF AS
2: /* $Header: ARCMXTCFB.pls 120.2 2006/05/03 08:19:57 kjoshi noship $ */
3:
4: pg_bind_var NUMBER(10);
5: pg_debug VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'),'N');

Line 10: ar_cmgt_util.debug (p_message_name, 'ar.cmgt.plsql.ARCM_EXTRACT_XML_CF' );

6:
7: PROCEDURE debug (
8: p_message_name IN VARCHAR2 ) IS
9: BEGIN
10: ar_cmgt_util.debug (p_message_name, 'ar.cmgt.plsql.ARCM_EXTRACT_XML_CF' );
11: END;
12:
13: FUNCTION get_case_folder_id return NUMBER is
14: BEGIN

Line 52: debug('ARCM_EXTRACT_XML_CF.process_xml_data(+)');

48:
49: BEGIN
50: IF pg_debug = 'Y'
51: THEN
52: debug('ARCM_EXTRACT_XML_CF.process_xml_data(+)');
53: END IF;
54:
55: -- get length of internal lob and open the dest. file.
56:

Line 92: debug('ARCM_EXTRACT_XML_CF.process_xml_data(-)');

88:
89: fnd_file.new_line(fnd_file.output,1);
90: IF pg_debug = 'Y'
91: THEN
92: debug('ARCM_EXTRACT_XML_CF.process_xml_data(-)');
93: END IF;
94:
95: EXCEPTION
96: WHEN OTHERS THEN

Line 142: debug('ARCM_EXTRACT_XML_CF.RAISE_BE_XTRACT(+)');

138:
139: BEGIN
140: IF pg_debug = 'Y'
141: THEN
142: debug('ARCM_EXTRACT_XML_CF.RAISE_BE_XTRACT(+)');
143: debug('case folder id '|| P_CASE_FOLDER_ID );
144: END IF;
145: --open the cursor and fetch the attributes
146:

Line 241: debug('ARCM_EXTRACT_XML_CF.RAISE_BE_XTRACT(-)');

237:
238: l_list.DELETE;
239: IF pg_debug = 'Y'
240: THEN
241: debug('ARCM_EXTRACT_XML_CF.RAISE_BE_XTRACT(-)');
242: END IF;
243: END ;
244:
245: /*========================================================================+

Line 287: debug('ARCM_EXTRACT_XML_CF.EXTRACT(+)');

283:
284: BEGIN
285: IF pg_debug = 'Y'
286: THEN
287: debug('ARCM_EXTRACT_XML_CF.EXTRACT(+)');
288: debug ( 'case folder id : '|| p_case_folder_id);
289: END IF;
290: --initialize the return code.
291:

Line 314: ' WHERE CASE_FOLDER_ID =ARCM_EXTRACT_XML_CF.get_case_folder_id' ||

310:
311: l_xml_query := 'SELECT CFD.CASE_FOLDER_ID,CFD.DATA_POINT_ID,
312: DPD.DATA_POINT_NAME,CFD.DATA_POINT_VALUE,CFD.SCORE' ||
313: ' FROM AR_CMGT_CF_DTLS CFD,AR_CMGT_SCORABLE_DATA_POINTS_V DPD' ||
314: ' WHERE CASE_FOLDER_ID =ARCM_EXTRACT_XML_CF.get_case_folder_id' ||
315: ' AND CFD.DATA_POINT_ID = DPD.DATA_POINT_ID ' ;
316: ELSE
317: ERRBUF := 'Null values found in P_CASE_FOLDER_ID';
318: RETCODE :=1;

Line 346: debug('ARCM_EXTRACT_XML_CF.EXTRACT(-)');

342: -- raise the business event
343: RAISE_BE_XTRACT(P_CASE_FOLDER_ID);
344: IF pg_debug = 'Y'
345: THEN
346: debug('ARCM_EXTRACT_XML_CF.EXTRACT(-)');
347: END IF;
348: END EXTRACT;
349:
350:

Line 351: END ARCM_EXTRACT_XML_CF;

347: END IF;
348: END EXTRACT;
349:
350:
351: END ARCM_EXTRACT_XML_CF;