23: --========================================================================
24: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
25: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
26: G_MODULE_HEAD CONSTANT VARCHAR2(200) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
27: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
24: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'oks.plsql.import.' || G_PKG_NAME;
25: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
26: G_MODULE_HEAD CONSTANT VARCHAR2(200) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
27: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
25: G_WORKER_REQ_ID CONSTANT NUMBER := FND_GLOBAL.conc_request_id;
26: G_MODULE_HEAD CONSTANT VARCHAR2(200) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
27: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
26: G_MODULE_HEAD CONSTANT VARCHAR2(200) := G_MODULE_NAME || '(Req Id = '||G_WORKER_REQ_ID||').';
27: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
34: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
27: G_LOG_LEVEL CONSTANT NUMBER := fnd_log.G_CURRENT_RUNTIME_LEVEL;
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
34: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
35:
28: G_UNEXPECTED_LOG CONSTANT BOOLEAN := fnd_log.level_unexpected >= G_LOG_LEVEL AND
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
34: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
35:
36: --=========================
29: fnd_log.TEST(fnd_log.level_unexpected, G_MODULE_HEAD);
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
34: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
35:
36: --=========================
37: -- PROCEDURES AND FUNCTIONS
30: G_ERROR_LOG CONSTANT BOOLEAN := G_UNEXPECTED_LOG AND fnd_log.level_error >= G_LOG_LEVEL;
31: G_EXCEPTION_LOG CONSTANT BOOLEAN := G_ERROR_LOG AND fnd_log.level_exception >= G_LOG_LEVEL;
32: G_EVENT_LOG CONSTANT BOOLEAN := G_EXCEPTION_LOG AND fnd_log.level_event >= G_LOG_LEVEL;
33: G_PROCEDURE_LOG CONSTANT BOOLEAN := G_EVENT_LOG AND fnd_log.level_procedure >= G_LOG_LEVEL;
34: G_STMT_LOG CONSTANT BOOLEAN := G_PROCEDURE_LOG AND fnd_log.level_statement >= G_LOG_LEVEL;
35:
36: --=========================
37: -- PROCEDURES AND FUNCTIONS
38: --=========================
75: --
76: -- Worker processing for OKS_HEADERS_INTERFACE table
77: --
78: IF G_PROCEDURE_LOG THEN
79: fnd_log.string(fnd_log.level_procedure,
80: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
81: 'Entering with ' ||
82: 'P_batch_id = ' || P_batch_id ||','||
83: 'P_Num_Workers = ' || P_Num_Workers ||','||
98: l_table_owner);
99:
100: if ((l_retstatus = FALSE) OR (l_table_owner is null)) then
101: IF G_ERROR_LOG THEN
102: fnd_log.string(fnd_log.level_error,
103: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
104: 'Cannot get schema name for product : '||l_product);
105: END IF;
106: raise_application_error(-20001,'Cannot get schema name for product : '||l_product);
106: raise_application_error(-20001,'Cannot get schema name for product : '||l_product);
107: end if;
108:
109: IF G_STMT_LOG THEN
110: fnd_log.string(fnd_log.level_statement,
111: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
112: 'Table Owner ' || l_table_owner);
113: END IF;
114:
213: X_retcode := AD_CONC_UTILS_PKG.CONC_SUCCESS;
214: X_errbuf := ' ';
215:
216: IF G_PROCEDURE_LOG THEN
217: fnd_log.string(fnd_log.level_procedure,
218: G_MODULE_HEAD || l_routine || '.' ||l_stmt_num,
219: 'Exit with ' ||
220: 'X_errbuf = ' || X_errbuf ||','||
221: 'X_retcode = ' || X_retcode);
231: X_retcode := '2';
232: X_errbuf := l_msg_data;
233:
234: IF G_EXCEPTION_LOG THEN
235: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION, G_MODULE_HEAD || l_routine , l_msg_data);
236: END IF;
237:
238: WHEN OTHERS THEN
239: X_errbuf := 'Stmt no '||l_stmt_num||' '|| SQLCODE || substr(SQLERRM, 1, 200);
244: ,p_data => l_msg_data
245: );
246:
247: IF G_EXCEPTION_LOG THEN
248: FND_LOG.string(FND_LOG.LEVEL_EXCEPTION
249: , G_MODULE_HEAD || l_routine ||'.others_exc'
250: , 'others: ' || X_errbuf || ' ' || substr(l_msg_data, 1,250)
251: );
252: END IF;