188: l_xml_header := l_xml_header ||l_new_line||'
189: end if;
190:
191: l_xml_header_length := length(l_xml_header);
192: dbms_lob.createtemporary(result,FALSE,DBMS_LOB.CALL);
193: dbms_lob.open(result,dbms_lob.lob_readwrite);
194: dbms_lob.writeAppend(result, length(l_xml_header), l_xml_header);
195: --dbms_lob.write(result,l_xml_header_length,1,l_xml_header);
196:
189: end if;
190:
191: l_xml_header_length := length(l_xml_header);
192: dbms_lob.createtemporary(result,FALSE,DBMS_LOB.CALL);
193: dbms_lob.open(result,dbms_lob.lob_readwrite);
194: dbms_lob.writeAppend(result, length(l_xml_header), l_xml_header);
195: --dbms_lob.write(result,l_xml_header_length,1,l_xml_header);
196:
197: --DQM STAGING LOG INFORMATION
190:
191: l_xml_header_length := length(l_xml_header);
192: dbms_lob.createtemporary(result,FALSE,DBMS_LOB.CALL);
193: dbms_lob.open(result,dbms_lob.lob_readwrite);
194: dbms_lob.writeAppend(result, length(l_xml_header), l_xml_header);
195: --dbms_lob.write(result,l_xml_header_length,1,l_xml_header);
196:
197: --DQM STAGING LOG INFORMATION
198:
191: l_xml_header_length := length(l_xml_header);
192: dbms_lob.createtemporary(result,FALSE,DBMS_LOB.CALL);
193: dbms_lob.open(result,dbms_lob.lob_readwrite);
194: dbms_lob.writeAppend(result, length(l_xml_header), l_xml_header);
195: --dbms_lob.write(result,l_xml_header_length,1,l_xml_header);
196:
197: --DQM STAGING LOG INFORMATION
198:
199: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
197: --DQM STAGING LOG INFORMATION
198:
199: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
200: IF l_rows_processed <> 0 THEN
201: l_resultOffset := DBMS_LOB.INSTR(l_result,'>');
202: l_result_length := dbms_lob.getlength(result);
203: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
204: l_result_length,l_resultOffset);
205: END IF;
198:
199: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
200: IF l_rows_processed <> 0 THEN
201: l_resultOffset := DBMS_LOB.INSTR(l_result,'>');
202: l_result_length := dbms_lob.getlength(result);
203: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
204: l_result_length,l_resultOffset);
205: END IF;
206:
199: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
200: IF l_rows_processed <> 0 THEN
201: l_resultOffset := DBMS_LOB.INSTR(l_result,'>');
202: l_result_length := dbms_lob.getlength(result);
203: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
204: l_result_length,l_resultOffset);
205: END IF;
206:
207:
208: -- DQM ATTRIBUTE DETAILS
209:
210: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(queryCtx);
211: IF l_rows_processed <> 0 THEN
212: l_result_length := dbms_lob.getlength(result);
213: l_attrib_resultOffset := DBMS_LOB.INSTR(l_attrib_result ,'>');
214: dbms_lob.copy(result,l_attrib_result,dbms_lob.getlength(l_attrib_result)-l_attrib_resultOffset,
215: l_result_length,l_attrib_resultOffset);
216: END IF;
209:
210: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(queryCtx);
211: IF l_rows_processed <> 0 THEN
212: l_result_length := dbms_lob.getlength(result);
213: l_attrib_resultOffset := DBMS_LOB.INSTR(l_attrib_result ,'>');
214: dbms_lob.copy(result,l_attrib_result,dbms_lob.getlength(l_attrib_result)-l_attrib_resultOffset,
215: l_result_length,l_attrib_resultOffset);
216: END IF;
217:
210: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(queryCtx);
211: IF l_rows_processed <> 0 THEN
212: l_result_length := dbms_lob.getlength(result);
213: l_attrib_resultOffset := DBMS_LOB.INSTR(l_attrib_result ,'>');
214: dbms_lob.copy(result,l_attrib_result,dbms_lob.getlength(l_attrib_result)-l_attrib_resultOffset,
215: l_result_length,l_attrib_resultOffset);
216: END IF;
217:
218: -- DQM MATCH RULES DETAILS
218: -- DQM MATCH RULES DETAILS
219:
220: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(q1Ctx);
221: IF l_rows_processed <> 0 THEN
222: l_result_length := dbms_lob.getlength(result);
223: l_mrule_resultOffset := DBMS_LOB.INSTR(l_mrule_result ,'>');
224: dbms_lob.copy(result,l_mrule_result,dbms_lob.getlength(l_mrule_result)-l_mrule_resultOffset,
225: l_result_length,l_mrule_resultOffset);
226: END IF;
219:
220: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(q1Ctx);
221: IF l_rows_processed <> 0 THEN
222: l_result_length := dbms_lob.getlength(result);
223: l_mrule_resultOffset := DBMS_LOB.INSTR(l_mrule_result ,'>');
224: dbms_lob.copy(result,l_mrule_result,dbms_lob.getlength(l_mrule_result)-l_mrule_resultOffset,
225: l_result_length,l_mrule_resultOffset);
226: END IF;
227:
220: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(q1Ctx);
221: IF l_rows_processed <> 0 THEN
222: l_result_length := dbms_lob.getlength(result);
223: l_mrule_resultOffset := DBMS_LOB.INSTR(l_mrule_result ,'>');
224: dbms_lob.copy(result,l_mrule_result,dbms_lob.getlength(l_mrule_result)-l_mrule_resultOffset,
225: l_result_length,l_mrule_resultOffset);
226: END IF;
227:
228: --Time for each operation in Staging Log Table
233: DBMS_XMLGEN.setRowTag(qryCtx, 'Time for STAGE_NEW_TRANSFORMATIONS in Staging Log Table');
234: l_result := DBMS_XMLGEN.getXML(qryCtx);
235: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
236: IF l_rows_processed <> 0 THEN
237: l_result_length := dbms_lob.getlength(result);
238: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
239: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
240: l_result_length,l_resultOffset);
241: END IF;
234: l_result := DBMS_XMLGEN.getXML(qryCtx);
235: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
236: IF l_rows_processed <> 0 THEN
237: l_result_length := dbms_lob.getlength(result);
238: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
239: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
240: l_result_length,l_resultOffset);
241: END IF;
242:
235: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
236: IF l_rows_processed <> 0 THEN
237: l_result_length := dbms_lob.getlength(result);
238: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
239: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
240: l_result_length,l_resultOffset);
241: END IF;
242:
243:
247: DBMS_XMLGEN.setRowTag(qryCtx, 'Time for STAGE_ALL_DATA in Staging Log Table');
248: l_result := DBMS_XMLGEN.getXML(qryCtx);
249: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
250: IF l_rows_processed <> 0 THEN
251: l_result_length := dbms_lob.getlength(result);
252: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
253: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
254: l_result_length,l_resultOffset);
255: END IF;
248: l_result := DBMS_XMLGEN.getXML(qryCtx);
249: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
250: IF l_rows_processed <> 0 THEN
251: l_result_length := dbms_lob.getlength(result);
252: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
253: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
254: l_result_length,l_resultOffset);
255: END IF;
256:
249: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
250: IF l_rows_processed <> 0 THEN
251: l_result_length := dbms_lob.getlength(result);
252: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
253: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
254: l_result_length,l_resultOffset);
255: END IF;
256:
257: qryCtx := dbms_xmlgen.newContext('select operation,to_char(max(end_time)-min(start_time)) time_diff from hz_dqm_stage_log
260: DBMS_XMLGEN.setRowTag(qryCtx, 'Time for CREATE_INDEXES in Staging Log Table');
261: l_result := DBMS_XMLGEN.getXML(qryCtx);
262: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
263: IF l_rows_processed <> 0 THEN
264: l_result_length := dbms_lob.getlength(result);
265: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
266: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
267: l_result_length,l_resultOffset);
268: END IF;
261: l_result := DBMS_XMLGEN.getXML(qryCtx);
262: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
263: IF l_rows_processed <> 0 THEN
264: l_result_length := dbms_lob.getlength(result);
265: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
266: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
267: l_result_length,l_resultOffset);
268: END IF;
269:
262: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
263: IF l_rows_processed <> 0 THEN
264: l_result_length := dbms_lob.getlength(result);
265: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
266: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
267: l_result_length,l_resultOffset);
268: END IF;
269:
270:
274: DBMS_XMLGEN.setRowTag(qryCtx, 'Time to build intermedia index by entity');
275: l_result := DBMS_XMLGEN.getXML(qryCtx);
276: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
277: IF l_rows_processed <> 0 THEN
278: l_result_length := dbms_lob.getlength(result);
279: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
280: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
281: l_result_length,l_resultOffset);
282: END IF;
275: l_result := DBMS_XMLGEN.getXML(qryCtx);
276: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
277: IF l_rows_processed <> 0 THEN
278: l_result_length := dbms_lob.getlength(result);
279: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
280: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
281: l_result_length,l_resultOffset);
282: END IF;
283:
276: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
277: IF l_rows_processed <> 0 THEN
278: l_result_length := dbms_lob.getlength(result);
279: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
280: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
281: l_result_length,l_resultOffset);
282: END IF;
283:
284: /*
328: DBMS_XMLGEN.setRowTag(qryCtx, 'Intermedia index details');
329: l_result := DBMS_XMLGEN.getXML(qryCtx);
330: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
331: IF l_rows_processed <> 0 THEN
332: l_result_length := dbms_lob.getlength(result);
333: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
334: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
335: l_result_length,l_resultOffset);
336: END IF;
329: l_result := DBMS_XMLGEN.getXML(qryCtx);
330: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
331: IF l_rows_processed <> 0 THEN
332: l_result_length := dbms_lob.getlength(result);
333: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
334: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
335: l_result_length,l_resultOffset);
336: END IF;
337:
330: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
331: IF l_rows_processed <> 0 THEN
332: l_result_length := dbms_lob.getlength(result);
333: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
334: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
335: l_result_length,l_resultOffset);
336: END IF;
337:
338:
340: DBMS_XMLGEN.setRowTag(qryCtx, 'Pending Syncs on Intermedia Index');
341: l_result := DBMS_XMLGEN.getXML(qryCtx);
342: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
343: IF l_rows_processed <> 0 THEN
344: l_result_length := dbms_lob.getlength(result);
345: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
346: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
347: l_result_length,l_resultOffset);
348: END IF;
341: l_result := DBMS_XMLGEN.getXML(qryCtx);
342: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
343: IF l_rows_processed <> 0 THEN
344: l_result_length := dbms_lob.getlength(result);
345: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
346: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
347: l_result_length,l_resultOffset);
348: END IF;
349:
342: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
343: IF l_rows_processed <> 0 THEN
344: l_result_length := dbms_lob.getlength(result);
345: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
346: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
347: l_result_length,l_resultOffset);
348: END IF;
349:
350:
352: DBMS_XMLGEN.setRowTag(qryCtx, 'Number of records with errors');
353: l_result := DBMS_XMLGEN.getXML(qryCtx);
354: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
355: IF l_rows_processed <> 0 THEN
356: l_result_length := dbms_lob.getlength(result);
357: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
358: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
359: l_result_length,l_resultOffset);
360: END IF;
353: l_result := DBMS_XMLGEN.getXML(qryCtx);
354: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
355: IF l_rows_processed <> 0 THEN
356: l_result_length := dbms_lob.getlength(result);
357: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
358: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
359: l_result_length,l_resultOffset);
360: END IF;
361:
354: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
355: IF l_rows_processed <> 0 THEN
356: l_result_length := dbms_lob.getlength(result);
357: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
358: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
359: l_result_length,l_resultOffset);
360: END IF;
361:
362: if(fnd_installation.GET_APP_INFO('AR',l_status,l_temp,l_owner)) then
364: DBMS_XMLGEN.setRowTag(qryCtx, 'Bulk Indexes');
365: l_result := DBMS_XMLGEN.getXML(qryCtx);
366: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
367: IF l_rows_processed <> 0 THEN
368: l_result_length := dbms_lob.getlength(result);
369: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
370: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
371: l_result_length,l_resultOffset);
372: END IF;
365: l_result := DBMS_XMLGEN.getXML(qryCtx);
366: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
367: IF l_rows_processed <> 0 THEN
368: l_result_length := dbms_lob.getlength(result);
369: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
370: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
371: l_result_length,l_resultOffset);
372: END IF;
373: end if;
366: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
367: IF l_rows_processed <> 0 THEN
368: l_result_length := dbms_lob.getlength(result);
369: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
370: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
371: l_result_length,l_resultOffset);
372: END IF;
373: end if;
374:
379: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync type from profile');
380: l_result := DBMS_XMLGEN.getXML(qryCtx);
381: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
382: IF l_rows_processed <> 0 THEN
383: l_result_length := dbms_lob.getlength(result);
384: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
385: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
386: l_result_length,l_resultOffset);
387: END IF;
380: l_result := DBMS_XMLGEN.getXML(qryCtx);
381: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
382: IF l_rows_processed <> 0 THEN
383: l_result_length := dbms_lob.getlength(result);
384: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
385: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
386: l_result_length,l_resultOffset);
387: END IF;
388:
381: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
382: IF l_rows_processed <> 0 THEN
383: l_result_length := dbms_lob.getlength(result);
384: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
385: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
386: l_result_length,l_resultOffset);
387: END IF;
388:
389:
391: DBMS_XMLGEN.setRowTag(qryCtx, 'Workflow Agent Listener Status');
392: l_result := DBMS_XMLGEN.getXML(qryCtx);
393: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
394: IF l_rows_processed <> 0 THEN
395: l_result_length := dbms_lob.getlength(result);
396: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
397: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
398: l_result_length,l_resultOffset);
399: END IF;
392: l_result := DBMS_XMLGEN.getXML(qryCtx);
393: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
394: IF l_rows_processed <> 0 THEN
395: l_result_length := dbms_lob.getlength(result);
396: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
397: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
398: l_result_length,l_resultOffset);
399: END IF;
400:
393: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
394: IF l_rows_processed <> 0 THEN
395: l_result_length := dbms_lob.getlength(result);
396: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
397: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
398: l_result_length,l_resultOffset);
399: END IF;
400:
401:
449: DBMS_XMLGEN.setRowTag(qryCtx, 'Interface table Data');
450: l_result := DBMS_XMLGEN.getXML(qryCtx);
451: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
452: IF l_rows_processed <> 0 THEN
453: l_result_length := dbms_lob.getlength(result);
454: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
455: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
456: l_result_length,l_resultOffset);
457: END IF;
450: l_result := DBMS_XMLGEN.getXML(qryCtx);
451: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
452: IF l_rows_processed <> 0 THEN
453: l_result_length := dbms_lob.getlength(result);
454: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
455: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
456: l_result_length,l_resultOffset);
457: END IF;
458:
451: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
452: IF l_rows_processed <> 0 THEN
453: l_result_length := dbms_lob.getlength(result);
454: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
455: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
456: l_result_length,l_resultOffset);
457: END IF;
458:
459: qryCtx := dbms_xmlgen.newContext('select party_id,record_id,entity,decode(operation,''U'',''Update'',''C'',''Create'',operation) operation,''Error'' staged_flag ,org_contact_id,party_site_id,error_data
462: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync Interface table Errors per Entity');
463: l_result := DBMS_XMLGEN.getXML(qryCtx);
464: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
465: IF l_rows_processed <> 0 THEN
466: l_result_length := dbms_lob.getlength(result);
467: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
468: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
469: l_result_length,l_resultOffset);
470: END IF;
463: l_result := DBMS_XMLGEN.getXML(qryCtx);
464: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
465: IF l_rows_processed <> 0 THEN
466: l_result_length := dbms_lob.getlength(result);
467: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
468: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
469: l_result_length,l_resultOffset);
470: END IF;
471:
464: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
465: IF l_rows_processed <> 0 THEN
466: l_result_length := dbms_lob.getlength(result);
467: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
468: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
469: l_result_length,l_resultOffset);
470: END IF;
471:
472:
476: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync program Schedule');
477: l_result := DBMS_XMLGEN.getXML(qryCtx);
478: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
479: IF l_rows_processed <> 0 THEN
480: l_result_length := dbms_lob.getlength(result);
481: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
482: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
483: l_result_length,l_resultOffset);
484: END IF;
477: l_result := DBMS_XMLGEN.getXML(qryCtx);
478: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
479: IF l_rows_processed <> 0 THEN
480: l_result_length := dbms_lob.getlength(result);
481: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
482: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
483: l_result_length,l_resultOffset);
484: END IF;
485:
478: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
479: IF l_rows_processed <> 0 THEN
480: l_result_length := dbms_lob.getlength(result);
481: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
482: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
483: l_result_length,l_resultOffset);
484: END IF;
485:
486:
519: DBMS_XMLGEN.setRowTag(qryCtx, 'DQM Profiles');
520: l_result := DBMS_XMLGEN.getXML(qryCtx);
521: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
522: IF l_rows_processed <> 0 THEN
523: l_result_length := dbms_lob.getlength(result);
524: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
525: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
526: l_result_length,l_resultOffset);
527: END IF;
520: l_result := DBMS_XMLGEN.getXML(qryCtx);
521: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
522: IF l_rows_processed <> 0 THEN
523: l_result_length := dbms_lob.getlength(result);
524: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
525: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
526: l_result_length,l_resultOffset);
527: END IF;
528:
521: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
522: IF l_rows_processed <> 0 THEN
523: l_result_length := dbms_lob.getlength(result);
524: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
525: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
526: l_result_length,l_resultOffset);
527: END IF;
528:
529:
528:
529:
530:
531: l_close_tag := l_new_line||''||l_new_line;
532: dbms_lob.writeAppend(result, length(l_close_tag), l_close_tag);
533:
534:
535: fnd_file.put_line (
536: which => fnd_file.log,
536: which => fnd_file.log,
537: buff => 'DQM Setup Snapshot XML');
538:
539: -- get length of internal lob and open the dest. file.
540: l_clob_size := dbms_lob.getlength(result);
541:
542: IF (l_clob_size = 0) THEN
543: fnd_file.put_line (
544: which => fnd_file.log,
558: fnd_file.put_line (
559: which => fnd_file.log,
560: buff => 'Off Set: ' || l_offset);
561:
562: l_chunk := dbms_lob.substr (result, l_chunk_size, l_offset);
563:
564: fnd_file.put_line (
565: which => fnd_file.log,
566: buff => l_chunk);
571:
572: l_bloc_subset := UTL_RAW.CAST_TO_RAW (l_chunk);
573: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
574:
575: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
576: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
577: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
578:
579: l_clob_size := l_clob_size - l_chunk_size;
572: l_bloc_subset := UTL_RAW.CAST_TO_RAW (l_chunk);
573: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
574:
575: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
576: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
577: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
578:
579: l_clob_size := l_clob_size - l_chunk_size;
580: l_offset := l_offset + l_chunk_size;
573: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
574:
575: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
576: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
577: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
578:
579: l_clob_size := l_clob_size - l_chunk_size;
580: l_offset := l_offset + l_chunk_size;
581: