DBA Data[Home] [Help]

APPS.OKL_CONTRACT_TOP_LINE_PVT dependencies on OKC_API

Line 48: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

44: -- End of comments
45:
46: PROCEDURE create_contract_link_serv (
47: p_api_version IN NUMBER,
48: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
49: x_return_status OUT NOCOPY VARCHAR2,
50: x_msg_count OUT NOCOPY NUMBER,
51: x_msg_data OUT NOCOPY VARCHAR2,
52: p_chr_id IN NUMBER,

Line 119: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

115: l_ste_code OKC_STATUSES_B.STE_CODE%type:= null;
116:
117: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_link_serv';
118: l_api_version CONSTANT NUMBER := 1.0;
119: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
120: l_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
121:
122: l_auth number := null;
123: l_inv number := null;

Line 136: l_return_status := OKC_API.START_ACTIVITY(

132: End If;
133:
134: -- call START_ACTIVITY to create savepoint, check compatibility
135: -- and initialize message list
136: l_return_status := OKC_API.START_ACTIVITY(
137: p_api_name => l_api_name,
138: p_pkg_name => g_pkg_name,
139: p_init_msg_list => p_init_msg_list,
140: l_api_version => l_api_version,

Line 146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

142: p_api_type => g_api_type,
143: x_return_status => x_return_status);
144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;

Line 147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

143: x_return_status => x_return_status);
144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:

Line 148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

144:
145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then

Line 149: raise OKC_API.G_EXCEPTION_ERROR;

145: -- check if activity started successfully
146: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
147: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
148: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;

Line 153: x_return_status := OKC_API.g_ret_sts_error;

149: raise OKC_API.G_EXCEPTION_ERROR;
150: End If;
151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;
154: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
155: OKC_API.SET_MESSAGE( p_app_name => g_app_name
156: , p_msg_name => 'OKL_REQUIRED_VALUE'
157: , p_token1 => 'COL_NAME'

Line 155: OKC_API.SET_MESSAGE( p_app_name => g_app_name

151:
152: If(p_contract_number is null) Then
153: x_return_status := OKC_API.g_ret_sts_error;
154: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
155: OKC_API.SET_MESSAGE( p_app_name => g_app_name
156: , p_msg_name => 'OKL_REQUIRED_VALUE'
157: , p_token1 => 'COL_NAME'
158: , p_token1_value => l_ak_prompt
159: -- , p_token1_value => 'a'||l_chr_id

Line 161: raise OKC_API.G_EXCEPTION_ERROR;

157: , p_token1 => 'COL_NAME'
158: , p_token1_value => l_ak_prompt
159: -- , p_token1_value => 'a'||l_chr_id
160: );
161: raise OKC_API.G_EXCEPTION_ERROR;
162: End If;
163:
164: l_rel_vers_id := null;
165: open l_rel_vers_csr;

Line 184: x_return_status := OKC_API.g_ret_sts_error;

180:
181: End If;
182:
183: If l_s_chr_id is null Then
184: x_return_status := OKC_API.g_ret_sts_error;
185: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
186: OKC_API.SET_MESSAGE( p_app_name => g_app_name
187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'

Line 186: OKC_API.SET_MESSAGE( p_app_name => g_app_name

182:
183: If l_s_chr_id is null Then
184: x_return_status := OKC_API.g_ret_sts_error;
185: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
186: OKC_API.SET_MESSAGE( p_app_name => g_app_name
187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'
189: , p_token1_value => l_ak_prompt
190: );

Line 191: raise OKC_API.G_EXCEPTION_ERROR;

187: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
188: , p_token1 => 'COL_NAME'
189: , p_token1_value => l_ak_prompt
190: );
191: raise OKC_API.G_EXCEPTION_ERROR;
192: End If;
193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;

Line 195: x_return_status := OKC_API.g_ret_sts_error;

191: raise OKC_API.G_EXCEPTION_ERROR;
192: End If;
193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;
196: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
197: OKC_API.SET_MESSAGE( p_app_name => g_app_name
198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'

Line 197: OKC_API.SET_MESSAGE( p_app_name => g_app_name

193:
194: If(p_item_name is null) Then
195: x_return_status := OKC_API.g_ret_sts_error;
196: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
197: OKC_API.SET_MESSAGE( p_app_name => g_app_name
198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'
200: , p_token1_value => l_ak_prompt
201: );

Line 202: raise OKC_API.G_EXCEPTION_ERROR;

198: , p_msg_name => 'OKL_REQUIRED_VALUE'
199: , p_token1 => 'COL_NAME'
200: , p_token1_value => l_ak_prompt
201: );
202: raise OKC_API.G_EXCEPTION_ERROR;
203: End If;
204:
205: -- If(NOT(p_item_name is not null and p_item_name = 'RELINK_SERV_INTGR')) Then
206:

Line 213: x_return_status := OKC_API.g_ret_sts_error;

209: fetch l_strmtyp_id_csr into l_strmtyp_id;
210: close l_strmtyp_id_csr;
211:
212: If(l_strmtyp_id is null) Then
213: x_return_status := OKC_API.g_ret_sts_error;
214: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_PAYMENT_TYPE');
215: If(l_ak_prompt is null) Then
216: l_ak_prompt := 'Payment Type';
217: End If;

Line 218: OKC_API.SET_MESSAGE( p_app_name => g_app_name

214: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_PAYMENT_TYPE');
215: If(l_ak_prompt is null) Then
216: l_ak_prompt := 'Payment Type';
217: End If;
218: OKC_API.SET_MESSAGE( p_app_name => g_app_name
219: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
220: , p_token1 => 'COL_NAME'
221: , p_token1_value => l_ak_prompt
222: );

Line 223: raise OKC_API.G_EXCEPTION_ERROR;

219: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
220: , p_token1 => 'COL_NAME'
221: , p_token1_value => l_ak_prompt
222: );
223: raise OKC_API.G_EXCEPTION_ERROR;
224: End If;
225:
226: -- End If;
227:

Line 229: x_return_status := OKC_API.g_ret_sts_error;

225:
226: -- End If;
227:
228: If(p_supplier_name is null) Then
229: x_return_status := OKC_API.g_ret_sts_error;
230: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
231: OKC_API.SET_MESSAGE( p_app_name => g_app_name
232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'

Line 231: OKC_API.SET_MESSAGE( p_app_name => g_app_name

227:
228: If(p_supplier_name is null) Then
229: x_return_status := OKC_API.g_ret_sts_error;
230: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
231: OKC_API.SET_MESSAGE( p_app_name => g_app_name
232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'
234: , p_token1_value => l_ak_prompt
235: );

Line 236: raise OKC_API.G_EXCEPTION_ERROR;

232: , p_msg_name => 'OKL_REQUIRED_VALUE'
233: , p_token1 => 'COL_NAME'
234: , p_token1_value => l_ak_prompt
235: );
236: raise OKC_API.G_EXCEPTION_ERROR;
237: End If;
238:
239: open l_supp_name_csr;
240: fetch l_supp_name_csr into l_supp_id;

Line 244: x_return_status := OKC_API.g_ret_sts_error;

240: fetch l_supp_name_csr into l_supp_id;
241: close l_supp_name_csr;
242:
243: If(l_supp_id is null) Then
244: x_return_status := OKC_API.g_ret_sts_error;
245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'

Line 246: OKC_API.SET_MESSAGE( p_app_name => g_app_name

242:
243: If(l_supp_id is null) Then
244: x_return_status := OKC_API.g_ret_sts_error;
245: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
246: OKC_API.SET_MESSAGE( p_app_name => g_app_name
247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'
249: , p_token1_value => l_ak_prompt
250: );

Line 251: raise OKC_API.G_EXCEPTION_ERROR;

247: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
248: , p_token1 => 'COL_NAME'
249: , p_token1_value => l_ak_prompt
250: );
251: raise OKC_API.G_EXCEPTION_ERROR;
252: End If;
253:
254: l_sts_code := null;
255: l_ste_code := null;

Line 276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

272: p_sty_id => l_strmtyp_id, -- payment type
273: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;

Line 277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

273: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:

Line 278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

274: );
275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:
282: Else

Line 279: raise OKC_API.G_EXCEPTION_ERROR;

275:
276: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
277: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
278: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
279: raise OKC_API.G_EXCEPTION_ERROR;
280: End If;
281:
282: Else
283:

Line 297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

293: p_sty_id => l_strmtyp_id, -- payment type
294: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;

Line 298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

294: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:

Line 299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

295: );
296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:
303: End If;

Line 300: raise OKC_API.G_EXCEPTION_ERROR;

296:
297: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
298: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
299: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
300: raise OKC_API.G_EXCEPTION_ERROR;
301: End If;
302:
303: End If;
304:

Line 307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

303: End If;
304:
305: x_cle_id := x_okl_cle_id;
306:
307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 310: when OKC_API.G_EXCEPTION_ERROR then

306:
307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

307: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
308:
309: EXCEPTION
310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
315: x_msg_count => x_msg_count,

Line 314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

310: when OKC_API.G_EXCEPTION_ERROR then
311: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
312: p_api_name => l_api_name,
313: p_pkg_name => g_pkg_name,
314: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
315: x_msg_count => x_msg_count,
316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:

Line 319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

315: x_msg_count => x_msg_count,
316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:
319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

316: x_msg_data => x_msg_data,
317: p_api_type => g_api_type);
318:
319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
324: x_msg_count => x_msg_count,

Line 323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

319: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
320: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
321: p_api_name => l_api_name,
322: p_pkg_name => g_pkg_name,
323: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
324: x_msg_count => x_msg_count,
325: x_msg_data => x_msg_data,
326: p_api_type => g_api_type);
327:

Line 329: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

325: x_msg_data => x_msg_data,
326: p_api_type => g_api_type);
327:
328: when OTHERS then
329: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
330: p_api_name => l_api_name,
331: p_pkg_name => g_pkg_name,
332: p_exc_name => 'OTHERS',
333: x_msg_count => x_msg_count,

Line 349: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

345: -- End of comments
346:
347: PROCEDURE update_contract_link_serv (
348: p_api_version IN NUMBER,
349: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
350: x_return_status OUT NOCOPY VARCHAR2,
351: x_msg_count OUT NOCOPY NUMBER,
352: x_msg_data OUT NOCOPY VARCHAR2,
353: p_chr_id IN NUMBER,

Line 402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

398:
399:
400: l_api_name CONSTANT VARCHAR2(30) := 'update_contract_link_serv';
401: l_api_version CONSTANT NUMBER := 1.0;
402: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
403: l_ak_prompt AK_ATTRIBUTES_VL.attribute_label_long%type;
404:
405: BEGIN
406:

Line 414: l_return_status := OKC_API.START_ACTIVITY(

410: End If;
411:
412: -- call START_ACTIVITY to create savepoint, check compatibility
413: -- and initialize message list
414: l_return_status := OKC_API.START_ACTIVITY(
415: p_api_name => l_api_name,
416: p_pkg_name => g_pkg_name,
417: p_init_msg_list => p_init_msg_list,
418: l_api_version => l_api_version,

Line 424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

420: p_api_type => g_api_type,
421: x_return_status => x_return_status);
422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;

Line 425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

421: x_return_status => x_return_status);
422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:

Line 426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

422:
423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then

Line 427: raise OKC_API.G_EXCEPTION_ERROR;

423: -- check if activity started successfully
424: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
425: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
426: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;

Line 431: x_return_status := OKC_API.g_ret_sts_error;

427: raise OKC_API.G_EXCEPTION_ERROR;
428: End If;
429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;
432: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
433: OKC_API.SET_MESSAGE( p_app_name => g_app_name
434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'

Line 433: OKC_API.SET_MESSAGE( p_app_name => g_app_name

429:
430: If(p_contract_number is null) Then
431: x_return_status := OKC_API.g_ret_sts_error;
432: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
433: OKC_API.SET_MESSAGE( p_app_name => g_app_name
434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'
436: , p_token1_value => l_ak_prompt
437: );

Line 438: raise OKC_API.G_EXCEPTION_ERROR;

434: , p_msg_name => 'OKL_REQUIRED_VALUE'
435: , p_token1 => 'COL_NAME'
436: , p_token1_value => l_ak_prompt
437: );
438: raise OKC_API.G_EXCEPTION_ERROR;
439: End If;
440:
441: l_rel_vers_id := null;
442: open l_rel_vers_csr;

Line 461: x_return_status := OKC_API.g_ret_sts_error;

457:
458: End If;
459:
460: If l_s_chr_id is null Then
461: x_return_status := OKC_API.g_ret_sts_error;
462: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
463: OKC_API.SET_MESSAGE( p_app_name => g_app_name
464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'

Line 463: OKC_API.SET_MESSAGE( p_app_name => g_app_name

459:
460: If l_s_chr_id is null Then
461: x_return_status := OKC_API.g_ret_sts_error;
462: l_ak_prompt := GET_AK_PROMPT('OKL_LA_DEAL_CREAT', 'OKL_CONTRACT_NUMBER');
463: OKC_API.SET_MESSAGE( p_app_name => g_app_name
464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'
466: , p_token1_value => l_ak_prompt
467: );

Line 468: raise OKC_API.G_EXCEPTION_ERROR;

464: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
465: , p_token1 => 'COL_NAME'
466: , p_token1_value => l_ak_prompt
467: );
468: raise OKC_API.G_EXCEPTION_ERROR;
469: End If;
470:
471: /*
472: If(p_item_name is null) Then

Line 473: x_return_status := OKC_API.g_ret_sts_error;

469: End If;
470:
471: /*
472: If(p_item_name is null) Then
473: x_return_status := OKC_API.g_ret_sts_error;
474: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
475: OKC_API.SET_MESSAGE( p_app_name => g_app_name
476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'

Line 475: OKC_API.SET_MESSAGE( p_app_name => g_app_name

471: /*
472: If(p_item_name is null) Then
473: x_return_status := OKC_API.g_ret_sts_error;
474: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
475: OKC_API.SET_MESSAGE( p_app_name => g_app_name
476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'
478: , p_token1_value => l_ak_prompt
479: );

Line 480: raise OKC_API.G_EXCEPTION_ERROR;

476: , p_msg_name => 'OKL_REQUIRED_VALUE'
477: , p_token1 => 'COL_NAME'
478: , p_token1_value => l_ak_prompt
479: );
480: raise OKC_API.G_EXCEPTION_ERROR;
481: End If;
482:
483:
484: open l_serv_line_csr;

Line 489: x_return_status := OKC_API.g_ret_sts_error;

485: fetch l_serv_line_csr into l_s_cle_id;
486: close l_serv_line_csr;
487:
488: If l_s_cle_id is null Then
489: x_return_status := OKC_API.g_ret_sts_error;
490: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
491: OKC_API.SET_MESSAGE( p_app_name => g_app_name
492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'

Line 491: OKC_API.SET_MESSAGE( p_app_name => g_app_name

487:
488: If l_s_cle_id is null Then
489: x_return_status := OKC_API.g_ret_sts_error;
490: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE');
491: OKC_API.SET_MESSAGE( p_app_name => g_app_name
492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'
494: , p_token1_value => l_ak_prompt
495: );

Line 496: raise OKC_API.G_EXCEPTION_ERROR;

492: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
493: , p_token1 => 'COL_NAME'
494: , p_token1_value => l_ak_prompt
495: );
496: raise OKC_API.G_EXCEPTION_ERROR;
497: End If;
498: */
499:
500: If(p_supplier_name is null) Then

Line 501: x_return_status := OKC_API.g_ret_sts_error;

497: End If;
498: */
499:
500: If(p_supplier_name is null) Then
501: x_return_status := OKC_API.g_ret_sts_error;
502: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
503: OKC_API.SET_MESSAGE( p_app_name => g_app_name
504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'

Line 503: OKC_API.SET_MESSAGE( p_app_name => g_app_name

499:
500: If(p_supplier_name is null) Then
501: x_return_status := OKC_API.g_ret_sts_error;
502: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
503: OKC_API.SET_MESSAGE( p_app_name => g_app_name
504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'
506: , p_token1_value => l_ak_prompt
507: );

Line 508: raise OKC_API.G_EXCEPTION_ERROR;

504: , p_msg_name => 'OKL_REQUIRED_VALUE'
505: , p_token1 => 'COL_NAME'
506: , p_token1_value => l_ak_prompt
507: );
508: raise OKC_API.G_EXCEPTION_ERROR;
509: End If;
510:
511: open l_supp_name_csr;
512: fetch l_supp_name_csr into l_supp_id;

Line 516: x_return_status := OKC_API.g_ret_sts_error;

512: fetch l_supp_name_csr into l_supp_id;
513: close l_supp_name_csr;
514:
515: If(l_supp_id is null) Then
516: x_return_status := OKC_API.g_ret_sts_error;
517: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
518: OKC_API.SET_MESSAGE( p_app_name => g_app_name
519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'

Line 518: OKC_API.SET_MESSAGE( p_app_name => g_app_name

514:
515: If(l_supp_id is null) Then
516: x_return_status := OKC_API.g_ret_sts_error;
517: l_ak_prompt := GET_AK_PROMPT('OKL_LA_SERVICE_LINE', 'OKL_LA_SERVICE_SUPPLIER');
518: OKC_API.SET_MESSAGE( p_app_name => g_app_name
519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'
521: , p_token1_value => l_ak_prompt
522: );

Line 523: raise OKC_API.G_EXCEPTION_ERROR;

519: , p_msg_name => 'OKL_LLA_INVALID_LOV_VALUE'
520: , p_token1 => 'COL_NAME'
521: , p_token1_value => l_ak_prompt
522: );
523: raise OKC_API.G_EXCEPTION_ERROR;
524: End If;
525:
526: lp_clev_rec.dnz_chr_id := l_chr_id;
527: lp_clev_rec.id := p_cle_id;

Line 546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

542: p_klev_rec => lp_klev_rec,
543: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;

Line 547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

543: x_okl_service_line_id => x_okl_cle_id -- Returns Contract Service TOP Line ID
544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:

Line 548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

544: );
545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:
552: x_cle_id := x_okl_cle_id;

Line 549: raise OKC_API.G_EXCEPTION_ERROR;

545:
546: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
547: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
548: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
549: raise OKC_API.G_EXCEPTION_ERROR;
550: End If;
551:
552: x_cle_id := x_okl_cle_id;
553:

Line 554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

550: End If;
551:
552: x_cle_id := x_okl_cle_id;
553:
554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 557: when OKC_API.G_EXCEPTION_ERROR then

553:
554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

554: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
555:
556: EXCEPTION
557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
562: x_msg_count => x_msg_count,

Line 561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

557: when OKC_API.G_EXCEPTION_ERROR then
558: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
559: p_api_name => l_api_name,
560: p_pkg_name => g_pkg_name,
561: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
562: x_msg_count => x_msg_count,
563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:

Line 566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

562: x_msg_count => x_msg_count,
563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:
566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

563: x_msg_data => x_msg_data,
564: p_api_type => g_api_type);
565:
566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count => x_msg_count,

Line 570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

566: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
567: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
568: p_api_name => l_api_name,
569: p_pkg_name => g_pkg_name,
570: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
571: x_msg_count => x_msg_count,
572: x_msg_data => x_msg_data,
573: p_api_type => g_api_type);
574:

Line 576: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

572: x_msg_data => x_msg_data,
573: p_api_type => g_api_type);
574:
575: when OTHERS then
576: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
577: p_api_name => l_api_name,
578: p_pkg_name => g_pkg_name,
579: p_exc_name => 'OTHERS',
580: x_msg_count => x_msg_count,

Line 588: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

584:
585:
586: PROCEDURE create_contract_top_line(
587: p_api_version IN NUMBER,
588: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
589: x_return_status OUT NOCOPY VARCHAR2,
590: x_msg_count OUT NOCOPY NUMBER,
591: x_msg_data OUT NOCOPY VARCHAR2,
592: p_clev_rec IN clev_rec_type,

Line 610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

606: l_chr_id l_clev_rec.dnz_chr_id%type;
607:
608: l_api_name CONSTANT VARCHAR2(30) := 'create_contract_top_line';
609: l_api_version CONSTANT NUMBER := 1.0;
610: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
611:
612: CURSOR get_k_dates_csr(l_id NUMBER) IS
613: select chr.start_date, chr.end_date
614: from okc_k_headers_b chr

Line 644: x_return_status := OKC_API.START_ACTIVITY(

640: End If;
641:
642: -- call START_ACTIVITY to create savepoint, check compatibility
643: -- and initialize message list
644: x_return_status := OKC_API.START_ACTIVITY(
645: p_api_name => l_api_name,
646: p_pkg_name => g_pkg_name,
647: p_init_msg_list => p_init_msg_list,
648: l_api_version => l_api_version,

Line 654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

650: p_api_type => g_api_type,
651: x_return_status => x_return_status);
652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;

Line 655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

651: x_return_status => x_return_status);
652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:

Line 656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

652:
653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:
660: l_clev_rec.name := l_clev_rec.item_description;

Line 657: raise OKC_API.G_EXCEPTION_ERROR;

653: -- check if activity started successfully
654: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
655: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
656: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
657: raise OKC_API.G_EXCEPTION_ERROR;
658: End If;
659:
660: l_clev_rec.name := l_clev_rec.item_description;
661:

Line 680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)

676:
677: End If;
678:
679:
680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)
681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
682:
683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;

Line 681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then

677: End If;
678:
679:
680: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE)
681: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
682:
683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;
685: close get_k_dates_csr;

Line 687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then

683: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
684: fetch get_k_dates_csr into l_start_date, l_end_date;
685: close get_k_dates_csr;
686:
687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
688: l_clev_rec.start_date := l_start_date;
689: End If;
690:
691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

Line 691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

687: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
688: l_clev_rec.start_date := l_start_date;
689: End If;
690:
691: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then
692: l_clev_rec.end_date := l_end_date;
693: End If;
694:
695: End If;

Line 712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

708: p_klev_rec => l_klev_rec,
709: x_clev_rec => x_clev_rec,
710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;

Line 713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

709: x_clev_rec => x_clev_rec,
710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:

Line 714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

710: x_klev_rec => x_klev_rec);
711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:
718: l_cimv_rec.cle_id := x_clev_rec.id;

Line 715: raise OKC_API.G_EXCEPTION_ERROR;

711:
712: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
713: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
714: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
715: raise OKC_API.G_EXCEPTION_ERROR;
716: END IF;
717:
718: l_cimv_rec.cle_id := x_clev_rec.id;
719:

Line 730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

726: p_cimv_rec => l_cimv_rec,
727: x_cimv_rec => x_cimv_rec);
728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;

Line 731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

727: x_cimv_rec => x_cimv_rec);
728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:

Line 732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

728:
729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:
736:

Line 733: raise OKC_API.G_EXCEPTION_ERROR;

729: -- check return status
730: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
731: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
732: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
733: raise OKC_API.G_EXCEPTION_ERROR;
734: End If;
735:
736:
737: l_cplv_rec.cle_id := x_clev_rec.id;

Line 752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

748: p_cplv_rec => l_cplv_rec,
749: x_cplv_rec => x_cplv_rec);
750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;

Line 753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

749: x_cplv_rec => x_cplv_rec);
750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:

Line 754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

750:
751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:
758: end if;*/

Line 755: raise OKC_API.G_EXCEPTION_ERROR;

751: -- check return status
752: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
753: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
754: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
755: raise OKC_API.G_EXCEPTION_ERROR;
756: End If;
757:
758: end if;*/
759:

Line 760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

756: End If;
757:
758: end if;*/
759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,

Line 762: when OKC_API.G_EXCEPTION_ERROR then

758: end if;*/
759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

759:
760: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
761: EXCEPTION
762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
767: x_msg_count => x_msg_count,

Line 766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

762: when OKC_API.G_EXCEPTION_ERROR then
763: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
764: p_api_name => l_api_name,
765: p_pkg_name => g_pkg_name,
766: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
767: x_msg_count => x_msg_count,
768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:

Line 771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

767: x_msg_count => x_msg_count,
768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:
771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

768: x_msg_data => x_msg_data,
769: p_api_type => g_api_type);
770:
771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
776: x_msg_count => x_msg_count,

Line 775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

771: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
772: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
773: p_api_name => l_api_name,
774: p_pkg_name => g_pkg_name,
775: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
776: x_msg_count => x_msg_count,
777: x_msg_data => x_msg_data,
778: p_api_type => g_api_type);
779:

Line 781: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

777: x_msg_data => x_msg_data,
778: p_api_type => g_api_type);
779:
780: when OTHERS then
781: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
782: p_api_name => l_api_name,
783: p_pkg_name => g_pkg_name,
784: p_exc_name => 'OTHERS',
785: x_msg_count => x_msg_count,

Line 800: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

796: -- Version : 1.0
797: -- End of comments
798: PROCEDURE create_contract_top_line(
799: p_api_version IN NUMBER,
800: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
801: x_return_status OUT NOCOPY VARCHAR2,
802: x_msg_count OUT NOCOPY NUMBER,
803: x_msg_data OUT NOCOPY VARCHAR2,
804: p_clev_tbl IN clev_tbl_type,

Line 815: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

811: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
812:
813: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_contract_top_line';
814: l_api_version CONSTANT NUMBER := 1.0;
815: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
816: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
817: i NUMBER;
818: l_klev_tbl klev_tbl_type := p_klev_tbl;
819: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 816: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

812:
813: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_contract_top_line';
814: l_api_version CONSTANT NUMBER := 1.0;
815: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
816: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
817: i NUMBER;
818: l_klev_tbl klev_tbl_type := p_klev_tbl;
819: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
820: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 826: l_return_status := OKC_API.START_ACTIVITY(

822:
823: /*
824: -- call START_ACTIVITY to create savepoint, check compatibility
825: -- and initialize message list
826: l_return_status := OKC_API.START_ACTIVITY(
827: p_api_name => l_api_name,
828: p_pkg_name => g_pkg_name,
829: p_init_msg_list => p_init_msg_list,
830: l_api_version => l_api_version,

Line 836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

832: p_api_type => g_api_type,
833: x_return_status => x_return_status);
834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;

Line 837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

833: x_return_status => x_return_status);
834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */

Line 838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

834:
835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */
842:

Line 839: raise OKC_API.G_EXCEPTION_ERROR;

835: -- check if activity started successfully
836: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
837: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
838: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
839: raise OKC_API.G_EXCEPTION_ERROR;
840: End If;
841: */
842:
843: If (p_clev_tbl.COUNT > 0) Then

Line 862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

858: x_klev_rec => x_klev_tbl(i),
859: x_cimv_rec => x_cimv_tbl(i),
860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;

Line 863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

859: x_cimv_rec => x_cimv_tbl(i),
860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:

Line 864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

860: x_cplv_rec => x_cplv_tbl(i));
861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:
868: EXIT WHEN (i = p_clev_tbl.LAST);

Line 865: raise OKC_API.G_EXCEPTION_ERROR;

861:
862: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
863: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
864: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
865: raise OKC_API.G_EXCEPTION_ERROR;
866: End If;
867:
868: EXIT WHEN (i = p_clev_tbl.LAST);
869: i := p_clev_tbl.NEXT(i);

Line 874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

870: END LOOP;
871:
872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;

Line 875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

871:
872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*

Line 876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

872: End If;
873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 877: raise OKC_API.G_EXCEPTION_ERROR;

873:
874: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
875: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);

Line 880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

876: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
877: raise OKC_API.G_EXCEPTION_ERROR;
878: End If;
879: /*
880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then

Line 884: when OKC_API.G_EXCEPTION_ERROR then

880: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

881: x_msg_data => x_msg_data);
882: */
883: EXCEPTION
884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
889: x_msg_count => x_msg_count,

Line 888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

884: when OKC_API.G_EXCEPTION_ERROR then
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
886: p_api_name => l_api_name,
887: p_pkg_name => g_pkg_name,
888: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
889: x_msg_count => x_msg_count,
890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:

Line 893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

889: x_msg_count => x_msg_count,
890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:
893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

890: x_msg_data => x_msg_data,
891: p_api_type => g_api_type);
892:
893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
898: x_msg_count => x_msg_count,

Line 897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

893: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
894: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
895: p_api_name => l_api_name,
896: p_pkg_name => g_pkg_name,
897: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
898: x_msg_count => x_msg_count,
899: x_msg_data => x_msg_data,
900: p_api_type => g_api_type);
901:

Line 903: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

899: x_msg_data => x_msg_data,
900: p_api_type => g_api_type);
901:
902: when OTHERS then
903: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
904: p_api_name => l_api_name,
905: p_pkg_name => g_pkg_name,
906: p_exc_name => 'OTHERS',
907: x_msg_count => x_msg_count,

Line 924: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

920: -- Version : 1.0
921: -- End of comments
922: PROCEDURE update_contract_top_line(
923: p_api_version IN NUMBER,
924: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
925: x_return_status OUT NOCOPY VARCHAR2,
926: x_msg_count OUT NOCOPY NUMBER,
927: x_msg_data OUT NOCOPY VARCHAR2,
928: p_clev_rec IN clev_rec_type,

Line 946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

942: l_chr_id l_clev_rec.dnz_chr_id%type;
943:
944: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
945: l_api_version CONSTANT NUMBER := 1.0;
946: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
947:
948: CURSOR get_k_dates_csr(l_id number) IS
949: select chr.start_date, chr.end_date
950: from okc_k_headers_b chr

Line 1005: x_return_status := OKC_API.START_ACTIVITY(

1001: End If;
1002:
1003: -- call START_ACTIVITY to create savepoint, check compatibility
1004: -- and initialize message list
1005: x_return_status := OKC_API.START_ACTIVITY(
1006: p_api_name => l_api_name,
1007: p_pkg_name => g_pkg_name,
1008: p_init_msg_list => p_init_msg_list,
1009: l_api_version => l_api_version,

Line 1015: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1011: p_api_type => g_api_type,
1012: x_return_status => x_return_status);
1013:
1014: -- check if activity started successfully
1015: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1016: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1017: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1018: raise OKC_API.G_EXCEPTION_ERROR;
1019: End If;

Line 1016: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1012: x_return_status => x_return_status);
1013:
1014: -- check if activity started successfully
1015: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1016: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1017: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1018: raise OKC_API.G_EXCEPTION_ERROR;
1019: End If;
1020:

Line 1017: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then

1013:
1014: -- check if activity started successfully
1015: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1016: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1017: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1018: raise OKC_API.G_EXCEPTION_ERROR;
1019: End If;
1020:
1021: l_clev_rec.name := l_clev_rec.item_description;

Line 1018: raise OKC_API.G_EXCEPTION_ERROR;

1014: -- check if activity started successfully
1015: If (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1016: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1017: Elsif (x_return_status = OKC_API.G_RET_STS_ERROR) then
1018: raise OKC_API.G_EXCEPTION_ERROR;
1019: End If;
1020:
1021: l_clev_rec.name := l_clev_rec.item_description;
1022:

Line 1041: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )

1037:
1038: End If;
1039:
1040:
1041: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )
1042: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
1043:
1044: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1045: fetch get_k_dates_csr into l_start_date, l_end_date;

Line 1042: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then

1038: End If;
1039:
1040:
1041: If ( (l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE )
1042: or (l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) )then
1043:
1044: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1045: fetch get_k_dates_csr into l_start_date, l_end_date;
1046: close get_k_dates_csr;

Line 1048: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then

1044: open get_k_dates_csr(l_clev_rec.dnz_chr_id);
1045: fetch get_k_dates_csr into l_start_date, l_end_date;
1046: close get_k_dates_csr;
1047:
1048: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
1049: l_clev_rec.start_date := l_start_date;
1050: End If;
1051:
1052: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

Line 1052: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then

1048: If ( l_clev_rec.start_date is null or l_clev_rec.start_date = OKC_API.G_MISS_DATE) then
1049: l_clev_rec.start_date := l_start_date;
1050: End If;
1051:
1052: If ( l_clev_rec.end_date is null or l_clev_rec.end_date = OKC_API.G_MISS_DATE) then
1053: l_clev_rec.end_date := l_end_date;
1054: End If;
1055:
1056: End If;

Line 1081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1077: x_clev_rec => x_clev_rec,
1078: x_klev_rec => x_klev_rec
1079: );
1080:
1081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1082: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1084: raise OKC_API.G_EXCEPTION_ERROR;
1085: END IF;

Line 1082: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1078: x_klev_rec => x_klev_rec
1079: );
1080:
1081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1082: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1084: raise OKC_API.G_EXCEPTION_ERROR;
1085: END IF;
1086:

Line 1083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1079: );
1080:
1081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1082: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1084: raise OKC_API.G_EXCEPTION_ERROR;
1085: END IF;
1086:
1087: -- added below for bug 7323444 -- start

Line 1084: raise OKC_API.G_EXCEPTION_ERROR;

1080:
1081: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1082: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1083: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1084: raise OKC_API.G_EXCEPTION_ERROR;
1085: END IF;
1086:
1087: -- added below for bug 7323444 -- start
1088: For service_subline_rec In service_subline_csr(p_cle_id => l_clev_rec.id,

Line 1137: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1133: p_cimv_rec => l_cimv_rec,
1134: x_cimv_rec => x_cimv_rec);
1135:
1136: -- check return status
1137: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1138: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1139: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1140: raise OKC_API.G_EXCEPTION_ERROR;
1141: End If;

Line 1138: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1134: x_cimv_rec => x_cimv_rec);
1135:
1136: -- check return status
1137: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1138: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1139: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1140: raise OKC_API.G_EXCEPTION_ERROR;
1141: End If;
1142:

Line 1139: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1135:
1136: -- check return status
1137: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1138: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1139: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1140: raise OKC_API.G_EXCEPTION_ERROR;
1141: End If;
1142:
1143: -- Bug# 6438785

Line 1140: raise OKC_API.G_EXCEPTION_ERROR;

1136: -- check return status
1137: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1138: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1139: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1140: raise OKC_API.G_EXCEPTION_ERROR;
1141: End If;
1142:
1143: -- Bug# 6438785
1144: -- When the service line start date is changed, update the

Line 1182: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1178: p_cplv_rec => l_cplv_rec,
1179: x_cplv_rec => x_cplv_rec);
1180:
1181: -- check return status
1182: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1184: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1185: raise OKC_API.G_EXCEPTION_ERROR;
1186: End If;

Line 1183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1179: x_cplv_rec => x_cplv_rec);
1180:
1181: -- check return status
1182: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1184: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1185: raise OKC_API.G_EXCEPTION_ERROR;
1186: End If;
1187:

Line 1184: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1180:
1181: -- check return status
1182: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1184: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1185: raise OKC_API.G_EXCEPTION_ERROR;
1186: End If;
1187:
1188: else

Line 1185: raise OKC_API.G_EXCEPTION_ERROR;

1181: -- check return status
1182: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1183: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1184: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1185: raise OKC_API.G_EXCEPTION_ERROR;
1186: End If;
1187:
1188: else
1189:

Line 1200: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1196: p_cplv_rec => l_cplv_rec,
1197: x_cplv_rec => x_cplv_rec);
1198:
1199: -- check return status
1200: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1201: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1202: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1203: raise OKC_API.G_EXCEPTION_ERROR;
1204: End If;

Line 1201: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1197: x_cplv_rec => x_cplv_rec);
1198:
1199: -- check return status
1200: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1201: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1202: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1203: raise OKC_API.G_EXCEPTION_ERROR;
1204: End If;
1205:

Line 1202: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1198:
1199: -- check return status
1200: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1201: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1202: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1203: raise OKC_API.G_EXCEPTION_ERROR;
1204: End If;
1205:
1206: end if;

Line 1203: raise OKC_API.G_EXCEPTION_ERROR;

1199: -- check return status
1200: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1201: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1202: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1203: raise OKC_API.G_EXCEPTION_ERROR;
1204: End If;
1205:
1206: end if;
1207:

Line 1220: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1216: x_msg_data => x_msg_data,
1217: p_cplv_rec => l_cplv_rec);
1218:
1219: -- check return status
1220: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1221: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1222: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1223: raise OKC_API.G_EXCEPTION_ERROR;
1224: End If;

Line 1221: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1217: p_cplv_rec => l_cplv_rec);
1218:
1219: -- check return status
1220: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1221: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1222: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1223: raise OKC_API.G_EXCEPTION_ERROR;
1224: End If;
1225: end if;*/

Line 1222: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1218:
1219: -- check return status
1220: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1221: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1222: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1223: raise OKC_API.G_EXCEPTION_ERROR;
1224: End If;
1225: end if;*/
1226:

Line 1223: raise OKC_API.G_EXCEPTION_ERROR;

1219: -- check return status
1220: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1221: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1222: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1223: raise OKC_API.G_EXCEPTION_ERROR;
1224: End If;
1225: end if;*/
1226:
1227: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

Line 1227: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

1223: raise OKC_API.G_EXCEPTION_ERROR;
1224: End If;
1225: end if;*/
1226:
1227: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1228: x_msg_data => x_msg_data);
1229:
1230: EXCEPTION
1231: when OKC_API.G_EXCEPTION_ERROR then

Line 1231: when OKC_API.G_EXCEPTION_ERROR then

1227: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1228: x_msg_data => x_msg_data);
1229:
1230: EXCEPTION
1231: when OKC_API.G_EXCEPTION_ERROR then
1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1233: p_api_name => l_api_name,
1234: p_pkg_name => g_pkg_name,
1235: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1228: x_msg_data => x_msg_data);
1229:
1230: EXCEPTION
1231: when OKC_API.G_EXCEPTION_ERROR then
1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1233: p_api_name => l_api_name,
1234: p_pkg_name => g_pkg_name,
1235: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1236: x_msg_count => x_msg_count,

Line 1235: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1231: when OKC_API.G_EXCEPTION_ERROR then
1232: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1233: p_api_name => l_api_name,
1234: p_pkg_name => g_pkg_name,
1235: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1236: x_msg_count => x_msg_count,
1237: x_msg_data => x_msg_data,
1238: p_api_type => g_api_type);
1239:

Line 1240: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1236: x_msg_count => x_msg_count,
1237: x_msg_data => x_msg_data,
1238: p_api_type => g_api_type);
1239:
1240: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1241: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1242: p_api_name => l_api_name,
1243: p_pkg_name => g_pkg_name,
1244: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1241: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1237: x_msg_data => x_msg_data,
1238: p_api_type => g_api_type);
1239:
1240: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1241: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1242: p_api_name => l_api_name,
1243: p_pkg_name => g_pkg_name,
1244: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1245: x_msg_count => x_msg_count,

Line 1244: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1240: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1241: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1242: p_api_name => l_api_name,
1243: p_pkg_name => g_pkg_name,
1244: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1245: x_msg_count => x_msg_count,
1246: x_msg_data => x_msg_data,
1247: p_api_type => g_api_type);
1248:

Line 1250: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1246: x_msg_data => x_msg_data,
1247: p_api_type => g_api_type);
1248:
1249: when OTHERS then
1250: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1251: p_api_name => l_api_name,
1252: p_pkg_name => g_pkg_name,
1253: p_exc_name => 'OTHERS',
1254: x_msg_count => x_msg_count,

Line 1270: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1266: -- Version : 1.0
1267: -- End of comments
1268: PROCEDURE update_contract_top_line(
1269: p_api_version IN NUMBER,
1270: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1271: x_return_status OUT NOCOPY VARCHAR2,
1272: x_msg_count OUT NOCOPY NUMBER,
1273: x_msg_data OUT NOCOPY VARCHAR2,
1274: p_clev_tbl IN clev_tbl_type,

Line 1285: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1281: x_cplv_tbl OUT NOCOPY cplv_tbl_type) IS
1282:
1283: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
1284: l_api_version CONSTANT NUMBER := 1.0;
1285: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1286: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1287: i NUMBER;
1288: l_klev_tbl klev_tbl_type := p_klev_tbl;
1289: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 1286: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1282:
1283: l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_contract_top_line';
1284: l_api_version CONSTANT NUMBER := 1.0;
1285: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1286: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1287: i NUMBER;
1288: l_klev_tbl klev_tbl_type := p_klev_tbl;
1289: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
1290: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 1295: l_return_status := OKC_API.START_ACTIVITY(

1291: BEGIN
1292: /*
1293: -- call START_ACTIVITY to create savepoint, check compatibility
1294: -- and initialize message list
1295: l_return_status := OKC_API.START_ACTIVITY(
1296: p_api_name => l_api_name,
1297: p_pkg_name => g_pkg_name,
1298: p_init_msg_list => p_init_msg_list,
1299: l_api_version => l_api_version,

Line 1305: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1301: p_api_type => g_api_type,
1302: x_return_status => x_return_status);
1303:
1304: -- check if activity started successfully
1305: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1306: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1307: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1308: raise OKC_API.G_EXCEPTION_ERROR;
1309: End If;

Line 1306: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1302: x_return_status => x_return_status);
1303:
1304: -- check if activity started successfully
1305: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1306: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1307: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1308: raise OKC_API.G_EXCEPTION_ERROR;
1309: End If;
1310: */

Line 1307: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1303:
1304: -- check if activity started successfully
1305: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1306: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1307: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1308: raise OKC_API.G_EXCEPTION_ERROR;
1309: End If;
1310: */
1311:

Line 1308: raise OKC_API.G_EXCEPTION_ERROR;

1304: -- check if activity started successfully
1305: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1306: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1307: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1308: raise OKC_API.G_EXCEPTION_ERROR;
1309: End If;
1310: */
1311:
1312: If (p_clev_tbl.COUNT > 0) Then

Line 1331: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1327: x_klev_rec => x_klev_tbl(i),
1328: x_cimv_rec => x_cimv_tbl(i),
1329: x_cplv_rec => x_cplv_tbl(i));
1330:
1331: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1332: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1333: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1334: raise OKC_API.G_EXCEPTION_ERROR;
1335: End If;

Line 1332: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1328: x_cimv_rec => x_cimv_tbl(i),
1329: x_cplv_rec => x_cplv_tbl(i));
1330:
1331: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1332: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1333: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1334: raise OKC_API.G_EXCEPTION_ERROR;
1335: End If;
1336:

Line 1333: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1329: x_cplv_rec => x_cplv_tbl(i));
1330:
1331: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1332: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1333: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1334: raise OKC_API.G_EXCEPTION_ERROR;
1335: End If;
1336:
1337: EXIT WHEN (i = p_clev_tbl.LAST);

Line 1334: raise OKC_API.G_EXCEPTION_ERROR;

1330:
1331: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1332: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1333: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1334: raise OKC_API.G_EXCEPTION_ERROR;
1335: End If;
1336:
1337: EXIT WHEN (i = p_clev_tbl.LAST);
1338: i := p_clev_tbl.NEXT(i);

Line 1343: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1339: END LOOP;
1340:
1341: End If;
1342:
1343: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1344: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1346: raise OKC_API.G_EXCEPTION_ERROR;
1347: End If;

Line 1344: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1340:
1341: End If;
1342:
1343: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1344: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1346: raise OKC_API.G_EXCEPTION_ERROR;
1347: End If;
1348: /*

Line 1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1341: End If;
1342:
1343: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1344: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1346: raise OKC_API.G_EXCEPTION_ERROR;
1347: End If;
1348: /*
1349: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 1346: raise OKC_API.G_EXCEPTION_ERROR;

1342:
1343: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1344: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1346: raise OKC_API.G_EXCEPTION_ERROR;
1347: End If;
1348: /*
1349: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1350: x_msg_data => x_msg_data);

Line 1349: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

1345: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1346: raise OKC_API.G_EXCEPTION_ERROR;
1347: End If;
1348: /*
1349: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1350: x_msg_data => x_msg_data);
1351: */
1352: EXCEPTION
1353: when OKC_API.G_EXCEPTION_ERROR then

Line 1353: when OKC_API.G_EXCEPTION_ERROR then

1349: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1350: x_msg_data => x_msg_data);
1351: */
1352: EXCEPTION
1353: when OKC_API.G_EXCEPTION_ERROR then
1354: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1355: p_api_name => l_api_name,
1356: p_pkg_name => g_pkg_name,
1357: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1354: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1350: x_msg_data => x_msg_data);
1351: */
1352: EXCEPTION
1353: when OKC_API.G_EXCEPTION_ERROR then
1354: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1355: p_api_name => l_api_name,
1356: p_pkg_name => g_pkg_name,
1357: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1358: x_msg_count => x_msg_count,

Line 1357: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1353: when OKC_API.G_EXCEPTION_ERROR then
1354: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1355: p_api_name => l_api_name,
1356: p_pkg_name => g_pkg_name,
1357: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1358: x_msg_count => x_msg_count,
1359: x_msg_data => x_msg_data,
1360: p_api_type => g_api_type);
1361:

Line 1362: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1358: x_msg_count => x_msg_count,
1359: x_msg_data => x_msg_data,
1360: p_api_type => g_api_type);
1361:
1362: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1363: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1364: p_api_name => l_api_name,
1365: p_pkg_name => g_pkg_name,
1366: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1363: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1359: x_msg_data => x_msg_data,
1360: p_api_type => g_api_type);
1361:
1362: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1363: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1364: p_api_name => l_api_name,
1365: p_pkg_name => g_pkg_name,
1366: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1367: x_msg_count => x_msg_count,

Line 1366: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1362: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1363: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1364: p_api_name => l_api_name,
1365: p_pkg_name => g_pkg_name,
1366: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1367: x_msg_count => x_msg_count,
1368: x_msg_data => x_msg_data,
1369: p_api_type => g_api_type);
1370:

Line 1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1368: x_msg_data => x_msg_data,
1369: p_api_type => g_api_type);
1370:
1371: when OTHERS then
1372: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1373: p_api_name => l_api_name,
1374: p_pkg_name => g_pkg_name,
1375: p_exc_name => 'OTHERS',
1376: x_msg_count => x_msg_count,

Line 1385: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1381:
1382:
1383: PROCEDURE delete_contract_line(
1384: p_api_version IN NUMBER,
1385: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1386: x_return_status OUT NOCOPY VARCHAR2,
1387: x_msg_count OUT NOCOPY NUMBER,
1388: x_msg_data OUT NOCOPY VARCHAR2,
1389: p_chr_id IN number,

Line 1397: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1393: lp_klev_rec OKL_SERVICE_INTEGRATION_PUB.klev_rec_type;
1394:
1395: l_api_name CONSTANT VARCHAR2(30) := 'delete_contract_line';
1396: l_api_version CONSTANT NUMBER := 1.0;
1397: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1398:
1399: l_chr_id number := null;
1400:
1401: BEGIN

Line 1410: l_return_status := OKC_API.START_ACTIVITY(

1406: End If;
1407:
1408: -- call START_ACTIVITY to create savepoint, check compatibility
1409: -- and initialize message list
1410: l_return_status := OKC_API.START_ACTIVITY(
1411: p_api_name => l_api_name,
1412: p_pkg_name => g_pkg_name,
1413: p_init_msg_list => p_init_msg_list,
1414: l_api_version => l_api_version,

Line 1420: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1416: p_api_type => g_api_type,
1417: x_return_status => x_return_status);
1418:
1419: -- check if activity started successfully
1420: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1421: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1422: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1423: raise OKC_API.G_EXCEPTION_ERROR;
1424: End If;

Line 1421: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1417: x_return_status => x_return_status);
1418:
1419: -- check if activity started successfully
1420: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1421: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1422: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1423: raise OKC_API.G_EXCEPTION_ERROR;
1424: End If;
1425:

Line 1422: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1418:
1419: -- check if activity started successfully
1420: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1421: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1422: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1423: raise OKC_API.G_EXCEPTION_ERROR;
1424: End If;
1425:
1426: lp_clev_rec.dnz_chr_id := l_chr_id;

Line 1423: raise OKC_API.G_EXCEPTION_ERROR;

1419: -- check if activity started successfully
1420: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1421: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1422: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1423: raise OKC_API.G_EXCEPTION_ERROR;
1424: End If;
1425:
1426: lp_clev_rec.dnz_chr_id := l_chr_id;
1427: lp_clev_rec.id := p_cle_id;

Line 1440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1436: p_clev_rec => lp_clev_rec,
1437: p_klev_rec => lp_klev_rec
1438: );
1439:
1440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1441: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_ERROR;
1444: END IF;

Line 1441: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1437: p_klev_rec => lp_klev_rec
1438: );
1439:
1440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1441: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_ERROR;
1444: END IF;
1445:

Line 1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1438: );
1439:
1440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1441: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_ERROR;
1444: END IF;
1445:
1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

Line 1443: raise OKC_API.G_EXCEPTION_ERROR;

1439:
1440: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1441: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_ERROR;
1444: END IF;
1445:
1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1447:

Line 1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);

1442: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1443: raise OKC_API.G_EXCEPTION_ERROR;
1444: END IF;
1445:
1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1447:
1448: EXCEPTION
1449: when OKC_API.G_EXCEPTION_ERROR then
1450: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1449: when OKC_API.G_EXCEPTION_ERROR then

1445:
1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1447:
1448: EXCEPTION
1449: when OKC_API.G_EXCEPTION_ERROR then
1450: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1451: p_api_name => l_api_name,
1452: p_pkg_name => g_pkg_name,
1453: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1450: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1446: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count, x_msg_data => x_msg_data);
1447:
1448: EXCEPTION
1449: when OKC_API.G_EXCEPTION_ERROR then
1450: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1451: p_api_name => l_api_name,
1452: p_pkg_name => g_pkg_name,
1453: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1454: x_msg_count => x_msg_count,

Line 1453: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1449: when OKC_API.G_EXCEPTION_ERROR then
1450: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1451: p_api_name => l_api_name,
1452: p_pkg_name => g_pkg_name,
1453: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1454: x_msg_count => x_msg_count,
1455: x_msg_data => x_msg_data,
1456: p_api_type => g_api_type);
1457:

Line 1458: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1454: x_msg_count => x_msg_count,
1455: x_msg_data => x_msg_data,
1456: p_api_type => g_api_type);
1457:
1458: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1459: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1460: p_api_name => l_api_name,
1461: p_pkg_name => g_pkg_name,
1462: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1459: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1455: x_msg_data => x_msg_data,
1456: p_api_type => g_api_type);
1457:
1458: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1459: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1460: p_api_name => l_api_name,
1461: p_pkg_name => g_pkg_name,
1462: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1463: x_msg_count => x_msg_count,

Line 1462: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1458: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1459: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1460: p_api_name => l_api_name,
1461: p_pkg_name => g_pkg_name,
1462: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1463: x_msg_count => x_msg_count,
1464: x_msg_data => x_msg_data,
1465: p_api_type => g_api_type);
1466:

Line 1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1464: x_msg_data => x_msg_data,
1465: p_api_type => g_api_type);
1466:
1467: when OTHERS then
1468: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1469: p_api_name => l_api_name,
1470: p_pkg_name => g_pkg_name,
1471: p_exc_name => 'OTHERS',
1472: x_msg_count => x_msg_count,

Line 1480: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1476:
1477:
1478: PROCEDURE delete_contract_top_line(
1479: p_api_version IN NUMBER,
1480: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1481: x_return_status OUT NOCOPY VARCHAR2,
1482: x_msg_count OUT NOCOPY NUMBER,
1483: x_msg_data OUT NOCOPY VARCHAR2,
1484: p_clev_rec IN clev_rec_type,

Line 1496: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1492: l_cplv_rec cplv_rec_type := p_cplv_rec;
1493:
1494: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1495: l_api_version CONSTANT NUMBER := 1.0;
1496: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1497:
1498: --Bug# 4558486
1499: l_kplv_rec okl_k_party_roles_pvt.kplv_rec_type;
1500:

Line 1505: l_return_status := OKC_API.START_ACTIVITY(

1501: BEGIN
1502:
1503: -- call START_ACTIVITY to create savepoint, check compatibility
1504: -- and initialize message list
1505: l_return_status := OKC_API.START_ACTIVITY(
1506: p_api_name => l_api_name,
1507: p_pkg_name => g_pkg_name,
1508: p_init_msg_list => p_init_msg_list,
1509: l_api_version => l_api_version,

Line 1515: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1511: p_api_type => g_api_type,
1512: x_return_status => x_return_status);
1513:
1514: -- check if activity started successfully
1515: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1516: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1517: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1518: raise OKC_API.G_EXCEPTION_ERROR;
1519: End If;

Line 1516: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1512: x_return_status => x_return_status);
1513:
1514: -- check if activity started successfully
1515: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1516: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1517: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1518: raise OKC_API.G_EXCEPTION_ERROR;
1519: End If;
1520:

Line 1517: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1513:
1514: -- check if activity started successfully
1515: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1516: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1517: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1518: raise OKC_API.G_EXCEPTION_ERROR;
1519: End If;
1520:
1521: okl_contract_pvt.delete_contract_line(

Line 1518: raise OKC_API.G_EXCEPTION_ERROR;

1514: -- check if activity started successfully
1515: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1516: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1517: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1518: raise OKC_API.G_EXCEPTION_ERROR;
1519: End If;
1520:
1521: okl_contract_pvt.delete_contract_line(
1522: p_api_version => p_api_version,

Line 1531: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1527: p_clev_rec => l_clev_rec,
1528: p_klev_rec => l_klev_rec
1529: );
1530:
1531: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1532: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1533: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1534: raise OKC_API.G_EXCEPTION_ERROR;
1535: END IF;

Line 1532: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1528: p_klev_rec => l_klev_rec
1529: );
1530:
1531: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1532: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1533: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1534: raise OKC_API.G_EXCEPTION_ERROR;
1535: END IF;
1536:

Line 1533: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1529: );
1530:
1531: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1532: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1533: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1534: raise OKC_API.G_EXCEPTION_ERROR;
1535: END IF;
1536:
1537: --

Line 1534: raise OKC_API.G_EXCEPTION_ERROR;

1530:
1531: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1532: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1533: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1534: raise OKC_API.G_EXCEPTION_ERROR;
1535: END IF;
1536:
1537: --
1538: -- call procedure in complex API

Line 1549: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1545: x_msg_data => x_msg_data,
1546: p_cimv_rec => l_cimv_rec);
1547:
1548: -- check return status
1549: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1550: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1551: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1552: raise OKC_API.G_EXCEPTION_ERROR;
1553: End If;

Line 1550: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1546: p_cimv_rec => l_cimv_rec);
1547:
1548: -- check return status
1549: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1550: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1551: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1552: raise OKC_API.G_EXCEPTION_ERROR;
1553: End If;
1554:

Line 1551: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1547:
1548: -- check return status
1549: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1550: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1551: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1552: raise OKC_API.G_EXCEPTION_ERROR;
1553: End If;
1554:
1555: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api

Line 1552: raise OKC_API.G_EXCEPTION_ERROR;

1548: -- check return status
1549: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1550: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1551: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1552: raise OKC_API.G_EXCEPTION_ERROR;
1553: End If;
1554:
1555: --Bug# 4558486: Changed call to okl_k_party_roles_pvt api
1556: -- to delete records in tables

Line 1579: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1575: p_cplv_rec => l_cplv_rec,
1576: p_kplv_rec => l_kplv_rec);
1577:
1578: -- check return status
1579: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1580: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1582: raise OKC_API.G_EXCEPTION_ERROR;
1583: End If;

Line 1580: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1576: p_kplv_rec => l_kplv_rec);
1577:
1578: -- check return status
1579: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1580: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1582: raise OKC_API.G_EXCEPTION_ERROR;
1583: End If;
1584:

Line 1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1577:
1578: -- check return status
1579: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1580: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1582: raise OKC_API.G_EXCEPTION_ERROR;
1583: End If;
1584:
1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

Line 1582: raise OKC_API.G_EXCEPTION_ERROR;

1578: -- check return status
1579: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1580: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1582: raise OKC_API.G_EXCEPTION_ERROR;
1583: End If;
1584:
1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1586: x_msg_data => x_msg_data);

Line 1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,

1581: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1582: raise OKC_API.G_EXCEPTION_ERROR;
1583: End If;
1584:
1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1586: x_msg_data => x_msg_data);
1587: EXCEPTION
1588: when OKC_API.G_EXCEPTION_ERROR then
1589: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

Line 1588: when OKC_API.G_EXCEPTION_ERROR then

1584:
1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1586: x_msg_data => x_msg_data);
1587: EXCEPTION
1588: when OKC_API.G_EXCEPTION_ERROR then
1589: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1590: p_api_name => l_api_name,
1591: p_pkg_name => g_pkg_name,
1592: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1589: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1585: OKC_API.END_ACTIVITY(x_msg_count => x_msg_count,
1586: x_msg_data => x_msg_data);
1587: EXCEPTION
1588: when OKC_API.G_EXCEPTION_ERROR then
1589: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1590: p_api_name => l_api_name,
1591: p_pkg_name => g_pkg_name,
1592: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1593: x_msg_count => x_msg_count,

Line 1592: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1588: when OKC_API.G_EXCEPTION_ERROR then
1589: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1590: p_api_name => l_api_name,
1591: p_pkg_name => g_pkg_name,
1592: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1593: x_msg_count => x_msg_count,
1594: x_msg_data => x_msg_data,
1595: p_api_type => g_api_type);
1596:

Line 1597: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1593: x_msg_count => x_msg_count,
1594: x_msg_data => x_msg_data,
1595: p_api_type => g_api_type);
1596:
1597: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1598: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1599: p_api_name => l_api_name,
1600: p_pkg_name => g_pkg_name,
1601: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1598: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1594: x_msg_data => x_msg_data,
1595: p_api_type => g_api_type);
1596:
1597: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1598: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1599: p_api_name => l_api_name,
1600: p_pkg_name => g_pkg_name,
1601: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1602: x_msg_count => x_msg_count,

Line 1601: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1597: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1598: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1599: p_api_name => l_api_name,
1600: p_pkg_name => g_pkg_name,
1601: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1602: x_msg_count => x_msg_count,
1603: x_msg_data => x_msg_data,
1604: p_api_type => g_api_type);
1605:

Line 1607: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1603: x_msg_data => x_msg_data,
1604: p_api_type => g_api_type);
1605:
1606: when OTHERS then
1607: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1608: p_api_name => l_api_name,
1609: p_pkg_name => g_pkg_name,
1610: p_exc_name => 'OTHERS',
1611: x_msg_count => x_msg_count,

Line 1626: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1622: -- Version : 1.0
1623: -- End of comments
1624: PROCEDURE delete_contract_top_line(
1625: p_api_version IN NUMBER,
1626: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1627: x_return_status OUT NOCOPY VARCHAR2,
1628: x_msg_count OUT NOCOPY NUMBER,
1629: x_msg_data OUT NOCOPY VARCHAR2,
1630: p_clev_tbl IN clev_tbl_type,

Line 1638: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1634: ) IS
1635:
1636: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1637: l_api_version CONSTANT NUMBER := 1.0;
1638: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1639: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1640: i NUMBER;
1641: l_klev_tbl klev_tbl_type := p_klev_tbl;
1642: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;

Line 1639: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1635:
1636: l_api_name CONSTANT VARCHAR2(30) := 'DELETE_contract_top_line';
1637: l_api_version CONSTANT NUMBER := 1.0;
1638: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1639: l_overall_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1640: i NUMBER;
1641: l_klev_tbl klev_tbl_type := p_klev_tbl;
1642: l_cimv_tbl cimv_tbl_type := p_cimv_tbl;
1643: l_cplv_tbl cplv_tbl_type := p_cplv_tbl;

Line 1648: l_return_status := OKC_API.START_ACTIVITY(

1644: BEGIN
1645: /*
1646: -- call START_ACTIVITY to create savepoint, check compatibility
1647: -- and initialize message list
1648: l_return_status := OKC_API.START_ACTIVITY(
1649: p_api_name => l_api_name,
1650: p_pkg_name => g_pkg_name,
1651: p_init_msg_list => p_init_msg_list,
1652: l_api_version => l_api_version,

Line 1658: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then

1654: p_api_type => g_api_type,
1655: x_return_status => x_return_status);
1656:
1657: -- check if activity started successfully
1658: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1659: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1660: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1661: raise OKC_API.G_EXCEPTION_ERROR;
1662: End If;

Line 1659: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1655: x_return_status => x_return_status);
1656:
1657: -- check if activity started successfully
1658: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1659: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1660: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1661: raise OKC_API.G_EXCEPTION_ERROR;
1662: End If;
1663: */

Line 1660: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then

1656:
1657: -- check if activity started successfully
1658: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1659: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1660: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1661: raise OKC_API.G_EXCEPTION_ERROR;
1662: End If;
1663: */
1664: If (p_clev_tbl.COUNT > 0) Then

Line 1661: raise OKC_API.G_EXCEPTION_ERROR;

1657: -- check if activity started successfully
1658: If (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) then
1659: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1660: Elsif (l_return_status = OKC_API.G_RET_STS_ERROR) then
1661: raise OKC_API.G_EXCEPTION_ERROR;
1662: End If;
1663: */
1664: If (p_clev_tbl.COUNT > 0) Then
1665: i := p_clev_tbl.FIRST;

Line 1680: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1676: p_cimv_rec => l_cimv_tbl(i),
1677: p_cplv_rec => l_cplv_tbl(i)
1678: );
1679:
1680: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;

Line 1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1677: p_cplv_rec => l_cplv_tbl(i)
1678: );
1679:
1680: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:

Line 1682: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1678: );
1679:
1680: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:
1686: EXIT WHEN (i = p_clev_tbl.LAST);

Line 1683: raise OKC_API.G_EXCEPTION_ERROR;

1679:
1680: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1681: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1682: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1683: raise OKC_API.G_EXCEPTION_ERROR;
1684: End If;
1685:
1686: EXIT WHEN (i = p_clev_tbl.LAST);
1687: i := p_clev_tbl.NEXT(i);

Line 1692: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then

1688: END LOOP;
1689:
1690: End If;
1691:
1692: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1693: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1695: raise OKC_API.G_EXCEPTION_ERROR;
1696: End If;

Line 1693: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1689:
1690: End If;
1691:
1692: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1693: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1695: raise OKC_API.G_EXCEPTION_ERROR;
1696: End If;
1697: /*

Line 1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then

1690: End If;
1691:
1692: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1693: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1695: raise OKC_API.G_EXCEPTION_ERROR;
1696: End If;
1697: /*
1698: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

Line 1695: raise OKC_API.G_EXCEPTION_ERROR;

1691:
1692: If x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR Then
1693: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1695: raise OKC_API.G_EXCEPTION_ERROR;
1696: End If;
1697: /*
1698: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1699: x_msg_data => x_msg_data);

Line 1698: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,

1694: Elsif x_return_status = OKC_API.G_RET_STS_ERROR Then
1695: raise OKC_API.G_EXCEPTION_ERROR;
1696: End If;
1697: /*
1698: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1699: x_msg_data => x_msg_data);
1700: */
1701: EXCEPTION
1702: when OKC_API.G_EXCEPTION_ERROR then

Line 1702: when OKC_API.G_EXCEPTION_ERROR then

1698: OKC_API.END_ACTIVITY( x_msg_count => x_msg_count,
1699: x_msg_data => x_msg_data);
1700: */
1701: EXCEPTION
1702: when OKC_API.G_EXCEPTION_ERROR then
1703: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1704: p_api_name => l_api_name,
1705: p_pkg_name => g_pkg_name,
1706: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

Line 1703: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1699: x_msg_data => x_msg_data);
1700: */
1701: EXCEPTION
1702: when OKC_API.G_EXCEPTION_ERROR then
1703: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1704: p_api_name => l_api_name,
1705: p_pkg_name => g_pkg_name,
1706: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1707: x_msg_count => x_msg_count,

Line 1706: p_exc_name => 'OKC_API.G_RET_STS_ERROR',

1702: when OKC_API.G_EXCEPTION_ERROR then
1703: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1704: p_api_name => l_api_name,
1705: p_pkg_name => g_pkg_name,
1706: p_exc_name => 'OKC_API.G_RET_STS_ERROR',
1707: x_msg_count => x_msg_count,
1708: x_msg_data => x_msg_data,
1709: p_api_type => g_api_type);
1710:

Line 1711: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then

1707: x_msg_count => x_msg_count,
1708: x_msg_data => x_msg_data,
1709: p_api_type => g_api_type);
1710:
1711: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1712: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1713: p_api_name => l_api_name,
1714: p_pkg_name => g_pkg_name,
1715: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1712: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1708: x_msg_data => x_msg_data,
1709: p_api_type => g_api_type);
1710:
1711: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1712: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1713: p_api_name => l_api_name,
1714: p_pkg_name => g_pkg_name,
1715: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1716: x_msg_count => x_msg_count,

Line 1715: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',

1711: when OKC_API.G_EXCEPTION_UNEXPECTED_ERROR then
1712: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1713: p_api_name => l_api_name,
1714: p_pkg_name => g_pkg_name,
1715: p_exc_name => 'OKC_API.G_RET_STS_UNEXP_ERROR',
1716: x_msg_count => x_msg_count,
1717: x_msg_data => x_msg_data,
1718: p_api_type => g_api_type);
1719:

Line 1721: x_return_status := OKC_API.HANDLE_EXCEPTIONS(

1717: x_msg_data => x_msg_data,
1718: p_api_type => g_api_type);
1719:
1720: when OTHERS then
1721: x_return_status := OKC_API.HANDLE_EXCEPTIONS(
1722: p_api_name => l_api_name,
1723: p_pkg_name => g_pkg_name,
1724: p_exc_name => 'OTHERS',
1725: x_msg_count => x_msg_count,