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