1: PACKAGE BODY cn_calc_subledger_pvt AS
2: -- $Header: cnvcsubb.pls 120.9 2008/07/17 20:20:18 rnagired ship $
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CN_CALC_SUBLEDGER_PVT';
5: g_org_id NUMBER;
1: PACKAGE BODY cn_calc_subledger_pvt AS
2: -- $Header: cnvcsubb.pls 120.9 2008/07/17 20:20:18 rnagired ship $
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30) := 'CN_CALC_SUBLEDGER_PVT';
5: g_org_id NUMBER;
6:
7: FUNCTION get_max_period(p_quota_id NUMBER,
8: p_period_id NUMBER,
289: x_return_status := FND_API.G_RET_STS_SUCCESS;
290:
291: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
292: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
293: 'cn.plsql.cn_calc_subledger_pvt.update_srp_subledger.begin',
294: 'Beginning of update_srp_subledger ...');
295: end if;
296:
297: cn_message_pkg.debug('Start updating payment subledgers ... ');
419: end if;
420:
421: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
422: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
423: 'cn.plsql.cn_calc_subledger_pvt.update_srp_subledger.end',
424: 'End of update_srp_subledger ...');
425: end if;
426:
427: -- Standard check of p_commit.
472: );
473:
474: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
475: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
476: 'cn.plsql.cn_calc_subledger_pvt.update_srp_subledger.exception',
477: sqlerrm);
478: end if;
479:
480: fnd_file.put_line(fnd_file.log, 'EXCEPTION in update_srp_subledger: '||sqlerrm);
477: sqlerrm);
478: end if;
479:
480: fnd_file.put_line(fnd_file.log, 'EXCEPTION in update_srp_subledger: '||sqlerrm);
481: cn_message_pkg.debug('Exception occurs in cn_calc_subledger_pvt.update_srp_subledger: ');
482: cn_message_pkg.debug(sqlerrm);
483: END update_srp_subledger;
484:
485: -- API name : update_srp_pe_subledger
668:
669: -- Codes start here
670: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
671: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
672: 'cn.plsql.cn_calc_subledger_pvt.update_srp_pe_subledger.begin',
673: 'Beginning of update_srp_pe_subledger (srp_plan_assign_id='
674: ||p_srp_pe_subledger.srp_plan_assign_id|| ' and quota_id='||p_srp_pe_subledger.quota_id);
675: end if;
676:
967: END LOOP;
968:
969: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
970: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
971: 'cn.plsql.cn_calc_subledger_pvt.update_srp_pe_subledger.end',
972: 'End of update_srp_pe_subledger ...');
973: end if;
974:
975: -- Standard check of p_commit.
1019: );
1020:
1021: if (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) then
1022: FND_LOG.STRING(FND_LOG.LEVEL_UNEXPECTED,
1023: 'cn.plsql.cn_calc_subledger_pvt.update_srp_pe_subledger.exception',
1024: sqlerrm);
1025: end if;
1026:
1027: fnd_file.put_line(fnd_file.log, 'EXCEPTION in update_srp_pe_subledger: '||sqlerrm);
1058: NULL;
1059:
1060: END roll_quotas_forecast;
1061:
1062: END cn_calc_subledger_pvt;