709: PROCEDURE print_to_log(p_message IN VARCHAR2)
710: IS
711: BEGIN
712:
713: if (L_DEBUG_ENABLED='Y' and fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
714: fnd_log.string(fnd_log.level_statement,'okl_bill_controll',
715: p_message );
716:
717: end if;
710: IS
711: BEGIN
712:
713: if (L_DEBUG_ENABLED='Y' and fnd_log.level_statement >= fnd_log.g_current_runtime_level) then
714: fnd_log.string(fnd_log.level_statement,'okl_bill_controll',
715: p_message );
716:
717: end if;
718:
1928:
1929: -- rmunjulu R12 Fixes -- comment out entire code and put NULL
1930: NULL;
1931: /*
1932: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1933: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
1934: ,'Process_Break Begin(+)');
1935: END IF;
1936:
1929: -- rmunjulu R12 Fixes -- comment out entire code and put NULL
1930: NULL;
1931: /*
1932: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1933: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
1934: ,'Process_Break Begin(+)');
1935: END IF;
1936:
1937: -- ------------------------------------
2007: -- END IF;
2008: -- saved_bill_rec.l_commit_cnt := 0;
2009: -- END IF;
2010:
2011: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2012: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
2013: ,'Process_Break End(-)');
2014: END IF;
2015: */
2008: -- saved_bill_rec.l_commit_cnt := 0;
2009: -- END IF;
2010:
2011: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2012: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
2013: ,'Process_Break End(-)');
2014: END IF;
2015: */
2016: EXCEPTION
2014: END IF;
2015: */
2016: EXCEPTION
2017: WHEN OTHERS THEN
2018: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2019: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
2020: 'EXCEPTION (OTHERS) :'||SQLERRM);
2021: END IF;
2022:
2015: */
2016: EXCEPTION
2017: WHEN OTHERS THEN
2018: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2019: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
2020: 'EXCEPTION (OTHERS) :'||SQLERRM);
2021: END IF;
2022:
2023: PRINT_TO_LOG( 'EXCEPTION in Procedure Process_Break: '||SQLERRM);
3776: -- Exception handling
3777: ------------------------------------------------------------
3778:
3779: WHEN OTHERS THEN
3780: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
3782: 'EXCEPTION :'||'OTHERS');
3783: END IF;
3784:
3777: ------------------------------------------------------------
3778:
3779: WHEN OTHERS THEN
3780: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3781: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
3782: 'EXCEPTION :'||'OTHERS');
3783: END IF;
3784:
3785: PRINT_TO_LOG('*=> Error Message(O3): '||SQLERRM);
4196: NULL;
4197: /*
4198: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
4199:
4200: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4201: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
4202: ,'Begin(+)');
4203: END IF;
4204:
4197: /*
4198: L_DEBUG_ENABLED := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
4199:
4200: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4201: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,'okl_cons_bill'
4202: ,'Begin(+)');
4203: END IF;
4204:
4205: -- ------------------------
5232: -- Exception handling
5233: ------------------------------------------------------------
5234:
5235: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
5236: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5237: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5238: 'EXCEPTION :'||'Okl_Api.G_EXCEPTION_ERROR');
5239: END IF;
5240:
5233: ------------------------------------------------------------
5234:
5235: WHEN Okl_Api.G_EXCEPTION_ERROR THEN
5236: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5237: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5238: 'EXCEPTION :'||'Okl_Api.G_EXCEPTION_ERROR');
5239: END IF;
5240:
5241: PRINT_TO_LOG('*=> Error Message(O1): '||SQLERRM);
5257: p_api_type => '_PVT');
5258:
5259: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
5260:
5261: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5262: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5263: 'EXCEPTION :'||'Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR');
5264: END IF;
5265:
5258:
5259: WHEN Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR THEN
5260:
5261: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5262: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5263: 'EXCEPTION :'||'Okl_Api.G_EXCEPTION_UNEXPECTED_ERROR');
5264: END IF;
5265:
5266: PRINT_TO_LOG('*=> Error Message(O2): '||SQLERRM);
5281: x_msg_data => x_msg_data,
5282: p_api_type => '_PVT');
5283:
5284: WHEN OTHERS THEN
5285: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5286: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5287: 'EXCEPTION :'||'OTHERS');
5288: END IF;
5289:
5282: p_api_type => '_PVT');
5283:
5284: WHEN OTHERS THEN
5285: IF (L_DEBUG_ENABLED='Y' and FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
5286: FND_LOG.STRING(FND_LOG.LEVEL_EXCEPTION,'okl_cons_bill',
5287: 'EXCEPTION :'||'OTHERS');
5288: END IF;
5289:
5290: PRINT_TO_LOG('*=> Error Message(O3): '||SQLERRM);