5:
6:
7: PROCEDURE create_print_form(
8: p_api_version IN NUMBER,
9: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
10: x_return_status OUT NOCOPY VARCHAR2,
11: x_msg_count OUT NOCOPY NUMBER,
12: x_msg_data OUT NOCOPY VARCHAR2,
13: p_form_rec IN oke_form_pvt.form_rec_type,
17: l_form_rec oke_form_pvt.form_rec_type;
18:
19: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PRINT_FORM';
20: l_api_version CONSTANT NUMBER := 1.0;
21: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
22: --bug 9354391 modified line_number length to 150 as per table
23: l_line_number VARCHAR2(150);
24:
25: BEGIN
24:
25: BEGIN
26: -- call START_ACTIVITY to create savepoint, check compatibility
27: -- and initialize message list
28: l_return_status := OKE_API.START_ACTIVITY(
29: p_api_name => l_api_name,
30: p_pkg_name => g_pkg_name,
31: p_init_msg_list => p_init_msg_list,
32: l_api_version => l_api_version,
34: p_api_type => g_api_type,
35: x_return_status => x_return_status);
36:
37: -- check if activity started successfully
38: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
39: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
40: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
41: raise OKE_API.G_EXCEPTION_ERROR;
42: End If;
35: x_return_status => x_return_status);
36:
37: -- check if activity started successfully
38: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
39: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
40: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
41: raise OKE_API.G_EXCEPTION_ERROR;
42: End If;
43:
36:
37: -- check if activity started successfully
38: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
39: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
40: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
41: raise OKE_API.G_EXCEPTION_ERROR;
42: End If;
43:
44: l_form_rec := p_form_rec;
37: -- check if activity started successfully
38: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
39: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
40: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
41: raise OKE_API.G_EXCEPTION_ERROR;
42: End If;
43:
44: l_form_rec := p_form_rec;
45:
56: p_form_rec => l_form_rec,
57: x_form_rec => x_form_rec);
58:
59:
60: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
61: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
62: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
63: raise OKE_API.G_EXCEPTION_ERROR;
64: End If;
57: x_form_rec => x_form_rec);
58:
59:
60: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
61: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
62: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
63: raise OKE_API.G_EXCEPTION_ERROR;
64: End If;
65:
58:
59:
60: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
61: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
62: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
63: raise OKE_API.G_EXCEPTION_ERROR;
64: End If;
65:
66: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'oke call passed');
59:
60: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
61: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
62: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
63: raise OKE_API.G_EXCEPTION_ERROR;
64: End If;
65:
66: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'oke call passed');
67:
64: End If;
65:
66: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'oke call passed');
67:
68: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
69: x_msg_data => x_msg_data);
70: EXCEPTION
71: when OKE_API.G_EXCEPTION_ERROR then
72: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
67:
68: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
69: x_msg_data => x_msg_data);
70: EXCEPTION
71: when OKE_API.G_EXCEPTION_ERROR then
72: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
73: p_api_name => l_api_name,
74: p_pkg_name => g_pkg_name,
75: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
68: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
69: x_msg_data => x_msg_data);
70: EXCEPTION
71: when OKE_API.G_EXCEPTION_ERROR then
72: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
73: p_api_name => l_api_name,
74: p_pkg_name => g_pkg_name,
75: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
76: x_msg_count => x_msg_count,
71: when OKE_API.G_EXCEPTION_ERROR then
72: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
73: p_api_name => l_api_name,
74: p_pkg_name => g_pkg_name,
75: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
76: x_msg_count => x_msg_count,
77: x_msg_data => x_msg_data,
78: p_api_type => g_api_type);
79:
76: x_msg_count => x_msg_count,
77: x_msg_data => x_msg_data,
78: p_api_type => g_api_type);
79:
80: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
81: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
82: p_api_name => l_api_name,
83: p_pkg_name => g_pkg_name,
84: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
77: x_msg_data => x_msg_data,
78: p_api_type => g_api_type);
79:
80: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
81: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
82: p_api_name => l_api_name,
83: p_pkg_name => g_pkg_name,
84: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
85: x_msg_count => x_msg_count,
80: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
81: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
82: p_api_name => l_api_name,
83: p_pkg_name => g_pkg_name,
84: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
85: x_msg_count => x_msg_count,
86: x_msg_data => x_msg_data,
87: p_api_type => g_api_type);
88:
86: x_msg_data => x_msg_data,
87: p_api_type => g_api_type);
88:
89: when OTHERS then
90: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
91: p_api_name => l_api_name,
92: p_pkg_name => g_pkg_name,
93: p_exc_name => 'OTHERS',
94: x_msg_count => x_msg_count,
100:
101:
102: PROCEDURE create_print_form(
103: p_api_version IN NUMBER,
104: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
105: x_return_status OUT NOCOPY VARCHAR2,
106: x_msg_count OUT NOCOPY NUMBER,
107: x_msg_data OUT NOCOPY VARCHAR2,
108: p_form_tbl IN oke_form_pvt.form_tbl_type,
109: x_form_tbl OUT NOCOPY oke_form_pvt.form_tbl_type) IS
110:
111: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PRINT_FORM';
112: l_api_version CONSTANT NUMBER := 1.0;
113: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
114: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
115: i NUMBER;
116: l_form_tbl oke_form_pvt.form_tbl_type;
117: BEGIN
110:
111: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PRINT_FORM';
112: l_api_version CONSTANT NUMBER := 1.0;
113: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
114: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
115: i NUMBER;
116: l_form_tbl oke_form_pvt.form_tbl_type;
117: BEGIN
118: -- call START_ACTIVITY to create savepoint, check compatibility
116: l_form_tbl oke_form_pvt.form_tbl_type;
117: BEGIN
118: -- call START_ACTIVITY to create savepoint, check compatibility
119: -- and initialize message list
120: l_return_status := OKE_API.START_ACTIVITY(
121: p_api_name => l_api_name,
122: p_pkg_name => g_pkg_name,
123: p_init_msg_list => p_init_msg_list,
124: l_api_version => l_api_version,
126: p_api_type => g_api_type,
127: x_return_status => x_return_status);
128:
129: -- check if activity started successfully
130: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
131: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
132: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
133: raise OKE_API.G_EXCEPTION_ERROR;
134: End If;
127: x_return_status => x_return_status);
128:
129: -- check if activity started successfully
130: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
131: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
132: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
133: raise OKE_API.G_EXCEPTION_ERROR;
134: End If;
135:
128:
129: -- check if activity started successfully
130: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
131: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
132: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
133: raise OKE_API.G_EXCEPTION_ERROR;
134: End If;
135:
136: OKE_FORM_PVT.Insert_Row(
129: -- check if activity started successfully
130: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
131: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
132: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
133: raise OKE_API.G_EXCEPTION_ERROR;
134: End If;
135:
136: OKE_FORM_PVT.Insert_Row(
137: p_api_version => p_api_version,
142: p_form_tbl => p_form_tbl,
143: x_form_tbl => x_form_tbl);
144:
145:
146: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
147: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
149: raise OKE_API.G_EXCEPTION_ERROR;
150: End If;
143: x_form_tbl => x_form_tbl);
144:
145:
146: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
147: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
149: raise OKE_API.G_EXCEPTION_ERROR;
150: End If;
151:
144:
145:
146: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
147: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
149: raise OKE_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
145:
146: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
147: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
149: raise OKE_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
153: x_msg_data => x_msg_data);
148: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
149: raise OKE_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
153: x_msg_data => x_msg_data);
154: EXCEPTION
155: when OKE_API.G_EXCEPTION_ERROR then
156: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
151:
152: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
153: x_msg_data => x_msg_data);
154: EXCEPTION
155: when OKE_API.G_EXCEPTION_ERROR then
156: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
157: p_api_name => l_api_name,
158: p_pkg_name => g_pkg_name,
159: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
152: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
153: x_msg_data => x_msg_data);
154: EXCEPTION
155: when OKE_API.G_EXCEPTION_ERROR then
156: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
157: p_api_name => l_api_name,
158: p_pkg_name => g_pkg_name,
159: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
160: x_msg_count => x_msg_count,
155: when OKE_API.G_EXCEPTION_ERROR then
156: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
157: p_api_name => l_api_name,
158: p_pkg_name => g_pkg_name,
159: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
160: x_msg_count => x_msg_count,
161: x_msg_data => x_msg_data,
162: p_api_type => g_api_type);
163:
160: x_msg_count => x_msg_count,
161: x_msg_data => x_msg_data,
162: p_api_type => g_api_type);
163:
164: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
165: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
166: p_api_name => l_api_name,
167: p_pkg_name => g_pkg_name,
168: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
161: x_msg_data => x_msg_data,
162: p_api_type => g_api_type);
163:
164: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
165: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
166: p_api_name => l_api_name,
167: p_pkg_name => g_pkg_name,
168: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
169: x_msg_count => x_msg_count,
164: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
165: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
166: p_api_name => l_api_name,
167: p_pkg_name => g_pkg_name,
168: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
169: x_msg_count => x_msg_count,
170: x_msg_data => x_msg_data,
171: p_api_type => g_api_type);
172:
170: x_msg_data => x_msg_data,
171: p_api_type => g_api_type);
172:
173: when OTHERS then
174: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
175: p_api_name => l_api_name,
176: p_pkg_name => g_pkg_name,
177: p_exc_name => 'OTHERS',
178: x_msg_count => x_msg_count,
182: END create_print_form;
183:
184: PROCEDURE update_print_form(
185: p_api_version IN NUMBER,
186: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
187: x_return_status OUT NOCOPY VARCHAR2,
188: x_msg_count OUT NOCOPY NUMBER,
189: x_msg_data OUT NOCOPY VARCHAR2,
190: p_form_rec IN oke_form_pvt.form_rec_type,
191: x_form_rec OUT NOCOPY oke_form_pvt.form_rec_type) IS
192:
193: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PRINT_FORM';
194: l_api_version CONSTANT NUMBER := 1.0;
195: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
196: BEGIN
197: -- call START_ACTIVITY to create savepoint, check compatibility
198: -- and initialize message list
199:
197: -- call START_ACTIVITY to create savepoint, check compatibility
198: -- and initialize message list
199:
200: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.START TO CALL PUB LINE REC UPDATE');
201: l_return_status := OKE_API.START_ACTIVITY(
202: p_api_name => l_api_name,
203: p_pkg_name => g_pkg_name,
204: p_init_msg_list => p_init_msg_list,
205: l_api_version => l_api_version,
207: p_api_type => g_api_type,
208: x_return_status => x_return_status);
209:
210: -- check if activity started successfully
211: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
212: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
214: raise OKE_API.G_EXCEPTION_ERROR;
215: End If;
208: x_return_status => x_return_status);
209:
210: -- check if activity started successfully
211: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
212: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
214: raise OKE_API.G_EXCEPTION_ERROR;
215: End If;
216:
209:
210: -- check if activity started successfully
211: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
212: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
214: raise OKE_API.G_EXCEPTION_ERROR;
215: End If;
216:
217: -- call complex api
210: -- check if activity started successfully
211: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
212: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
213: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
214: raise OKE_API.G_EXCEPTION_ERROR;
215: End If;
216:
217: -- call complex api
218: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.going to call pvt_update_row');
225: p_form_rec => p_form_rec,
226: x_form_rec => x_form_rec);
227:
228:
229: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
230: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
232: raise OKE_API.G_EXCEPTION_ERROR;
233: End If;
226: x_form_rec => x_form_rec);
227:
228:
229: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
230: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
232: raise OKE_API.G_EXCEPTION_ERROR;
233: End If;
234:
227:
228:
229: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
230: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
232: raise OKE_API.G_EXCEPTION_ERROR;
233: End If;
234:
235: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
228:
229: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
230: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
231: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
232: raise OKE_API.G_EXCEPTION_ERROR;
233: End If;
234:
235: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
236: x_msg_data => x_msg_data);
231: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
232: raise OKE_API.G_EXCEPTION_ERROR;
233: End If;
234:
235: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
236: x_msg_data => x_msg_data);
237: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
238: EXCEPTION
239: when OKE_API.G_EXCEPTION_ERROR then
235: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
236: x_msg_data => x_msg_data);
237: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
238: EXCEPTION
239: when OKE_API.G_EXCEPTION_ERROR then
240: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
241: p_api_name => l_api_name,
242: p_pkg_name => g_pkg_name,
243: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
236: x_msg_data => x_msg_data);
237: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
238: EXCEPTION
239: when OKE_API.G_EXCEPTION_ERROR then
240: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
241: p_api_name => l_api_name,
242: p_pkg_name => g_pkg_name,
243: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
244: x_msg_count => x_msg_count,
239: when OKE_API.G_EXCEPTION_ERROR then
240: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
241: p_api_name => l_api_name,
242: p_pkg_name => g_pkg_name,
243: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
244: x_msg_count => x_msg_count,
245: x_msg_data => x_msg_data,
246: p_api_type => g_api_type);
247:
244: x_msg_count => x_msg_count,
245: x_msg_data => x_msg_data,
246: p_api_type => g_api_type);
247:
248: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
249: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
250: p_api_name => l_api_name,
251: p_pkg_name => g_pkg_name,
252: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
245: x_msg_data => x_msg_data,
246: p_api_type => g_api_type);
247:
248: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
249: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
250: p_api_name => l_api_name,
251: p_pkg_name => g_pkg_name,
252: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
253: x_msg_count => x_msg_count,
248: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
249: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
250: p_api_name => l_api_name,
251: p_pkg_name => g_pkg_name,
252: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
253: x_msg_count => x_msg_count,
254: x_msg_data => x_msg_data,
255: p_api_type => g_api_type);
256:
254: x_msg_data => x_msg_data,
255: p_api_type => g_api_type);
256:
257: when OTHERS then
258: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
259: p_api_name => l_api_name,
260: p_pkg_name => g_pkg_name,
261: p_exc_name => 'OTHERS',
262: x_msg_count => x_msg_count,
267:
268:
269: PROCEDURE update_print_form(
270: p_api_version IN NUMBER,
271: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
272: x_return_status OUT NOCOPY VARCHAR2,
273: x_msg_count OUT NOCOPY NUMBER,
274: x_msg_data OUT NOCOPY VARCHAR2,
275: p_form_tbl IN oke_form_pvt.form_tbl_type,
276: x_form_tbl OUT NOCOPY oke_form_pvt.form_tbl_type) IS
277:
278: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PRINT_FORM';
279: l_api_version CONSTANT NUMBER := 1.0;
280: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
281: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
282: i NUMBER;
283: BEGIN
284: -- call START_ACTIVITY to create savepoint, check compatibility
277:
278: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_PRINT_FORM';
279: l_api_version CONSTANT NUMBER := 1.0;
280: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
281: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
282: i NUMBER;
283: BEGIN
284: -- call START_ACTIVITY to create savepoint, check compatibility
285: -- and initialize message list
285: -- and initialize message list
286:
287: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.start call pub update table');
288:
289: l_return_status := OKE_API.START_ACTIVITY(
290: p_api_name => l_api_name,
291: p_pkg_name => g_pkg_name,
292: p_init_msg_list => p_init_msg_list,
293: l_api_version => l_api_version,
295: p_api_type => g_api_type,
296: x_return_status => x_return_status);
297:
298: -- check if activity started successfully
299: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
300: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
302: raise OKE_API.G_EXCEPTION_ERROR;
303:
296: x_return_status => x_return_status);
297:
298: -- check if activity started successfully
299: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
300: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
302: raise OKE_API.G_EXCEPTION_ERROR;
303:
304: End If;
297:
298: -- check if activity started successfully
299: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
300: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
302: raise OKE_API.G_EXCEPTION_ERROR;
303:
304: End If;
305:
298: -- check if activity started successfully
299: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
300: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
301: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
302: raise OKE_API.G_EXCEPTION_ERROR;
303:
304: End If;
305:
306: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.going to call PVT.update_row table version');
315: x_form_tbl => x_form_tbl);
316:
317:
318:
319: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
320: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
321: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
322: raise OKE_API.G_EXCEPTION_ERROR;
323: End If;
316:
317:
318:
319: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
320: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
321: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
322: raise OKE_API.G_EXCEPTION_ERROR;
323: End If;
324:
317:
318:
319: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
320: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
321: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
322: raise OKE_API.G_EXCEPTION_ERROR;
323: End If;
324:
325: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
318:
319: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
320: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
321: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
322: raise OKE_API.G_EXCEPTION_ERROR;
323: End If;
324:
325: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
326: x_msg_data => x_msg_data);
321: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
322: raise OKE_API.G_EXCEPTION_ERROR;
323: End If;
324:
325: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
326: x_msg_data => x_msg_data);
327: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
328: EXCEPTION
329: when OKE_API.G_EXCEPTION_ERROR then
325: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
326: x_msg_data => x_msg_data);
327: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
328: EXCEPTION
329: when OKE_API.G_EXCEPTION_ERROR then
330: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
331: p_api_name => l_api_name,
332: p_pkg_name => g_pkg_name,
333: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
326: x_msg_data => x_msg_data);
327: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'PUB.ended');
328: EXCEPTION
329: when OKE_API.G_EXCEPTION_ERROR then
330: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
331: p_api_name => l_api_name,
332: p_pkg_name => g_pkg_name,
333: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
334: x_msg_count => x_msg_count,
329: when OKE_API.G_EXCEPTION_ERROR then
330: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
331: p_api_name => l_api_name,
332: p_pkg_name => g_pkg_name,
333: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
334: x_msg_count => x_msg_count,
335: x_msg_data => x_msg_data,
336: p_api_type => g_api_type);
337:
334: x_msg_count => x_msg_count,
335: x_msg_data => x_msg_data,
336: p_api_type => g_api_type);
337:
338: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
339: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
340: p_api_name => l_api_name,
341: p_pkg_name => g_pkg_name,
342: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
335: x_msg_data => x_msg_data,
336: p_api_type => g_api_type);
337:
338: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
339: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
340: p_api_name => l_api_name,
341: p_pkg_name => g_pkg_name,
342: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
343: x_msg_count => x_msg_count,
338: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
339: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
340: p_api_name => l_api_name,
341: p_pkg_name => g_pkg_name,
342: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
343: x_msg_count => x_msg_count,
344: x_msg_data => x_msg_data,
345: p_api_type => g_api_type);
346:
344: x_msg_data => x_msg_data,
345: p_api_type => g_api_type);
346:
347: when OTHERS then
348: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
349: p_api_name => l_api_name,
350: p_pkg_name => g_pkg_name,
351: p_exc_name => 'OTHERS',
352: x_msg_count => x_msg_count,
358:
359:
360: PROCEDURE validate_print_form(
361: p_api_version IN NUMBER,
362: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
363: x_return_status OUT NOCOPY VARCHAR2,
364: x_msg_count OUT NOCOPY NUMBER,
365: x_msg_data OUT NOCOPY VARCHAR2,
366: p_form_rec IN oke_form_pvt.form_rec_type) IS
367:
368: l_form_rec oke_form_pvt.form_rec_type;
369: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_PRINT_FORM';
370: l_api_version CONSTANT NUMBER := 1.0;
371: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
372:
373: BEGIN
374: -- call START_ACTIVITY to create savepoint, check compatibility
375: -- and initialize message list
372:
373: BEGIN
374: -- call START_ACTIVITY to create savepoint, check compatibility
375: -- and initialize message list
376: l_return_status := OKE_API.START_ACTIVITY(
377: p_api_name => l_api_name,
378: p_pkg_name => g_pkg_name,
379: p_init_msg_list => p_init_msg_list,
380: l_api_version => l_api_version,
382: p_api_type => g_api_type,
383: x_return_status => x_return_status);
384:
385: -- check if activity started successfully
386: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
387: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
388: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
389: raise OKE_API.G_EXCEPTION_ERROR;
390: End If;
383: x_return_status => x_return_status);
384:
385: -- check if activity started successfully
386: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
387: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
388: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
389: raise OKE_API.G_EXCEPTION_ERROR;
390: End If;
391:
384:
385: -- check if activity started successfully
386: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
387: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
388: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
389: raise OKE_API.G_EXCEPTION_ERROR;
390: End If;
391:
392: -- call BEFORE user hook
385: -- check if activity started successfully
386: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
387: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
388: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
389: raise OKE_API.G_EXCEPTION_ERROR;
390: End If;
391:
392: -- call BEFORE user hook
393: l_form_rec := p_form_rec;
402: x_msg_data => x_msg_data,
403: p_form_rec => p_form_rec);
404:
405:
406: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
407: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
409: raise OKE_API.G_EXCEPTION_ERROR;
410: End If;
403: p_form_rec => p_form_rec);
404:
405:
406: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
407: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
409: raise OKE_API.G_EXCEPTION_ERROR;
410: End If;
411:
404:
405:
406: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
407: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
409: raise OKE_API.G_EXCEPTION_ERROR;
410: End If;
411:
412: -- end activity
405:
406: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
407: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
408: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
409: raise OKE_API.G_EXCEPTION_ERROR;
410: End If;
411:
412: -- end activity
413: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
409: raise OKE_API.G_EXCEPTION_ERROR;
410: End If;
411:
412: -- end activity
413: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
414: x_msg_data => x_msg_data);
415: EXCEPTION
416: when OKE_API.G_EXCEPTION_ERROR then
417: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
412: -- end activity
413: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
414: x_msg_data => x_msg_data);
415: EXCEPTION
416: when OKE_API.G_EXCEPTION_ERROR then
417: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
418: p_api_name => l_api_name,
419: p_pkg_name => g_pkg_name,
420: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
413: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
414: x_msg_data => x_msg_data);
415: EXCEPTION
416: when OKE_API.G_EXCEPTION_ERROR then
417: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
418: p_api_name => l_api_name,
419: p_pkg_name => g_pkg_name,
420: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
421: x_msg_count => x_msg_count,
416: when OKE_API.G_EXCEPTION_ERROR then
417: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
418: p_api_name => l_api_name,
419: p_pkg_name => g_pkg_name,
420: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
421: x_msg_count => x_msg_count,
422: x_msg_data => x_msg_data,
423: p_api_type => g_api_type);
424:
421: x_msg_count => x_msg_count,
422: x_msg_data => x_msg_data,
423: p_api_type => g_api_type);
424:
425: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
426: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
427: p_api_name => l_api_name,
428: p_pkg_name => g_pkg_name,
429: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
422: x_msg_data => x_msg_data,
423: p_api_type => g_api_type);
424:
425: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
426: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
427: p_api_name => l_api_name,
428: p_pkg_name => g_pkg_name,
429: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
430: x_msg_count => x_msg_count,
425: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
426: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
427: p_api_name => l_api_name,
428: p_pkg_name => g_pkg_name,
429: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
430: x_msg_count => x_msg_count,
431: x_msg_data => x_msg_data,
432: p_api_type => g_api_type);
433:
431: x_msg_data => x_msg_data,
432: p_api_type => g_api_type);
433:
434: when OTHERS then
435: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
436: p_api_name => l_api_name,
437: p_pkg_name => g_pkg_name,
438: p_exc_name => 'OTHERS',
439: x_msg_count => x_msg_count,
443: END validate_print_form;
444:
445: PROCEDURE validate_print_form(
446: p_api_version IN NUMBER,
447: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
448: x_return_status OUT NOCOPY VARCHAR2,
449: x_msg_count OUT NOCOPY NUMBER,
450: x_msg_data OUT NOCOPY VARCHAR2,
451: p_form_tbl IN oke_form_pvt.form_tbl_type) IS
452:
453: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_PRINT_FORM';
454:
455: l_api_version CONSTANT NUMBER := 1.0;
456: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
457: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
458: i NUMBER;
459: l_form_tbl oke_form_pvt.form_tbl_type := p_form_tbl;
460: BEGIN
453: l_api_name CONSTANT VARCHAR2(30) := 'VALIDATE_PRINT_FORM';
454:
455: l_api_version CONSTANT NUMBER := 1.0;
456: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
457: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
458: i NUMBER;
459: l_form_tbl oke_form_pvt.form_tbl_type := p_form_tbl;
460: BEGIN
461: -- call START_ACTIVITY to create savepoint, check compatibility
459: l_form_tbl oke_form_pvt.form_tbl_type := p_form_tbl;
460: BEGIN
461: -- call START_ACTIVITY to create savepoint, check compatibility
462: -- and initialize message list
463: l_return_status := OKE_API.START_ACTIVITY(
464: p_api_name => l_api_name,
465: p_pkg_name => g_pkg_name,
466: p_init_msg_list => p_init_msg_list,
467: l_api_version => l_api_version,
469: p_api_type => g_api_type,
470: x_return_status => x_return_status);
471:
472: -- check if activity started successfully
473: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
474: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
475: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
476: raise OKE_API.G_EXCEPTION_ERROR;
477: End If;
470: x_return_status => x_return_status);
471:
472: -- check if activity started successfully
473: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
474: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
475: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
476: raise OKE_API.G_EXCEPTION_ERROR;
477: End If;
478:
471:
472: -- check if activity started successfully
473: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
474: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
475: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
476: raise OKE_API.G_EXCEPTION_ERROR;
477: End If;
478:
479:
472: -- check if activity started successfully
473: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
474: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
475: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
476: raise OKE_API.G_EXCEPTION_ERROR;
477: End If;
478:
479:
480: OKE_FORM_PVT.Validate_Row(
485: x_msg_data => x_msg_data,
486: p_form_tbl => p_form_tbl);
487:
488:
489: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
490: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
491: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
492: raise OKE_API.G_EXCEPTION_ERROR;
493: End If;
486: p_form_tbl => p_form_tbl);
487:
488:
489: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
490: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
491: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
492: raise OKE_API.G_EXCEPTION_ERROR;
493: End If;
494:
487:
488:
489: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
490: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
491: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
492: raise OKE_API.G_EXCEPTION_ERROR;
493: End If;
494:
495: -- end activity
488:
489: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
490: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
491: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
492: raise OKE_API.G_EXCEPTION_ERROR;
493: End If;
494:
495: -- end activity
496: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
492: raise OKE_API.G_EXCEPTION_ERROR;
493: End If;
494:
495: -- end activity
496: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: EXCEPTION
499: when OKE_API.G_EXCEPTION_ERROR then
500: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
495: -- end activity
496: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: EXCEPTION
499: when OKE_API.G_EXCEPTION_ERROR then
500: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
501: p_api_name => l_api_name,
502: p_pkg_name => g_pkg_name,
503: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
496: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
497: x_msg_data => x_msg_data);
498: EXCEPTION
499: when OKE_API.G_EXCEPTION_ERROR then
500: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
501: p_api_name => l_api_name,
502: p_pkg_name => g_pkg_name,
503: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
504: x_msg_count => x_msg_count,
499: when OKE_API.G_EXCEPTION_ERROR then
500: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
501: p_api_name => l_api_name,
502: p_pkg_name => g_pkg_name,
503: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
504: x_msg_count => x_msg_count,
505: x_msg_data => x_msg_data,
506: p_api_type => g_api_type);
507:
504: x_msg_count => x_msg_count,
505: x_msg_data => x_msg_data,
506: p_api_type => g_api_type);
507:
508: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
509: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
510: p_api_name => l_api_name,
511: p_pkg_name => g_pkg_name,
512: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
505: x_msg_data => x_msg_data,
506: p_api_type => g_api_type);
507:
508: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
509: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
510: p_api_name => l_api_name,
511: p_pkg_name => g_pkg_name,
512: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
513: x_msg_count => x_msg_count,
508: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
509: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
510: p_api_name => l_api_name,
511: p_pkg_name => g_pkg_name,
512: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
513: x_msg_count => x_msg_count,
514: x_msg_data => x_msg_data,
515: p_api_type => g_api_type);
516:
514: x_msg_data => x_msg_data,
515: p_api_type => g_api_type);
516:
517: when OTHERS then
518: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
519: p_api_name => l_api_name,
520: p_pkg_name => g_pkg_name,
521: p_exc_name => 'OTHERS',
522: x_msg_count => x_msg_count,
530:
531: PROCEDURE delete_print_form(
532:
533: p_api_version IN NUMBER,
534: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
535: x_return_status OUT NOCOPY VARCHAR2,
536: x_msg_count OUT NOCOPY NUMBER,
537: x_msg_data OUT NOCOPY VARCHAR2,
538: p_form_rec IN oke_form_pvt.form_rec_type) IS
539:
540: l_form_rec oke_form_pvt.form_rec_type;
541: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PRINT_FORM';
542: l_api_version CONSTANT NUMBER := 1.0;
543: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
544: BEGIN
545: -- call START_ACTIVITY to create savepoint, check compatibility
546: -- and initialize message list
547: l_return_status := OKE_API.START_ACTIVITY(
543: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
544: BEGIN
545: -- call START_ACTIVITY to create savepoint, check compatibility
546: -- and initialize message list
547: l_return_status := OKE_API.START_ACTIVITY(
548: p_api_name => l_api_name,
549: p_pkg_name => g_pkg_name,
550: p_init_msg_list => p_init_msg_list,
551: l_api_version => l_api_version,
553: p_api_type => g_api_type,
554: x_return_status => x_return_status);
555:
556: -- check if activity started successfully
557: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
558: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
559: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
560: raise OKE_API.G_EXCEPTION_ERROR;
561: End If;
554: x_return_status => x_return_status);
555:
556: -- check if activity started successfully
557: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
558: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
559: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
560: raise OKE_API.G_EXCEPTION_ERROR;
561: End If;
562:
555:
556: -- check if activity started successfully
557: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
558: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
559: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
560: raise OKE_API.G_EXCEPTION_ERROR;
561: End If;
562:
563: l_form_rec := p_form_rec;
556: -- check if activity started successfully
557: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
558: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
559: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
560: raise OKE_API.G_EXCEPTION_ERROR;
561: End If;
562:
563: l_form_rec := p_form_rec;
564:
572: x_msg_data => x_msg_data,
573: p_form_rec => p_form_rec);
574:
575:
576: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
577: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
578: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
579: raise OKE_API.G_EXCEPTION_ERROR;
580: End If;
573: p_form_rec => p_form_rec);
574:
575:
576: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
577: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
578: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
579: raise OKE_API.G_EXCEPTION_ERROR;
580: End If;
581:
574:
575:
576: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
577: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
578: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
579: raise OKE_API.G_EXCEPTION_ERROR;
580: End If;
581:
582:
575:
576: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
577: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
578: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
579: raise OKE_API.G_EXCEPTION_ERROR;
580: End If;
581:
582:
583: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
579: raise OKE_API.G_EXCEPTION_ERROR;
580: End If;
581:
582:
583: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
584: x_msg_data => x_msg_data);
585: EXCEPTION
586: when OKE_API.G_EXCEPTION_ERROR then
587: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
582:
583: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
584: x_msg_data => x_msg_data);
585: EXCEPTION
586: when OKE_API.G_EXCEPTION_ERROR then
587: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
588: p_api_name => l_api_name,
589: p_pkg_name => g_pkg_name,
590: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
583: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
584: x_msg_data => x_msg_data);
585: EXCEPTION
586: when OKE_API.G_EXCEPTION_ERROR then
587: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
588: p_api_name => l_api_name,
589: p_pkg_name => g_pkg_name,
590: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
591: x_msg_count => x_msg_count,
586: when OKE_API.G_EXCEPTION_ERROR then
587: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
588: p_api_name => l_api_name,
589: p_pkg_name => g_pkg_name,
590: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
591: x_msg_count => x_msg_count,
592: x_msg_data => x_msg_data,
593: p_api_type => g_api_type);
594:
591: x_msg_count => x_msg_count,
592: x_msg_data => x_msg_data,
593: p_api_type => g_api_type);
594:
595: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
596: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
597: p_api_name => l_api_name,
598: p_pkg_name => g_pkg_name,
599: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
592: x_msg_data => x_msg_data,
593: p_api_type => g_api_type);
594:
595: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
596: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
597: p_api_name => l_api_name,
598: p_pkg_name => g_pkg_name,
599: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
600: x_msg_count => x_msg_count,
595: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
596: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
597: p_api_name => l_api_name,
598: p_pkg_name => g_pkg_name,
599: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
600: x_msg_count => x_msg_count,
601: x_msg_data => x_msg_data,
602: p_api_type => g_api_type);
603:
601: x_msg_data => x_msg_data,
602: p_api_type => g_api_type);
603:
604: when OTHERS then
605: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
606: p_api_name => l_api_name,
607: p_pkg_name => g_pkg_name,
608: p_exc_name => 'OTHERS',
609: x_msg_count => x_msg_count,
614:
615:
616: PROCEDURE delete_print_form(
617: p_api_version IN NUMBER,
618: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
619: x_return_status OUT NOCOPY VARCHAR2,
620: x_msg_count OUT NOCOPY NUMBER,
621: x_msg_data OUT NOCOPY VARCHAR2,
622: p_form_tbl IN oke_form_pvt.form_tbl_type) IS
622: p_form_tbl IN oke_form_pvt.form_tbl_type) IS
623:
624: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PRINT_FORM';
625: l_api_version CONSTANT NUMBER := 1.0;
626: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
627: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
628: i NUMBER;
629: BEGIN
630: -- call START_ACTIVITY to create savepoint, check compatibility
623:
624: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PRINT_FORM';
625: l_api_version CONSTANT NUMBER := 1.0;
626: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
627: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
628: i NUMBER;
629: BEGIN
630: -- call START_ACTIVITY to create savepoint, check compatibility
631: -- and initialize message list
628: i NUMBER;
629: BEGIN
630: -- call START_ACTIVITY to create savepoint, check compatibility
631: -- and initialize message list
632: l_return_status := OKE_API.START_ACTIVITY(
633: p_api_name => l_api_name,
634: p_pkg_name => g_pkg_name,
635: p_init_msg_list => p_init_msg_list,
636: l_api_version => l_api_version,
638: p_api_type => g_api_type,
639: x_return_status => x_return_status);
640:
641: -- check if activity started successfully
642: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
643: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
644: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
645: raise OKE_API.G_EXCEPTION_ERROR;
646: End If;
639: x_return_status => x_return_status);
640:
641: -- check if activity started successfully
642: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
643: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
644: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
645: raise OKE_API.G_EXCEPTION_ERROR;
646: End If;
647:
640:
641: -- check if activity started successfully
642: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
643: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
644: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
645: raise OKE_API.G_EXCEPTION_ERROR;
646: End If;
647:
648:
641: -- check if activity started successfully
642: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
643: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
644: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
645: raise OKE_API.G_EXCEPTION_ERROR;
646: End If;
647:
648:
649: OKE_FORM_PVT.Delete_Row(
655: p_form_tbl => p_form_tbl);
656:
657:
658:
659: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
660: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
661: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
662: raise OKE_API.G_EXCEPTION_ERROR;
663: End If;
656:
657:
658:
659: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
660: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
661: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
662: raise OKE_API.G_EXCEPTION_ERROR;
663: End If;
664:
657:
658:
659: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
660: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
661: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
662: raise OKE_API.G_EXCEPTION_ERROR;
663: End If;
664:
665: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
658:
659: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
660: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
661: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
662: raise OKE_API.G_EXCEPTION_ERROR;
663: End If;
664:
665: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
666: x_msg_data => x_msg_data);
661: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
662: raise OKE_API.G_EXCEPTION_ERROR;
663: End If;
664:
665: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
666: x_msg_data => x_msg_data);
667: EXCEPTION
668: when OKE_API.G_EXCEPTION_ERROR then
669: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
664:
665: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
666: x_msg_data => x_msg_data);
667: EXCEPTION
668: when OKE_API.G_EXCEPTION_ERROR then
669: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
670: p_api_name => l_api_name,
671: p_pkg_name => g_pkg_name,
672: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
665: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
666: x_msg_data => x_msg_data);
667: EXCEPTION
668: when OKE_API.G_EXCEPTION_ERROR then
669: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
670: p_api_name => l_api_name,
671: p_pkg_name => g_pkg_name,
672: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
673: x_msg_count => x_msg_count,
668: when OKE_API.G_EXCEPTION_ERROR then
669: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
670: p_api_name => l_api_name,
671: p_pkg_name => g_pkg_name,
672: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
673: x_msg_count => x_msg_count,
674: x_msg_data => x_msg_data,
675: p_api_type => g_api_type);
676:
673: x_msg_count => x_msg_count,
674: x_msg_data => x_msg_data,
675: p_api_type => g_api_type);
676:
677: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
678: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
679: p_api_name => l_api_name,
680: p_pkg_name => g_pkg_name,
681: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
674: x_msg_data => x_msg_data,
675: p_api_type => g_api_type);
676:
677: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
678: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
679: p_api_name => l_api_name,
680: p_pkg_name => g_pkg_name,
681: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
682: x_msg_count => x_msg_count,
677: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
678: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
679: p_api_name => l_api_name,
680: p_pkg_name => g_pkg_name,
681: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
682: x_msg_count => x_msg_count,
683: x_msg_data => x_msg_data,
684: p_api_type => g_api_type);
685:
683: x_msg_data => x_msg_data,
684: p_api_type => g_api_type);
685:
686: when OTHERS then
687: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
688: p_api_name => l_api_name,
689: p_pkg_name => g_pkg_name,
690: p_exc_name => 'OTHERS',
691: x_msg_count => x_msg_count,
697:
698:
699: PROCEDURE delete_print_form(
700: p_api_version IN NUMBER,
701: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
702: x_return_status OUT NOCOPY VARCHAR2,
703: x_msg_count OUT NOCOPY NUMBER,
704: x_msg_data OUT NOCOPY VARCHAR2,
705: p_chr_id IN NUMBER,
708:
709: l_form_rec oke_form_pvt.form_rec_type;
710: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_PRINT_FORM';
711: l_api_version CONSTANT NUMBER := 1.0;
712: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
713: l_check_num1 NUMBER;
714: l_check_num2 NUMBER;
715:
716: BEGIN
715:
716: BEGIN
717: -- call START_ACTIVITY to create savepoint, check compatibility
718: -- and initialize message list
719: l_return_status := OKE_API.START_ACTIVITY(
720: p_api_name => l_api_name,
721: p_pkg_name => g_pkg_name,
722: p_init_msg_list => p_init_msg_list,
723: l_api_version => l_api_version,
725: p_api_type => g_api_type,
726: x_return_status => x_return_status);
727:
728: -- check if activity started successfully
729: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
730: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
732: raise OKE_API.G_EXCEPTION_ERROR;
733: End If;
726: x_return_status => x_return_status);
727:
728: -- check if activity started successfully
729: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
730: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
732: raise OKE_API.G_EXCEPTION_ERROR;
733: End If;
734:
727:
728: -- check if activity started successfully
729: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
730: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
732: raise OKE_API.G_EXCEPTION_ERROR;
733: End If;
734:
735: If (p_cle_id IS NOT NULL) Then
728: -- check if activity started successfully
729: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
730: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
731: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
732: raise OKE_API.G_EXCEPTION_ERROR;
733: End If;
734:
735: If (p_cle_id IS NOT NULL) Then
736: OKE_FORM_PVT.delete_row(
756: End If;
757:
758:
759:
760: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
761: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
762: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
763: raise OKE_API.G_EXCEPTION_ERROR;
764: End If;
757:
758:
759:
760: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
761: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
762: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
763: raise OKE_API.G_EXCEPTION_ERROR;
764: End If;
765:
758:
759:
760: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
761: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
762: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
763: raise OKE_API.G_EXCEPTION_ERROR;
764: End If;
765:
766: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
759:
760: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
761: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
762: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
763: raise OKE_API.G_EXCEPTION_ERROR;
764: End If;
765:
766: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data);
762: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
763: raise OKE_API.G_EXCEPTION_ERROR;
764: End If;
765:
766: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data);
768: EXCEPTION
769: when OKE_API.G_EXCEPTION_ERROR then
770: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
765:
766: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data);
768: EXCEPTION
769: when OKE_API.G_EXCEPTION_ERROR then
770: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
771: p_api_name => l_api_name,
772: p_pkg_name => g_pkg_name,
773: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
766: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
767: x_msg_data => x_msg_data);
768: EXCEPTION
769: when OKE_API.G_EXCEPTION_ERROR then
770: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
771: p_api_name => l_api_name,
772: p_pkg_name => g_pkg_name,
773: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
774: x_msg_count => x_msg_count,
769: when OKE_API.G_EXCEPTION_ERROR then
770: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
771: p_api_name => l_api_name,
772: p_pkg_name => g_pkg_name,
773: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
774: x_msg_count => x_msg_count,
775: x_msg_data => x_msg_data,
776: p_api_type => g_api_type);
777:
774: x_msg_count => x_msg_count,
775: x_msg_data => x_msg_data,
776: p_api_type => g_api_type);
777:
778: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
779: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
780: p_api_name => l_api_name,
781: p_pkg_name => g_pkg_name,
782: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
775: x_msg_data => x_msg_data,
776: p_api_type => g_api_type);
777:
778: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
779: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
780: p_api_name => l_api_name,
781: p_pkg_name => g_pkg_name,
782: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
783: x_msg_count => x_msg_count,
778: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
779: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
780: p_api_name => l_api_name,
781: p_pkg_name => g_pkg_name,
782: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
783: x_msg_count => x_msg_count,
784: x_msg_data => x_msg_data,
785: p_api_type => g_api_type);
786:
784: x_msg_data => x_msg_data,
785: p_api_type => g_api_type);
786:
787: when OTHERS then
788: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
789: p_api_name => l_api_name,
790: p_pkg_name => g_pkg_name,
791: p_exc_name => 'OTHERS',
792: x_msg_count => x_msg_count,
798:
799:
800: PROCEDURE copy_print_form(
801: p_api_version IN NUMBER,
802: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
803: x_return_status OUT NOCOPY VARCHAR2,
804: x_msg_count OUT NOCOPY NUMBER,
805: x_msg_data OUT NOCOPY VARCHAR2,
806: p_from_level IN VARCHAR2,
814: l_form_tbl oke_form_pvt.form_tbl_type;
815: l_form_rec oke_form_pvt.form_rec_type;
816: l_api_name CONSTANT VARCHAR2(30) := 'COPY_PRINT_FORM';
817: l_api_version CONSTANT NUMBER := 1.0;
818: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
819: l_rec_num NUMBER:=0;
820:
821: x_form_tbl oke_form_pvt.form_tbl_type;
822:
890: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'print forms start call copy forms pub');
891:
892: -- call START_ACTIVITY to create savepoint, check compatibility
893: -- and initialize message list
894: l_return_status := OKE_API.START_ACTIVITY(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_init_msg_list => p_init_msg_list,
898: l_api_version => l_api_version,
900: p_api_type => g_api_type,
901: x_return_status => x_return_status);
902:
903: -- check if activity started successfully
904: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
905: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
907: raise OKE_API.G_EXCEPTION_ERROR;
908: End If;
901: x_return_status => x_return_status);
902:
903: -- check if activity started successfully
904: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
905: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
907: raise OKE_API.G_EXCEPTION_ERROR;
908: End If;
909:
902:
903: -- check if activity started successfully
904: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
905: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
907: raise OKE_API.G_EXCEPTION_ERROR;
908: End If;
909:
910: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Print FORMS check conditions');
903: -- check if activity started successfully
904: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
905: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
906: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
907: raise OKE_API.G_EXCEPTION_ERROR;
908: End If;
909:
910: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'Print FORMS check conditions');
911:
947:
948: l_rec_num := l_rec_num+1;
949:
950: IF(p_to_chr_id IS NULL)AND(p_to_cle_id IS NULL) THEN
951: raise OKE_API.G_EXCEPTION_ERROR;
952: END IF;
953:
954: IF(p_to_chr_id IS NULL) THEN
955: l_form_rec.K_HEADER_ID := l_form_rec.K_HEADER_ID ;
979: x_msg_data => x_msg_data,
980: p_form_tbl => l_form_tbl,
981: x_form_tbl => x_form_tbl);
982:
983: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
984: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
986: raise OKE_API.G_EXCEPTION_ERROR;
987: End If;
980: p_form_tbl => l_form_tbl,
981: x_form_tbl => x_form_tbl);
982:
983: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
984: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
986: raise OKE_API.G_EXCEPTION_ERROR;
987: End If;
988:
981: x_form_tbl => x_form_tbl);
982:
983: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
984: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
986: raise OKE_API.G_EXCEPTION_ERROR;
987: End If;
988:
989:
982:
983: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
984: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
985: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
986: raise OKE_API.G_EXCEPTION_ERROR;
987: End If;
988:
989:
990: ELSIF( p_from_level='L' ) THEN
1025:
1026: l_rec_num := l_rec_num+1;
1027:
1028: IF(p_to_chr_id IS NULL)AND(p_to_cle_id IS NULL) THEN
1029: raise OKE_API.G_EXCEPTION_ERROR;
1030: END IF;
1031:
1032: IF(p_to_chr_id IS NULL) THEN
1033: l_form_rec.K_HEADER_ID := l_form_rec.K_HEADER_ID ;
1057: x_msg_data => x_msg_data,
1058: p_form_tbl => l_form_tbl,
1059: x_form_tbl => x_form_tbl);
1060:
1061: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1062: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1064: raise OKE_API.G_EXCEPTION_ERROR;
1065: End If;
1058: p_form_tbl => l_form_tbl,
1059: x_form_tbl => x_form_tbl);
1060:
1061: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1062: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1064: raise OKE_API.G_EXCEPTION_ERROR;
1065: End If;
1066:
1059: x_form_tbl => x_form_tbl);
1060:
1061: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1062: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1064: raise OKE_API.G_EXCEPTION_ERROR;
1065: End If;
1066:
1067: ELSE
1060:
1061: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1062: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1063: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1064: raise OKE_API.G_EXCEPTION_ERROR;
1065: End If;
1066:
1067: ELSE
1068: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'conditions not met');
1065: End If;
1066:
1067: ELSE
1068: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'conditions not met');
1069: raise OKE_API.G_EXCEPTION_ERROR;
1070: END IF;
1071:
1072: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1073: x_msg_data => x_msg_data);
1068: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'conditions not met');
1069: raise OKE_API.G_EXCEPTION_ERROR;
1070: END IF;
1071:
1072: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1073: x_msg_data => x_msg_data);
1074: EXCEPTION
1075: when OKE_API.G_EXCEPTION_ERROR then
1076: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1071:
1072: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1073: x_msg_data => x_msg_data);
1074: EXCEPTION
1075: when OKE_API.G_EXCEPTION_ERROR then
1076: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1077: p_api_name => l_api_name,
1078: p_pkg_name => g_pkg_name,
1079: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1072: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1073: x_msg_data => x_msg_data);
1074: EXCEPTION
1075: when OKE_API.G_EXCEPTION_ERROR then
1076: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1077: p_api_name => l_api_name,
1078: p_pkg_name => g_pkg_name,
1079: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1080: x_msg_count => x_msg_count,
1075: when OKE_API.G_EXCEPTION_ERROR then
1076: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1077: p_api_name => l_api_name,
1078: p_pkg_name => g_pkg_name,
1079: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1080: x_msg_count => x_msg_count,
1081: x_msg_data => x_msg_data,
1082: p_api_type => g_api_type);
1083:
1080: x_msg_count => x_msg_count,
1081: x_msg_data => x_msg_data,
1082: p_api_type => g_api_type);
1083:
1084: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1085: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1086: p_api_name => l_api_name,
1087: p_pkg_name => g_pkg_name,
1088: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1081: x_msg_data => x_msg_data,
1082: p_api_type => g_api_type);
1083:
1084: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1085: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1086: p_api_name => l_api_name,
1087: p_pkg_name => g_pkg_name,
1088: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1089: x_msg_count => x_msg_count,
1084: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1085: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1086: p_api_name => l_api_name,
1087: p_pkg_name => g_pkg_name,
1088: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1089: x_msg_count => x_msg_count,
1090: x_msg_data => x_msg_data,
1091: p_api_type => g_api_type);
1092:
1090: x_msg_data => x_msg_data,
1091: p_api_type => g_api_type);
1092:
1093: when OTHERS then
1094: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1095: p_api_name => l_api_name,
1096: p_pkg_name => g_pkg_name,
1097: p_exc_name => 'OTHERS',
1098: x_msg_count => x_msg_count,
1103:
1104:
1105: PROCEDURE lock_print_form(
1106: p_api_version IN NUMBER,
1107: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
1108: x_return_status OUT NOCOPY VARCHAR2,
1109: x_msg_count OUT NOCOPY NUMBER,
1110: x_msg_data OUT NOCOPY VARCHAR2,
1111: p_form_rec IN OKE_FORM_PVT.form_rec_type) IS
1112:
1113:
1114: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_PRINT_FORM';
1115: l_api_version CONSTANT NUMBER := 1.0;
1116: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1117:
1118: BEGIN
1119: l_return_status := OKE_API.START_ACTIVITY(
1120: p_api_name => l_api_name,
1115: l_api_version CONSTANT NUMBER := 1.0;
1116: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1117:
1118: BEGIN
1119: l_return_status := OKE_API.START_ACTIVITY(
1120: p_api_name => l_api_name,
1121: p_pkg_name => g_pkg_name,
1122: p_init_msg_list => p_init_msg_list,
1123: l_api_version => l_api_version,
1125: p_api_type => g_api_type,
1126: x_return_status => x_return_status);
1127:
1128: -- check if activity started successfully
1129: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1130: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1131: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1132: raise OKE_API.G_EXCEPTION_ERROR;
1133: End If;
1126: x_return_status => x_return_status);
1127:
1128: -- check if activity started successfully
1129: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1130: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1131: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1132: raise OKE_API.G_EXCEPTION_ERROR;
1133: End If;
1134:
1127:
1128: -- check if activity started successfully
1129: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1130: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1131: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1132: raise OKE_API.G_EXCEPTION_ERROR;
1133: End If;
1134:
1135: OKE_FORM_PVT.Lock_Row(
1128: -- check if activity started successfully
1129: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1130: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1131: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1132: raise OKE_API.G_EXCEPTION_ERROR;
1133: End If;
1134:
1135: OKE_FORM_PVT.Lock_Row(
1136: p_api_version => p_api_version,
1140: x_msg_data => x_msg_data,
1141: p_form_rec => p_form_rec);
1142:
1143: -- check return status
1144: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1145: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1147: raise OKE_API.G_EXCEPTION_ERROR;
1148: End If;
1141: p_form_rec => p_form_rec);
1142:
1143: -- check return status
1144: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1145: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1147: raise OKE_API.G_EXCEPTION_ERROR;
1148: End If;
1149:
1142:
1143: -- check return status
1144: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1145: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1147: raise OKE_API.G_EXCEPTION_ERROR;
1148: End If;
1149:
1150: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1143: -- check return status
1144: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1145: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1146: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1147: raise OKE_API.G_EXCEPTION_ERROR;
1148: End If;
1149:
1150: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1151: x_msg_data => x_msg_data);
1146: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1147: raise OKE_API.G_EXCEPTION_ERROR;
1148: End If;
1149:
1150: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1151: x_msg_data => x_msg_data);
1152: EXCEPTION
1153: when OKE_API.G_EXCEPTION_ERROR then
1154: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1149:
1150: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1151: x_msg_data => x_msg_data);
1152: EXCEPTION
1153: when OKE_API.G_EXCEPTION_ERROR then
1154: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1155: p_api_name => l_api_name,
1156: p_pkg_name => g_pkg_name,
1157: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1150: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1151: x_msg_data => x_msg_data);
1152: EXCEPTION
1153: when OKE_API.G_EXCEPTION_ERROR then
1154: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1155: p_api_name => l_api_name,
1156: p_pkg_name => g_pkg_name,
1157: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1158: x_msg_count => x_msg_count,
1153: when OKE_API.G_EXCEPTION_ERROR then
1154: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1155: p_api_name => l_api_name,
1156: p_pkg_name => g_pkg_name,
1157: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1158: x_msg_count => x_msg_count,
1159: x_msg_data => x_msg_data,
1160: p_api_type => g_api_type);
1161:
1158: x_msg_count => x_msg_count,
1159: x_msg_data => x_msg_data,
1160: p_api_type => g_api_type);
1161:
1162: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1163: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1164: p_api_name => l_api_name,
1165: p_pkg_name => g_pkg_name,
1166: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1159: x_msg_data => x_msg_data,
1160: p_api_type => g_api_type);
1161:
1162: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1163: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1164: p_api_name => l_api_name,
1165: p_pkg_name => g_pkg_name,
1166: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1167: x_msg_count => x_msg_count,
1162: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1163: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1164: p_api_name => l_api_name,
1165: p_pkg_name => g_pkg_name,
1166: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1167: x_msg_count => x_msg_count,
1168: x_msg_data => x_msg_data,
1169: p_api_type => g_api_type);
1170:
1168: x_msg_data => x_msg_data,
1169: p_api_type => g_api_type);
1170:
1171: when OTHERS then
1172: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1173: p_api_name => l_api_name,
1174: p_pkg_name => g_pkg_name,
1175: p_exc_name => 'OTHERS',
1176: x_msg_count => x_msg_count,
1180: END lock_print_form;
1181:
1182: PROCEDURE lock_print_form(
1183: p_api_version IN NUMBER,
1184: p_init_msg_list IN VARCHAR2 DEFAULT OKE_API.G_FALSE,
1185: x_return_status OUT NOCOPY VARCHAR2,
1186: x_msg_count OUT NOCOPY NUMBER,
1187: x_msg_data OUT NOCOPY VARCHAR2,
1188: p_form_tbl IN oke_form_pvt.form_tbl_type) IS
1188: p_form_tbl IN oke_form_pvt.form_tbl_type) IS
1189:
1190: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_PRINT_FORM';
1191: l_api_version CONSTANT NUMBER := 1.0;
1192: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1193: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1194: i NUMBER;
1195: BEGIN
1196: -- call START_ACTIVITY to create savepoint, check compatibility
1189:
1190: l_api_name CONSTANT VARCHAR2(30) := 'LOCK_PRINT_FORM';
1191: l_api_version CONSTANT NUMBER := 1.0;
1192: l_return_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1193: l_overall_status VARCHAR2(1) := OKE_API.G_RET_STS_SUCCESS;
1194: i NUMBER;
1195: BEGIN
1196: -- call START_ACTIVITY to create savepoint, check compatibility
1197: -- and initialize message list
1194: i NUMBER;
1195: BEGIN
1196: -- call START_ACTIVITY to create savepoint, check compatibility
1197: -- and initialize message list
1198: l_return_status := OKE_API.START_ACTIVITY(
1199: p_api_name => l_api_name,
1200: p_pkg_name => g_pkg_name,
1201: p_init_msg_list => p_init_msg_list,
1202: l_api_version => l_api_version,
1204: p_api_type => g_api_type,
1205: x_return_status => x_return_status);
1206:
1207: -- check if activity started successfully
1208: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1209: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1210: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1211: raise OKE_API.G_EXCEPTION_ERROR;
1212: End If;
1205: x_return_status => x_return_status);
1206:
1207: -- check if activity started successfully
1208: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1209: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1210: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1211: raise OKE_API.G_EXCEPTION_ERROR;
1212: End If;
1213:
1206:
1207: -- check if activity started successfully
1208: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1209: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1210: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1211: raise OKE_API.G_EXCEPTION_ERROR;
1212: End If;
1213:
1214: If (p_form_tbl.COUNT > 0) Then
1207: -- check if activity started successfully
1208: If (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) then
1209: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1210: Elsif (l_return_status = OKE_API.G_RET_STS_ERROR) then
1211: raise OKE_API.G_EXCEPTION_ERROR;
1212: End If;
1213:
1214: If (p_form_tbl.COUNT > 0) Then
1215: i := p_form_tbl.FIRST;
1223: x_msg_data => x_msg_data,
1224: p_form_rec => p_form_tbl(i));
1225:
1226: -- store the highest degree of error
1227: If x_return_status <> OKE_API.G_RET_STS_SUCCESS Then
1228: If l_overall_status <> OKE_API.G_RET_STS_UNEXP_ERROR Then
1229: l_overall_status := x_return_status;
1230: End If;
1231: End If;
1224: p_form_rec => p_form_tbl(i));
1225:
1226: -- store the highest degree of error
1227: If x_return_status <> OKE_API.G_RET_STS_SUCCESS Then
1228: If l_overall_status <> OKE_API.G_RET_STS_UNEXP_ERROR Then
1229: l_overall_status := x_return_status;
1230: End If;
1231: End If;
1232: EXIT WHEN (i = p_form_tbl.LAST);
1235: -- return overall status
1236: x_return_status := l_overall_status;
1237: End If;
1238:
1239: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1240: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1242: raise OKE_API.G_EXCEPTION_ERROR;
1243: End If;
1236: x_return_status := l_overall_status;
1237: End If;
1238:
1239: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1240: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1242: raise OKE_API.G_EXCEPTION_ERROR;
1243: End If;
1244:
1237: End If;
1238:
1239: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1240: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1242: raise OKE_API.G_EXCEPTION_ERROR;
1243: End If;
1244:
1245: -- end activity
1238:
1239: If x_return_status = OKE_API.G_RET_STS_UNEXP_ERROR Then
1240: raise OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: Elsif x_return_status = OKE_API.G_RET_STS_ERROR Then
1242: raise OKE_API.G_EXCEPTION_ERROR;
1243: End If;
1244:
1245: -- end activity
1246: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1242: raise OKE_API.G_EXCEPTION_ERROR;
1243: End If;
1244:
1245: -- end activity
1246: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1247: x_msg_data => x_msg_data);
1248: EXCEPTION
1249: when OKE_API.G_EXCEPTION_ERROR then
1250: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1245: -- end activity
1246: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1247: x_msg_data => x_msg_data);
1248: EXCEPTION
1249: when OKE_API.G_EXCEPTION_ERROR then
1250: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1251: p_api_name => l_api_name,
1252: p_pkg_name => g_pkg_name,
1253: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1246: OKE_API.END_ACTIVITY( x_msg_count => x_msg_count,
1247: x_msg_data => x_msg_data);
1248: EXCEPTION
1249: when OKE_API.G_EXCEPTION_ERROR then
1250: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1251: p_api_name => l_api_name,
1252: p_pkg_name => g_pkg_name,
1253: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1254: x_msg_count => x_msg_count,
1249: when OKE_API.G_EXCEPTION_ERROR then
1250: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1251: p_api_name => l_api_name,
1252: p_pkg_name => g_pkg_name,
1253: p_exc_name => 'OKE_API.G_RET_STS_ERROR',
1254: x_msg_count => x_msg_count,
1255: x_msg_data => x_msg_data,
1256: p_api_type => g_api_type);
1257:
1254: x_msg_count => x_msg_count,
1255: x_msg_data => x_msg_data,
1256: p_api_type => g_api_type);
1257:
1258: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1259: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1260: p_api_name => l_api_name,
1261: p_pkg_name => g_pkg_name,
1262: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1255: x_msg_data => x_msg_data,
1256: p_api_type => g_api_type);
1257:
1258: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1259: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1260: p_api_name => l_api_name,
1261: p_pkg_name => g_pkg_name,
1262: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1263: x_msg_count => x_msg_count,
1258: when OKE_API.G_EXCEPTION_UNEXPECTED_ERROR then
1259: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1260: p_api_name => l_api_name,
1261: p_pkg_name => g_pkg_name,
1262: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR',
1263: x_msg_count => x_msg_count,
1264: x_msg_data => x_msg_data,
1265: p_api_type => g_api_type);
1266:
1264: x_msg_data => x_msg_data,
1265: p_api_type => g_api_type);
1266:
1267: when OTHERS then
1268: x_return_status := OKE_API.HANDLE_EXCEPTIONS(
1269: p_api_name => l_api_name,
1270: p_pkg_name => g_pkg_name,
1271: p_exc_name => 'OTHERS',
1272: x_msg_count => x_msg_count,