226: -- free temporary memory
227:
228: DBMS_LOB.FREETEMPORARY (l_xml_doc);
229:
230: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('NORMAL', 'Request Completed Successfully');
231:
232: -- Write the module name to fnd log file
233:
234: IF (l_pLog) THEN
269: p_msg_data => l_msg_data,
270: x_return_status => l_return_status);
271:
272: l_msg_data := SUBSTRB (SQLERRM,1,240);
273: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_msg_data);
274:
275: l_conc_request := fnd_concurrent.set_completion_status('ERROR',substr(fnd_message.get_string('BOM',l_error_message),1,240));
276:
277: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
271:
272: l_msg_data := SUBSTRB (SQLERRM,1,240);
273: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_msg_data);
274:
275: l_conc_request := fnd_concurrent.set_completion_status('ERROR',substr(fnd_message.get_string('BOM',l_error_message),1,240));
276:
277: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
278: FND_MSG_PUB.Count_And_Get
279: ( p_count => l_msg_count,
286: p_msg_data => l_msg_data,
287: x_return_status => l_return_status);
288:
289: l_msg_data := SUBSTRB (SQLERRM,1,240);
290: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_msg_data);
291:
292: WHEN OTHERS THEN
293: IF (l_uLog) THEN
294: FND_LOG.STRING (FND_LOG.LEVEL_UNEXPECTED,
312: p_msg_data => l_msg_data,
313: x_return_status => l_return_status);
314:
315: l_msg_data := SUBSTRB (SQLERRM,1,240);
316: l_success := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR', l_msg_data);
317:
318: END Generate_APPOReportXml;
319:
320: PROCEDURE Add_Parameters