104: )
105: is
106: l_api_name CONSTANT VARCHAR2(30) := 'gen_xml_data';
107: l_api_version CONSTANT NUMBER := 1.0;
108: ctx DBMS_XMLQUERY.ctxType;
109: result CLOB;
110: qryCtx DBMS_XMLQUERY.ctxHandle;
111: l_result CLOB;
112: tempResult CLOB;
106: l_api_name CONSTANT VARCHAR2(30) := 'gen_xml_data';
107: l_api_version CONSTANT NUMBER := 1.0;
108: ctx DBMS_XMLQUERY.ctxType;
109: result CLOB;
110: qryCtx DBMS_XMLQUERY.ctxHandle;
111: l_result CLOB;
112: tempResult CLOB;
113: l_where varchar2(8000):='';
114: l_group_by varchar2(4000);
122: l_xml_header clob;
123: l_xml_header_length number;
124: l_errNo NUMBER;
125: l_errMsg VARCHAR2(200);
126: queryCtx DBMS_XMLquery.ctxType;
127: l_xml_query VARCHAR2(32767);
128: TYPE ref_cur IS REF CURSOR;
129: l_xml_stmt ref_cur;
130: l_rows_processed NUMBER;
366: l_order_by:=' order by ipd1.promise_detail_id,jrev.resource_name,amsc.source_code,ipd1.cust_account_id,ipd1.promise_amount)';
367: l_query:=l_query||l_where;
368: l_query:=l_query||l_order_by;
369: FND_FILE.put_line( FND_FILE.LOG,'qry-->'||l_query);
370: ctx := DBMS_XMLQUERY.newContext(l_query);
371: end if;
372:
373: --report mode SUMMARY
374: if p_summ_det = 'SUMMARY' then
416: END IF;
417: -- end if;
418:
419: FND_FILE.put_line( FND_FILE.LOG,'l_query_summ-->'||l_query);
420: ctx := DBMS_XMLQUERY.newContext(l_query);
421: FND_FILE.put_line( FND_FILE.LOG,'7.5');
422:
423: end if;
424:
421: FND_FILE.put_line( FND_FILE.LOG,'7.5');
422:
423: end if;
424:
425: DBMS_XMLQUERY.setRaiseNoRowsException(ctx,TRUE);
426:
427: -- Bind Mandatory Variables
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
424:
425: DBMS_XMLQUERY.setRaiseNoRowsException(ctx,TRUE);
426:
427: -- Bind Mandatory Variables
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
425: DBMS_XMLQUERY.setRaiseNoRowsException(ctx,TRUE);
426:
427: -- Bind Mandatory Variables
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
426:
427: -- Bind Mandatory Variables
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
434:
427: -- Bind Mandatory Variables
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
434:
435: --get the result
428: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_from', p_date_from);
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
434:
435: --get the result
436: BEGIN
429: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_date_to', p_date_to);
430: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency', p_currency);
431: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency1', p_currency);
432: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_currency2', p_currency);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
434:
435: --get the result
436: BEGIN
437: l_result := DBMS_XMLQUERY.getXML(ctx);
433: -- DBMS_XMLQUERY.setBindValue(ctx, 'p_pro_status', p_pro_status);
434:
435: --get the result
436: BEGIN
437: l_result := DBMS_XMLQUERY.getXML(ctx);
438: DBMS_XMLQUERY.closeContext(ctx);
439: l_rows_processed := 1;
440:
441: EXCEPTION
434:
435: --get the result
436: BEGIN
437: l_result := DBMS_XMLQUERY.getXML(ctx);
438: DBMS_XMLQUERY.closeContext(ctx);
439: l_rows_processed := 1;
440:
441: EXCEPTION
442: WHEN OTHERS THEN
439: l_rows_processed := 1;
440:
441: EXCEPTION
442: WHEN OTHERS THEN
443: DBMS_XMLQUERY.getExceptionContent(ctx,l_errNo,l_errMsg);
444: IF l_errNo = 1403 THEN
445: l_rows_processed := 0;
446: --l_no_data_flag:=0;
447: END IF;
444: IF l_errNo = 1403 THEN
445: l_rows_processed := 0;
446: --l_no_data_flag:=0;
447: END IF;
448: DBMS_XMLQUERY.closeContext(ctx);
449: END;
450:
451: IF l_rows_processed <> 0 THEN
452: FND_FILE.put_line( FND_FILE.LOG,'8') ;