2: /* $Header: CSTACRHB.pls 120.20.12010000.3 2008/12/30 15:21:56 smsasidh ship $ */
3:
4: G_PKG_NAME constant varchar2(30) := 'CST_Accrual_Rec_PVT';
5: G_LOG_HEADER constant varchar2(40) := 'cst.plsql.CST_Accrual_Rec_PVT';
6: G_LOG_LEVEL constant number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7:
8: -- Start of comments
9: -- API name : Get_Accounts
10: -- Type : Private
37: l_api_version constant number := 1.0;
38: l_api_name constant varchar2(30) := 'get_accounts';
39: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
40: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
41: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
38: l_api_name constant varchar2(30) := 'get_accounts';
39: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
40: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
41: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
46: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
39: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
40: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
41: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
46: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
47: l_stmt_num number;
40: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
41: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
46: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
47: l_stmt_num number;
48:
41: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
46: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
47: l_stmt_num number;
48:
49: begin
42: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
43: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
44: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
45: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
46: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
47: l_stmt_num number;
48:
49: begin
50:
50:
51: l_stmt_num := 5;
52:
53: if(l_pLog) then
54: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
55: '.begin', 'get_accounts << ' || 'p_ou_id := ' || to_char(p_ou_id));
56: end if;
57:
58: /* Print out the parameters to the Message Stack */
169: x_err_msg := 'CST_Accrual_Rec_PVT.get_accounts() ' || SQLERRM;
170: fnd_message.set_name('BOM','CST_UNEXPECTED');
171: fnd_message.set_token('TOKEN',SQLERRM);
172: if(l_unLog) then
173: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
174: || '(' || to_char(l_stmt_num) || ')', FALSE);
175: end if;
176: fnd_msg_pub.add;
177: return;
221: l_api_version constant number := 1.0;
222: l_api_name constant varchar2(30) := 'flip_flag';
223: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
224: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
225: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
222: l_api_name constant varchar2(30) := 'flip_flag';
223: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
224: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
225: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
230: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
223: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
224: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
225: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
230: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
231: l_stmt_num number;
224: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
225: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
230: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
231: l_stmt_num number;
232:
225: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
230: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
231: l_stmt_num number;
232:
233: begin
226: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
227: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
228: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
229: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
230: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
231: l_stmt_num number;
232:
233: begin
234:
234:
235: l_stmt_num := 5;
236:
237: if(l_pLog) then
238: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
239: '.begin', 'flip_flag << '
240: || 'p_row_id := ' || p_row_id
241: || 'p_bit := ' || p_bit
242: || 'p_prog := ' || to_char(p_prog));
308: x_err_msg := 'CST_Accrual_Rec_PVT.flip_flag() ' || SQLERRM;
309: fnd_message.set_name('BOM','CST_UNEXPECTED');
310: fnd_message.set_token('TOKEN',SQLERRM);
311: if(l_unLog) then
312: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
313: || '(' || to_char(l_stmt_num) || ')', FALSE);
314: end if;
315: fnd_msg_pub.add;
316: return;
350: l_api_version constant number := 1.0;
351: l_api_name constant varchar2(30) := 'calc_age_in_days';
352: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
353: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
354: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
351: l_api_name constant varchar2(30) := 'calc_age_in_days';
352: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
353: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
354: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
359: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
352: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
353: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
354: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
359: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
360: l_stmt_num number;
353: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
354: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
359: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
360: l_stmt_num number;
361:
354: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
359: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
360: l_stmt_num number;
361:
362: begin
355: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
356: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
357: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
358: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
359: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
360: l_stmt_num number;
361:
362: begin
363:
363:
364: l_stmt_num := 5;
365:
366: if(l_pLog) then
367: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
368: '.begin', 'procedure cal_age_in_days << '
369: || 'p_lrd := ' || to_char(p_lrd, 'YYYY/MM/DD HH24:MI:SS')
370: || 'p_lid := ' || to_char(p_lid, 'YYYY/MM/DD HH24:MI:SS'));
371: end if;
439: x_err_msg := 'CST_Accrual_Rec_PVT.calc_age_in_days() ' || SQLERRM;
440: fnd_message.set_name('BOM','CST_UNEXPECTED');
441: fnd_message.set_token('TOKEN',SQLERRM);
442: if(l_unLog) then
443: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
444: || '(' || to_char(l_stmt_num) || ')', FALSE);
445: end if;
446: fnd_msg_pub.add;
447: return;
473: l_api_version constant number := 1.0;
474: l_api_name constant varchar2(30) := 'calc_age_in_days';
475: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
476: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
477: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
474: l_api_name constant varchar2(30) := 'calc_age_in_days';
475: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
476: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
477: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
482: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
475: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
476: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
477: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
482: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
483: l_stmt_num number;
476: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
477: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
482: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
483: l_stmt_num number;
484:
477: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
482: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
483: l_stmt_num number;
484:
485: begin
478: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
479: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
480: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
481: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
482: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
483: l_stmt_num number;
484:
485: begin
486:
486:
487: l_stmt_num := 5;
488:
489: if(l_pLog) then
490: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
491: '.begin', 'function calc_age_in_days << '
492: || 'p_lrd := ' || to_char(p_lrd, 'YYYY/MM/DD HH24:MI:SS')
493: || 'p_lid := ' || to_char(p_lid, 'YYYY/MM/DD HH24:MI:SS'));
494: end if;
552: rollback;
553: fnd_message.set_name('BOM','CST_UNEXPECTED');
554: fnd_message.set_token('TOKEN',SQLERRM);
555: if(l_unLog) then
556: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
557: || '(' || to_char(l_stmt_num) || ')', FALSE);
558: end if;
559: fnd_msg_pub.add;
560: return -1;
604: l_api_version constant number := 1.0;
605: l_api_name constant varchar2(30) := 'update_all';
606: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
607: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
608: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
605: l_api_name constant varchar2(30) := 'update_all';
606: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
607: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
608: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
613: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
606: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
607: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
608: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
613: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
614: l_stmt_num number;
607: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
608: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
613: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
614: l_stmt_num number;
615:
608: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
613: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
614: l_stmt_num number;
615:
616: begin
609: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
610: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
611: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
612: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
613: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
614: l_stmt_num number;
615:
616: begin
617:
617:
618: l_stmt_num := 5;
619:
620: if(l_pLog) then
621: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
622: '.begin', 'update_all << '
623: || 'p_where := ' || p_where
624: || 'p_prog := ' || to_char(p_prog)
625: || 'p_ou := ' || to_char(p_ou_id));
667: x_err_msg := 'CST_Accrual_Rec_PVT.update_all() ' || SQLERRM;
668: fnd_message.set_name('BOM','CST_UNEXPECTED');
669: fnd_message.set_token('TOKEN',SQLERRM);
670: if(l_unLog) then
671: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
672: || '(' || to_char(l_stmt_num) || ')', FALSE);
673: end if;
674: fnd_msg_pub.add;
675: return;
727: l_api_version constant number := 1.0;
728: l_api_name constant varchar2(30) := 'insert_misc_data_all';
729: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
730: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
731: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
728: l_api_name constant varchar2(30) := 'insert_misc_data_all';
729: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
730: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
731: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
736: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
729: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
730: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
731: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
736: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
737: l_stmt_num number;
730: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
731: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
736: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
737: l_stmt_num number;
738: l_rows number;
731: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
736: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
737: l_stmt_num number;
738: l_rows number;
739: l_le_id number;
732: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
733: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
734: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
735: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
736: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
737: l_stmt_num number;
738: l_rows number;
739: l_le_id number;
740: /* Cursor to hold all select miscellaneous transactions*/
776:
777: l_stmt_num := 5;
778:
779: if(l_pLog) then
780: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
781: '.begin', 'insert_misc_data_all << '
782: || 'p_wo_date := ' || to_char(p_wo_date, 'YYYY/MM/DD HH24:MI:SS')
783: || 'p_off_id := ' || to_char(p_off_id)
784: || 'p_rea_id := ' || to_char(p_rea_id)
1064: x_err_msg := 'CST_Accrual_Rec_PVT.insert_misc_data_all() ' || SQLERRM;
1065: fnd_message.set_name('BOM','CST_UNEXPECTED');
1066: fnd_message.set_token('TOKEN',SQLERRM);
1067: if(l_unLog) then
1068: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
1069: || '(' || to_char(l_stmt_num) || ')', FALSE);
1070: end if;
1071: fnd_msg_pub.add;
1072: return;
1123: l_api_version constant number := 1.0;
1124: l_api_name constant varchar2(30) := 'insert_appo_data_all';
1125: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1126: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1127: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1124: l_api_name constant varchar2(30) := 'insert_appo_data_all';
1125: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1126: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1127: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1132: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1125: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1126: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1127: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1132: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1133: l_stmt_num number;
1126: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1127: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1132: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1133: l_stmt_num number;
1134: l_rows number;
1127: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1132: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1133: l_stmt_num number;
1134: l_rows number;
1135: l_ent_sum number;
1128: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1129: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1130: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1131: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1132: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1133: l_stmt_num number;
1134: l_rows number;
1135: l_ent_sum number;
1136: l_off_id number;
1167:
1168: l_stmt_num := 5;
1169:
1170: if(l_pLog) then
1171: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
1172: '.begin', 'insert_appo_data_all << '
1173: || 'p_wo_date := ' || to_char(p_wo_date, 'YYYY/MM/DD HH24:MI:SS')
1174: || 'p_rea_id := ' || to_char(p_rea_id)
1175: || 'p_comments := ' || p_comments
1523: x_err_msg := 'CST_Accrual_Rec_PVT.insert_appo_data_all() ' || SQLERRM;
1524: fnd_message.set_name('BOM','CST_UNEXPECTED');
1525: fnd_message.set_token('TOKEN',SQLERRM);
1526: if(l_unLog) then
1527: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
1528: || '(' || to_char(l_stmt_num) || ')', FALSE);
1529: end if;
1530: fnd_msg_pub.add;
1531: return;
1576: l_api_version constant number := 1.0;
1577: l_api_name constant varchar2(30) := 'is_reversible';
1578: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1579: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1580: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1577: l_api_name constant varchar2(30) := 'is_reversible';
1578: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1579: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1580: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1585: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1578: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1579: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1580: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1585: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1586: l_stmt_num number;
1579: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1580: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1585: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1586: l_stmt_num number;
1587: l_enabled number;
1580: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1585: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1586: l_stmt_num number;
1587: l_enabled number;
1588:
1581: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1582: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1583: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1584: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1585: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1586: l_stmt_num number;
1587: l_enabled number;
1588:
1589: begin
1590:
1591: l_stmt_num := 5;
1592:
1593: if(l_pLog) then
1594: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
1595: '.begin', 'is_reversible << '
1596: || 'p_wo_id := ' || to_char(p_wo_id)
1597: || 'p_txn_c := ' || p_txn_c
1598: || 'p_off_id := ' || to_char(p_off_id)
1670: x_err_msg := 'CST_Accrual_Rec_PVT.is_reversible() ' || SQLERRM;
1671: fnd_message.set_name('BOM','CST_UNEXPECTED');
1672: fnd_message.set_token('TOKEN',SQLERRM);
1673: if(l_unLog) then
1674: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
1675: || '(' || to_char(l_stmt_num) || ')', FALSE);
1676: end if;
1677: fnd_msg_pub.add;
1678: return;
1733: l_api_version constant number := 1.0;
1734: l_api_name constant varchar2(30) := 'reverse_write_offs';
1735: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1736: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1737: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1734: l_api_name constant varchar2(30) := 'reverse_write_offs';
1735: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1736: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1737: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1742: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1735: l_full_name constant varchar2(60) := g_pkg_name || '.' || l_api_name;
1736: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1737: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1742: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1743: l_stmt_num number;
1736: l_module constant varchar2(60) := 'cst.plsql.' || l_full_name;
1737: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1742: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1743: l_stmt_num number;
1744: l_rows number;
1737: l_uLog constant boolean := fnd_log.test(fnd_log.level_unexpected, l_module);
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1742: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1743: l_stmt_num number;
1744: l_rows number;
1745: l_po_proc number;
1738: l_unLog constant boolean := l_uLog and (fnd_log.level_unexpected >= g_log_level);
1739: l_errorLog constant boolean := l_uLog and (fnd_log.level_error >= g_log_level);
1740: l_exceptionLog constant boolean := l_errorLog and (fnd_log.level_exception >= g_log_level);
1741: l_pLog constant boolean := l_exceptionLog and (fnd_log.level_procedure >= g_log_level);
1742: l_sLog constant boolean := l_pLog and (fnd_log.level_statement >= g_log_level);
1743: l_stmt_num number;
1744: l_rows number;
1745: l_po_proc number;
1746: /* Cursor to hold all the distributions marked for reversal */
1781:
1782: l_stmt_num := 5;
1783:
1784: if(l_pLog) then
1785: fnd_log.string(fnd_log.level_procedure, g_log_header || '.' || l_api_name ||
1786: '.begin', 'reverse_write_offs << '
1787: || 'p_wo_date := ' || to_char(p_wo_date, 'YYYY/MM/DD HH24:MI:SS')
1788: || 'p_rea_id := ' || to_char(p_rea_id)
1789: || 'p_comments := ' || p_comments
2436: x_err_msg := 'CST_Accrual_Rec_PVT.reverse_write_offs() ' || SQLERRM;
2437: fnd_message.set_name('BOM','CST_UNEXPECTED');
2438: fnd_message.set_token('TOKEN',SQLERRM);
2439: if(l_unLog) then
2440: fnd_log.message(fnd_log.level_unexpected, g_log_header || '.' || l_api_name
2441: || '(' || to_char(l_stmt_num) || ')', FALSE);
2442: end if;
2443: fnd_msg_pub.add;
2444: return;