[Home] [Help]
1: PACKAGE BODY OKL_SETUPPRODUCTS_PUB AS
2: /* $Header: OKLPSPDB.pls 115.9 2004/04/14 13:07:14 rnaik noship $ */
3: -- Start of wraper code generated automatically by Debug code generator
4: L_MODULE VARCHAR2(40) := 'LEASE.SETUP.PRODUCTS';
5: L_DEBUG_ENABLED CONSTANT VARCHAR2(10) := OKL_DEBUG_PUB.CHECK_LOG_ENABLED;
6: L_LEVEL_PROCEDURE NUMBER;
7: IS_DEBUG_PROCEDURE_ON BOOLEAN;
8: -- End of wraper code generated automatically by Debug code generator
9:
26:
27: -- Start of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.get_rec
28: IF(L_DEBUG_ENABLED='Y') THEN
29: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
30: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
31: END IF;
32: IF(IS_DEBUG_PROCEDURE_ON) THEN
33: BEGIN
34: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.get_rec ');
30: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
31: END IF;
32: IF(IS_DEBUG_PROCEDURE_ON) THEN
33: BEGIN
34: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.get_rec ');
35: END;
36: END IF;
37: okl_setupproducts_pvt.get_rec(p_pdtv_rec => l_pdtv_rec,
38: x_return_status => l_return_status,
39: x_no_data_found => l_no_data_found,
40: x_pdtv_rec => x_pdtv_rec);
41: IF(IS_DEBUG_PROCEDURE_ON) THEN
42: BEGIN
43: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSPDB.pls call okl_setupproducts_pvt.get_rec ');
44: END;
45: END IF;
46: -- End of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.get_rec
47:
87:
88: -- Start of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.Getpdt_parameters
89: IF(L_DEBUG_ENABLED='Y') THEN
90: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
91: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
92: END IF;
93: IF(IS_DEBUG_PROCEDURE_ON) THEN
94: BEGIN
95: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.Getpdt_parameters ');
91: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
92: END IF;
93: IF(IS_DEBUG_PROCEDURE_ON) THEN
94: BEGIN
95: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.Getpdt_parameters ');
96: END;
97: END IF;
98: okl_setupproducts_pvt.Getpdt_parameters(p_api_version => p_api_version,
99: p_init_msg_list => p_init_msg_list,
105: p_product_date => l_product_date,
106: p_pdt_parameter_rec => p_pdt_parameter_rec);
107: IF(IS_DEBUG_PROCEDURE_ON) THEN
108: BEGIN
109: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSPDB.pls call okl_setupproducts_pvt.Getpdt_parameters ');
110: END;
111: END IF;
112: -- End of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.Getpdt_parameters
113:
147: -- call process api to insert products
148: -- Start of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.insert_products
149: IF(L_DEBUG_ENABLED='Y') THEN
150: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
151: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
152: END IF;
153: IF(IS_DEBUG_PROCEDURE_ON) THEN
154: BEGIN
155: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.insert_products ');
151: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
152: END IF;
153: IF(IS_DEBUG_PROCEDURE_ON) THEN
154: BEGIN
155: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.insert_products ');
156: END;
157: END IF;
158: okl_setupproducts_pvt.insert_products(p_api_version => p_api_version,
159: p_init_msg_list => p_init_msg_list,
163: p_pdtv_rec => l_pdtv_rec,
164: x_pdtv_rec => x_pdtv_rec);
165: IF(IS_DEBUG_PROCEDURE_ON) THEN
166: BEGIN
167: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSPDB.pls call okl_setupproducts_pvt.insert_products ');
168: END;
169: END IF;
170: -- End of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.insert_products
171:
236: -- call process api to update products
237: -- Start of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.update_products
238: IF(L_DEBUG_ENABLED='Y') THEN
239: L_LEVEL_PROCEDURE :=FND_LOG.LEVEL_PROCEDURE;
240: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
241: END IF;
242: IF(IS_DEBUG_PROCEDURE_ON) THEN
243: BEGIN
244: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.update_products ');
240: IS_DEBUG_PROCEDURE_ON := OKL_DEBUG_PUB.Check_Log_On(L_MODULE, L_LEVEL_PROCEDURE);
241: END IF;
242: IF(IS_DEBUG_PROCEDURE_ON) THEN
243: BEGIN
244: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'Begin Debug OKLPSPDB.pls call okl_setupproducts_pvt.update_products ');
245: END;
246: END IF;
247: okl_setupproducts_pvt.update_products(p_api_version => p_api_version,
248: p_init_msg_list => p_init_msg_list,
252: p_pdtv_rec => l_pdtv_rec,
253: x_pdtv_rec => x_pdtv_rec);
254: IF(IS_DEBUG_PROCEDURE_ON) THEN
255: BEGIN
256: OKL_DEBUG_PUB.LOG_DEBUG(L_LEVEL_PROCEDURE,L_MODULE,'End Debug OKLPSPDB.pls call okl_setupproducts_pvt.update_products ');
257: END;
258: END IF;
259: -- End of wraper code generated automatically by Debug code generator for okl_setupproducts_pvt.update_products
260: