DBA Data[Home] [Help]

PACKAGE: APPS.BIS_VG_DESC_FLEX

Source


1 PACKAGE BIS_VG_DESC_FLEX AUTHID CURRENT_USER AS
2 /* $Header: BISTDFXS.pls 115.18 2002/03/27 08:18:35 pkm ship     $ */
3 
4 ----------------------------------------------------------------
5 ---  Copyright (c) 1998 Oracle Corporation, Redwood Shores, CA, USA
6 ---  All rights reserved.
7 ---
8 ---  FILENAME
9 ---
10 ---      BISTDFXS.pls
11 ---
12 ---  DESCRIPTION
13 ---
14 ---      specification of package which handles descriptive flexfield tags
15 ---
16 ---  NOTES
17 ---
18 ---  HISTORY
19 ---
20 ---  29-JUL-98 Created
21 ---  19-MAR-99 Edited by WNASRALL@US for exception handling
22 ---  10-NOV-00 Edited by WNASRALL@US to  add new function generate_pruned_view
23 ---  06-APR-01 Edited by Don Bowles added new out parameter to add_Desc_Flex_Info
24 ---            x_Column_Comment_Table to store flex data.
25 ---  10-DEC-01 Edited by DBOWLES Added db driver comment
26 ---
27 ---
28 --- ============================================================================
29 ---   PROCEDURE : add_Desc_Flex_Info
30 ---   PARAMETERS:
31 ---            1. p_View_Column_Table  table of varchars to hold columns of
32 ---                                       view text
33 ---            2. p_View_Select_Table  table of varchars to hold select clause
34 ---                                    of view
35 ---            3. p_Mode               mode of execution of the program
36 ---            4. p_column_table       List of columns for calls from generate_pruned_view
37 ---            5. p_Column_Pointer     pointer to the desc flex column in
38 ---                                    column table
39 ---            6. p_Select_Pointer     pointer to the select clause
40 ---            6. p_From_Pointer       pointer to the corresponding from clause
41 ---            8. x_Column_Table       table of varchars to hold additional
42 ---                                    columns
43 ---            9. x_Select_Table       table of varchars to hold additional
44 ---                                    columns
45 ---           10. x_Column_Comment_Table table of Flex_Column_Comment_Rec_Type
46 ---                                    used to hold flex data as it is gathered.
47 ---           11. x_Column_Pointer     pointer to the character after the
48 ---                                    delimiter
49 ---                                    (column table)
50 ---           12. x_Select_Pointer     pointer to the character after the
51 ---                                    delimiter
52 ---                                    (select table)
53 ---           13. x_return_status    error or normal
54 ---           14. x_error_Tbl        table of error messages
55 ---
56 ---   COMMENT   : Call this procedure to add a particular desc flexfield
57 ---               information to a view.
58 ---   ---
59 ---  ==========================================================================
60 
61 PROCEDURE add_Desc_Flex_Info
62 ( p_View_Column_Table    IN  BIS_VG_TYPES.View_Text_Table_Type
63 , p_View_Select_Table    IN  BIS_VG_TYPES.View_Text_Table_Type
64 , p_Mode                 IN  NUMBER
65 , p_column_table         IN  BIS_VG_TYPES.flexfield_column_table_type
66 , p_Column_Pointer       IN  BIS_VG_TYPES.View_Character_Pointer_Type
67 , p_Select_Pointer       IN  BIS_VG_TYPES.View_Character_Pointer_Type
68 , p_From_Pointer         IN  BIS_VG_TYPES.View_Character_Pointer_Type
69 , x_Column_Table         OUT BIS_VG_TYPES.View_Text_Table_Type
70 , x_Select_Table         OUT BIS_VG_TYPES.View_Text_Table_Type
71 , x_Column_Comment_Table OUT BIS_VG_TYPES.Flex_Column_Comment_Table_Type
72 , x_Column_Pointer       OUT BIS_VG_TYPES.View_Character_Pointer_Type
73 , x_Select_Pointer       OUT BIS_VG_TYPES.View_Character_Pointer_Type
74 , x_return_status        OUT VARCHAR2
75 , x_error_Tbl            OUT BIS_VG_UTIL.Error_Tbl_Type
76 );
77 
78 
79 -- ============================================================================
80 -- PROCEDURE : parse_DF_Select_Line
81 -- PARAMETERS: 1. p_View_Select_Table table of varchars to hold select clause
82 --                                    of view text
83 --             2. p_Select_Pointer    pointer to the key flex column in select
84 --                                    table (IN)
85 --             3. x_Select_Pointer    pointer to the char after the delimiter
86 --                                    in select table (OUT)
87 --             4. x_Application_Name  Application Name
88 --             5. x_Desc_Flex_Name    Desc Flexfield name
89 --             6. x_Table_Alias       Table alias
90 --             7. x_return_status    error or normal
91 --             8. x_error_Tbl        table of error messages
92 -- COMMENT   : Call this procedure to parse the DF selected tag.
93 -- ---
94 -- =============================================================================
95 PROCEDURE parse_DF_Select_Line
96 ( p_View_Select_Table IN  bis_vg_types.View_Text_Table_Type
97 , p_Select_Pointer    IN  bis_vg_types.View_Character_Pointer_Type
98 , x_Select_Pointer    OUT bis_vg_types.View_Character_Pointer_Type
99 , x_Application_Name  OUT VARCHAR2
100 , x_Desc_Flex_Name    OUT VARCHAR2
101 , x_Table_Alias       OUT VARCHAR2
102 , x_DUMMY_flag        OUT BOOLEAN
103 , x_return_status     OUT VARCHAR2
104 , x_error_Tbl         OUT BIS_VG_UTIL.Error_Tbl_Type
105 );
106 --
107 --============================================================================
108 -- Exceptions for the package
109 --============================================================================
110 --
111 
112   MALFORMED_DFX_COL_TAG_BAD_FLAG EXCEPTION;
113   DFX_COL_TAG_EXP_BAD_FLAG_MSG CONSTANT VARCHAR2(50)
114     := 'BIS_VG_DFX_COL_BAD_FLAG';
115 
116   DFX_COL_TAG_EXP_INVALID_FLAG CONSTANT VARCHAR(50)
117                                 := 'BIS_VG_DFX_COL_INVALID_FLAG';
118 
119   DFX_SEL_TAG_EXP_NO_APP_MSG CONSTANT VARCHAR2(50)
120                                 := 'BIS_VG_DFX_SEL_MISSING_APP';
121 
122   DFX_SEL_TAG_EXP_NO_NAME_MSG CONSTANT VARCHAR2(50)
123                                 := 'BIS_VG_DFX_SEL_MISSING_NAME';
124 
125   DFX_SEL_TAG_EXP_NO_TABLE_MSG CONSTANT VARCHAR2(50)
126                                 := 'BIS_VG_DFX_SEL_MISSING_TABLE';
127 
128   DFX_SEL_TAG_EXP_INVALID_APP CONSTANT VARCHAR2(50)
129                                 := 'BIS_VG_DFX_SEL_INVALID_APP';
130 
131 --  MALFORMED_DFX_SEL_TAG_NO_APP EXCEPTION;
132 --  MALFORMED_DFX_SEL_TAG_NO_TABLE EXCEPTION;
133 --  MALFORMED_DFX_SEL_TAG_NO_NAME EXCEPTION;
134 
135 END BIS_VG_DESC_FLEX;