136: RAISE G_NO_DATA_FOUND_EXC;
137: WHEN FND_API.G_EXC_ERROR THEN
138: RAISE FND_API.G_EXC_ERROR;
139: WHEN OTHERS THEN
140: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
141: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
142: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
143: FND_MSG_PUB.Add;
144: RAISE FND_API.G_EXC_ERROR;
137: WHEN FND_API.G_EXC_ERROR THEN
138: RAISE FND_API.G_EXC_ERROR;
139: WHEN OTHERS THEN
140: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
141: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
142: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
143: FND_MSG_PUB.Add;
144: RAISE FND_API.G_EXC_ERROR;
145: END Print_Statistics;
138: RAISE FND_API.G_EXC_ERROR;
139: WHEN OTHERS THEN
140: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
141: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
142: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
143: FND_MSG_PUB.Add;
144: RAISE FND_API.G_EXC_ERROR;
145: END Print_Statistics;
146:
214:
215: CLOSE error_messages_cur;
216:
217: IF l_error_count = l_threshold_count THEN
218: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_TOO_MANY_ERRORS');
219: FND_FILE.put_line(FND_FILE.OUTPUT, FND_MESSAGE.GET);
220: END IF;
221:
222: IF G_PROCEDURE_LOG THEN
215: CLOSE error_messages_cur;
216:
217: IF l_error_count = l_threshold_count THEN
218: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_TOO_MANY_ERRORS');
219: FND_FILE.put_line(FND_FILE.OUTPUT, FND_MESSAGE.GET);
220: END IF;
221:
222: IF G_PROCEDURE_LOG THEN
223: fnd_log.string(fnd_log.level_procedure,
227: EXCEPTION
228: WHEN FND_API.G_EXC_ERROR THEN
229: RAISE FND_API.G_EXC_ERROR;
230: WHEN OTHERS THEN
231: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
232: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
233: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
234: FND_MSG_PUB.Add;
235: RAISE FND_API.G_EXC_ERROR;
228: WHEN FND_API.G_EXC_ERROR THEN
229: RAISE FND_API.G_EXC_ERROR;
230: WHEN OTHERS THEN
231: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
232: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
233: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
234: FND_MSG_PUB.Add;
235: RAISE FND_API.G_EXC_ERROR;
236: END Print_Error_Messages;
229: RAISE FND_API.G_EXC_ERROR;
230: WHEN OTHERS THEN
231: FND_MESSAGE.Set_Name('OKS', 'OKS_IMPORT_UNEXPECTED');
232: FND_MESSAGE.set_token('ROUTINE', G_PKG_NAME||'.'||l_routine);
233: FND_MESSAGE.set_token('MESSAGE', 'stmt_num '||l_stmt_num||' ('||SQLCODE||') '||SQLERRM);
234: FND_MSG_PUB.Add;
235: RAISE FND_API.G_EXC_ERROR;
236: END Print_Error_Messages;
237:
319: 'X_retcode = ' || X_retcode);
320: END IF;
321: EXCEPTION
322: WHEN G_NO_DATA_FOUND_EXC THEN
323: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_DATA');
324: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
325: l_msg_data := FND_MESSAGE.GET;
326: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
327: X_errbuf := l_msg_data;
320: END IF;
321: EXCEPTION
322: WHEN G_NO_DATA_FOUND_EXC THEN
323: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_DATA');
324: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
325: l_msg_data := FND_MESSAGE.GET;
326: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
327: X_errbuf := l_msg_data;
328: WHEN no_data_found THEN
321: EXCEPTION
322: WHEN G_NO_DATA_FOUND_EXC THEN
323: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_DATA');
324: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
325: l_msg_data := FND_MESSAGE.GET;
326: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
327: X_errbuf := l_msg_data;
328: WHEN no_data_found THEN
329: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_REQUEST');
325: l_msg_data := FND_MESSAGE.GET;
326: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
327: X_errbuf := l_msg_data;
328: WHEN no_data_found THEN
329: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_REQUEST');
330: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
331: FND_MESSAGE.set_token('STMT', l_stmt_num);
332: l_msg_data := FND_MESSAGE.GET;
333: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
326: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
327: X_errbuf := l_msg_data;
328: WHEN no_data_found THEN
329: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_REQUEST');
330: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
331: FND_MESSAGE.set_token('STMT', l_stmt_num);
332: l_msg_data := FND_MESSAGE.GET;
333: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
334: X_errbuf := l_msg_data;
327: X_errbuf := l_msg_data;
328: WHEN no_data_found THEN
329: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_REQUEST');
330: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
331: FND_MESSAGE.set_token('STMT', l_stmt_num);
332: l_msg_data := FND_MESSAGE.GET;
333: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
334: X_errbuf := l_msg_data;
335: WHEN FND_API.G_EXC_ERROR THEN
328: WHEN no_data_found THEN
329: FND_MESSAGE.Set_Name('OKS', 'OKS_IMP_RPT_NO_REQUEST');
330: FND_MESSAGE.set_token('REQUEST', P_parent_request_id);
331: FND_MESSAGE.set_token('STMT', l_stmt_num);
332: l_msg_data := FND_MESSAGE.GET;
333: FND_FILE.put_line(FND_FILE.OUTPUT, l_msg_data);
334: X_errbuf := l_msg_data;
335: WHEN FND_API.G_EXC_ERROR THEN
336: FND_MSG_PUB.Count_And_Get