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
366: DBMS_XMLGEN.setRowTag(qryCtx, 'Bulk Indexes');
367: l_result := DBMS_XMLGEN.getXML(qryCtx);
368: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
369: IF l_rows_processed <> 0 THEN
370: l_result_length := dbms_lob.getlength(result);
371: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
372: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
373: l_result_length,l_resultOffset);
374: END IF;
367: l_result := DBMS_XMLGEN.getXML(qryCtx);
368: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
369: IF l_rows_processed <> 0 THEN
370: l_result_length := dbms_lob.getlength(result);
371: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
372: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
373: l_result_length,l_resultOffset);
374: END IF;
375: end if;
368: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
369: IF l_rows_processed <> 0 THEN
370: l_result_length := dbms_lob.getlength(result);
371: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
372: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
373: l_result_length,l_resultOffset);
374: END IF;
375: end if;
376:
381: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync type from profile');
382: l_result := DBMS_XMLGEN.getXML(qryCtx);
383: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
384: IF l_rows_processed <> 0 THEN
385: l_result_length := dbms_lob.getlength(result);
386: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
387: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
388: l_result_length,l_resultOffset);
389: END IF;
382: l_result := DBMS_XMLGEN.getXML(qryCtx);
383: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
384: IF l_rows_processed <> 0 THEN
385: l_result_length := dbms_lob.getlength(result);
386: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
387: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
388: l_result_length,l_resultOffset);
389: END IF;
390:
383: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
384: IF l_rows_processed <> 0 THEN
385: l_result_length := dbms_lob.getlength(result);
386: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
387: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
388: l_result_length,l_resultOffset);
389: END IF;
390:
391:
393: DBMS_XMLGEN.setRowTag(qryCtx, 'Workflow Agent Listener Status');
394: l_result := DBMS_XMLGEN.getXML(qryCtx);
395: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
396: IF l_rows_processed <> 0 THEN
397: l_result_length := dbms_lob.getlength(result);
398: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
399: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
400: l_result_length,l_resultOffset);
401: END IF;
394: l_result := DBMS_XMLGEN.getXML(qryCtx);
395: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
396: IF l_rows_processed <> 0 THEN
397: l_result_length := dbms_lob.getlength(result);
398: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
399: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
400: l_result_length,l_resultOffset);
401: END IF;
402:
395: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
396: IF l_rows_processed <> 0 THEN
397: l_result_length := dbms_lob.getlength(result);
398: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
399: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
400: l_result_length,l_resultOffset);
401: END IF;
402:
403:
451: DBMS_XMLGEN.setRowTag(qryCtx, 'Interface table Data');
452: l_result := DBMS_XMLGEN.getXML(qryCtx);
453: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
454: IF l_rows_processed <> 0 THEN
455: l_result_length := dbms_lob.getlength(result);
456: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
457: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
458: l_result_length,l_resultOffset);
459: END IF;
452: l_result := DBMS_XMLGEN.getXML(qryCtx);
453: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
454: IF l_rows_processed <> 0 THEN
455: l_result_length := dbms_lob.getlength(result);
456: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
457: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
458: l_result_length,l_resultOffset);
459: END IF;
460:
453: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
454: IF l_rows_processed <> 0 THEN
455: l_result_length := dbms_lob.getlength(result);
456: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
457: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
458: l_result_length,l_resultOffset);
459: END IF;
460:
461: 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
464: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync Interface table Errors per Entity');
465: l_result := DBMS_XMLGEN.getXML(qryCtx);
466: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
467: IF l_rows_processed <> 0 THEN
468: l_result_length := dbms_lob.getlength(result);
469: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
470: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
471: l_result_length,l_resultOffset);
472: END IF;
465: l_result := DBMS_XMLGEN.getXML(qryCtx);
466: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
467: IF l_rows_processed <> 0 THEN
468: l_result_length := dbms_lob.getlength(result);
469: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
470: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
471: l_result_length,l_resultOffset);
472: END IF;
473:
466: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
467: IF l_rows_processed <> 0 THEN
468: l_result_length := dbms_lob.getlength(result);
469: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
470: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
471: l_result_length,l_resultOffset);
472: END IF;
473:
474:
478: DBMS_XMLGEN.setRowTag(qryCtx, 'Sync program Schedule');
479: l_result := DBMS_XMLGEN.getXML(qryCtx);
480: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
481: IF l_rows_processed <> 0 THEN
482: l_result_length := dbms_lob.getlength(result);
483: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
484: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
485: l_result_length,l_resultOffset);
486: END IF;
479: l_result := DBMS_XMLGEN.getXML(qryCtx);
480: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
481: IF l_rows_processed <> 0 THEN
482: l_result_length := dbms_lob.getlength(result);
483: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
484: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
485: l_result_length,l_resultOffset);
486: END IF;
487:
480: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
481: IF l_rows_processed <> 0 THEN
482: l_result_length := dbms_lob.getlength(result);
483: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
484: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
485: l_result_length,l_resultOffset);
486: END IF;
487:
488:
521: DBMS_XMLGEN.setRowTag(qryCtx, 'DQM Profiles');
522: l_result := DBMS_XMLGEN.getXML(qryCtx);
523: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
524: IF l_rows_processed <> 0 THEN
525: l_result_length := dbms_lob.getlength(result);
526: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
527: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
528: l_result_length,l_resultOffset);
529: END IF;
522: l_result := DBMS_XMLGEN.getXML(qryCtx);
523: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
524: IF l_rows_processed <> 0 THEN
525: l_result_length := dbms_lob.getlength(result);
526: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
527: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
528: l_result_length,l_resultOffset);
529: END IF;
530:
523: l_rows_processed := DBMS_XMLGEN.getNumRowsProcessed(qryCtx);
524: IF l_rows_processed <> 0 THEN
525: l_result_length := dbms_lob.getlength(result);
526: l_resultOffset := DBMS_LOB.INSTR(l_result ,'>');
527: dbms_lob.copy(result,l_result,dbms_lob.getlength(l_result)-l_resultOffset,
528: l_result_length,l_resultOffset);
529: END IF;
530:
531:
530:
531:
532:
533: l_close_tag := l_new_line||''||l_new_line;
534: dbms_lob.writeAppend(result, length(l_close_tag), l_close_tag);
535:
536:
537: fnd_file.put_line (
538: which => fnd_file.log,
538: which => fnd_file.log,
539: buff => 'DQM Setup Snapshot XML');
540:
541: -- get length of internal lob and open the dest. file.
542: l_clob_size := dbms_lob.getlength(result);
543:
544: IF (l_clob_size = 0) THEN
545: fnd_file.put_line (
546: which => fnd_file.log,
560: fnd_file.put_line (
561: which => fnd_file.log,
562: buff => 'Off Set: ' || l_offset);
563:
564: l_chunk := dbms_lob.substr (result, l_chunk_size, l_offset);
565:
566: fnd_file.put_line (
567: which => fnd_file.log,
568: buff => l_chunk);
573:
574: l_bloc_subset := UTL_RAW.CAST_TO_RAW (l_chunk);
575: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
576:
577: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
578: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
579: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
580:
581: l_clob_size := l_clob_size - l_chunk_size;
574: l_bloc_subset := UTL_RAW.CAST_TO_RAW (l_chunk);
575: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
576:
577: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
578: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
579: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
580:
581: l_clob_size := l_clob_size - l_chunk_size;
582: l_offset := l_offset + l_chunk_size;
575: l_new_length := UTL_RAW.LENGTH(l_bloc_subset);
576:
577: dbms_lob.createtemporary(l_bloc_result,FALSE,DBMS_LOB.CALL);
578: dbms_lob.open(l_bloc_result,dbms_lob.lob_readwrite);
579: dbms_lob.write(l_bloc_result,l_new_length,l_offset,l_bloc_subset);
580:
581: l_clob_size := l_clob_size - l_chunk_size;
582: l_offset := l_offset + l_chunk_size;
583: