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;