[Home] [Help]
75: WHEN G_EXCEPTION_HALT_VALIDATION THEN
76: RAISE G_EXCEPTION_HALT_VALIDATION;
77:
78: WHEN OTHERS THEN
79: OKE_API.set_message(p_app_name => G_APP_NAME ,
80: p_msg_name => G_UNEXPECTED_ERROR ,
81: p_token1 => G_SQLCODE_TOKEN ,
82: p_token1_value => SQLCODE ,
83: p_token2 => G_SQLERRM_TOKEN ,
126: WHEN G_EXCEPTION_HALT_VALIDATION THEN
127: RAISE G_EXCEPTION_HALT_VALIDATION;
128:
129: WHEN OTHERS THEN
130: OKE_API.set_message(p_app_name => G_APP_NAME ,
131: p_msg_name => G_UNEXPECTED_ERROR ,
132: p_token1 => G_SQLCODE_TOKEN ,
133: p_token1_value => SQLCODE ,
134: p_token2 => G_SQLERRM_TOKEN ,
188: END IF;
189:
190: IF (l_field is not null) THEN
191:
192: OKE_API.set_message(p_app_name => G_APP_NAME ,
193: p_msg_name => 'OKE_NO_FUND_CHANGE' ,
194: p_token1 => 'FILED' ,
195: p_token1_value => l_field
196: );
213: ) is
214:
215: BEGIN
216:
217: p_return_status := OKE_API.G_RET_STS_SUCCESS;
218:
219: IF (p_amount is null) OR
220: (p_amount = OKE_API.G_MISS_NUM) THEN
221:
216:
217: p_return_status := OKE_API.G_RET_STS_SUCCESS;
218:
219: IF (p_amount is null) OR
220: (p_amount = OKE_API.G_MISS_NUM) THEN
221:
222: OKE_API.set_message(p_app_name => G_APP_NAME ,
223: p_msg_name => 'OKE_API_MISSING_VALUE' ,
224: p_token1 => 'VALUE' ,
218:
219: IF (p_amount is null) OR
220: (p_amount = OKE_API.G_MISS_NUM) THEN
221:
222: OKE_API.set_message(p_app_name => G_APP_NAME ,
223: p_msg_name => 'OKE_API_MISSING_VALUE' ,
224: p_token1 => 'VALUE' ,
225: p_token1_value => 'amount'
226: );
219: IF (p_amount is null) OR
220: (p_amount = OKE_API.G_MISS_NUM) THEN
221:
222: OKE_API.set_message(p_app_name => G_APP_NAME ,
223: p_msg_name => 'OKE_API_MISSING_VALUE' ,
224: p_token1 => 'VALUE' ,
225: p_token1_value => 'amount'
226: );
227:
224: p_token1 => 'VALUE' ,
225: p_token1_value => 'amount'
226: );
227:
228: p_return_status := OKE_API.G_RET_STS_ERROR;
229:
230: END IF;
231:
232: END validate_amount;
263: CLOSE c_project_task;
264:
265: IF (l_dummy_value = '?') THEN
266:
267: OKE_API.set_message(p_app_name => G_APP_NAME ,
268: p_msg_name => 'OKE_API_INVALID_VALUE' ,
269: p_token1 => 'VALUE' ,
270: p_token1_value => 'task_id and project_id'
271: );
264:
265: IF (l_dummy_value = '?') THEN
266:
267: OKE_API.set_message(p_app_name => G_APP_NAME ,
268: p_msg_name => 'OKE_API_INVALID_VALUE' ,
269: p_token1 => 'VALUE' ,
270: p_token1_value => 'task_id and project_id'
271: );
272:
277: END IF;
278:
279: ElSIF (p_task_id is not null) THEN
280:
281: OKE_API.set_message(p_app_name => G_APP_NAME ,
282: p_msg_name => 'OKE_API_INVALID_VALUE' ,
283: p_token1 => 'VALUE' ,
284: p_token1_value => 'task_id'
285: );
278:
279: ElSIF (p_task_id is not null) THEN
280:
281: OKE_API.set_message(p_app_name => G_APP_NAME ,
282: p_msg_name => 'OKE_API_INVALID_VALUE' ,
283: p_token1 => 'VALUE' ,
284: p_token1_value => 'task_id'
285: );
286:
292: WHEN G_EXCEPTION_HALT_VALIDATION THEN
293: RAISE G_EXCEPTION_HALT_VALIDATION;
294:
295: WHEN OTHERS THEN
296: OKE_API.set_message(p_app_name => G_APP_NAME ,
297: p_msg_name => G_UNEXPECTED_ERROR ,
298: p_token1 => G_SQLCODE_TOKEN ,
299: p_token1_value => SQLCODE ,
300: p_token2 => G_SQLERRM_TOKEN ,
335: CLOSE c_header_line;
336:
337: IF (l_dummy_value = '?') THEN
338:
339: OKE_API.set_message(p_app_name => G_APP_NAME ,
340: p_msg_name => 'OKE_API_INVALID_VALUE' ,
341: p_token1 => 'VALUE' ,
342: p_token1_value => 'k_line_id and object_id'
343: );
336:
337: IF (l_dummy_value = '?') THEN
338:
339: OKE_API.set_message(p_app_name => G_APP_NAME ,
340: p_msg_name => 'OKE_API_INVALID_VALUE' ,
341: p_token1 => 'VALUE' ,
342: p_token1_value => 'k_line_id and object_id'
343: );
344:
352: WHEN G_EXCEPTION_HALT_VALIDATION THEN
353: RAISE G_EXCEPTION_HALT_VALIDATION;
354:
355: WHEN OTHERS THEN
356: OKE_API.set_message(p_app_name => G_APP_NAME ,
357: p_msg_name => G_UNEXPECTED_ERROR ,
358: p_token1 => G_SQLCODE_TOKEN ,
359: p_token1_value => SQLCODE ,
360: p_token2 => G_SQLERRM_TOKEN ,
386:
387: BEGIN
388:
389: IF (p_fund_allocation_id is null) OR
390: (p_fund_allocation_id = OKE_API.G_MISS_NUM) THEN
391:
392: OKE_API.set_message(p_app_name => G_APP_NAME ,
393: p_msg_name => 'OKE_API_MISSING_VALUE' ,
394: p_token1 => 'VALUE' ,
388:
389: IF (p_fund_allocation_id is null) OR
390: (p_fund_allocation_id = OKE_API.G_MISS_NUM) THEN
391:
392: OKE_API.set_message(p_app_name => G_APP_NAME ,
393: p_msg_name => 'OKE_API_MISSING_VALUE' ,
394: p_token1 => 'VALUE' ,
395: p_token1_value => 'fund_allocation_id'
396: );
389: IF (p_fund_allocation_id is null) OR
390: (p_fund_allocation_id = OKE_API.G_MISS_NUM) THEN
391:
392: OKE_API.set_message(p_app_name => G_APP_NAME ,
393: p_msg_name => 'OKE_API_MISSING_VALUE' ,
394: p_token1 => 'VALUE' ,
395: p_token1_value => 'fund_allocation_id'
396: );
397:
405: IF (c_fund_allocation_id%NOTFOUND) THEN
406:
407: CLOSE c_fund_allocation_id;
408:
409: OKE_API.set_message(p_app_name => G_APP_NAME ,
410: p_msg_name => 'OKE_API_INVALID_VALUE' ,
411: p_token1 => 'VALUE' ,
412: p_token1_value => 'fund_allocation_id'
413: );
406:
407: CLOSE c_fund_allocation_id;
408:
409: OKE_API.set_message(p_app_name => G_APP_NAME ,
410: p_msg_name => 'OKE_API_INVALID_VALUE' ,
411: p_token1 => 'VALUE' ,
412: p_token1_value => 'fund_allocation_id'
413: );
414:
422: WHEN G_EXCEPTION_HALT_VALIDATION THEN
423: raise G_EXCEPTION_HALT_VALIDATION;
424:
425: WHEN OTHERS THEN
426: OKE_API.set_message(p_app_name => G_APP_NAME ,
427: p_msg_name => G_UNEXPECTED_ERROR ,
428: p_token1 => G_SQLCODE_TOKEN ,
429: p_token1_value => SQLCODE ,
430: p_token2 => G_SQLERRM_TOKEN ,
460: l_dummy_value VARCHAR2(1) := '?';
461:
462: BEGIN
463:
464: p_return_status := OKE_API.G_RET_STS_SUCCESS;
465:
466: IF (p_object_id is null) OR
467: (p_object_id = OKE_API.G_MISS_NUM) THEN
468:
463:
464: p_return_status := OKE_API.G_RET_STS_SUCCESS;
465:
466: IF (p_object_id is null) OR
467: (p_object_id = OKE_API.G_MISS_NUM) THEN
468:
469: OKE_API.set_message(p_app_name => G_APP_NAME ,
470: p_msg_name => 'OKE_API_MISSING_VALUE' ,
471: p_token1 => 'VALUE' ,
465:
466: IF (p_object_id is null) OR
467: (p_object_id = OKE_API.G_MISS_NUM) THEN
468:
469: OKE_API.set_message(p_app_name => G_APP_NAME ,
470: p_msg_name => 'OKE_API_MISSING_VALUE' ,
471: p_token1 => 'VALUE' ,
472: p_token1_value => 'object_id'
473: );
466: IF (p_object_id is null) OR
467: (p_object_id = OKE_API.G_MISS_NUM) THEN
468:
469: OKE_API.set_message(p_app_name => G_APP_NAME ,
470: p_msg_name => 'OKE_API_MISSING_VALUE' ,
471: p_token1 => 'VALUE' ,
472: p_token1_value => 'object_id'
473: );
474:
471: p_token1 => 'VALUE' ,
472: p_token1_value => 'object_id'
473: );
474:
475: p_return_status := OKE_API.G_RET_STS_ERROR;
476:
477: ELSE
478:
479: OPEN c_object_id;
481: CLOSE c_object_id;
482:
483: IF (l_dummy_value = '?') THEN
484:
485: OKE_API.set_message(p_app_name => G_APP_NAME ,
486: p_msg_name => 'OKE_API_INVALID_VALUE' ,
487: p_token1 => 'VALUE' ,
488: p_token1_value => 'object_id'
489: );
482:
483: IF (l_dummy_value = '?') THEN
484:
485: OKE_API.set_message(p_app_name => G_APP_NAME ,
486: p_msg_name => 'OKE_API_INVALID_VALUE' ,
487: p_token1 => 'VALUE' ,
488: p_token1_value => 'object_id'
489: );
490:
487: p_token1 => 'VALUE' ,
488: p_token1_value => 'object_id'
489: );
490:
491: p_return_status := OKE_API.G_RET_STS_ERROR;
492:
493: END IF;
494:
495: END IF;
495: END IF;
496:
497: EXCEPTION
498: WHEN OTHERS THEN
499: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
500: OKE_API.set_message(p_app_name => G_APP_NAME ,
501: p_msg_name => G_UNEXPECTED_ERROR ,
502: p_token1 => G_SQLCODE_TOKEN ,
503: p_token1_value => SQLCODE ,
496:
497: EXCEPTION
498: WHEN OTHERS THEN
499: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
500: OKE_API.set_message(p_app_name => G_APP_NAME ,
501: p_msg_name => G_UNEXPECTED_ERROR ,
502: p_token1 => G_SQLCODE_TOKEN ,
503: p_token1_value => SQLCODE ,
504: p_token2 => G_SQLERRM_TOKEN ,
534:
535: --oke_debug.debug('validate_funding_source_id : funding_source_id ' || p_funding_source_id);
536: --dbms_output.put_line('validate_funding_source_id : funding_source_id ' || p_funding_source_id);
537:
538: p_return_status := OKE_API.G_RET_STS_SUCCESS;
539:
540: IF (p_funding_source_id is null) OR
541: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
542:
537:
538: p_return_status := OKE_API.G_RET_STS_SUCCESS;
539:
540: IF (p_funding_source_id is null) OR
541: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
542:
543: OKE_API.set_message(p_app_name => G_APP_NAME ,
544: p_msg_name => 'OKE_API_MISSING_VALUE' ,
545: p_token1 => 'VALUE' ,
539:
540: IF (p_funding_source_id is null) OR
541: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
542:
543: OKE_API.set_message(p_app_name => G_APP_NAME ,
544: p_msg_name => 'OKE_API_MISSING_VALUE' ,
545: p_token1 => 'VALUE' ,
546: p_token1_value => 'funding_source_id'
547: );
540: IF (p_funding_source_id is null) OR
541: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
542:
543: OKE_API.set_message(p_app_name => G_APP_NAME ,
544: p_msg_name => 'OKE_API_MISSING_VALUE' ,
545: p_token1 => 'VALUE' ,
546: p_token1_value => 'funding_source_id'
547: );
548:
545: p_token1 => 'VALUE' ,
546: p_token1_value => 'funding_source_id'
547: );
548:
549: p_return_status := OKE_API.G_RET_STS_ERROR;
550:
551: ELSE
552:
553: OPEN c_funding_source_id;
558: --dbms_output.put_line('validate_funding_source_id : l_dummy_value ' || l_dummy_value);
559:
560: IF (l_dummy_value = '?') THEN
561:
562: OKE_API.set_message(p_app_name => G_APP_NAME ,
563: p_msg_name => 'OKE_API_INVALID_VALUE' ,
564: p_token1 => 'VALUE' ,
565: p_token1_value => 'funding_source_id'
566: );
559:
560: IF (l_dummy_value = '?') THEN
561:
562: OKE_API.set_message(p_app_name => G_APP_NAME ,
563: p_msg_name => 'OKE_API_INVALID_VALUE' ,
564: p_token1 => 'VALUE' ,
565: p_token1_value => 'funding_source_id'
566: );
567:
564: p_token1 => 'VALUE' ,
565: p_token1_value => 'funding_source_id'
566: );
567:
568: p_return_status := OKE_API.G_RET_STS_ERROR;
569:
570: END IF;
571:
572: END IF;
572: END IF;
573:
574: EXCEPTION
575: WHEN G_RESOURCE_BUSY THEN
576: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
577: OKE_API.set_message(p_app_name => G_APP_NAME ,
578: p_msg_name => 'OKE_ROW_LOCKED' ,
579: p_token1 => 'SOURCE' ,
580: p_token1_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
573:
574: EXCEPTION
575: WHEN G_RESOURCE_BUSY THEN
576: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
577: OKE_API.set_message(p_app_name => G_APP_NAME ,
578: p_msg_name => 'OKE_ROW_LOCKED' ,
579: p_token1 => 'SOURCE' ,
580: p_token1_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
581: p_token1_translate => OKE_API.G_TRUE ,
577: OKE_API.set_message(p_app_name => G_APP_NAME ,
578: p_msg_name => 'OKE_ROW_LOCKED' ,
579: p_token1 => 'SOURCE' ,
580: p_token1_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
581: p_token1_translate => OKE_API.G_TRUE ,
582: p_token2 => 'ID' ,
583: p_token2_value => p_funding_source_id
584: );
585:
587: CLOSE c_funding_source_id;
588: END IF;
589:
590: WHEN OTHERS THEN
591: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
592: OKE_API.set_message(p_app_name => G_APP_NAME ,
593: p_msg_name => G_UNEXPECTED_ERROR ,
594: p_token1 => G_SQLCODE_TOKEN ,
595: p_token1_value => SQLCODE ,
588: END IF;
589:
590: WHEN OTHERS THEN
591: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
592: OKE_API.set_message(p_app_name => G_APP_NAME ,
593: p_msg_name => G_UNEXPECTED_ERROR ,
594: p_token1 => G_SQLCODE_TOKEN ,
595: p_token1_value => SQLCODE ,
596: p_token2 => G_SQLERRM_TOKEN ,
670: l_line_task NUMBER;
671:
672: BEGIN
673:
674: p_return_status := OKE_API.G_RET_STS_SUCCESS;
675:
676: IF (p_k_line_id is not null) OR
677: (p_k_line_id <> OKE_API.G_MISS_NUM) THEN
678:
673:
674: p_return_status := OKE_API.G_RET_STS_SUCCESS;
675:
676: IF (p_k_line_id is not null) OR
677: (p_k_line_id <> OKE_API.G_MISS_NUM) THEN
678:
679: OPEN c_line_id;
680: FETCH c_line_id into l_dummy_value;
681: CLOSE c_line_id;
681: CLOSE c_line_id;
682:
683: IF (l_dummy_value = '?') THEN
684:
685: OKE_API.set_message(p_app_name => G_APP_NAME ,
686: p_msg_name => 'OKE_API_INVALID_VALUE' ,
687: p_token1 => 'VALUE' ,
688: p_token1_value => 'k_line_id'
689: );
682:
683: IF (l_dummy_value = '?') THEN
684:
685: OKE_API.set_message(p_app_name => G_APP_NAME ,
686: p_msg_name => 'OKE_API_INVALID_VALUE' ,
687: p_token1 => 'VALUE' ,
688: p_token1_value => 'k_line_id'
689: );
690:
687: p_token1 => 'VALUE' ,
688: p_token1_value => 'k_line_id'
689: );
690:
691: p_return_status := OKE_API.G_RET_STS_ERROR;
692:
693: END IF;
694:
695: IF (p_fund_allocation_id is not null) THEN
735:
736: END IF;
737:
738: IF (l_dummy_value = '?') THEN
739: OKE_API.set_message(p_app_name => G_APP_NAME ,
740: p_msg_name => 'OKE_API_INVALID_VALUE' ,
741: p_token1 => 'VALUE' ,
742: p_token1_value => 'k_line_id'
743: );
736: END IF;
737:
738: IF (l_dummy_value = '?') THEN
739: OKE_API.set_message(p_app_name => G_APP_NAME ,
740: p_msg_name => 'OKE_API_INVALID_VALUE' ,
741: p_token1 => 'VALUE' ,
742: p_token1_value => 'k_line_id'
743: );
744:
741: p_token1 => 'VALUE' ,
742: p_token1_value => 'k_line_id'
743: );
744:
745: p_return_status := OKE_API.G_RET_STS_ERROR;
746: END IF;
747: END IF;
748: END IF;
749:
754: END IF;
755:
756: EXCEPTION
757: WHEN OTHERS THEN
758: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
759: OKE_API.set_message(p_app_name => G_APP_NAME ,
760: p_msg_name => G_UNEXPECTED_ERROR ,
761: p_token1 => G_SQLCODE_TOKEN ,
762: p_token1_value => SQLCODE ,
755:
756: EXCEPTION
757: WHEN OTHERS THEN
758: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
759: OKE_API.set_message(p_app_name => G_APP_NAME ,
760: p_msg_name => G_UNEXPECTED_ERROR ,
761: p_token1 => G_SQLCODE_TOKEN ,
762: p_token1_value => SQLCODE ,
763: p_token2 => G_SQLERRM_TOKEN ,
894: l_exist VARCHAR2(1);
895:
896: BEGIN
897:
898: p_return_status := OKE_API.G_RET_STS_SUCCESS;
899:
900: IF (p_project_id is not null) OR
901: (p_project_id <> OKE_API.G_MISS_NUM) THEN
902:
897:
898: p_return_status := OKE_API.G_RET_STS_SUCCESS;
899:
900: IF (p_project_id is not null) OR
901: (p_project_id <> OKE_API.G_MISS_NUM) THEN
902:
903: OPEN c_intent;
904: FETCH c_intent into l_intent;
905: CLOSE c_intent;
911: CLOSE c_project_id;
912:
913: IF (l_dummy_value = '?') THEN
914:
915: OKE_API.set_message(p_app_name => G_APP_NAME ,
916: p_msg_name => 'OKE_API_INVALID_VALUE' ,
917: p_token1 => 'VALUE' ,
918: p_token1_value => 'project_id'
919: );
912:
913: IF (l_dummy_value = '?') THEN
914:
915: OKE_API.set_message(p_app_name => G_APP_NAME ,
916: p_msg_name => 'OKE_API_INVALID_VALUE' ,
917: p_token1 => 'VALUE' ,
918: p_token1_value => 'project_id'
919: );
920:
917: p_token1 => 'VALUE' ,
918: p_token1_value => 'project_id'
919: );
920:
921: p_return_status := OKE_API.G_RET_STS_ERROR;
922: return;
923:
924: END IF;
925:
962: END IF;
963:
964: IF (l_project_id is null) then
965:
966: OKE_API.set_message(p_app_name => G_APP_NAME ,
967: p_msg_name => 'OKE_API_INVALID_VALUE' ,
968: p_token1 => 'VALUE' ,
969: p_token1_value => 'project_id'
970: );
963:
964: IF (l_project_id is null) then
965:
966: OKE_API.set_message(p_app_name => G_APP_NAME ,
967: p_msg_name => 'OKE_API_INVALID_VALUE' ,
968: p_token1 => 'VALUE' ,
969: p_token1_value => 'project_id'
970: );
971:
968: p_token1 => 'VALUE' ,
969: p_token1_value => 'project_id'
970: );
971:
972: p_return_status := OKE_API.G_RET_STS_ERROR;
973:
974: ELSE
975:
976: IF (l_task_id is not null) THEN
988: END IF;
989:
990: IF (l_dummy_value = '?') then
991:
992: OKE_API.set_message(p_app_name => G_APP_NAME ,
993: p_msg_name => 'OKE_API_INVALID_VALUE' ,
994: p_token1 => 'VALUE' ,
995: p_token1_value => 'project_id'
996: );
989:
990: IF (l_dummy_value = '?') then
991:
992: OKE_API.set_message(p_app_name => G_APP_NAME ,
993: p_msg_name => 'OKE_API_INVALID_VALUE' ,
994: p_token1 => 'VALUE' ,
995: p_token1_value => 'project_id'
996: );
997:
994: p_token1 => 'VALUE' ,
995: p_token1_value => 'project_id'
996: );
997:
998: p_return_status := OKE_API.G_RET_STS_ERROR;
999:
1000: END IF;
1001:
1002: END IF;
1004: END IF;
1005:
1006: EXCEPTION
1007: WHEN OTHERS THEN
1008: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1009: OKE_API.set_message(p_app_name => G_APP_NAME ,
1010: p_msg_name => G_UNEXPECTED_ERROR ,
1011: p_token1 => G_SQLCODE_TOKEN ,
1012: p_token1_value => SQLCODE ,
1005:
1006: EXCEPTION
1007: WHEN OTHERS THEN
1008: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1009: OKE_API.set_message(p_app_name => G_APP_NAME ,
1010: p_msg_name => G_UNEXPECTED_ERROR ,
1011: p_token1 => G_SQLCODE_TOKEN ,
1012: p_token1_value => SQLCODE ,
1013: p_token2 => G_SQLERRM_TOKEN ,
1040: l_dummy_value VARCHAR2(1) := '?';
1041:
1042: BEGIN
1043:
1044: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1045:
1046: IF (p_task_id is not null) OR
1047: (p_task_id <> OKE_API.G_MISS_NUM) THEN
1048:
1043:
1044: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1045:
1046: IF (p_task_id is not null) OR
1047: (p_task_id <> OKE_API.G_MISS_NUM) THEN
1048:
1049: OPEN c_task_id;
1050: FETCH c_task_id into l_dummy_value;
1051: CLOSE c_task_id;
1051: CLOSE c_task_id;
1052:
1053: IF (l_dummy_value = '?') THEN
1054:
1055: OKE_API.set_message(p_app_name => G_APP_NAME ,
1056: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1057: p_token1 => 'VALUE' ,
1058: p_token1_value => 'task_id'
1059: );
1052:
1053: IF (l_dummy_value = '?') THEN
1054:
1055: OKE_API.set_message(p_app_name => G_APP_NAME ,
1056: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1057: p_token1 => 'VALUE' ,
1058: p_token1_value => 'task_id'
1059: );
1060:
1057: p_token1 => 'VALUE' ,
1058: p_token1_value => 'task_id'
1059: );
1060:
1061: p_return_status := OKE_API.G_RET_STS_ERROR;
1062:
1063: END IF;
1064:
1065: END IF;
1065: END IF;
1066:
1067: EXCEPTION
1068: WHEN OTHERS THEN
1069: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1070: OKE_API.set_message(p_app_name => G_APP_NAME ,
1071: p_msg_name => G_UNEXPECTED_ERROR ,
1072: p_token1 => G_SQLCODE_TOKEN ,
1073: p_token1_value => SQLCODE ,
1066:
1067: EXCEPTION
1068: WHEN OTHERS THEN
1069: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1070: OKE_API.set_message(p_app_name => G_APP_NAME ,
1071: p_msg_name => G_UNEXPECTED_ERROR ,
1072: p_token1 => G_SQLCODE_TOKEN ,
1073: p_token1_value => SQLCODE ,
1074: p_token2 => G_SQLERRM_TOKEN ,
1103: l_dummy_value VARCHAR2(1) := '?';
1104:
1105: BEGIN
1106:
1107: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1108:
1109: IF (p_fund_type is not null) OR
1110: (p_fund_type <> OKE_API.G_MISS_CHAR) THEN
1111:
1106:
1107: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1108:
1109: IF (p_fund_type is not null) OR
1110: (p_fund_type <> OKE_API.G_MISS_CHAR) THEN
1111:
1112: OPEN c_fund_type;
1113: FETCH c_fund_type into l_dummy_value;
1114: CLOSE c_fund_type;
1114: CLOSE c_fund_type;
1115:
1116: IF (l_dummy_value = '?') THEN
1117:
1118: OKE_API.set_message(p_app_name => G_APP_NAME ,
1119: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1120: p_token1 => 'VALUE' ,
1121: p_token1_value => 'fund_type'
1122: );
1115:
1116: IF (l_dummy_value = '?') THEN
1117:
1118: OKE_API.set_message(p_app_name => G_APP_NAME ,
1119: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1120: p_token1 => 'VALUE' ,
1121: p_token1_value => 'fund_type'
1122: );
1123:
1120: p_token1 => 'VALUE' ,
1121: p_token1_value => 'fund_type'
1122: );
1123:
1124: p_return_status := OKE_API.G_RET_STS_ERROR;
1125:
1126: END IF;
1127:
1128: END IF;
1128: END IF;
1129:
1130: EXCEPTION
1131: WHEN OTHERS THEN
1132: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1133: OKE_API.set_message(p_app_name => G_APP_NAME ,
1134: p_msg_name => G_UNEXPECTED_ERROR ,
1135: p_token1 => G_SQLCODE_TOKEN ,
1136: p_token1_value => SQLCODE ,
1129:
1130: EXCEPTION
1131: WHEN OTHERS THEN
1132: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1133: OKE_API.set_message(p_app_name => G_APP_NAME ,
1134: p_msg_name => G_UNEXPECTED_ERROR ,
1135: p_token1 => G_SQLCODE_TOKEN ,
1136: p_token1_value => SQLCODE ,
1137: p_token2 => G_SQLERRM_TOKEN ,
1166: l_dummy_value VARCHAR2(1) := '?';
1167:
1168: BEGIN
1169:
1170: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1171:
1172: IF (p_funding_status is not null) OR
1173: (p_funding_status <> OKE_API.G_MISS_CHAR) THEN
1174:
1169:
1170: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1171:
1172: IF (p_funding_status is not null) OR
1173: (p_funding_status <> OKE_API.G_MISS_CHAR) THEN
1174:
1175: OPEN c_funding_status;
1176: FETCH c_funding_status into l_dummy_value;
1177: CLOSE c_funding_status;
1177: CLOSE c_funding_status;
1178:
1179: IF (l_dummy_value = '?') THEN
1180:
1181: OKE_API.set_message(p_app_name => G_APP_NAME ,
1182: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1183: p_token1 => 'VALUE' ,
1184: p_token1_value => 'funding_status'
1185: );
1178:
1179: IF (l_dummy_value = '?') THEN
1180:
1181: OKE_API.set_message(p_app_name => G_APP_NAME ,
1182: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1183: p_token1 => 'VALUE' ,
1184: p_token1_value => 'funding_status'
1185: );
1186:
1183: p_token1 => 'VALUE' ,
1184: p_token1_value => 'funding_status'
1185: );
1186:
1187: p_return_status := OKE_API.G_RET_STS_ERROR;
1188:
1189: END IF;
1190:
1191: END IF;
1191: END IF;
1192:
1193: EXCEPTION
1194: WHEN OTHERS THEN
1195: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1196: OKE_API.set_message(p_app_name => G_APP_NAME ,
1197: p_msg_name => G_UNEXPECTED_ERROR ,
1198: p_token1 => G_SQLCODE_TOKEN ,
1199: p_token1_value => SQLCODE ,
1192:
1193: EXCEPTION
1194: WHEN OTHERS THEN
1195: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1196: OKE_API.set_message(p_app_name => G_APP_NAME ,
1197: p_msg_name => G_UNEXPECTED_ERROR ,
1198: p_token1 => G_SQLCODE_TOKEN ,
1199: p_token1_value => SQLCODE ,
1200: p_token2 => G_SQLERRM_TOKEN ,
1227: l_dummy_value VARCHAR2(1) := '?';
1228:
1229: BEGIN
1230:
1231: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1232:
1233: IF (p_funding_category is null) OR
1234: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1235:
1230:
1231: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1232:
1233: IF (p_funding_category is null) OR
1234: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1235:
1236: OKE_API.set_message(p_app_name => G_APP_NAME ,
1237: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1238: p_token1 => 'VALUE' ,
1232:
1233: IF (p_funding_category is null) OR
1234: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1235:
1236: OKE_API.set_message(p_app_name => G_APP_NAME ,
1237: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1238: p_token1 => 'VALUE' ,
1239: p_token1_value => 'funding_category'
1240: );
1233: IF (p_funding_category is null) OR
1234: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1235:
1236: OKE_API.set_message(p_app_name => G_APP_NAME ,
1237: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1238: p_token1 => 'VALUE' ,
1239: p_token1_value => 'funding_category'
1240: );
1241:
1238: p_token1 => 'VALUE' ,
1239: p_token1_value => 'funding_category'
1240: );
1241:
1242: p_return_status := OKE_API.G_RET_STS_ERROR;
1243:
1244: ELSE
1245:
1246: OPEN c_funding_category;
1248: CLOSE c_funding_category;
1249:
1250: IF (l_dummy_value = '?') THEN
1251:
1252: OKE_API.set_message(p_app_name => G_APP_NAME ,
1253: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1254: p_token1 => 'VALUE' ,
1255: p_token1_value => 'funding_category'
1256: );
1249:
1250: IF (l_dummy_value = '?') THEN
1251:
1252: OKE_API.set_message(p_app_name => G_APP_NAME ,
1253: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1254: p_token1 => 'VALUE' ,
1255: p_token1_value => 'funding_category'
1256: );
1257:
1254: p_token1 => 'VALUE' ,
1255: p_token1_value => 'funding_category'
1256: );
1257:
1258: p_return_status := OKE_API.G_RET_STS_ERROR;
1259:
1260: END IF;
1261:
1262: END IF;
1262: END IF;
1263:
1264: EXCEPTION
1265: WHEN OTHERS THEN
1266: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1267: OKE_API.set_message(p_app_name => G_APP_NAME ,
1268: p_msg_name => G_UNEXPECTED_ERROR ,
1269: p_token1 => G_SQLCODE_TOKEN ,
1270: p_token1_value => SQLCODE ,
1263:
1264: EXCEPTION
1265: WHEN OTHERS THEN
1266: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1267: OKE_API.set_message(p_app_name => G_APP_NAME ,
1268: p_msg_name => G_UNEXPECTED_ERROR ,
1269: p_token1 => G_SQLCODE_TOKEN ,
1270: p_token1_value => SQLCODE ,
1271: p_token2 => G_SQLERRM_TOKEN ,
1297: l_dummy_value VARCHAR2(1) := '?';
1298:
1299: BEGIN
1300:
1301: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1302:
1303: IF (p_conversion_type is not null) OR
1304: (p_conversion_type <> OKE_API.G_MISS_CHAR) THEN
1305:
1300:
1301: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1302:
1303: IF (p_conversion_type is not null) OR
1304: (p_conversion_type <> OKE_API.G_MISS_CHAR) THEN
1305:
1306: OPEN c_conversion_type;
1307: FETCH c_conversion_type into l_dummy_value;
1308: CLOSE c_conversion_type;
1308: CLOSE c_conversion_type;
1309:
1310: IF (l_dummy_value = '?') THEN
1311:
1312: OKE_API.set_message(p_app_name => G_APP_NAME ,
1313: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1314: p_token1 => 'VALUE' ,
1315: p_token1_value => 'pa_conversion_type'
1316: );
1309:
1310: IF (l_dummy_value = '?') THEN
1311:
1312: OKE_API.set_message(p_app_name => G_APP_NAME ,
1313: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1314: p_token1 => 'VALUE' ,
1315: p_token1_value => 'pa_conversion_type'
1316: );
1317:
1314: p_token1 => 'VALUE' ,
1315: p_token1_value => 'pa_conversion_type'
1316: );
1317:
1318: p_return_status := OKE_API.G_RET_STS_ERROR;
1319:
1320: END IF;
1321:
1322: END IF;
1322: END IF;
1323:
1324: EXCEPTION
1325: WHEN OTHERS THEN
1326: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1327: OKE_API.set_message(p_app_name => G_APP_NAME ,
1328: p_msg_name => G_UNEXPECTED_ERROR ,
1329: p_token1 => G_SQLCODE_TOKEN ,
1330: p_token1_value => SQLCODE ,
1323:
1324: EXCEPTION
1325: WHEN OTHERS THEN
1326: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1327: OKE_API.set_message(p_app_name => G_APP_NAME ,
1328: p_msg_name => G_UNEXPECTED_ERROR ,
1329: p_token1 => G_SQLCODE_TOKEN ,
1330: p_token1_value => SQLCODE ,
1331: p_token2 => G_SQLERRM_TOKEN ,
1353: BEGIN
1354:
1355: l_allocation_in_rec.fund_allocation_id := null;
1356:
1357: IF l_allocation_in_rec.agreement_id = OKE_API.G_MISS_NUM THEN
1358: l_allocation_in_rec.agreement_id := null;
1359: END IF;
1360:
1361: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1357: IF l_allocation_in_rec.agreement_id = OKE_API.G_MISS_NUM THEN
1358: l_allocation_in_rec.agreement_id := null;
1359: END IF;
1360:
1361: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1362: l_allocation_in_rec.amount := null;
1363: END IF;
1364:
1365: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1361: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1362: l_allocation_in_rec.amount := null;
1363: END IF;
1364:
1365: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1366: l_allocation_in_rec.funding_source_id := null;
1367: END IF;
1368:
1369: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1365: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1366: l_allocation_in_rec.funding_source_id := null;
1367: END IF;
1368:
1369: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1370: l_allocation_in_rec.object_id := null;
1371: END IF;
1372:
1373: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1369: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1370: l_allocation_in_rec.object_id := null;
1371: END IF;
1372:
1373: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1374: l_allocation_in_rec.k_line_id := null;
1375: END IF;
1376:
1377: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1373: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1374: l_allocation_in_rec.k_line_id := null;
1375: END IF;
1376:
1377: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1378: l_allocation_in_rec.project_id := null;
1379: END IF;
1380:
1381: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1377: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1378: l_allocation_in_rec.project_id := null;
1379: END IF;
1380:
1381: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1382: l_allocation_in_rec.task_id := null;
1383: END IF;
1384:
1385: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1381: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1382: l_allocation_in_rec.task_id := null;
1383: END IF;
1384:
1385: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1386: l_allocation_in_rec.fund_type := null;
1387: END IF;
1388:
1389: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1385: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1386: l_allocation_in_rec.fund_type := null;
1387: END IF;
1388:
1389: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1390: l_allocation_in_rec.hard_limit := null;
1391: END IF;
1392:
1393: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1389: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1390: l_allocation_in_rec.hard_limit := null;
1391: END IF;
1392:
1393: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1394: l_allocation_in_rec.funding_status := null;
1395: END IF;
1396:
1397: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1393: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1394: l_allocation_in_rec.funding_status := null;
1395: END IF;
1396:
1397: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1398: l_allocation_in_rec.fiscal_year := null;
1399: END IF;
1400:
1401: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1397: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1398: l_allocation_in_rec.fiscal_year := null;
1399: END IF;
1400:
1401: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1402: l_allocation_in_rec.reference1 := null;
1403: END IF;
1404:
1405: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1401: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1402: l_allocation_in_rec.reference1 := null;
1403: END IF;
1404:
1405: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1406: l_allocation_in_rec.reference2 := null;
1407: END IF;
1408:
1409: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1405: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1406: l_allocation_in_rec.reference2 := null;
1407: END IF;
1408:
1409: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1410: l_allocation_in_rec.reference3 := null;
1411: END IF;
1412:
1413: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1409: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1410: l_allocation_in_rec.reference3 := null;
1411: END IF;
1412:
1413: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1414: l_allocation_in_rec.pa_conversion_type := null;
1415: END IF;
1416:
1417: IF l_allocation_in_rec.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1413: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1414: l_allocation_in_rec.pa_conversion_type := null;
1415: END IF;
1416:
1417: IF l_allocation_in_rec.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1418: l_allocation_in_rec.pa_conversion_date := null;
1419: END IF;
1420:
1421: -- syho, bug 2208979
1418: l_allocation_in_rec.pa_conversion_date := null;
1419: END IF;
1420:
1421: -- syho, bug 2208979
1422: IF l_allocation_in_rec.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1423: l_allocation_in_rec.pa_conversion_rate := null;
1424: END IF;
1425: -- syho, bug 2208979
1426:
1423: l_allocation_in_rec.pa_conversion_rate := null;
1424: END IF;
1425: -- syho, bug 2208979
1426:
1427: IF l_allocation_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
1428: l_allocation_in_rec.start_date_active := null;
1429: END IF;
1430:
1431: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1427: IF l_allocation_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
1428: l_allocation_in_rec.start_date_active := null;
1429: END IF;
1430:
1431: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1432: l_allocation_in_rec.end_date_active := null;
1433: END IF;
1434: /*
1435: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1431: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1432: l_allocation_in_rec.end_date_active := null;
1433: END IF;
1434: /*
1435: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1436: l_allocation_in_rec.oke_desc_flex_name := null;
1437: END IF;
1438: */
1439: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1435: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1436: l_allocation_in_rec.oke_desc_flex_name := null;
1437: END IF;
1438: */
1439: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1440: l_allocation_in_rec.oke_attribute_category := null;
1441: END IF;
1442:
1443: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1439: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1440: l_allocation_in_rec.oke_attribute_category := null;
1441: END IF;
1442:
1443: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1444: l_allocation_in_rec.oke_attribute1 := null;
1445: END IF;
1446:
1447: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1443: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1444: l_allocation_in_rec.oke_attribute1 := null;
1445: END IF;
1446:
1447: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1448: l_allocation_in_rec.oke_attribute2 := null;
1449: END IF;
1450:
1451: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1447: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1448: l_allocation_in_rec.oke_attribute2 := null;
1449: END IF;
1450:
1451: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1452: l_allocation_in_rec.oke_attribute3 := null;
1453: END IF;
1454:
1455: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1451: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1452: l_allocation_in_rec.oke_attribute3 := null;
1453: END IF;
1454:
1455: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1456: l_allocation_in_rec.oke_attribute4 := null;
1457: END IF;
1458:
1459: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1455: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1456: l_allocation_in_rec.oke_attribute4 := null;
1457: END IF;
1458:
1459: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1460: l_allocation_in_rec.oke_attribute5 := null;
1461: END IF;
1462:
1463: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1459: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1460: l_allocation_in_rec.oke_attribute5 := null;
1461: END IF;
1462:
1463: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1464: l_allocation_in_rec.oke_attribute6 := null;
1465: END IF;
1466:
1467: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1463: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1464: l_allocation_in_rec.oke_attribute6 := null;
1465: END IF;
1466:
1467: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1468: l_allocation_in_rec.oke_attribute7 := null;
1469: END IF;
1470:
1471: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1467: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1468: l_allocation_in_rec.oke_attribute7 := null;
1469: END IF;
1470:
1471: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1472: l_allocation_in_rec.oke_attribute8 := null;
1473: END IF;
1474:
1475: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1471: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1472: l_allocation_in_rec.oke_attribute8 := null;
1473: END IF;
1474:
1475: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1476: l_allocation_in_rec.oke_attribute9 := null;
1477: END IF;
1478:
1479: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1475: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1476: l_allocation_in_rec.oke_attribute9 := null;
1477: END IF;
1478:
1479: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1480: l_allocation_in_rec.oke_attribute10 := null;
1481: END IF;
1482:
1483: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1479: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1480: l_allocation_in_rec.oke_attribute10 := null;
1481: END IF;
1482:
1483: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1484: l_allocation_in_rec.oke_attribute11 := null;
1485: END IF;
1486:
1487: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1483: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1484: l_allocation_in_rec.oke_attribute11 := null;
1485: END IF;
1486:
1487: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1488: l_allocation_in_rec.oke_attribute12 := null;
1489: END IF;
1490:
1491: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1487: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1488: l_allocation_in_rec.oke_attribute12 := null;
1489: END IF;
1490:
1491: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1492: l_allocation_in_rec.oke_attribute13 := null;
1493: END IF;
1494:
1495: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1491: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1492: l_allocation_in_rec.oke_attribute13 := null;
1493: END IF;
1494:
1495: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1496: l_allocation_in_rec.oke_attribute14 := null;
1497: END IF;
1498:
1499: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1495: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1496: l_allocation_in_rec.oke_attribute14 := null;
1497: END IF;
1498:
1499: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1500: l_allocation_in_rec.oke_attribute15 := null;
1501: END IF;
1502:
1503: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1499: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1500: l_allocation_in_rec.oke_attribute15 := null;
1501: END IF;
1502:
1503: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1504: l_allocation_in_rec.revenue_hard_limit := null;
1505: END IF;
1506:
1507: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1503: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1504: l_allocation_in_rec.revenue_hard_limit := null;
1505: END IF;
1506:
1507: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1508: l_allocation_in_rec.pa_attribute_category := null;
1509: END IF;
1510:
1511: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1507: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1508: l_allocation_in_rec.pa_attribute_category := null;
1509: END IF;
1510:
1511: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1512: l_allocation_in_rec.pa_attribute1 := null;
1513: END IF;
1514:
1515: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1511: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1512: l_allocation_in_rec.pa_attribute1 := null;
1513: END IF;
1514:
1515: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1516: l_allocation_in_rec.pa_attribute2 := null;
1517: END IF;
1518:
1519: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1515: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1516: l_allocation_in_rec.pa_attribute2 := null;
1517: END IF;
1518:
1519: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1520: l_allocation_in_rec.pa_attribute3 := null;
1521: END IF;
1522:
1523: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1519: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1520: l_allocation_in_rec.pa_attribute3 := null;
1521: END IF;
1522:
1523: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1524: l_allocation_in_rec.pa_attribute4 := null;
1525: END IF;
1526:
1527: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1523: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1524: l_allocation_in_rec.pa_attribute4 := null;
1525: END IF;
1526:
1527: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1528: l_allocation_in_rec.pa_attribute5 := null;
1529: END IF;
1530:
1531: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1527: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1528: l_allocation_in_rec.pa_attribute5 := null;
1529: END IF;
1530:
1531: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1532: l_allocation_in_rec.pa_attribute6 := null;
1533: END IF;
1534:
1535: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1531: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1532: l_allocation_in_rec.pa_attribute6 := null;
1533: END IF;
1534:
1535: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1536: l_allocation_in_rec.pa_attribute7 := null;
1537: END IF;
1538:
1539: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1535: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1536: l_allocation_in_rec.pa_attribute7 := null;
1537: END IF;
1538:
1539: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1540: l_allocation_in_rec.pa_attribute8 := null;
1541: END IF;
1542:
1543: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1539: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1540: l_allocation_in_rec.pa_attribute8 := null;
1541: END IF;
1542:
1543: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1544: l_allocation_in_rec.pa_attribute9 := null;
1545: END IF;
1546:
1547: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1543: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1544: l_allocation_in_rec.pa_attribute9 := null;
1545: END IF;
1546:
1547: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1548: l_allocation_in_rec.pa_attribute10 := null;
1549: END IF;
1550:
1551: IF l_allocation_in_rec.funding_category = OKE_API.G_MISS_CHAR THEN
1547: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1548: l_allocation_in_rec.pa_attribute10 := null;
1549: END IF;
1550:
1551: IF l_allocation_in_rec.funding_category = OKE_API.G_MISS_CHAR THEN
1552: l_allocation_in_rec.funding_category := null;
1553: END IF;
1554:
1555: return(l_allocation_in_rec);
1598: OPEN c_allocation_row;
1599: FETCH c_allocation_row into l_allocation_row;
1600: CLOSE c_allocation_row;
1601:
1602: IF p_allocation_in_rec_out.agreement_id = OKE_API.G_MISS_NUM THEN
1603: p_allocation_in_rec_out.agreement_id := null;
1604: END IF;
1605:
1606: IF (p_allocation_in_rec_out.funding_source_id = OKE_API.G_MISS_NUM) THEN
1602: IF p_allocation_in_rec_out.agreement_id = OKE_API.G_MISS_NUM THEN
1603: p_allocation_in_rec_out.agreement_id := null;
1604: END IF;
1605:
1606: IF (p_allocation_in_rec_out.funding_source_id = OKE_API.G_MISS_NUM) THEN
1607: p_allocation_in_rec_out.funding_source_id := l_allocation_row.funding_source_id;
1608:
1609: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1610:
1607: p_allocation_in_rec_out.funding_source_id := l_allocation_row.funding_source_id;
1608:
1609: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1610:
1611: OKE_API.set_message(p_app_name => G_APP_NAME ,
1612: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1613: p_token1 => 'VALUE' ,
1614: p_token1_value => 'funding_source_id'
1615: );
1608:
1609: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1610:
1611: OKE_API.set_message(p_app_name => G_APP_NAME ,
1612: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1613: p_token1 => 'VALUE' ,
1614: p_token1_value => 'funding_source_id'
1615: );
1616:
1617: RAISE G_EXCEPTION_HALT_VALIDATION;
1618:
1619: END IF;
1620:
1621: IF (p_allocation_in_rec_out.object_id = OKE_API.G_MISS_NUM) THEN
1622: p_allocation_in_rec_out.object_id := l_allocation_row.object_id;
1623:
1624: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1625:
1622: p_allocation_in_rec_out.object_id := l_allocation_row.object_id;
1623:
1624: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1625:
1626: OKE_API.set_message(p_app_name => G_APP_NAME ,
1627: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1628: p_token1 => 'VALUE' ,
1629: p_token1_value => 'object_id'
1630: );
1623:
1624: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1625:
1626: OKE_API.set_message(p_app_name => G_APP_NAME ,
1627: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1628: p_token1 => 'VALUE' ,
1629: p_token1_value => 'object_id'
1630: );
1631:
1632: RAISE G_EXCEPTION_HALT_VALIDATION;
1633:
1634: END IF;
1635:
1636: IF (p_allocation_in_rec_out.k_line_id = OKE_API.G_MISS_NUM) THEN
1637: p_allocation_in_rec_out.k_line_id := l_allocation_row.k_line_id;
1638: END IF;
1639:
1640: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1636: IF (p_allocation_in_rec_out.k_line_id = OKE_API.G_MISS_NUM) THEN
1637: p_allocation_in_rec_out.k_line_id := l_allocation_row.k_line_id;
1638: END IF;
1639:
1640: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1641: p_allocation_in_rec_out.pa_conversion_date := l_allocation_row.pa_conversion_date;
1642: END IF;
1643:
1644: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1640: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1641: p_allocation_in_rec_out.pa_conversion_date := l_allocation_row.pa_conversion_date;
1642: END IF;
1643:
1644: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1645: p_allocation_in_rec_out.pa_conversion_type := l_allocation_row.pa_conversion_type;
1646: END IF;
1647:
1648: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1644: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1645: p_allocation_in_rec_out.pa_conversion_type := l_allocation_row.pa_conversion_type;
1646: END IF;
1647:
1648: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1649: p_allocation_in_rec_out.pa_conversion_rate := l_allocation_row.pa_conversion_rate;
1650: END IF;
1651:
1652: IF (p_allocation_in_rec_out.project_id = OKE_API.G_MISS_NUM) THEN
1648: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1649: p_allocation_in_rec_out.pa_conversion_rate := l_allocation_row.pa_conversion_rate;
1650: END IF;
1651:
1652: IF (p_allocation_in_rec_out.project_id = OKE_API.G_MISS_NUM) THEN
1653: p_allocation_in_rec_out.project_id := l_allocation_row.project_id;
1654: END IF;
1655:
1656: IF (nvl(p_allocation_in_rec_out.project_id, -99) <> nvl(l_allocation_row.project_id, -99)) THEN
1674: p_flag := 'N';
1675:
1676: END IF;
1677:
1678: IF (p_allocation_in_rec_out.task_id = OKE_API.G_MISS_NUM) THEN
1679: p_allocation_in_rec_out.task_id := l_allocation_row.task_id;
1680: END IF;
1681:
1682: --
1686: IF (nvl(p_allocation_in_rec_out.task_id, -99) <> nvl(l_allocation_row.task_id, -99)) AND
1687: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1688: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1689:
1690: OKE_API.set_message(p_app_name => G_APP_NAME ,
1691: p_msg_name => 'OKE_API_NO_UPDATE' ,
1692: p_token1 => 'VALUE' ,
1693: p_token1_value => 'task_id'
1694: );
1687: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1688: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1689:
1690: OKE_API.set_message(p_app_name => G_APP_NAME ,
1691: p_msg_name => 'OKE_API_NO_UPDATE' ,
1692: p_token1 => 'VALUE' ,
1693: p_token1_value => 'task_id'
1694: );
1695:
1701: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1702: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1703:
1704:
1705: OKE_API.set_message(p_app_name => G_APP_NAME ,
1706: p_msg_name => 'OKE_API_NO_UPDATE' ,
1707: p_token1 => 'VALUE' ,
1708: p_token1_value => 'project_id'
1709: );
1702: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1703:
1704:
1705: OKE_API.set_message(p_app_name => G_APP_NAME ,
1706: p_msg_name => 'OKE_API_NO_UPDATE' ,
1707: p_token1 => 'VALUE' ,
1708: p_token1_value => 'project_id'
1709: );
1710:
1715: IF (nvl(p_allocation_in_rec_out.k_line_id, -99) <> nvl(l_allocation_row.k_line_id, -99)) AND
1716: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1717: ((nvl(l_allocation_row.agreement_version, 0) <> 0) AND (nvl(l_allocation_row.pa_flag, 'N') = 'N'))) THEN
1718:
1719: OKE_API.set_message(p_app_name => G_APP_NAME ,
1720: p_msg_name => 'OKE_API_NO_UPDATE' ,
1721: p_token1 => 'VALUE' ,
1722: p_token1_value => 'k_line_id'
1723: );
1716: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1717: ((nvl(l_allocation_row.agreement_version, 0) <> 0) AND (nvl(l_allocation_row.pa_flag, 'N') = 'N'))) THEN
1718:
1719: OKE_API.set_message(p_app_name => G_APP_NAME ,
1720: p_msg_name => 'OKE_API_NO_UPDATE' ,
1721: p_token1 => 'VALUE' ,
1722: p_token1_value => 'k_line_id'
1723: );
1724:
1725: RAISE G_EXCEPTION_HALT_VALIDATION;
1726:
1727: END IF;
1728:
1729: IF p_allocation_in_rec_out.start_date_active = OKE_API.G_MISS_DATE THEN
1730: p_allocation_in_rec_out.start_date_active := l_allocation_row.start_date_active;
1731: END IF;
1732:
1733: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1732:
1733: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1734: (nvl(to_char(p_allocation_in_rec_out.start_date_active, 'YYYYMMDD'), '19000101') <> nvl(to_char(l_allocation_row.start_date_active, 'YYYYMMDD'), '19000101')) THEN
1735:
1736: OKE_API.set_message(p_app_name => G_APP_NAME ,
1737: p_msg_name => 'OKE_API_NO_UPDATE' ,
1738: p_token1 => 'VALUE' ,
1739: p_token1_value => 'start_date_active'
1740: );
1733: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1734: (nvl(to_char(p_allocation_in_rec_out.start_date_active, 'YYYYMMDD'), '19000101') <> nvl(to_char(l_allocation_row.start_date_active, 'YYYYMMDD'), '19000101')) THEN
1735:
1736: OKE_API.set_message(p_app_name => G_APP_NAME ,
1737: p_msg_name => 'OKE_API_NO_UPDATE' ,
1738: p_token1 => 'VALUE' ,
1739: p_token1_value => 'start_date_active'
1740: );
1741:
1742: RAISE G_EXCEPTION_HALT_VALIDATION;
1743:
1744: END IF;
1745:
1746: IF (p_allocation_in_rec_out.amount = OKE_API.G_MISS_NUM) THEN
1747: p_allocation_in_rec_out.amount := l_allocation_row.amount;
1748: END IF;
1749:
1750: --
1768: END IF;
1769:
1770: IF (l_error_value is not null) THEN
1771:
1772: OKE_API.set_message(p_app_name => G_APP_NAME ,
1773: p_msg_name => 'OKE_NO_FUND_CHANGE' ,
1774: p_token1 => 'FIELD' ,
1775: p_token1_value => l_error_value
1776: );
1780: END IF;
1781:
1782: END IF;
1783: */
1784: IF p_allocation_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
1785: p_allocation_in_rec_out.funding_status := l_allocation_row.funding_status;
1786: END IF;
1787:
1788: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1784: IF p_allocation_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
1785: p_allocation_in_rec_out.funding_status := l_allocation_row.funding_status;
1786: END IF;
1787:
1788: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1789: p_allocation_in_rec_out.fund_type := l_allocation_row.fund_type;
1790: END IF;
1791:
1792: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1788: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1789: p_allocation_in_rec_out.fund_type := l_allocation_row.fund_type;
1790: END IF;
1791:
1792: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1793: p_allocation_in_rec_out.end_date_active := l_allocation_row.end_date_active;
1794: END IF;
1795:
1796: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1792: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1793: p_allocation_in_rec_out.end_date_active := l_allocation_row.end_date_active;
1794: END IF;
1795:
1796: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1797: p_allocation_in_rec_out.fiscal_year := l_allocation_row.fiscal_year;
1798: END IF;
1799:
1800: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1796: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1797: p_allocation_in_rec_out.fiscal_year := l_allocation_row.fiscal_year;
1798: END IF;
1799:
1800: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1801: p_allocation_in_rec_out.hard_limit := l_allocation_row.hard_limit;
1802: END IF;
1803:
1804: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1800: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1801: p_allocation_in_rec_out.hard_limit := l_allocation_row.hard_limit;
1802: END IF;
1803:
1804: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1805: p_allocation_in_rec_out.reference1 := l_allocation_row.reference1;
1806: END IF;
1807:
1808: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1804: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1805: p_allocation_in_rec_out.reference1 := l_allocation_row.reference1;
1806: END IF;
1807:
1808: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1809: p_allocation_in_rec_out.reference2 := l_allocation_row.reference2;
1810: END IF;
1811:
1812: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1808: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1809: p_allocation_in_rec_out.reference2 := l_allocation_row.reference2;
1810: END IF;
1811:
1812: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1813: p_allocation_in_rec_out.reference3 := l_allocation_row.reference3;
1814: END IF;
1815:
1816: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1812: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1813: p_allocation_in_rec_out.reference3 := l_allocation_row.reference3;
1814: END IF;
1815:
1816: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1817: p_allocation_in_rec_out.oke_attribute_category := l_allocation_row.attribute_category;
1818: END IF;
1819:
1820: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1816: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1817: p_allocation_in_rec_out.oke_attribute_category := l_allocation_row.attribute_category;
1818: END IF;
1819:
1820: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1821: p_allocation_in_rec_out.oke_attribute1 := l_allocation_row.attribute1;
1822: END IF;
1823:
1824: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1820: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1821: p_allocation_in_rec_out.oke_attribute1 := l_allocation_row.attribute1;
1822: END IF;
1823:
1824: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1825: p_allocation_in_rec_out.oke_attribute2 := l_allocation_row.attribute2;
1826: END IF;
1827:
1828: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1824: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1825: p_allocation_in_rec_out.oke_attribute2 := l_allocation_row.attribute2;
1826: END IF;
1827:
1828: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1829: p_allocation_in_rec_out.oke_attribute3 := l_allocation_row.attribute3;
1830: END IF;
1831:
1832: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1828: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1829: p_allocation_in_rec_out.oke_attribute3 := l_allocation_row.attribute3;
1830: END IF;
1831:
1832: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1833: p_allocation_in_rec_out.oke_attribute4 := l_allocation_row.attribute4;
1834: END IF;
1835:
1836: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1832: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1833: p_allocation_in_rec_out.oke_attribute4 := l_allocation_row.attribute4;
1834: END IF;
1835:
1836: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1837: p_allocation_in_rec_out.oke_attribute5 := l_allocation_row.attribute5;
1838: END IF;
1839:
1840: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1836: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1837: p_allocation_in_rec_out.oke_attribute5 := l_allocation_row.attribute5;
1838: END IF;
1839:
1840: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1841: p_allocation_in_rec_out.oke_attribute6 := l_allocation_row.attribute6;
1842: END IF;
1843:
1844: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1840: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1841: p_allocation_in_rec_out.oke_attribute6 := l_allocation_row.attribute6;
1842: END IF;
1843:
1844: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1845: p_allocation_in_rec_out.oke_attribute7 := l_allocation_row.attribute7;
1846: END IF;
1847:
1848: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1844: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1845: p_allocation_in_rec_out.oke_attribute7 := l_allocation_row.attribute7;
1846: END IF;
1847:
1848: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1849: p_allocation_in_rec_out.oke_attribute8 := l_allocation_row.attribute8;
1850: END IF;
1851:
1852: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1848: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1849: p_allocation_in_rec_out.oke_attribute8 := l_allocation_row.attribute8;
1850: END IF;
1851:
1852: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1853: p_allocation_in_rec_out.oke_attribute9 := l_allocation_row.attribute9;
1854: END IF;
1855:
1856: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1852: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1853: p_allocation_in_rec_out.oke_attribute9 := l_allocation_row.attribute9;
1854: END IF;
1855:
1856: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1857: p_allocation_in_rec_out.oke_attribute10 := l_allocation_row.attribute10;
1858: END IF;
1859:
1860: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1856: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1857: p_allocation_in_rec_out.oke_attribute10 := l_allocation_row.attribute10;
1858: END IF;
1859:
1860: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1861: p_allocation_in_rec_out.oke_attribute11 := l_allocation_row.attribute11;
1862: END IF;
1863:
1864: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1860: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1861: p_allocation_in_rec_out.oke_attribute11 := l_allocation_row.attribute11;
1862: END IF;
1863:
1864: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1865: p_allocation_in_rec_out.oke_attribute12 := l_allocation_row.attribute12;
1866: END IF;
1867:
1868: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1864: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1865: p_allocation_in_rec_out.oke_attribute12 := l_allocation_row.attribute12;
1866: END IF;
1867:
1868: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1869: p_allocation_in_rec_out.oke_attribute13 := l_allocation_row.attribute13;
1870: END IF;
1871:
1872: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1868: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1869: p_allocation_in_rec_out.oke_attribute13 := l_allocation_row.attribute13;
1870: END IF;
1871:
1872: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1873: p_allocation_in_rec_out.oke_attribute14 := l_allocation_row.attribute14;
1874: END IF;
1875:
1876: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1872: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1873: p_allocation_in_rec_out.oke_attribute14 := l_allocation_row.attribute14;
1874: END IF;
1875:
1876: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1877: p_allocation_in_rec_out.oke_attribute15 := l_allocation_row.attribute15;
1878: END IF;
1879:
1880: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1876: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1877: p_allocation_in_rec_out.oke_attribute15 := l_allocation_row.attribute15;
1878: END IF;
1879:
1880: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1881: p_allocation_in_rec_out.revenue_hard_limit := l_allocation_row.revenue_hard_limit;
1882: END IF;
1883:
1884: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1880: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1881: p_allocation_in_rec_out.revenue_hard_limit := l_allocation_row.revenue_hard_limit;
1882: END IF;
1883:
1884: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1885: p_allocation_in_rec_out.pa_attribute_category := l_allocation_row.pa_attribute_category;
1886: END IF;
1887:
1888: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1884: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1885: p_allocation_in_rec_out.pa_attribute_category := l_allocation_row.pa_attribute_category;
1886: END IF;
1887:
1888: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1889: p_allocation_in_rec_out.pa_attribute1 := l_allocation_row.pa_attribute1;
1890: END IF;
1891:
1892: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1888: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1889: p_allocation_in_rec_out.pa_attribute1 := l_allocation_row.pa_attribute1;
1890: END IF;
1891:
1892: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1893: p_allocation_in_rec_out.pa_attribute2 := l_allocation_row.pa_attribute2;
1894: END IF;
1895:
1896: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1892: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1893: p_allocation_in_rec_out.pa_attribute2 := l_allocation_row.pa_attribute2;
1894: END IF;
1895:
1896: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1897: p_allocation_in_rec_out.pa_attribute3 := l_allocation_row.pa_attribute3;
1898: END IF;
1899:
1900: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1896: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1897: p_allocation_in_rec_out.pa_attribute3 := l_allocation_row.pa_attribute3;
1898: END IF;
1899:
1900: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1901: p_allocation_in_rec_out.pa_attribute4 := l_allocation_row.pa_attribute4;
1902: END IF;
1903:
1904: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1900: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1901: p_allocation_in_rec_out.pa_attribute4 := l_allocation_row.pa_attribute4;
1902: END IF;
1903:
1904: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1905: p_allocation_in_rec_out.pa_attribute5 := l_allocation_row.pa_attribute5;
1906: END IF;
1907:
1908: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1904: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1905: p_allocation_in_rec_out.pa_attribute5 := l_allocation_row.pa_attribute5;
1906: END IF;
1907:
1908: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1909: p_allocation_in_rec_out.pa_attribute6 := l_allocation_row.pa_attribute6;
1910: END IF;
1911:
1912: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1908: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1909: p_allocation_in_rec_out.pa_attribute6 := l_allocation_row.pa_attribute6;
1910: END IF;
1911:
1912: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1913: p_allocation_in_rec_out.pa_attribute7 := l_allocation_row.pa_attribute7;
1914: END IF;
1915:
1916: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1912: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1913: p_allocation_in_rec_out.pa_attribute7 := l_allocation_row.pa_attribute7;
1914: END IF;
1915:
1916: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1917: p_allocation_in_rec_out.pa_attribute8 := l_allocation_row.pa_attribute8;
1918: END IF;
1919:
1920: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1916: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1917: p_allocation_in_rec_out.pa_attribute8 := l_allocation_row.pa_attribute8;
1918: END IF;
1919:
1920: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1921: p_allocation_in_rec_out.pa_attribute9 := l_allocation_row.pa_attribute9;
1922: END IF;
1923:
1924: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1920: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1921: p_allocation_in_rec_out.pa_attribute9 := l_allocation_row.pa_attribute9;
1922: END IF;
1923:
1924: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1925: p_allocation_in_rec_out.pa_attribute10 := l_allocation_row.pa_attribute10;
1926: END IF;
1927:
1928: IF p_allocation_in_rec_out.funding_category = OKE_API.G_MISS_CHAR THEN
1924: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1925: p_allocation_in_rec_out.pa_attribute10 := l_allocation_row.pa_attribute10;
1926: END IF;
1927:
1928: IF p_allocation_in_rec_out.funding_category = OKE_API.G_MISS_CHAR THEN
1929: p_allocation_in_rec_out.funding_category := l_allocation_row.funding_category;
1930: END IF;
1931:
1932: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1931:
1932: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1933: (nvl(p_allocation_in_rec_out.funding_category, '-99') <> l_allocation_row.funding_category) THEN
1934:
1935: OKE_API.set_message(p_app_name => G_APP_NAME ,
1936: p_msg_name => 'OKE_API_NO_UPDATE' ,
1937: p_token1 => 'VALUE' ,
1938: p_token1_value => 'funding_category'
1939: );
1932: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1933: (nvl(p_allocation_in_rec_out.funding_category, '-99') <> l_allocation_row.funding_category) THEN
1934:
1935: OKE_API.set_message(p_app_name => G_APP_NAME ,
1936: p_msg_name => 'OKE_API_NO_UPDATE' ,
1937: p_token1 => 'VALUE' ,
1938: p_token1_value => 'funding_category'
1939: );
1940:
1966: validate_funding_source_id(p_funding_source_id => p_allocation_in_rec.funding_source_id ,
1967: p_return_status => l_return_status
1968: );
1969:
1970: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1971:
1972: RAISE G_EXCEPTION_HALT_VALIDATION;
1973:
1974: END IF;
1981: p_funding_source_id => p_allocation_in_rec.funding_source_id ,
1982: p_return_status => l_return_status
1983: );
1984:
1985: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1986:
1987: RAISE G_EXCEPTION_HALT_VALIDATION;
1988:
1989: END IF;
1995: validate_amount(p_amount => p_allocation_in_rec.amount ,
1996: p_return_status => l_return_status
1997: );
1998:
1999: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2000:
2001: RAISE G_EXCEPTION_HALT_VALIDATION;
2002:
2003: END IF;
2011: p_fund_allocation_id => p_allocation_in_rec.fund_allocation_id ,
2012: p_return_status => l_return_status
2013: );
2014:
2015: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2016:
2017: RAISE G_EXCEPTION_HALT_VALIDATION;
2018:
2019: END IF;
2028: p_object_id => p_allocation_in_rec.object_id ,
2029: p_return_status => l_return_status
2030: );
2031:
2032: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2033:
2034: RAISE G_EXCEPTION_HALT_VALIDATION;
2035:
2036: END IF;
2042: validate_task_id(p_task_id => p_allocation_in_rec.task_id ,
2043: p_return_status => l_return_status
2044: );
2045:
2046: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2047:
2048: RAISE G_EXCEPTION_HALT_VALIDATION;
2049:
2050: END IF;
2056: validate_fund_type(p_fund_type => p_allocation_in_rec.fund_type ,
2057: p_return_status => l_return_status
2058: );
2059:
2060: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2061:
2062: RAISE G_EXCEPTION_HALT_VALIDATION;
2063:
2064: END IF;
2070: validate_funding_status(p_funding_status => p_allocation_in_rec.funding_status ,
2071: p_return_status => l_return_status
2072: );
2073:
2074: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2075:
2076: RAISE G_EXCEPTION_HALT_VALIDATION;
2077:
2078: END IF;
2081: validate_conversion_type(p_conversion_type => p_allocation_in_rec.pa_conversion_type ,
2082: p_return_status => l_return_status
2083: );
2084:
2085: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2086:
2087: RAISE G_EXCEPTION_HALT_VALIDATION;
2088:
2089: END IF;
2095: validate_funding_category(p_funding_category => p_allocation_in_rec.funding_category ,
2096: p_return_status => l_return_status
2097: );
2098:
2099: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2100:
2101: RAISE G_EXCEPTION_HALT_VALIDATION;
2102:
2103: END IF;
2135: );
2136:
2137: IF (l_return_status = 'N') THEN
2138:
2139: OKE_API.set_message(p_app_name => 'OKE' ,
2140: p_msg_name => 'OKE_INVALID_EFFDATE_PAIR'
2141: );
2142:
2143: RAISE G_EXCEPTION_HALT_VALIDATION;
2147: --
2148: -- Validate if date range within source date range
2149: --
2150:
2151: IF (p_validation_flag = OKE_API.G_TRUE) THEN
2152:
2153: -- Start date
2154: -- bug 3345170
2155: /*
2161: );
2162:
2163: IF (l_return_status = 'N') THEN
2164:
2165: OKE_API.set_message(p_app_name => G_APP_NAME ,
2166: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2167: p_token1 => 'EFFECTIVE_DATE' ,
2168: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2169: p_token1_translate => OKE_API.G_TRUE ,
2165: OKE_API.set_message(p_app_name => G_APP_NAME ,
2166: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2167: p_token1 => 'EFFECTIVE_DATE' ,
2168: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2169: p_token1_translate => OKE_API.G_TRUE ,
2170: p_token2 => 'OPERATOR' ,
2171: p_token2_value => 'OKE_GREATER_PROMPT' ,
2172: p_token2_translate => OKE_API.G_TRUE ,
2173: p_token3 => 'DATE_SOURCE' ,
2168: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2169: p_token1_translate => OKE_API.G_TRUE ,
2170: p_token2 => 'OPERATOR' ,
2171: p_token2_value => 'OKE_GREATER_PROMPT' ,
2172: p_token2_translate => OKE_API.G_TRUE ,
2173: p_token3 => 'DATE_SOURCE' ,
2174: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2175: p_token3_translate => OKE_API.G_TRUE
2176: );
2171: p_token2_value => 'OKE_GREATER_PROMPT' ,
2172: p_token2_translate => OKE_API.G_TRUE ,
2173: p_token3 => 'DATE_SOURCE' ,
2174: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2175: p_token3_translate => OKE_API.G_TRUE
2176: );
2177:
2178: RAISE G_EXCEPTION_HALT_VALIDATION;
2179:
2189: );
2190:
2191: IF (l_return_status = 'N') THEN
2192:
2193: OKE_API.set_message(p_app_name => G_APP_NAME ,
2194: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2195: p_token1 => 'EFFECTIVE_DATE' ,
2196: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2197: p_token1_translate => OKE_API.G_TRUE ,
2193: OKE_API.set_message(p_app_name => G_APP_NAME ,
2194: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2195: p_token1 => 'EFFECTIVE_DATE' ,
2196: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2197: p_token1_translate => OKE_API.G_TRUE ,
2198: p_token2 => 'OPERATOR' ,
2199: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2200: p_token2_translate => OKE_API.G_TRUE ,
2201: p_token3 => 'DATE_SOURCE' ,
2196: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2197: p_token1_translate => OKE_API.G_TRUE ,
2198: p_token2 => 'OPERATOR' ,
2199: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2200: p_token2_translate => OKE_API.G_TRUE ,
2201: p_token3 => 'DATE_SOURCE' ,
2202: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2203: p_token3_translate => OKE_API.G_TRUE
2204: );
2199: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2200: p_token2_translate => OKE_API.G_TRUE ,
2201: p_token3 => 'DATE_SOURCE' ,
2202: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2203: p_token3_translate => OKE_API.G_TRUE
2204: );
2205:
2206: RAISE G_EXCEPTION_HALT_VALIDATION;
2207:
2222: );
2223:
2224: IF (l_return_status = 'N') THEN
2225:
2226: OKE_API.set_message(p_app_name => 'OKE' ,
2227: p_msg_name => 'OKE_FUND_AMT_EXCEED'
2228: );
2229:
2230: RAISE G_EXCEPTION_HALT_VALIDATION;
2230: RAISE G_EXCEPTION_HALT_VALIDATION;
2231:
2232: ELSIF (l_return_status = 'E') THEN
2233:
2234: OKE_API.set_message(p_app_name => 'OKE' ,
2235: p_msg_name => 'OKE_NEGATIVE_ALLOCATION_SUM'
2236: );
2237:
2238: RAISE G_EXCEPTION_HALT_VALIDATION;
2258: IF (l_return_status = 'N') THEN
2259:
2260: IF (l_type = 'INVOICE') THEN
2261:
2262: OKE_API.set_message(p_app_name => 'OKE' ,
2263: p_msg_name => 'OKE_HARD_LIMIT_EXCEED'
2264: );
2265:
2266: ELSE
2264: );
2265:
2266: ELSE
2267:
2268: OKE_API.set_message(p_app_name => 'OKE' ,
2269: p_msg_name => 'OKE_REV_LIMIT_EXCEED'
2270: );
2271:
2272: END IF;
2276: ELSIF (l_return_status = 'E') THEN
2277:
2278: IF (l_type = 'INVOICE') THEN
2279:
2280: OKE_API.set_message(p_app_name => 'OKE' ,
2281: p_msg_name => 'OKE_NEGATIVE_HARD_LIMIT_SUM'
2282: );
2283:
2284: ELSE
2282: );
2283:
2284: ELSE
2285:
2286: OKE_API.set_message(p_app_name => 'OKE' ,
2287: p_msg_name => 'OKE_NEGATIVE_REV_LIMIT_SUM'
2288: );
2289:
2290: END IF;
2325: IF (l_source_currency = l_projfunc_currency) THEN
2326:
2327: IF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2328:
2329: OKE_API.set_message(p_app_name => 'OKE' ,
2330: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2331: p_token1 => 'VALUE' ,
2332: p_token1_value => 'pa_conversion_type'
2333: );
2326:
2327: IF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2328:
2329: OKE_API.set_message(p_app_name => 'OKE' ,
2330: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2331: p_token1 => 'VALUE' ,
2332: p_token1_value => 'pa_conversion_type'
2333: );
2334:
2335: RAISE G_EXCEPTION_HALT_VALIDATION;
2336:
2337: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2338:
2339: OKE_API.set_message(p_app_name => 'OKE' ,
2340: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2341: p_token1 => 'VALUE' ,
2342: p_token1_value => 'pa_conversion_date'
2343: );
2336:
2337: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2338:
2339: OKE_API.set_message(p_app_name => 'OKE' ,
2340: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2341: p_token1 => 'VALUE' ,
2342: p_token1_value => 'pa_conversion_date'
2343: );
2344:
2345: RAISE G_EXCEPTION_HALT_VALIDATION;
2346:
2347: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2348:
2349: OKE_API.set_message(p_app_name => 'OKE' ,
2350: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2351: p_token1 => 'VALUE' ,
2352: p_token1_value => 'pa_conversion_rate'
2353: );
2346:
2347: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2348:
2349: OKE_API.set_message(p_app_name => 'OKE' ,
2350: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2351: p_token1 => 'VALUE' ,
2352: p_token1_value => 'pa_conversion_rate'
2353: );
2354:
2374: );
2375:
2376: IF (l_return_status = 'N') THEN
2377:
2378: OKE_API.set_message(p_app_name => G_APP_NAME ,
2379: p_msg_name => 'OKE_FUND_NO_RATE'
2380: );
2381:
2382: RAISE G_EXCEPTION_HALT_VALIDATION;
2386: END IF;
2387:
2388: ELSIF (nvl(p_flag, 'N') = 'Y') THEN
2389:
2390: OKE_API.set_message(p_app_name => 'OKE' ,
2391: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2392: p_token1 => 'VALUE' ,
2393: p_token1_value => 'pa_conversion_rate'
2394: );
2387:
2388: ELSIF (nvl(p_flag, 'N') = 'Y') THEN
2389:
2390: OKE_API.set_message(p_app_name => 'OKE' ,
2391: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2392: p_token1 => 'VALUE' ,
2393: p_token1_value => 'pa_conversion_rate'
2394: );
2395:
2402: ELSIF (nvl(upper(p_allocation_in_rec.pa_conversion_type), '-99') <> 'USER') THEN
2403:
2404: IF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2405:
2406: OKE_API.set_message(p_app_name => 'OKE' ,
2407: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2408: p_token1 => 'VALUE' ,
2409: p_token1_value => 'pa_conversion_rate'
2410: );
2403:
2404: IF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2405:
2406: OKE_API.set_message(p_app_name => 'OKE' ,
2407: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2408: p_token1 => 'VALUE' ,
2409: p_token1_value => 'pa_conversion_rate'
2410: );
2411:
2416: END IF;
2417:
2418: ELSIF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2419:
2420: OKE_API.set_message(p_app_name => 'OKE' ,
2421: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2422: p_token1 => 'VALUE' ,
2423: p_token1_value => 'pa_conversion_type'
2424: );
2417:
2418: ELSIF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2419:
2420: OKE_API.set_message(p_app_name => 'OKE' ,
2421: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2422: p_token1 => 'VALUE' ,
2423: p_token1_value => 'pa_conversion_type'
2424: );
2425:
2426: RAISE G_EXCEPTION_HALT_VALIDATION;
2427:
2428: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2429:
2430: OKE_API.set_message(p_app_name => 'OKE' ,
2431: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2432: p_token1 => 'VALUE' ,
2433: p_token1_value => 'pa_conversion_date'
2434: );
2427:
2428: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2429:
2430: OKE_API.set_message(p_app_name => 'OKE' ,
2431: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2432: p_token1 => 'VALUE' ,
2433: p_token1_value => 'pa_conversion_date'
2434: );
2435:
2436: RAISE G_EXCEPTION_HALT_VALIDATION;
2437:
2438: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2439:
2440: OKE_API.set_message(p_app_name => 'OKE' ,
2441: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2442: p_token1 => 'VALUE' ,
2443: p_token1_value => 'pa_conversion_rate'
2444: );
2437:
2438: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2439:
2440: OKE_API.set_message(p_app_name => 'OKE' ,
2441: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2442: p_token1 => 'VALUE' ,
2443: p_token1_value => 'pa_conversion_rate'
2444: );
2445:
2458: -- Procedure add_allocation
2459: --
2460: -- Description: This procedure is used to insert record in OKE_K_FUND_ALLOCATIONS table
2461: --
2462: -- Calling subprograms: OKE_API.start_activity
2463: -- OKE_API.end_activity
2464: -- OKE_FUNDINGALLOCATION_PVT.insert_row
2465: -- null_allocation_out
2466: -- validate_attributes
2459: --
2460: -- Description: This procedure is used to insert record in OKE_K_FUND_ALLOCATIONS table
2461: --
2462: -- Calling subprograms: OKE_API.start_activity
2463: -- OKE_API.end_activity
2464: -- OKE_FUNDINGALLOCATION_PVT.insert_row
2465: -- null_allocation_out
2466: -- validate_attributes
2467: -- validate_record
2467: -- validate_record
2468: --
2469:
2470: PROCEDURE add_allocation(p_api_version IN NUMBER ,
2471: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2472: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2473: p_msg_count OUT NOCOPY NUMBER ,
2474: p_msg_data OUT NOCOPY VARCHAR2 ,
2475: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2468: --
2469:
2470: PROCEDURE add_allocation(p_api_version IN NUMBER ,
2471: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2472: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2473: p_msg_count OUT NOCOPY NUMBER ,
2474: p_msg_data OUT NOCOPY VARCHAR2 ,
2475: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2476: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2473: p_msg_count OUT NOCOPY NUMBER ,
2474: p_msg_data OUT NOCOPY VARCHAR2 ,
2475: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2476: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2477: p_validation_flag IN VARCHAR2 := OKE_API.G_TRUE ,
2478: p_return_status OUT NOCOPY VARCHAR2
2479: ) is
2480:
2481: l_return_status VARCHAR2(1);
2489:
2490: --dbms_output.put_line('entering oke_allocation_pvt.add_allocation');
2491: --oke_debug.debug('entering oke_allocation_pvt.add_allocation');
2492:
2493: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2494: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2495:
2496: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2497: p_pkg_name => G_PKG_NAME ,
2490: --dbms_output.put_line('entering oke_allocation_pvt.add_allocation');
2491: --oke_debug.debug('entering oke_allocation_pvt.add_allocation');
2492:
2493: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2494: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2495:
2496: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2497: p_pkg_name => G_PKG_NAME ,
2498: p_init_msg_list => p_init_msg_list ,
2492:
2493: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2494: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2495:
2496: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2497: p_pkg_name => G_PKG_NAME ,
2498: p_init_msg_list => p_init_msg_list ,
2499: l_api_version => G_API_VERSION_NUMBER ,
2500: p_api_version => p_api_version ,
2501: p_api_type => '_PVT' ,
2502: x_return_status => p_return_status
2503: );
2504:
2505: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2506:
2507: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508:
2509: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2503: );
2504:
2505: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2506:
2507: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508:
2509: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2510:
2511: RAISE OKE_API.G_EXCEPTION_ERROR;
2505: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2506:
2507: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508:
2509: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2510:
2511: RAISE OKE_API.G_EXCEPTION_ERROR;
2512:
2513: END IF;
2507: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2508:
2509: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2510:
2511: RAISE OKE_API.G_EXCEPTION_ERROR;
2512:
2513: END IF;
2514:
2515: --
2617: COMMIT WORK;
2618:
2619: END IF;
2620:
2621: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
2622: x_msg_data => p_msg_data
2623: );
2624:
2625: EXCEPTION
2622: x_msg_data => p_msg_data
2623: );
2624:
2625: EXCEPTION
2626: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2627: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2628: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2629: p_pkg_name => G_PKG_NAME ,
2630: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2623: );
2624:
2625: EXCEPTION
2626: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2627: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2628: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2629: p_pkg_name => G_PKG_NAME ,
2630: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2631: x_msg_count => p_msg_count ,
2624:
2625: EXCEPTION
2626: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2627: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2628: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2629: p_pkg_name => G_PKG_NAME ,
2630: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2631: x_msg_count => p_msg_count ,
2632: x_msg_data => p_msg_data ,
2626: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2627: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2628: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2629: p_pkg_name => G_PKG_NAME ,
2630: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2631: x_msg_count => p_msg_count ,
2632: x_msg_data => p_msg_data ,
2633: p_api_type => '_PVT'
2634: );
2632: x_msg_data => p_msg_data ,
2633: p_api_type => '_PVT'
2634: );
2635:
2636: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2637: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2638: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2639: p_pkg_name => G_PKG_NAME ,
2640: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2633: p_api_type => '_PVT'
2634: );
2635:
2636: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2637: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2638: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2639: p_pkg_name => G_PKG_NAME ,
2640: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2641: x_msg_count => p_msg_count ,
2634: );
2635:
2636: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2637: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2638: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2639: p_pkg_name => G_PKG_NAME ,
2640: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2641: x_msg_count => p_msg_count ,
2642: x_msg_data => p_msg_data ,
2636: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2637: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2638: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2639: p_pkg_name => G_PKG_NAME ,
2640: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2641: x_msg_count => p_msg_count ,
2642: x_msg_data => p_msg_data ,
2643: p_api_type => '_PVT'
2644: );
2643: p_api_type => '_PVT'
2644: );
2645:
2646: WHEN OTHERS THEN
2647: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2648: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2649: p_pkg_name => G_PKG_NAME ,
2650: p_exc_name => 'OTHERS' ,
2651: x_msg_count => p_msg_count ,
2644: );
2645:
2646: WHEN OTHERS THEN
2647: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2648: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2649: p_pkg_name => G_PKG_NAME ,
2650: p_exc_name => 'OTHERS' ,
2651: x_msg_count => p_msg_count ,
2652: x_msg_data => p_msg_data ,
2660: -- Procedure update_allocation
2661: --
2662: -- Description: This procedure is used to update record in OKE_K_FUND_ALLOCATIONS table
2663: --
2664: -- Calling subprograms: OKE_API.start_activity
2665: -- OKE_API.end_activity
2666: -- allowable_changes
2667: -- OKE_FUNDINGALLOCATION_PVT.update_allocation
2668: -- validate_fund_allocation_id
2661: --
2662: -- Description: This procedure is used to update record in OKE_K_FUND_ALLOCATIONS table
2663: --
2664: -- Calling subprograms: OKE_API.start_activity
2665: -- OKE_API.end_activity
2666: -- allowable_changes
2667: -- OKE_FUNDINGALLOCATION_PVT.update_allocation
2668: -- validate_fund_allocation_id
2669: -- validate_populate_rec
2671: -- validate_record
2672: --
2673:
2674: PROCEDURE update_allocation(p_api_version IN NUMBER ,
2675: p_init_msg_list IN VARCHAR2 :=OKE_API.G_FALSE ,
2676: p_commit IN VARCHAR2 :=OKE_API.G_FALSE ,
2677: p_msg_count OUT NOCOPY NUMBER ,
2678: p_msg_data OUT NOCOPY VARCHAR2 ,
2679: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2672: --
2673:
2674: PROCEDURE update_allocation(p_api_version IN NUMBER ,
2675: p_init_msg_list IN VARCHAR2 :=OKE_API.G_FALSE ,
2676: p_commit IN VARCHAR2 :=OKE_API.G_FALSE ,
2677: p_msg_count OUT NOCOPY NUMBER ,
2678: p_msg_data OUT NOCOPY VARCHAR2 ,
2679: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2680: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2677: p_msg_count OUT NOCOPY NUMBER ,
2678: p_msg_data OUT NOCOPY VARCHAR2 ,
2679: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2680: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2681: p_validation_flag IN VARCHAR2 := OKE_API.G_TRUE ,
2682: p_return_status OUT NOCOPY VARCHAR2
2683: ) is
2684:
2685: l_api_name CONSTANT VARCHAR2(30) := 'update_allocation';
2696:
2697: --dbms_output.put_line('entering oke_allocation_pvt.update_allocation');
2698: --oke_debug.debug('entering oke_allocation_pvt.update_allocation');
2699:
2700: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2701: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2702:
2703: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2704: p_pkg_name => G_PKG_NAME ,
2697: --dbms_output.put_line('entering oke_allocation_pvt.update_allocation');
2698: --oke_debug.debug('entering oke_allocation_pvt.update_allocation');
2699:
2700: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2701: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2702:
2703: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2704: p_pkg_name => G_PKG_NAME ,
2705: p_init_msg_list => p_init_msg_list ,
2699:
2700: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2701: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2702:
2703: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2704: p_pkg_name => G_PKG_NAME ,
2705: p_init_msg_list => p_init_msg_list ,
2706: l_api_version => G_API_VERSION_NUMBER ,
2707: p_api_version => p_api_version ,
2708: p_api_type => '_PVT' ,
2709: x_return_status => p_return_status
2710: );
2711:
2712: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2713:
2714: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715:
2716: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2710: );
2711:
2712: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2713:
2714: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715:
2716: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2717:
2718: RAISE OKE_API.G_EXCEPTION_ERROR;
2712: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2713:
2714: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715:
2716: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2717:
2718: RAISE OKE_API.G_EXCEPTION_ERROR;
2719:
2720: END IF;
2714: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2715:
2716: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2717:
2718: RAISE OKE_API.G_EXCEPTION_ERROR;
2719:
2720: END IF;
2721:
2722: --
2861:
2862: --dbms_output.put_line('finished oke_allocation_pvt.update_allocation w/ ' || p_return_status);
2863: --oke_debug.debug('finished oke_allocation_pvt.update_allocation w/ ' || p_return_status);
2864:
2865: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
2866: x_msg_data => p_msg_data
2867: );
2868:
2869: EXCEPTION
2866: x_msg_data => p_msg_data
2867: );
2868:
2869: EXCEPTION
2870: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2871: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2872: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2873: p_pkg_name => G_PKG_NAME ,
2874: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2867: );
2868:
2869: EXCEPTION
2870: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2871: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2872: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2873: p_pkg_name => G_PKG_NAME ,
2874: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2875: x_msg_count => p_msg_count ,
2868:
2869: EXCEPTION
2870: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2871: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2872: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2873: p_pkg_name => G_PKG_NAME ,
2874: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2875: x_msg_count => p_msg_count ,
2876: x_msg_data => p_msg_data ,
2870: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2871: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2872: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2873: p_pkg_name => G_PKG_NAME ,
2874: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2875: x_msg_count => p_msg_count ,
2876: x_msg_data => p_msg_data ,
2877: p_api_type => '_PVT'
2878: );
2876: x_msg_data => p_msg_data ,
2877: p_api_type => '_PVT'
2878: );
2879:
2880: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2881: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2882: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2883: p_pkg_name => G_PKG_NAME ,
2884: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2877: p_api_type => '_PVT'
2878: );
2879:
2880: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2881: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2882: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2883: p_pkg_name => G_PKG_NAME ,
2884: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2885: x_msg_count => p_msg_count ,
2878: );
2879:
2880: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2881: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2882: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2883: p_pkg_name => G_PKG_NAME ,
2884: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2885: x_msg_count => p_msg_count ,
2886: x_msg_data => p_msg_data ,
2880: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2881: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2882: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2883: p_pkg_name => G_PKG_NAME ,
2884: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2885: x_msg_count => p_msg_count ,
2886: x_msg_data => p_msg_data ,
2887: p_api_type => '_PVT'
2888: );
2887: p_api_type => '_PVT'
2888: );
2889:
2890: WHEN OTHERS THEN
2891: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2892: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2893: p_pkg_name => G_PKG_NAME ,
2894: p_exc_name => 'OTHERS' ,
2895: x_msg_count => p_msg_count ,
2888: );
2889:
2890: WHEN OTHERS THEN
2891: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2892: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2893: p_pkg_name => G_PKG_NAME ,
2894: p_exc_name => 'OTHERS' ,
2895: x_msg_count => p_msg_count ,
2896: x_msg_data => p_msg_data ,
2905: --
2906: -- Description: This procedure is used to delete record in OKE_K_FUND_ALLOCATIONS table
2907: --
2908: -- Calling subprograms: OKE_FUNDINGALLOCATION_PVT.delete_row
2909: -- OKE_API.start_activity
2910: -- OKE_API.end_activity
2911: -- validate_fund_allocation_id
2912: -- PA_AGREEMENT_PUB.delete_funding
2913: --
2906: -- Description: This procedure is used to delete record in OKE_K_FUND_ALLOCATIONS table
2907: --
2908: -- Calling subprograms: OKE_FUNDINGALLOCATION_PVT.delete_row
2909: -- OKE_API.start_activity
2910: -- OKE_API.end_activity
2911: -- validate_fund_allocation_id
2912: -- PA_AGREEMENT_PUB.delete_funding
2913: --
2914:
2912: -- PA_AGREEMENT_PUB.delete_funding
2913: --
2914:
2915: PROCEDURE delete_allocation(p_api_version IN NUMBER ,
2916: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2917: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2918: p_msg_count OUT NOCOPY NUMBER ,
2919: p_msg_data OUT NOCOPY VARCHAR2 ,
2920: p_fund_allocation_id IN NUMBER ,
2913: --
2914:
2915: PROCEDURE delete_allocation(p_api_version IN NUMBER ,
2916: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2917: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2918: p_msg_count OUT NOCOPY NUMBER ,
2919: p_msg_data OUT NOCOPY VARCHAR2 ,
2920: p_fund_allocation_id IN NUMBER ,
2921: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
2917: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2918: p_msg_count OUT NOCOPY NUMBER ,
2919: p_msg_data OUT NOCOPY VARCHAR2 ,
2920: p_fund_allocation_id IN NUMBER ,
2921: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
2922: p_return_status OUT NOCOPY VARCHAR2
2923: ) is
2924:
2925: l_api_name CONSTANT VARCHAR2(30) := 'delete_allocation';
2963:
2964: --dbms_output.put_line('entering oke_allocation_pvt.delete_allocation');
2965: --oke_debug.debug('entering oke_allocation_pvt.delete_allocation');
2966:
2967: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2968:
2969: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2970: p_pkg_name => G_PKG_NAME ,
2971: p_init_msg_list => p_init_msg_list ,
2965: --oke_debug.debug('entering oke_allocation_pvt.delete_allocation');
2966:
2967: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2968:
2969: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2970: p_pkg_name => G_PKG_NAME ,
2971: p_init_msg_list => p_init_msg_list ,
2972: l_api_version => G_API_VERSION_NUMBER ,
2973: p_api_version => p_api_version ,
2974: p_api_type => '_PVT' ,
2975: x_return_status => p_return_status
2976: );
2977:
2978: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2979:
2980: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2981:
2982: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2976: );
2977:
2978: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2979:
2980: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2981:
2982: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2983:
2984: RAISE OKE_API.G_EXCEPTION_ERROR;
2978: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2979:
2980: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2981:
2982: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2983:
2984: RAISE OKE_API.G_EXCEPTION_ERROR;
2985:
2986: END IF;
2980: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2981:
2982: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2983:
2984: RAISE OKE_API.G_EXCEPTION_ERROR;
2985:
2986: END IF;
2987:
2988: --
3003: CLOSE c_ver;
3004:
3005: IF (l_current_ver <> l_created_ver) THEN
3006:
3007: OKE_API.set_message(p_app_name => G_APP_NAME ,
3008: p_msg_name => 'OKE_VER_NO_ALLOCATION_DELETE'
3009: );
3010:
3011: RAISE OKE_API.G_EXCEPTION_ERROR;
3007: OKE_API.set_message(p_app_name => G_APP_NAME ,
3008: p_msg_name => 'OKE_VER_NO_ALLOCATION_DELETE'
3009: );
3010:
3011: RAISE OKE_API.G_EXCEPTION_ERROR;
3012:
3013: END IF;
3014: --
3015: -- End 7/15/02
3044: -- fnd_client_info.set_org_context(l_project_funding.org_id);
3045: mo_global.set_policy_context('S',l_project_funding.org_id);
3046:
3047: PA_AGREEMENT_PUB.delete_funding(p_api_version_number => p_api_version ,
3048: p_commit => OKE_API.G_FALSE ,
3049: p_init_msg_list => OKE_API.G_FALSE ,
3050: p_msg_count => p_msg_count ,
3051: p_msg_data => p_msg_data ,
3052: p_return_status => p_return_status ,
3045: mo_global.set_policy_context('S',l_project_funding.org_id);
3046:
3047: PA_AGREEMENT_PUB.delete_funding(p_api_version_number => p_api_version ,
3048: p_commit => OKE_API.G_FALSE ,
3049: p_init_msg_list => OKE_API.G_FALSE ,
3050: p_msg_count => p_msg_count ,
3051: p_msg_data => p_msg_data ,
3052: p_return_status => p_return_status ,
3053: p_pm_product_code => G_PRODUCT_CODE ,
3055: p_funding_id => l_project_funding.project_funding_id ,
3056: p_check_y_n => 'Y'
3057: );
3058:
3059: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3060:
3061: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3062:
3063: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3057: );
3058:
3059: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3060:
3061: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3062:
3063: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3064:
3065: RAISE OKE_API.G_EXCEPTION_ERROR;
3059: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3060:
3061: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3062:
3063: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3064:
3065: RAISE OKE_API.G_EXCEPTION_ERROR;
3066:
3067: END IF;
3061: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3062:
3063: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3064:
3065: RAISE OKE_API.G_EXCEPTION_ERROR;
3066:
3067: END IF;
3068:
3069: END LOOP;
3077: COMMIT WORK;
3078:
3079: END IF;
3080:
3081: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
3082: x_msg_data => p_msg_data
3083: );
3084:
3085: EXCEPTION
3082: x_msg_data => p_msg_data
3083: );
3084:
3085: EXCEPTION
3086: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3087: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3088: p_pkg_name => G_PKG_NAME ,
3089: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3090: x_msg_count => p_msg_count ,
3083: );
3084:
3085: EXCEPTION
3086: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3087: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3088: p_pkg_name => G_PKG_NAME ,
3089: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3090: x_msg_count => p_msg_count ,
3091: x_msg_data => p_msg_data ,
3085: EXCEPTION
3086: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3087: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3088: p_pkg_name => G_PKG_NAME ,
3089: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3090: x_msg_count => p_msg_count ,
3091: x_msg_data => p_msg_data ,
3092: p_api_type => '_PVT'
3093: );
3091: x_msg_data => p_msg_data ,
3092: p_api_type => '_PVT'
3093: );
3094:
3095: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3096: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3097: p_pkg_name => G_PKG_NAME ,
3098: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3099: x_msg_count => p_msg_count ,
3092: p_api_type => '_PVT'
3093: );
3094:
3095: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3096: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3097: p_pkg_name => G_PKG_NAME ,
3098: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3099: x_msg_count => p_msg_count ,
3100: x_msg_data => p_msg_data ,
3094:
3095: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3096: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3097: p_pkg_name => G_PKG_NAME ,
3098: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3099: x_msg_count => p_msg_count ,
3100: x_msg_data => p_msg_data ,
3101: p_api_type => '_PVT'
3102: );
3101: p_api_type => '_PVT'
3102: );
3103:
3104: WHEN OTHERS THEN
3105: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3106: p_pkg_name => G_PKG_NAME ,
3107: p_exc_name => 'OTHERS' ,
3108: x_msg_count => p_msg_count ,
3109: x_msg_data => p_msg_data ,