DBA Data[Home] [Help]

APPS.OKC_CREATE_PO_FROM_K_PVT dependencies on OKC_API

Line 37: G_APP_NAME CONSTANT VARCHAR2(03) := OKC_API.G_APP_NAME;

33: G_SQLCODE_TOKEN CONSTANT VARCHAR2(07) := 'SQLCODE';
34: G_SQLERRM_TOKEN CONSTANT VARCHAR2(07) := 'SQLERRM';
35: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OKC_CREATE_PO_FROM_K_PVT';
36: G_PKG_FILENAME CONSTANT VARCHAR2(12) := 'OKCRKPOB.pls';
37: G_APP_NAME CONSTANT VARCHAR2(03) := OKC_API.G_APP_NAME;
38: G_APP_NAME1 CONSTANT VARCHAR2(03) := 'OKC';
39:
40: G_API_TYPE CONSTANT VARCHAR2(08) := '_PROCESS';
41: G_SCOPE CONSTANT VARCHAR2(04) := '_PVT';

Line 320: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);

316: my_debug('4000: Entered set_notification_msg', 2);
317:
318: my_debug('4010: Initialize Error Message List', 2);
319:
320: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);
321:
322: l_init_msg_count:=fnd_msg_pub.count_msg;
323:
324: my_debug('4020: Set Notification Messages on the stack', 2);

Line 329: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR OR

325:
326:
327: -- Checking on subject and body message codes not null
328:
329: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR OR
330: NVL(p_message_subject,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR
331: THEN
332: OKC_API.set_message(p_app_name => p_application_name,
333: p_msg_name => 'OKC_K_NO_MSG_NOTIF');

Line 330: NVL(p_message_subject,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR

326:
327: -- Checking on subject and body message codes not null
328:
329: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR OR
330: NVL(p_message_subject,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR
331: THEN
332: OKC_API.set_message(p_app_name => p_application_name,
333: p_msg_name => 'OKC_K_NO_MSG_NOTIF');
334:

Line 332: OKC_API.set_message(p_app_name => p_application_name,

328:
329: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR OR
330: NVL(p_message_subject,OKC_API.G_MISS_CHAR) = OKC_API.G_MISS_CHAR
331: THEN
332: OKC_API.set_message(p_app_name => p_application_name,
333: p_msg_name => 'OKC_K_NO_MSG_NOTIF');
334:
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336:

Line 335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

331: THEN
332: OKC_API.set_message(p_app_name => p_application_name,
333: p_msg_name => 'OKC_K_NO_MSG_NOTIF');
334:
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336:
337: ELSE
338: IF NVL(p_message_subject,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR
339: THEN

Line 338: IF NVL(p_message_subject,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR

334:
335: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
336:
337: ELSE
338: IF NVL(p_message_subject,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR
339: THEN
340: my_debug('4030: Setting subject message on the stack', 2);
341:
342: OKC_API.set_message(p_app_name => p_application_name

Line 342: OKC_API.set_message(p_app_name => p_application_name

338: IF NVL(p_message_subject,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR
339: THEN
340: my_debug('4030: Setting subject message on the stack', 2);
341:
342: OKC_API.set_message(p_app_name => p_application_name
343: ,p_msg_name => p_message_subject
344: ,p_token1 => p_message_body_token1
345: ,p_token1_value => p_message_body_token1_value
346: ,p_token2 => p_message_body_token2

Line 353: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR

349: ,p_token3_value => p_message_body_token3_value
350: );
351: END IF;
352:
353: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR
354: THEN
355: my_debug('4040: Setting body message on the stack', 2);
356:
357: OKC_API.set_message(p_app_name => p_application_name

Line 357: OKC_API.set_message(p_app_name => p_application_name

353: IF NVL(p_message_body,OKC_API.G_MISS_CHAR) <> OKC_API.G_MISS_CHAR
354: THEN
355: my_debug('4040: Setting body message on the stack', 2);
356:
357: OKC_API.set_message(p_app_name => p_application_name
358: ,p_msg_name => p_message_body
359: ,p_token1 => p_message_body_token1
360: ,p_token1_value => p_message_body_token1_value
361: ,p_token2 => p_message_body_token2

Line 369: x_return_status := OKC_API.G_RET_STS_SUCCESS;

365: );
366: END IF;
367: END IF;
368:
369: x_return_status := OKC_API.G_RET_STS_SUCCESS;
370:
371: my_debug('4040: Exiting set_notification_msg', 2);
372:
373:

Line 375: WHEN OKC_API.G_EXCEPTION_ERROR THEN

371: my_debug('4040: Exiting set_notification_msg', 2);
372:
373:
374: EXCEPTION
375: WHEN OKC_API.G_EXCEPTION_ERROR THEN
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377:
378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 376: x_return_status := OKC_API.G_RET_STS_ERROR;

372:
373:
374: EXCEPTION
375: WHEN OKC_API.G_EXCEPTION_ERROR THEN
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377:
378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
380:

Line 378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

374: EXCEPTION
375: WHEN OKC_API.G_EXCEPTION_ERROR THEN
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377:
378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
380:
381: WHEN OTHERS THEN
382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

375: WHEN OKC_API.G_EXCEPTION_ERROR THEN
376: x_return_status := OKC_API.G_RET_STS_ERROR;
377:
378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
380:
381: WHEN OTHERS THEN
382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
383: OKC_API.set_message(G_APP_NAME

Line 382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

378: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
380:
381: WHEN OTHERS THEN
382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
383: OKC_API.set_message(G_APP_NAME
384: ,G_UNEXPECTED_ERROR
385: ,G_SQLCODE_TOKEN
386: ,SQLCODE

Line 383: OKC_API.set_message(G_APP_NAME

379: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
380:
381: WHEN OTHERS THEN
382: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
383: OKC_API.set_message(G_APP_NAME
384: ,G_UNEXPECTED_ERROR
385: ,G_SQLCODE_TOKEN
386: ,SQLCODE
387: ,G_SQLERRM_TOKEN

Line 420: lx_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

416:
417: -- standard api variables
418: l_api_version CONSTANT NUMBER := 1;
419: l_api_name CONSTANT VARCHAR2(30) := 'notify_buyer';
420: lx_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
421: lx_msg_count NUMBER := 0;
422: lx_msg_data VARCHAR2(2000);
423: l_init_msg_count NUMBER:=0;
424:

Line 425: l_notif_flag VARCHAR2(1):=OKC_API.g_false;

421: lx_msg_count NUMBER := 0;
422: lx_msg_data VARCHAR2(2000);
423: l_init_msg_count NUMBER:=0;
424:
425: l_notif_flag VARCHAR2(1):=OKC_API.g_false;
426: l_send_notif VARCHAR2(1):=OKC_API.g_false;
427: l_notification_string VARCHAR2(4000);
428: l_k_buyer_name fnd_user.user_name%TYPE;
429:

Line 426: l_send_notif VARCHAR2(1):=OKC_API.g_false;

422: lx_msg_data VARCHAR2(2000);
423: l_init_msg_count NUMBER:=0;
424:
425: l_notif_flag VARCHAR2(1):=OKC_API.g_false;
426: l_send_notif VARCHAR2(1):=OKC_API.g_false;
427: l_notification_string VARCHAR2(4000);
428: l_k_buyer_name fnd_user.user_name%TYPE;
429:
430:

Line 438: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);

434: my_debug('5010: Entered notify_buyer', 2);
435:
436: my_debug('5010: Initialize error message list', 2);
437:
438: okc_api.init_msg_list(p_init_msg_list => p_init_msg_list);
439:
440: l_init_msg_count:=fnd_msg_pub.count_msg;
441:
442:

Line 458: IF SQL%FOUND AND NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char THEN

454: AND rownum = 1)
455: AND rownum = 1;
456:
457:
458: IF SQL%FOUND AND NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char THEN
459:
460: my_debug('5020: Buyer name' || l_k_buyer_name , 2);
461:
462: l_send_notif := OKC_API.G_TRUE;

Line 462: l_send_notif := OKC_API.G_TRUE;

458: IF SQL%FOUND AND NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char THEN
459:
460: my_debug('5020: Buyer name' || l_k_buyer_name , 2);
461:
462: l_send_notif := OKC_API.G_TRUE;
463:
464: x_k_buyer_name := l_k_buyer_name;
465:
466: ELSE

Line 468: l_send_notif := OKC_API.G_FALSE;

464: x_k_buyer_name := l_k_buyer_name;
465:
466: ELSE
467:
468: l_send_notif := OKC_API.G_FALSE;
469:
470: OKC_API.set_message(p_app_name => g_app_name, --OKC
471: p_msg_name => 'OKC_K_NOKBUYER',
472: p_token1 => 'KNUMBER',

Line 470: OKC_API.set_message(p_app_name => g_app_name, --OKC

466: ELSE
467:
468: l_send_notif := OKC_API.G_FALSE;
469:
470: OKC_API.set_message(p_app_name => g_app_name, --OKC
471: p_msg_name => 'OKC_K_NOKBUYER',
472: p_token1 => 'KNUMBER',
473: p_token1_value => p_chr_id);
474:

Line 478: IF l_send_notif = OKC_API.g_true THEN

474:
475: END IF;
476:
477:
478: IF l_send_notif = OKC_API.g_true THEN
479:
480: -- Prepare the procedure to be executed through the
481: -- workflow alert system
482:

Line 493: IF NVL(p_message_body_token1, OKC_API.G_MISS_CHAR) <>

489: ',p_message_subject =>'||''''||p_message_subject ||''''||
490: ',p_message_body =>'||''''||p_message_body||'''' ;
491:
492:
493: IF NVL(p_message_body_token1, OKC_API.G_MISS_CHAR) <>
494: OKC_API.G_MISS_CHAR AND
495: NVL(p_message_body_token1_value, OKC_API.G_MISS_CHAR) <>
496: OKC_API.G_MISS_CHAR THEN
497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';

Line 494: OKC_API.G_MISS_CHAR AND

490: ',p_message_body =>'||''''||p_message_body||'''' ;
491:
492:
493: IF NVL(p_message_body_token1, OKC_API.G_MISS_CHAR) <>
494: OKC_API.G_MISS_CHAR AND
495: NVL(p_message_body_token1_value, OKC_API.G_MISS_CHAR) <>
496: OKC_API.G_MISS_CHAR THEN
497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';
498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';

Line 495: NVL(p_message_body_token1_value, OKC_API.G_MISS_CHAR) <>

491:
492:
493: IF NVL(p_message_body_token1, OKC_API.G_MISS_CHAR) <>
494: OKC_API.G_MISS_CHAR AND
495: NVL(p_message_body_token1_value, OKC_API.G_MISS_CHAR) <>
496: OKC_API.G_MISS_CHAR THEN
497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';
498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';
499: END IF;

Line 496: OKC_API.G_MISS_CHAR THEN

492:
493: IF NVL(p_message_body_token1, OKC_API.G_MISS_CHAR) <>
494: OKC_API.G_MISS_CHAR AND
495: NVL(p_message_body_token1_value, OKC_API.G_MISS_CHAR) <>
496: OKC_API.G_MISS_CHAR THEN
497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';
498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';
499: END IF;
500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>

Line 500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>

496: OKC_API.G_MISS_CHAR THEN
497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';
498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';
499: END IF;
500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>
501: OKC_API.G_MISS_CHAR AND
502: NVL(p_message_body_token2_value, OKC_API.G_MISS_CHAR) <>
503: OKC_API.G_MISS_CHAR THEN
504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';

Line 501: OKC_API.G_MISS_CHAR AND

497: l_notification_string := l_notification_string||',p_message_body_token1 =>' ||''''|| p_message_body_token1 ||'''';
498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';
499: END IF;
500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>
501: OKC_API.G_MISS_CHAR AND
502: NVL(p_message_body_token2_value, OKC_API.G_MISS_CHAR) <>
503: OKC_API.G_MISS_CHAR THEN
504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';
505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';

Line 502: NVL(p_message_body_token2_value, OKC_API.G_MISS_CHAR) <>

498: l_notification_string := l_notification_string||',p_message_body_token1_value =>' ||''''|| p_message_body_token1_value ||'''';
499: END IF;
500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>
501: OKC_API.G_MISS_CHAR AND
502: NVL(p_message_body_token2_value, OKC_API.G_MISS_CHAR) <>
503: OKC_API.G_MISS_CHAR THEN
504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';
505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';
506: END IF;

Line 503: OKC_API.G_MISS_CHAR THEN

499: END IF;
500: IF NVL(p_message_body_token2, OKC_API.G_MISS_CHAR) <>
501: OKC_API.G_MISS_CHAR AND
502: NVL(p_message_body_token2_value, OKC_API.G_MISS_CHAR) <>
503: OKC_API.G_MISS_CHAR THEN
504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';
505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';
506: END IF;
507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>

Line 507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>

503: OKC_API.G_MISS_CHAR THEN
504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';
505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';
506: END IF;
507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>
508: OKC_API.G_MISS_CHAR AND
509: NVL(p_message_body_token3_value, OKC_API.G_MISS_CHAR) <>
510: OKC_API.G_MISS_CHAR THEN
511: l_notification_string := l_notification_string||',p_message_body_token3 =>' ||''''|| p_message_body_token3 ||'''';

Line 508: OKC_API.G_MISS_CHAR AND

504: l_notification_string := l_notification_string||',p_message_body_token2 =>' ||''''|| p_message_body_token2 ||'''';
505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';
506: END IF;
507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>
508: OKC_API.G_MISS_CHAR AND
509: NVL(p_message_body_token3_value, OKC_API.G_MISS_CHAR) <>
510: OKC_API.G_MISS_CHAR THEN
511: l_notification_string := l_notification_string||',p_message_body_token3 =>' ||''''|| p_message_body_token3 ||'''';
512: l_notification_string := l_notification_string||',p_message_body_token3_value =>' ||''''|| p_message_body_token3_value ||'''';

Line 509: NVL(p_message_body_token3_value, OKC_API.G_MISS_CHAR) <>

505: l_notification_string := l_notification_string||',p_message_body_token2_value =>' ||''''|| p_message_body_token2_value ||'''';
506: END IF;
507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>
508: OKC_API.G_MISS_CHAR AND
509: NVL(p_message_body_token3_value, OKC_API.G_MISS_CHAR) <>
510: OKC_API.G_MISS_CHAR THEN
511: l_notification_string := l_notification_string||',p_message_body_token3 =>' ||''''|| p_message_body_token3 ||'''';
512: l_notification_string := l_notification_string||',p_message_body_token3_value =>' ||''''|| p_message_body_token3_value ||'''';
513: END IF;

Line 510: OKC_API.G_MISS_CHAR THEN

506: END IF;
507: IF NVL(p_message_body_token3, OKC_API.G_MISS_CHAR) <>
508: OKC_API.G_MISS_CHAR AND
509: NVL(p_message_body_token3_value, OKC_API.G_MISS_CHAR) <>
510: OKC_API.G_MISS_CHAR THEN
511: l_notification_string := l_notification_string||',p_message_body_token3 =>' ||''''|| p_message_body_token3 ||'''';
512: l_notification_string := l_notification_string||',p_message_body_token3_value =>' ||''''|| p_message_body_token3_value ||'''';
513: END IF;
514:

Line 521: IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char THEN

517:
518: -- Submit the procedure to the workflow alert system once to notify the buyer
519:
520:
521: IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char THEN
522:
523:
524: my_debug('5030: Notify the buyer' , 2);
525:

Line 547: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR

543:
544: my_debug('5070: Return status: ' || lx_return_status, 2);
545:
546:
547: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
548: lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
549:
550: okc_api.set_message(p_app_name => g_app_name,
551: p_msg_name => 'OKC_K_BUYER_NOTIFFAILURE',

Line 548: lx_return_status = OKC_API.G_RET_STS_ERROR) THEN

544: my_debug('5070: Return status: ' || lx_return_status, 2);
545:
546:
547: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
548: lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
549:
550: okc_api.set_message(p_app_name => g_app_name,
551: p_msg_name => 'OKC_K_BUYER_NOTIFFAILURE',
552: p_token1 => 'KBUYER',

Line 550: okc_api.set_message(p_app_name => g_app_name,

546:
547: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR OR
548: lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
549:
550: okc_api.set_message(p_app_name => g_app_name,
551: p_msg_name => 'OKC_K_BUYER_NOTIFFAILURE',
552: p_token1 => 'KBUYER',
553: p_token1_value => l_k_buyer_name);
554:

Line 557: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

553: p_token1_value => l_k_buyer_name);
554:
555: END IF;
556:
557: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
558:
559: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
560:
561: ELSIF (lx_return_status = OKC_API.G_RET_STS_ERROR) THEN

Line 559: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

555: END IF;
556:
557: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
558:
559: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
560:
561: ELSIF (lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
562:
563: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 561: ELSIF (lx_return_status = OKC_API.G_RET_STS_ERROR) THEN

557: IF (lx_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
558:
559: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
560:
561: ELSIF (lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
562:
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564:
565: END IF;

Line 563: RAISE OKC_API.G_EXCEPTION_ERROR;

559: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
560:
561: ELSIF (lx_return_status = OKC_API.G_RET_STS_ERROR) THEN
562:
563: RAISE OKC_API.G_EXCEPTION_ERROR;
564:
565: END IF;
566:
567: END IF; -- IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char

Line 567: END IF; -- IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char

563: RAISE OKC_API.G_EXCEPTION_ERROR;
564:
565: END IF;
566:
567: END IF; -- IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char
568:
569:
570: END IF; -- IF l_send_notif = OKC_API.g_true THEN
571:

Line 570: END IF; -- IF l_send_notif = OKC_API.g_true THEN

566:
567: END IF; -- IF NVL(l_k_buyer_name, okc_api.g_miss_char) <> okc_api.g_miss_char
568:
569:
570: END IF; -- IF l_send_notif = OKC_API.g_true THEN
571:
572: my_debug('5080: INITIALIZE ERROR MESSAGE OUT NOCOPY VARIABLES' , 2);
573:
574: FND_MSG_PUB.Count_And_Get (

Line 580: x_return_status := OKC_API.G_RET_STS_SUCCESS;

576: p_data => x_msg_data);
577:
578: x_msg_count:=x_msg_count - l_init_msg_count;
579:
580: x_return_status := OKC_API.G_RET_STS_SUCCESS;
581:
582:
583:
584: EXCEPTION

Line 585: WHEN OKC_API.G_EXCEPTION_ERROR THEN

581:
582:
583:
584: EXCEPTION
585: WHEN OKC_API.G_EXCEPTION_ERROR THEN
586:
587: x_return_status := OKC_API.G_RET_STS_ERROR;
588:
589: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN

Line 587: x_return_status := OKC_API.G_RET_STS_ERROR;

583:
584: EXCEPTION
585: WHEN OKC_API.G_EXCEPTION_ERROR THEN
586:
587: x_return_status := OKC_API.G_RET_STS_ERROR;
588:
589: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
590: fnd_msg_pub.add_exc_msg(p_pkg_name => g_pkg_name
591: ,p_procedure_name => l_api_name

Line 601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

597: p_count => x_msg_count,
598: p_data => x_msg_data);
599: x_msg_count:=x_msg_count - l_init_msg_count;
600:
601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
602:
603: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
604:
605: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN

Line 603: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

599: x_msg_count:=x_msg_count - l_init_msg_count;
600:
601: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
602:
603: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
604:
605: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
606: fnd_msg_pub.add_exc_msg(p_pkg_name => g_pkg_name
607: ,p_procedure_name => l_api_name

Line 618: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

614: p_data => x_msg_data);
615: x_msg_count:=x_msg_count - l_init_msg_count;
616:
617: WHEN OTHERS THEN
618: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
619: OKC_API.set_message(G_APP_NAME
620: ,G_UNEXPECTED_ERROR
621: ,G_SQLCODE_TOKEN
622: ,SQLCODE

Line 619: OKC_API.set_message(G_APP_NAME

615: x_msg_count:=x_msg_count - l_init_msg_count;
616:
617: WHEN OTHERS THEN
618: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
619: OKC_API.set_message(G_APP_NAME
620: ,G_UNEXPECTED_ERROR
621: ,G_SQLCODE_TOKEN
622: ,SQLCODE
623: ,G_SQLERRM_TOKEN

Line 712: x_return_status := OKC_API.G_RET_STS_SUCCESS;

708: END IF;
709:
710: my_debug('20: Entering get_k_rules', 2);
711:
712: x_return_status := OKC_API.G_RET_STS_SUCCESS;
713:
714:
715: -- rule selection
716:

Line 884: OKC_API.set_message(p_app_name => g_app_name,

880:
881: EXCEPTION
882: WHEN OTHERS THEN
883: my_debug('440: error'||substr(sqlerrm,1,240));
884: OKC_API.set_message(p_app_name => g_app_name,
885: p_msg_name => g_unexpected_error,
886: p_token1 => g_sqlcode_token,
887: p_token1_value => sqlcode,
888: p_token2 => g_sqlerrm_token,

Line 890: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

886: p_token1 => g_sqlcode_token,
887: p_token1_value => sqlcode,
888: p_token2 => g_sqlerrm_token,
889: p_token2_value => sqlerrm);
890: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
891: my_debug('460: Exiting get_k_rules', 2);
892: IF (l_debug = 'Y') THEN
893: okc_debug.Reset_Indentation;
894: END IF;

Line 949: x_return_status := OKC_API.G_RET_STS_SUCCESS;

945: END IF;
946:
947: my_debug('480: Entering get_k_info', 2);
948:
949: x_return_status := OKC_API.G_RET_STS_SUCCESS;
950:
951: OPEN c_chr(p_chr_id);
952:
953: FETCH c_chr INTO g_chr;

Line 1056: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1052:
1053: my_debug('660: after calling get_k_rules at header level. Status :'||l_return_status, 1);
1054:
1055:
1056: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1057: Raise g_unexp_error;
1058: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1059: Raise g_error;
1060: END IF;

Line 1058: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1054:
1055:
1056: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1057: Raise g_unexp_error;
1058: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1059: Raise g_error;
1060: END IF;
1061:
1062:

Line 1157: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN

1153:
1154:
1155: my_debug('880: after calling get_k_rules at line level. Status :'||l_return_status, 1);
1156:
1157: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1158: Raise g_unexp_error;
1159: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1160: Raise g_error;
1161: END IF;

Line 1159: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN

1155: my_debug('880: after calling get_k_rules at line level. Status :'||l_return_status, 1);
1156:
1157: IF l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR THEN
1158: Raise g_unexp_error;
1159: ELSIF l_return_status = OKC_API.G_RET_STS_ERROR THEN
1160: Raise g_error;
1161: END IF;
1162:
1163:

Line 1176: x_return_status := OKC_API.G_RET_STS_ERROR;

1172:
1173: EXCEPTION
1174: WHEN contract_not_found THEN
1175:
1176: x_return_status := OKC_API.G_RET_STS_ERROR;
1177: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_K2O_NOKHDR');
1178: my_debug('920: Exiting get_k_info', 2);
1179: IF (l_debug = 'Y') THEN
1180: okc_debug.Reset_Indentation;

Line 1177: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_K2O_NOKHDR');

1173: EXCEPTION
1174: WHEN contract_not_found THEN
1175:
1176: x_return_status := OKC_API.G_RET_STS_ERROR;
1177: okc_api.set_message(OKC_API.G_APP_NAME,'OKC_K2O_NOKHDR');
1178: my_debug('920: Exiting get_k_info', 2);
1179: IF (l_debug = 'Y') THEN
1180: okc_debug.Reset_Indentation;
1181: END IF;

Line 1185: x_return_status := OKC_API.G_RET_STS_ERROR;

1181: END IF;
1182:
1183: WHEN g_error THEN
1184:
1185: x_return_status := OKC_API.G_RET_STS_ERROR;
1186:
1187: IF c_chr%ISOPEN THEN
1188: CLOSE c_chr;
1189: END IF;

Line 1202: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1198: END IF;
1199:
1200: WHEN g_unexp_error THEN
1201:
1202: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1203:
1204: IF c_chr%ISOPEN THEN
1205: CLOSE c_chr;
1206: END IF;

Line 1219: OKC_API.set_message(p_app_name => g_app_name,

1215: END IF;
1216:
1217: WHEN OTHERS THEN
1218: my_debug('980: error'||substr(sqlerrm,1,240));
1219: OKC_API.set_message(p_app_name => g_app_name,
1220: p_msg_name => g_unexpected_error,
1221: p_token1 => g_sqlcode_token,
1222: p_token1_value => sqlcode,
1223: p_token2 => g_sqlerrm_token,

Line 1225: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1221: p_token1 => g_sqlcode_token,
1222: p_token1_value => sqlcode,
1223: p_token2 => g_sqlerrm_token,
1224: p_token2_value => sqlerrm);
1225: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1226:
1227: IF c_chr%ISOPEN THEN
1228: CLOSE c_chr;
1229: END IF;

Line 1283: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1279: END IF;
1280:
1281: my_debug('1020: Entering insert_po_hdr', 2);
1282:
1283: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1284:
1285: my_debug('1040: Batch id = ' || p_batch_id, 2);
1286:
1287: -- Select the PO Header id so that it can be populated in related

Line 1429: OKC_API.set_message(p_app_name => g_app_name,

1425:
1426: EXCEPTION
1427: WHEN OTHERS THEN
1428: my_debug('1120: error'||substr(sqlerrm,1,240));
1429: OKC_API.set_message(p_app_name => g_app_name,
1430: p_msg_name => g_unexpected_error,
1431: p_token1 => g_sqlcode_token,
1432: p_token1_value => sqlcode,
1433: p_token2 => g_sqlerrm_token,

Line 1435: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1431: p_token1 => g_sqlcode_token,
1432: p_token1_value => sqlcode,
1433: p_token2 => g_sqlerrm_token,
1434: p_token2_value => sqlerrm);
1435: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1436: my_debug('1140: Exiting insert_po_hdr', 4);
1437: IF (l_debug = 'Y') THEN
1438: okc_debug.Reset_Indentation;
1439: END IF;

Line 1489: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1485: END IF;
1486:
1487: my_debug('1160: Entering insert_po_lines', 2);
1488:
1489: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1490:
1491: -- Map all values into single table arrays to avoid Oracle errors
1492: -- caused by using rec(i).field
1493:

Line 1675: OKC_API.set_message(p_app_name => g_app_name,

1671:
1672: EXCEPTION
1673: WHEN OTHERS THEN
1674: my_debug('1580: error'||substr(sqlerrm,1,240));
1675: OKC_API.set_message(p_app_name => g_app_name,
1676: p_msg_name => g_unexpected_error,
1677: p_token1 => g_sqlcode_token,
1678: p_token1_value => sqlcode,
1679: p_token2 => g_sqlerrm_token,

Line 1681: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1677: p_token1 => g_sqlcode_token,
1678: p_token1_value => sqlcode,
1679: p_token2 => g_sqlerrm_token,
1680: p_token2_value => sqlerrm);
1681: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1682: my_debug('1600: Exiting insert_po_lines', 4);
1683: IF (l_debug = 'Y') THEN
1684: okc_debug.Reset_Indentation;
1685: END IF;

Line 1722: x_return_status := OKC_API.G_RET_STS_SUCCESS;

1718: END IF;
1719:
1720: my_debug('1620: Entering insert_po_distributions', 2);
1721:
1722: x_return_status := OKC_API.G_RET_STS_SUCCESS;
1723:
1724:
1725: -- Map all values into single table arrays to avoid Oracle errors
1726: -- caused by using rec(i).field

Line 1797: OKC_API.set_message(p_app_name => g_app_name,

1793:
1794: EXCEPTION
1795: WHEN OTHERS THEN
1796: my_debug('1720: error'||substr(sqlerrm,1,240));
1797: OKC_API.set_message(p_app_name => g_app_name,
1798: p_msg_name => g_unexpected_error,
1799: p_token1 => g_sqlcode_token,
1800: p_token1_value => sqlcode,
1801: p_token2 => g_sqlerrm_token,

Line 1803: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

1799: p_token1 => g_sqlcode_token,
1800: p_token1_value => sqlcode,
1801: p_token2 => g_sqlerrm_token,
1802: p_token2_value => sqlerrm);
1803: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
1804: my_debug('1740: Exiting insert_po_distributions', 4);
1805: IF (l_debug = 'Y') THEN
1806: okc_debug.Reset_Indentation;
1807: END IF;

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

1835: -- standard api variables
1836:
1837: l_api_version CONSTANT NUMBER := 1;
1838: l_api_name CONSTANT VARCHAR2(30) := 'CREATE_PO_FROM_K';
1839: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1840: l_msg_count NUMBER := 0;
1841: l_msg_data VARCHAR2(1000);
1842: l_po_header_rec po_header_rec_type;
1843: l_po_lines_tab po_lines_tab;

Line 1885: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1881: ,x_po_header_rec => l_po_header_rec
1882: ,x_po_lines_tab => l_po_lines_tab
1883: ,x_po_dist_tab => l_po_dist_tab);
1884:
1885: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1886: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1887: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1888: RAISE OKC_API.G_EXCEPTION_ERROR;
1889: END IF;

Line 1886: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1882: ,x_po_lines_tab => l_po_lines_tab
1883: ,x_po_dist_tab => l_po_dist_tab);
1884:
1885: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1886: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1887: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1888: RAISE OKC_API.G_EXCEPTION_ERROR;
1889: END IF;
1890:

Line 1887: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1883: ,x_po_dist_tab => l_po_dist_tab);
1884:
1885: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1886: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1887: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1888: RAISE OKC_API.G_EXCEPTION_ERROR;
1889: END IF;
1890:
1891: -- call procedure to populate purchase order header

Line 1888: RAISE OKC_API.G_EXCEPTION_ERROR;

1884:
1885: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1886: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1887: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1888: RAISE OKC_API.G_EXCEPTION_ERROR;
1889: END IF;
1890:
1891: -- call procedure to populate purchase order header
1892:

Line 1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1896: ,p_po_header_rec => l_po_header_rec
1897: ,x_return_status => l_return_status
1898: ,x_po_header_id => l_po_header_id);
1899:
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;

Line 1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1897: ,x_return_status => l_return_status
1898: ,x_po_header_id => l_po_header_id);
1899:
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905:

Line 1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1898: ,x_po_header_id => l_po_header_id);
1899:
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905:
1906:

Line 1903: RAISE OKC_API.G_EXCEPTION_ERROR;

1899:
1900: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1901: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1902: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1903: RAISE OKC_API.G_EXCEPTION_ERROR;
1904: END IF;
1905:
1906:
1907: OPEN c_top_cle(p_chr_id);

Line 1930: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1926: ,p_po_header_id => l_po_header_id
1927: ,x_return_status => l_return_status);
1928:
1929:
1930: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1931: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1932: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1933: RAISE OKC_API.G_EXCEPTION_ERROR;
1934: END IF;

Line 1931: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1927: ,x_return_status => l_return_status);
1928:
1929:
1930: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1931: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1932: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1933: RAISE OKC_API.G_EXCEPTION_ERROR;
1934: END IF;
1935:

Line 1932: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1928:
1929:
1930: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1931: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1932: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1933: RAISE OKC_API.G_EXCEPTION_ERROR;
1934: END IF;
1935:
1936:

Line 1933: RAISE OKC_API.G_EXCEPTION_ERROR;

1929:
1930: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1931: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1932: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1933: RAISE OKC_API.G_EXCEPTION_ERROR;
1934: END IF;
1935:
1936:
1937: -- call procedure to populate purchase order distributions

Line 1943: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1939:
1940: insert_po_distributions(p_po_dist_tab => l_po_dist_tab
1941: ,x_return_status => l_return_status);
1942:
1943: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: my_debug('1780: Unexpected error from insert_po_distributions',4);
1945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1947: my_debug('1800: Error from insert_po_distributions',4);

Line 1945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1941: ,x_return_status => l_return_status);
1942:
1943: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: my_debug('1780: Unexpected error from insert_po_distributions',4);
1945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1947: my_debug('1800: Error from insert_po_distributions',4);
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;

Line 1946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1942:
1943: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1944: my_debug('1780: Unexpected error from insert_po_distributions',4);
1945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1947: my_debug('1800: Error from insert_po_distributions',4);
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950:

Line 1948: RAISE OKC_API.G_EXCEPTION_ERROR;

1944: my_debug('1780: Unexpected error from insert_po_distributions',4);
1945: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1946: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1947: my_debug('1800: Error from insert_po_distributions',4);
1948: RAISE OKC_API.G_EXCEPTION_ERROR;
1949: END IF;
1950:
1951: END IF;
1952:

Line 1982: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1978:
1979: IF l_request_id = 0
1980: THEN
1981: my_debug('1860: Error submitting request for PDOI',4);
1982: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1983: END IF;
1984:
1985: -- If no errors, set the status of the current request to PAUSED since
1986: -- it is not running at present and so that it frees up resources

Line 1993: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1989: fnd_conc_global.set_req_globals(conc_status => 'PAUSED',
1990: request_data => 'STAGE2');
1991:
1992: EXCEPTION
1993: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1994: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1995: (l_api_name,
1996: G_PKG_NAME,
1997: 'OKC_API.G_RET_STS_ERROR',

Line 1994: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1990: request_data => 'STAGE2');
1991:
1992: EXCEPTION
1993: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1994: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1995: (l_api_name,
1996: G_PKG_NAME,
1997: 'OKC_API.G_RET_STS_ERROR',
1998: x_msg_count,

Line 1997: 'OKC_API.G_RET_STS_ERROR',

1993: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1994: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1995: (l_api_name,
1996: G_PKG_NAME,
1997: 'OKC_API.G_RET_STS_ERROR',
1998: x_msg_count,
1999: x_msg_data,
2000: '_PROCESS');
2001: my_debug('1880: Exiting create_po_from_k', 4);

Line 2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2002: IF (l_debug = 'Y') THEN
2003: okc_debug.Reset_Indentation;
2004: END IF;
2005:
2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2007: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2008: (l_api_name,
2009: G_PKG_NAME,
2010: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2007: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2003: okc_debug.Reset_Indentation;
2004: END IF;
2005:
2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2007: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2008: (l_api_name,
2009: G_PKG_NAME,
2010: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2011: x_msg_count,

Line 2010: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2006: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2007: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2008: (l_api_name,
2009: G_PKG_NAME,
2010: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2011: x_msg_count,
2012: x_msg_data,
2013: '_PROCESS');
2014: my_debug('1900: Exiting create_po_from_k', 4);

Line 2021: OKC_API.set_message(p_app_name => g_app_name,

2017: END IF;
2018:
2019: WHEN OTHERS THEN
2020: my_debug('1920: error'||substr(sqlerrm,1,240));
2021: OKC_API.set_message(p_app_name => g_app_name,
2022: p_msg_name => g_unexpected_error,
2023: p_token1 => g_sqlcode_token,
2024: p_token1_value => sqlcode,
2025: p_token2 => g_sqlerrm_token,

Line 2027: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2023: p_token1 => g_sqlcode_token,
2024: p_token1_value => sqlcode,
2025: p_token2 => g_sqlerrm_token,
2026: p_token2_value => sqlerrm);
2027: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2028: my_debug('1940: Exiting create_po_from_k', 4);
2029: IF (l_debug = 'Y') THEN
2030: okc_debug.Reset_Indentation;
2031: END IF;

Line 2071: x_return_status := OKC_API.G_RET_STS_SUCCESS;

2067:
2068:
2069: BEGIN
2070:
2071: x_return_status := OKC_API.G_RET_STS_SUCCESS;
2072:
2073: IF (l_debug = 'Y') THEN
2074: okc_debug.Set_Indentation('tieback_related_objs_from_po');
2075: END IF;

Line 2196: x_return_status := OKC_API.G_RET_STS_WARNING;

2192: IF l_sql_rowcount > 0
2193: THEN
2194: fnd_message.set_name('OKC','OKC_LOG_PO_SOME_LINES_NOT_XFRD');
2195: l_msg_data := fnd_message.get;
2196: x_return_status := OKC_API.G_RET_STS_WARNING;
2197: x_msg_count := 1;
2198: x_msg_data := l_msg_data;
2199:
2200: fnd_file.put_line(fnd_file.output, l_msg_data);

Line 2233: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

2229:
2230: EXCEPTION
2231: WHEN g_unexp_error
2232: THEN
2233: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
2234: IF (l_debug = 'Y') THEN
2235: okc_debug.Reset_Indentation;
2236: END IF;
2237: