[Home] [Help]
5: ---------------------------------------------------------------------------
6: G_PKG_NAME CONSTANT VARCHAR2(200) := 'OKL_SSC_WF';
7: G_APP_NAME CONSTANT VARCHAR2(3) := OKL_API.G_APP_NAME;
8: L_MODULE VARCHAR2(40) := 'LEASE.SETUP.FUNCTIONS';
9: L_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
10: L_LEVEL_PROCEDURE NUMBER;
11: IS_DEBUG_PROCEDURE_ON BOOLEAN;
12:
13: --
3333:
3334: -- Start of wraper code generated automatically by Debug code generator for okl_setupfunctions_pvt.get_rec
3335: IF(L_DEBUG_ENABLED='Y') THEN
3336: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
3337: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3338: END IF;
3339: IF(IS_DEBUG_PROCEDURE_ON) THEN
3340: BEGIN
3341: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLSSWFB.pls call OKL_PAYMENT_PUB.CREATE_PAYMENTS ');
3337: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
3338: END IF;
3339: IF(IS_DEBUG_PROCEDURE_ON) THEN
3340: BEGIN
3341: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLSSWFB.pls call OKL_PAYMENT_PUB.CREATE_PAYMENTS ');
3342: END;
3343: END IF;
3344: --commented out the call to eliminate receipt dependency by dkagrawa
3345: -- Begin - Make Payment - varangan
3369: xl_return_status := nvl(xl_return_status,OKL_API.G_RET_STS_UNEXP_ERROR);
3370:
3371: IF(IS_DEBUG_PROCEDURE_ON) THEN
3372: BEGIN
3373: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLSSWFB.pls call OKL_PAYMENT_PUB.CREATE_PAYMENTS ');
3374: END;
3375: END IF;
3376: -- End of wraper code generated automatically by Debug code generator for okl_setupfunctions_pvt.get_rec
3377: -- check for errors