DBA Data[Home] [Help]

PACKAGE BODY: APPS.EGO_METADATA_PUB

Source


1 PACKAGE BODY EGO_METADATA_PUB AS
2 /* $Header: EGOPMDPB.pls 120.0.12010000.1 2010/04/15 12:29:06 kjonnala noship $ */
3 
4 
5   /* Currently, we are NOT supporting Public bulkload APIs for Metadata.
6      Hence commenting the below procedures.
7      For single record public APIs for metadata, please refer to EGO_EXT_FWK_PUB and EGO_ITEM_CATALOG_PUB packages.
8   */
9 /*Public Procedures
10   --Main procedure for API processing. Takes care of AGs and its associated DL Called by Public API.
11   PROCEDURE process_attribute_group(
12     p_ag_tbl        IN OUT NOCOPY ego_attr_groups_tbl,
13     p_agdl_tbl      IN OUT NOCOPY ego_attr_groups_dl_tbl,
14     p_commit        IN BOOLEAN DEFAULT false,
15     x_return_status OUT VARCHAR2,
16     x_return_msg    OUT VARCHAR2)
17     IS
18     BEGIN
19     	ego_process_ag_pvt.process_attribute_group(p_ag_tbl, p_agdl_tbl, p_commit, x_return_status,x_return_msg);
20     EXCEPTION
21     	WHEN  OTHERS THEN
22     		x_return_status := g_ret_sts_unexp_error;
23     		ego_metadata_bulkload_pvt.Write_debug('import_agdl - Exception When Others');
24     END;
25   --Main procedure for Attributes processing through API
26   PROCEDURE process_attribute(
27     p_attr_tbl      IN OUT NOCOPY ego_attr_group_cols_tbl,
28     p_commit        IN BOOLEAN DEFAULT false,
29     x_return_status OUT VARCHAR2,
30     x_return_msg    OUT VARCHAR2)
31     IS
32     BEGIN
33     	ego_process_ag_pvt.process_attribute(p_attr_tbl, p_commit, x_return_status,x_return_msg);
34     EXCEPTION
35     	WHEN  OTHERS THEN
36     		x_return_status := g_ret_sts_unexp_error;
37     		ego_metadata_bulkload_pvt.Write_debug('import_attribute - Exception When Others');
38     END;
39 
40   --Main procedure for API processing. Takes care of Pages and is called by Public API.
41   PROCEDURE process_pages(
42     p_pg_tbl        IN OUT NOCOPY ego_pg_tbl,
43     p_commit        IN BOOLEAN DEFAULT false,
44     x_return_status OUT VARCHAR2,
45     x_return_msg    OUT VARCHAR2)
46     IS
47     BEGIN
48     	ego_process_pg_pvt.process_pages(p_pg_tbl, p_commit, x_return_status,x_return_msg);
49     EXCEPTION
50     	WHEN  OTHERS THEN
51     		x_return_status := g_ret_sts_unexp_error;
52     		ego_metadata_bulkload_pvt.Write_debug('import_pg - Exception When Others');
53     END;
54 
55   --Main procedure for Page Entries processing through API
56   PROCEDURE process_pg_entries(
57     p_ent_tbl       IN OUT NOCOPY ego_ent_tbl,
58     p_commit        IN BOOLEAN DEFAULT false,
59     x_return_status OUT VARCHAR2,
60     x_return_msg    OUT VARCHAR2)
61     IS
62     BEGIN
63     	ego_process_pg_pvt.process_pg_entries(p_ent_tbl, p_commit, x_return_status,x_return_msg);
64     EXCEPTION
65     	WHEN  OTHERS THEN
66     		x_return_status := g_ret_sts_unexp_error;
67     		ego_metadata_bulkload_pvt.Write_debug('import_ent - Exception When Others');
68     END;
69  */
70   /*-- Public API to create Value Set (No Child Value Set)
71   PROCEDURE Process_Value_Set (
72            p_api_version      IN            NUMBER,
73            p_value_set_tbl    IN OUT NOCOPY Value_Set_Tbl,
74            p_set_process_id   IN            NUMBER,
75            x_return_status    OUT NOCOPY    VARCHAR2,
76            x_msg_count        OUT NOCOPY    NUMBER,
77            x_msg_data         OUT NOCOPY    VARCHAR2)
78   IS
79 
80   BEGIN
81    	Ego_Value_Set_Pvt.Process_Value_Set(p_api_version,p_value_set_tbl, p_set_process_id,x_return_status,x_msg_count,x_msg_data);
82   EXCEPTION
83    	WHEN  OTHERS THEN
84     		x_return_status := g_ret_sts_unexp_error;
85     		ego_metadata_bulkload_pvt.Write_debug(' Public API Process_Value_Set failed. ');
86   END;
87 
88 
89   -- Public API to create Value
90   PROCEDURE Process_Value_Set_Value (
91            p_api_version            IN         NUMBER,
92            p_value_set_val_tbl      IN         Value_Set_Value_Tbl,
93            p_value_set_val_tl_tbl   IN         Value_Set_Value_Tl_Tbl,
94            p_set_process_id         IN         NUMBER,
95            x_return_status          OUT NOCOPY VARCHAR2,
96            x_msg_count              OUT NOCOPY NUMBER,
97            x_msg_data               OUT NOCOPY VARCHAR2)
98   IS
99 
100   BEGIN
101    	Ego_Value_Set_Pvt.Process_Value_Set_Value(p_api_version,p_value_set_val_tbl,p_value_set_val_tl_tbl,p_set_process_id,x_return_status,x_msg_count,x_msg_data);
102   EXCEPTION
103    	WHEN  OTHERS THEN
104     		x_return_status := g_ret_sts_unexp_error;
105     		ego_metadata_bulkload_pvt.Write_debug(' Public API Process_Value_Set_Value failed. ');
106   END;
107 
108 
109 
110   -- Public API to create Child Value Set and corresponding values
111   PROCEDURE Process_Child_Value_Set (
112            p_api_version      IN         NUMBER,
113            p_value_set_tbl    IN         Value_Set_Tbl,
114            p_valueset_val_tab IN         Value_Set_Value_Tbl,
115            p_set_process_id   IN         NUMBER,
116            x_return_status    OUT NOCOPY VARCHAR2,
117            x_msg_count        OUT NOCOPY NUMBER,
118            x_msg_data         OUT NOCOPY VARCHAR2)
119 
120   IS
121 
122   BEGIN
123    	Ego_Value_Set_Pvt.Process_Child_Value_Set(p_api_version,p_value_set_tbl,p_valueset_val_tab, p_set_process_id,x_return_status,x_msg_count,x_msg_data);
124   EXCEPTION
125    	WHEN  OTHERS THEN
126     		x_return_status := g_ret_sts_unexp_error;
127     		ego_metadata_bulkload_pvt.Write_debug(' Public API Process_Child_Value_Set failed. ');
128   END;
129   */
130 
131 
132 END EGO_METADATA_PUB;