DBA Data[Home] [Help]

PACKAGE BODY: APPS.FII_GL_BIS_MSC_PKG

Source


1 PACKAGE BODY FII_GL_BIS_MSC_PKG AS
2 /* $Header: FIIGLBSB.pls 120.1 2005/09/27 14:41:16 sgautam noship $ */
3 -- PUBLIC FUNCTIONS
4 --
5 
6   FUNCTION get_description_sql(
7                           p_coa_id  IN NUMBER,
8                           p_column_name IN VARCHAR2,
9                           p_seg_val     IN VARCHAR2) RETURN VARCHAR2 IS
10       l_segment_num   NUMBER(3);
11       l_desc_sql      VARCHAR2(500);
12   BEGIN
13      /* Retrieve the segment number for the chart of account id
14          and  segment name combination */
15      SELECT segment_num
16      INTO   l_segment_num
17      FROM   FND_ID_FLEX_SEGMENTS
18      WHERE  application_id = 101
19      AND    id_flex_code = 'GL#'
20      AND    id_flex_num = p_coa_id
21      AND    application_column_name = p_column_name;
22 
23      /* No Exception Raised  so far. That means segment number exists
24         for this chart of account id and segment name combination
25         So  Calling GL_FLEXFIELDS_PKG.get_description_sql to get
26           the description */
27      l_desc_sql := GL_FLEXFIELDS_PKG.get_description_sql(
28                                                    p_coa_id,
29                                                    l_segment_num,
30                                                    p_seg_val);
31      return(l_desc_sql);
32    EXCEPTION
33       /* Segment Number doesn't exist for this chart of account id and
34          segment name  */
35       WHEN no_data_found THEN
36           return(NULL);
37    END get_description_sql;
38 
39 END FII_GL_BIS_MSC_PKG;