PACKAGE BODY: APPS.JL_BR_AR_BATCH_PKG

Source

1 PACKAGE BODY JL_BR_AR_BATCH_PKG as
2 /* $Header: jlbrrbgb.pls 115.2 2002/11/21 17:44:00 vsidhart ship $ */
3 
4 
5 /*----------------------------------------------------------------------------*
6  |   SETTING AND GETTING GLOBAL PARAMETER 			              |
7  *----------------------------------------------------------------------------*/
8 
9 
10   PROCEDURE get_batch_id (
11         p_request_id IN NUMBER,
12         x_batch_id OUT NOCOPY NUMBER) IS
13 
14   sqlstmt   VARCHAR2(240);
15 
16   BEGIN
17 
18     sqlstmt := 'SELECT batch_id FROM jl_br_ar_temp_batch_'||to_char(p_request_id);
19     EXECUTE IMMEDIATE sqlstmt INTO x_batch_id;
20 
21     sqlstmt := 'DELETE FROM jl_br_ar_temp_batch_'||to_char(p_request_id);
22     EXECUTE IMMEDIATE sqlstmt;
23 
24     sqlstmt := 'DROP TABLE jl_br_ar_temp_batch_'||to_char(p_request_id);
25     EXECUTE IMMEDIATE sqlstmt;
26 
27   END;
28 
29 
30 END JL_BR_AR_BATCH_PKG;