1 PACKAGE BODY PO_ISPCODELEVEL_PVT AS
2 /* $Header: PO_ISPCODELEVEL_PVT.plb 120.1 2010/03/09 12:18:16 adevadul noship $ */
3
4 --Function helps to obtain the current code level of isp supplier
5 FUNCTION get_curr_isp_supp_code_level
6 RETURN NUMBER
7 IS
8 l_code_level NUMBER;
9 BEGIN
10
11 -- Value 30 indicates that the code level is R12.2 base
12
13 l_code_level := G_ISP_SUP_CODE_LEVEL_CLM_BASE;
14 return l_code_level;
15
16 END get_curr_isp_supp_code_level;
17
18 END PO_ISPCODELEVEL_PVT;