DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_SETUP_STRMS_TRANS_PUB

Source


1 PACKAGE BODY OKL_SETUP_STRMS_TRANS_PUB AS
2 /* $Header: OKLPSMNB.pls 115.6 2004/04/13 11:17:54 rnaik noship $ */
3 
4   PROCEDURE insert_translations (p_api_version        IN     NUMBER
5                                 ,p_init_msg_list      IN     VARCHAR2
6 								,p_sgnv_tbl           IN     sgnv_tbl_type
7         	                    ,x_sgnv_tbl           OUT    NOCOPY sgnv_tbl_type
8                                 ,x_return_status      OUT    NOCOPY VARCHAR2
9                                 ,x_msg_count          OUT    NOCOPY NUMBER
10                                 ,x_msg_data           OUT    NOCOPY VARCHAR2
11   ) IS
12 	l_api_name VARCHAR2(20):= 'insert_translations';
13 	l_api_version NUMBER := 1.0;
14     l_return_status     VARCHAR2(1) := G_RET_STS_SUCCESS;
15 	i NUMBER;
16   BEGIN
17     l_return_status := OKL_API.START_ACTIVITY(p_api_name       => l_api_name,
18                                               p_pkg_name	   => 'OKL_SETUP_STRMS_TRANS_PUB',
19                                               p_init_msg_list  => p_init_msg_list,
20                                               l_api_version	   => l_api_version,
21                                               p_api_version	   => p_api_version,
22                                               p_api_type	   => '_PUB',
23                                               x_return_status  => l_return_status);
24     IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
25       RAISE G_EXCEPTION_UNEXPECTED_ERROR;
26     ELSIF (l_return_status = G_RET_STS_ERROR) THEN
27       RAISE G_EXCEPTION_ERROR;
28     END IF;
29 
30 
31 
32     OKL_SETUP_STRMS_TRANS_PVT.insert_translations (p_api_version      => l_api_version
33                                                   ,p_init_msg_list    => p_init_msg_list
34                                                   ,p_sgnv_tbl         => p_sgnv_tbl
35                                                   ,x_sgnv_tbl         => x_sgnv_tbl
36                                                   ,x_return_status    => l_return_status
37                                                   ,x_msg_count        => x_msg_count
38                                                   ,x_msg_data         => x_msg_data);
39 
40      IF l_return_status = G_RET_STS_ERROR THEN
41         RAISE G_EXCEPTION_ERROR;
42      ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
43         RAISE G_EXCEPTION_UNEXPECTED_ERROR;
44      END IF;
45 
46 
47 
48 	OKL_API.END_ACTIVITY(x_msg_count  => x_msg_count,
49 	  					 x_msg_data	  => x_msg_data);
50 
51     x_return_status := l_return_status;
52 
53   EXCEPTION
54     WHEN G_EXCEPTION_ERROR THEN
55       x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
56 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
57 												   p_exc_name   => G_EXC_NAME_ERROR,
58 												   x_msg_count  => x_msg_count,
59 												   x_msg_data	=> x_msg_data,
60 												   p_api_type	=> '_PUB');
61     WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
62       x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
63 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
64 												   p_exc_name   => G_EXC_NAME_UNEXP_ERROR,
65 												   x_msg_count	=> x_msg_count,
66 												   x_msg_data	=> x_msg_data,
67 												   p_api_type	=> '_PUB');
68     WHEN OTHERS THEN
69       x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
70 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
71 												   p_exc_name   => G_EXC_NAME_OTHERS,
72 												   x_msg_count	=> x_msg_count,
73 												   x_msg_data	=> x_msg_data,
74 												   p_api_type	=> '_PUB');
75   END insert_translations;
76 
77   PROCEDURE update_translations (p_api_version        IN     NUMBER
78                                 ,p_init_msg_list      IN     VARCHAR2
79 								,p_sgnv_tbl           IN     sgnv_tbl_type
80         	                    ,x_sgnv_tbl           OUT    NOCOPY sgnv_tbl_type
81                                 ,x_return_status      OUT    NOCOPY VARCHAR2
82                                 ,x_msg_count          OUT    NOCOPY NUMBER
83                                 ,x_msg_data           OUT    NOCOPY VARCHAR2
84   ) IS
85 	l_api_name VARCHAR2(20):= 'update_translations';
86 	l_api_version NUMBER := 1.0;
87     l_return_status     VARCHAR2(1) := G_RET_STS_SUCCESS;
88 	i NUMBER;
89   BEGIN
90     l_return_status := OKL_API.START_ACTIVITY(p_api_name       => l_api_name,
91                                               p_pkg_name	   => 'OKL_SETUP_STRMS_TRANS_PUB',
92                                               p_init_msg_list  => p_init_msg_list,
93                                               l_api_version	   => l_api_version,
94                                               p_api_version	   => p_api_version,
95                                               p_api_type	   => '_PUB',
96                                               x_return_status  => l_return_status);
97     IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
98       RAISE G_EXCEPTION_UNEXPECTED_ERROR;
99     ELSIF (l_return_status = G_RET_STS_ERROR) THEN
100       RAISE G_EXCEPTION_ERROR;
101     END IF;
102 
103 
104 
105     OKL_SETUP_STRMS_TRANS_PVT.update_translations (p_api_version        => l_api_version
106                                                   ,p_init_msg_list    => p_init_msg_list
107                                                   ,p_sgnv_tbl         => p_sgnv_tbl
108                                                   ,x_sgnv_tbl         => x_sgnv_tbl
109                                                   ,x_return_status    => x_return_status
110                                                   ,x_msg_count        => x_msg_count
111                                                   ,x_msg_data         => x_msg_data);
112 
113      IF l_return_status = G_RET_STS_ERROR THEN
114         RAISE G_EXCEPTION_ERROR;
115      ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
116         RAISE G_EXCEPTION_UNEXPECTED_ERROR;
117      END IF;
118 
119 
120 
121 	OKL_API.END_ACTIVITY(x_msg_count  => x_msg_count,
122 	  					 x_msg_data	  => x_msg_data);
123 
124     x_return_status := l_return_status;
125 
126     EXCEPTION
127       WHEN G_EXCEPTION_ERROR THEN
128 
129         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
130 	  				  	 						     p_pkg_name	=> G_PKG_NAME,
131 												     p_exc_name => G_EXC_NAME_ERROR,
132 												     x_msg_count=> x_msg_count,
133 												     x_msg_data	=> x_msg_data,
134 												     p_api_type	=> '_PUB');
135 
136       WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
137 
138         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
139 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
140 												   p_exc_name   => G_EXC_NAME_UNEXP_ERROR,
141 												   x_msg_count	=> x_msg_count,
142 												   x_msg_data	=> x_msg_data,
143 												   p_api_type	=> '_PUB');
144 
145       WHEN OTHERS THEN
146 
147         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
148 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
149 												   p_exc_name   => G_EXC_NAME_OTHERS,
150 												   x_msg_count	=> x_msg_count,
151 												   x_msg_data	=> x_msg_data,
152 												   p_api_type	=> '_PUB');
153 
154   END update_translations;
155 
156   PROCEDURE delete_translations (p_api_version        IN     NUMBER
157                                 ,p_init_msg_list      IN     VARCHAR2
158         	                    ,p_sgnv_tbl           IN     sgnv_tbl_type
159                                 ,x_return_status      OUT    NOCOPY VARCHAR2
160                                 ,x_msg_count          OUT    NOCOPY NUMBER
161                                 ,x_msg_data           OUT    NOCOPY VARCHAR2
162   ) IS
163 	l_api_name VARCHAR2(20):= 'delete_translations';
164 	l_api_version NUMBER := 1.0;
165     l_return_status     VARCHAR2(1) := G_RET_STS_SUCCESS;
166 	i NUMBER;
167   BEGIN
168     l_return_status := OKL_API.START_ACTIVITY(p_api_name       => l_api_name,
169                                               p_pkg_name	   => 'OKL_SETUP_STRMS_TRANS_PUB',
170                                               p_init_msg_list  => p_init_msg_list,
171                                               l_api_version	   => l_api_version,
172                                               p_api_version	   => p_api_version,
173                                               p_api_type	   => '_PUB',
174                                               x_return_status  => l_return_status);
175     IF (l_return_status = G_RET_STS_UNEXP_ERROR) THEN
176       RAISE G_EXCEPTION_UNEXPECTED_ERROR;
177     ELSIF (l_return_status = G_RET_STS_ERROR) THEN
178       RAISE G_EXCEPTION_ERROR;
179     END IF;
180 
181 
182 
183     OKL_SETUP_STRMS_TRANS_PVT.delete_translations (p_api_version        => l_api_version
184                                                   ,p_init_msg_list      => p_init_msg_list
185                                                   ,p_sgnv_tbl           => p_sgnv_tbl
186                                                   ,x_return_status      => x_return_status
187                                                   ,x_msg_count          => x_msg_count
188                                                   ,x_msg_data           => x_msg_data);
189 
190      IF l_return_status = G_RET_STS_ERROR THEN
191         RAISE G_EXCEPTION_ERROR;
192      ELSIF l_return_status = G_RET_STS_UNEXP_ERROR THEN
193         RAISE G_EXCEPTION_UNEXPECTED_ERROR;
194      END IF;
195 
196 
197 
198 	OKL_API.END_ACTIVITY(x_msg_count  => x_msg_count,
199 	  					 x_msg_data	  => x_msg_data);
200 
201     x_return_status := l_return_status;
202 
203     EXCEPTION
204       WHEN G_EXCEPTION_ERROR THEN
205         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
206 	  				  	 						     p_pkg_name	=> G_PKG_NAME,
207 												     p_exc_name => G_EXC_NAME_ERROR,
208 												     x_msg_count=> x_msg_count,
209 												     x_msg_data	=> x_msg_data,
210 												     p_api_type	=> '_PUB');
211       WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
212         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
213 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
214 												   p_exc_name   => G_EXC_NAME_UNEXP_ERROR,
215 												   x_msg_count	=> x_msg_count,
216 												   x_msg_data	=> x_msg_data,
217 												   p_api_type	=> '_PUB');
218       WHEN OTHERS THEN
219         x_return_status := OKL_API.HANDLE_EXCEPTIONS(p_api_name	=> l_api_name,
220 	  				  	 						   p_pkg_name	=> G_PKG_NAME,
221 												   p_exc_name   => G_EXC_NAME_OTHERS,
222 												   x_msg_count	=> x_msg_count,
223 												   x_msg_data	=> x_msg_data,
224 												   p_api_type	=> '_PUB');
225   END delete_translations;
226 
227 
228 END OKL_SETUP_STRMS_TRANS_PUB;