[Home] [Help]
1: PACKAGE BODY OKL_XMLP_PARAMS_PVT AS
2: /* $Header: OKLRXMPB.pls 120.0 2007/01/04 11:22:50 udhenuko noship $ */
3:
4: ----------------------------------------------------------------------------
5: -- PROCEDURE create_xmlp_params_rec
7: -- Start of comments
8: --
9: -- Procedure Name : create_xmlp_params_rec
10: -- Description : procedure for inserting the records in
11: -- table OKL_XMLP_PARAMS
12: -- Business Rules : This procedure creates a record containing the parameter
13: -- name, value and type code.
14: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
15: -- x_msg_data, p_xmp_rec, x_xmp_rec.
27:
28: ---------------------------
29: -- DECLARE Local Variables
30: ---------------------------
31: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.create_xmlp_params_rec';
32: L_DEBUG_ENABLED VARCHAR2(10);
33: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
34: IS_DEBUG_PROCEDURE_ON BOOLEAN;
35: l_xmp_rec xmp_rec_type ;
75: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
76: RAISE OKL_API.G_EXCEPTION_ERROR;
77: END IF;
78:
79: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
80: okl_xmp_pvt.insert_row( l_api_version,
81: l_init_msg_list,
82: l_return_status,
83: l_msg_count,
145: -- Start of comments
146: --
147: -- Procedure Name : create_xmlp_params_tbl
148: -- Description : procedure for inserting the records in
149: -- table OKL_XMLP_PARAMS
150: -- Business Rules : This procedure creates a record containing the parameter
151: -- name, value and type code.
152: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
153: -- x_msg_data, p_xmp_tbl, x_xmp_tbl.
165:
166: ---------------------------
167: -- DECLARE Local Variables
168: ---------------------------
169: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.create_xmlp_params_tbl';
170: L_DEBUG_ENABLED VARCHAR2(10);
171: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
172: IS_DEBUG_PROCEDURE_ON BOOLEAN;
173: l_xmp_tbl xmp_tbl_type ;
213: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
214: RAISE OKL_API.G_EXCEPTION_ERROR;
215: END IF;
216:
217: -- TAPI call to create a record for xmlp params in table OKL_XMLP_PARAMS.
218: okl_xmp_pvt.insert_row( l_api_version,
219: l_init_msg_list,
220: l_return_status,
221: l_msg_count,
283: -- Start of comments
284: --
285: -- Procedure Name : update_xmlp_params_rec
286: -- Description : procedure for updating the records in
287: -- table OKL_XMLP_PARAMS
288: -- Business Rules : This procedure updates a record based on the id provided.
289: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
290: -- x_msg_data, p_xmp_rec, x_xmp_rec.
291: -- Version : 1.0
301: ) IS
302: ---------------------------
303: -- DECLARE Local Variables
304: ---------------------------
305: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.update_xmlp_params_rec';
306: L_DEBUG_ENABLED VARCHAR2(10);
307: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
308: IS_DEBUG_PROCEDURE_ON BOOLEAN;
309: l_xmp_rec xmp_rec_type ;
347: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
348: RAISE OKL_API.G_EXCEPTION_ERROR;
349: END IF;
350:
351: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
352: okl_xmp_pvt.update_row(l_api_version,
353: l_init_msg_list,
354: l_return_status,
355: l_msg_count,
416: -- Start of comments
417: --
418: -- Procedure Name : update_xmlp_params_tbl
419: -- Description : procedure for updating the records in
420: -- table OKL_XMLP_PARAMS
421: -- Business Rules : This procedure updates a record based on the id provided.
422: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
423: -- x_msg_data, p_xmp_tbl, x_xmp_tbl.
424: -- Version : 1.0
434: ) IS
435: ---------------------------
436: -- DECLARE Local Variables
437: ---------------------------
438: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.update_xmlp_params_tbl';
439: L_DEBUG_ENABLED VARCHAR2(10);
440: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
441: IS_DEBUG_PROCEDURE_ON BOOLEAN;
442: l_xmp_tbl xmp_tbl_type ;
480: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
481: RAISE OKL_API.G_EXCEPTION_ERROR;
482: END IF;
483:
484: -- TAPI call to update xmlp params in table OKL_XMLP_PARAMS.
485: okl_xmp_pvt.update_row(l_api_version,
486: l_init_msg_list,
487: l_return_status,
488: l_msg_count,
549: -- Start of comments
550: --
551: -- Procedure Name : delete_xmlp_params
552: -- Description : procedure for deleting the records in
553: -- table OKL_XMLP_PARAMS
554: -- Business Rules : This procedure deletes a record based on the id provided.
555: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
556: -- x_msg_data, p_xmp_rec, x_xmp_rec.
557: -- Version : 1.0
561: ,p_init_msg_list IN VARCHAR2
562: ,x_return_status OUT NOCOPY VARCHAR2
563: ,x_msg_count OUT NOCOPY NUMBER
564: ,x_msg_data OUT NOCOPY VARCHAR2
565: ,p_batch_id IN OKL_XMLP_PARAMS.Batch_Id%TYPE
566: ) IS
567: ---------------------------
568: -- DECLARE Local Variables
569: ---------------------------
566: ) IS
567: ---------------------------
568: -- DECLARE Local Variables
569: ---------------------------
570: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.delete_xmlp_params';
571: L_DEBUG_ENABLED VARCHAR2(10);
572: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
573: IS_DEBUG_PROCEDURE_ON BOOLEAN;
574: l_batch_id OKL_XMLP_PARAMS.Batch_Id%TYPE ;
570: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.delete_xmlp_params';
571: L_DEBUG_ENABLED VARCHAR2(10);
572: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
573: IS_DEBUG_PROCEDURE_ON BOOLEAN;
574: l_batch_id OKL_XMLP_PARAMS.Batch_Id%TYPE ;
575: l_id OKL_XMLP_PARAMS.Id%TYPE ;
576: l_xmp_rec xmp_rec_type ;
577: l_api_version NUMBER ;
578: l_init_msg_list VARCHAR2(1) ;
571: L_DEBUG_ENABLED VARCHAR2(10);
572: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
573: IS_DEBUG_PROCEDURE_ON BOOLEAN;
574: l_batch_id OKL_XMLP_PARAMS.Batch_Id%TYPE ;
575: l_id OKL_XMLP_PARAMS.Id%TYPE ;
576: l_xmp_rec xmp_rec_type ;
577: l_api_version NUMBER ;
578: l_init_msg_list VARCHAR2(1) ;
579: l_return_status VARCHAR2(1);
584: -------------------
585: -- DECLARE Cursors
586: -------------------
587:
588: CURSOR c_get_param_ids(p_batch_id IN OKL_XMLP_PARAMS.Batch_Id%TYPE) IS
589: SELECT ID,
590: BATCH_ID
591: FROM OKL_XMLP_PARAMS
592: WHERE BATCH_ID = p_batch_id;
587:
588: CURSOR c_get_param_ids(p_batch_id IN OKL_XMLP_PARAMS.Batch_Id%TYPE) IS
589: SELECT ID,
590: BATCH_ID
591: FROM OKL_XMLP_PARAMS
592: WHERE BATCH_ID = p_batch_id;
593:
594: BEGIN
595: L_DEBUG_ENABLED := Okl_Debug_Pub.CHECK_LOG_ENABLED;
621: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
622: RAISE OKL_API.G_EXCEPTION_ERROR;
623: END IF;
624:
625: -- Call TAPI to delete the xmlp params in table OKL_XMLP_PARAMS based on the batch id.
626: FOR each_row IN c_get_param_ids(l_batch_id) LOOP
627: l_xmp_rec.id := each_row.id;
628: l_xmp_rec.batch_id := each_row.batch_id;
629: okl_xmp_pvt.delete_row(l_api_version,
692: -- Start of comments
693: --
694: -- Procedure Name : validate_xmlp_params_rec
695: -- Description : procedure for validating the records in
696: -- table OKL_XMLP_PARAMS
697: -- Business Rules : Validates the record passed to it. x_return_status is 'S' on success.
698: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
699: -- x_msg_data, p_xmp_rec.
700: -- Version : 1.0
709: p_xmp_rec IN xmp_rec_type) IS
710: ---------------------------
711: -- DECLARE Local Variables
712: ---------------------------
713: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.validate_xmlp_params_rec';
714: L_DEBUG_ENABLED VARCHAR2(10);
715: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
716: IS_DEBUG_PROCEDURE_ON BOOLEAN;
717: l_xmp_rec xmp_rec_type := p_xmp_rec;
819: -- Start of comments
820: --
821: -- Procedure Name : validate_xmlp_params_tbl
822: -- Description : procedure for validating the records in
823: -- table OKL_XMLP_PARAMS
824: -- Business Rules : Validates the records passed to it. x_return_status is 'S' on success.
825: -- Parameters : p_api_version, p_init_msg_list, x_return_status, x_msg_count,
826: -- x_msg_data, p_xmp_tbl.
827: -- Version : 1.0
837:
838: ---------------------------
839: -- DECLARE Local Variables
840: ---------------------------
841: L_MODULE CONSTANT fnd_log_messages.module%TYPE := 'okl.plsql.OKL_XMLP_PARAMS_PVT.validate_xmlp_params_tbl';
842: L_DEBUG_ENABLED VARCHAR2(10);
843: L_LEVEL_PROCEDURE fnd_log_messages.log_level%TYPE;
844: IS_DEBUG_PROCEDURE_ON BOOLEAN;
845: l_xmp_tbl xmp_tbl_type := p_xmp_tbl;
938: x_msg_data => x_msg_data,
939: p_api_type => g_api_type);
940: END validate_xmlp_params_tbl;
941:
942: END OKL_XMLP_PARAMS_PVT;