[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 ,
859: l_exist VARCHAR2(1);
860:
861: BEGIN
862:
863: p_return_status := OKE_API.G_RET_STS_SUCCESS;
864:
865: IF (p_project_id is not null) OR
866: (p_project_id <> OKE_API.G_MISS_NUM) THEN
867:
862:
863: p_return_status := OKE_API.G_RET_STS_SUCCESS;
864:
865: IF (p_project_id is not null) OR
866: (p_project_id <> OKE_API.G_MISS_NUM) THEN
867:
868: OPEN c_intent;
869: FETCH c_intent into l_intent;
870: CLOSE c_intent;
876: CLOSE c_project_id;
877:
878: IF (l_dummy_value = '?') THEN
879:
880: OKE_API.set_message(p_app_name => G_APP_NAME ,
881: p_msg_name => 'OKE_API_INVALID_VALUE' ,
882: p_token1 => 'VALUE' ,
883: p_token1_value => 'project_id'
884: );
877:
878: IF (l_dummy_value = '?') THEN
879:
880: OKE_API.set_message(p_app_name => G_APP_NAME ,
881: p_msg_name => 'OKE_API_INVALID_VALUE' ,
882: p_token1 => 'VALUE' ,
883: p_token1_value => 'project_id'
884: );
885:
882: p_token1 => 'VALUE' ,
883: p_token1_value => 'project_id'
884: );
885:
886: p_return_status := OKE_API.G_RET_STS_ERROR;
887: return;
888:
889: END IF;
890:
927: END IF;
928:
929: IF (l_project_id is null) then
930:
931: OKE_API.set_message(p_app_name => G_APP_NAME ,
932: p_msg_name => 'OKE_API_INVALID_VALUE' ,
933: p_token1 => 'VALUE' ,
934: p_token1_value => 'project_id'
935: );
928:
929: IF (l_project_id is null) then
930:
931: OKE_API.set_message(p_app_name => G_APP_NAME ,
932: p_msg_name => 'OKE_API_INVALID_VALUE' ,
933: p_token1 => 'VALUE' ,
934: p_token1_value => 'project_id'
935: );
936:
933: p_token1 => 'VALUE' ,
934: p_token1_value => 'project_id'
935: );
936:
937: p_return_status := OKE_API.G_RET_STS_ERROR;
938:
939: ELSE
940:
941: IF (l_task_id is not null) THEN
953: END IF;
954:
955: IF (l_dummy_value = '?') then
956:
957: OKE_API.set_message(p_app_name => G_APP_NAME ,
958: p_msg_name => 'OKE_API_INVALID_VALUE' ,
959: p_token1 => 'VALUE' ,
960: p_token1_value => 'project_id'
961: );
954:
955: IF (l_dummy_value = '?') then
956:
957: OKE_API.set_message(p_app_name => G_APP_NAME ,
958: p_msg_name => 'OKE_API_INVALID_VALUE' ,
959: p_token1 => 'VALUE' ,
960: p_token1_value => 'project_id'
961: );
962:
959: p_token1 => 'VALUE' ,
960: p_token1_value => 'project_id'
961: );
962:
963: p_return_status := OKE_API.G_RET_STS_ERROR;
964:
965: END IF;
966:
967: END IF;
969: END IF;
970:
971: EXCEPTION
972: WHEN OTHERS THEN
973: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
974: OKE_API.set_message(p_app_name => G_APP_NAME ,
975: p_msg_name => G_UNEXPECTED_ERROR ,
976: p_token1 => G_SQLCODE_TOKEN ,
977: p_token1_value => SQLCODE ,
970:
971: EXCEPTION
972: WHEN OTHERS THEN
973: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
974: OKE_API.set_message(p_app_name => G_APP_NAME ,
975: p_msg_name => G_UNEXPECTED_ERROR ,
976: p_token1 => G_SQLCODE_TOKEN ,
977: p_token1_value => SQLCODE ,
978: p_token2 => G_SQLERRM_TOKEN ,
1005: l_dummy_value VARCHAR2(1) := '?';
1006:
1007: BEGIN
1008:
1009: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1010:
1011: IF (p_task_id is not null) OR
1012: (p_task_id <> OKE_API.G_MISS_NUM) THEN
1013:
1008:
1009: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1010:
1011: IF (p_task_id is not null) OR
1012: (p_task_id <> OKE_API.G_MISS_NUM) THEN
1013:
1014: OPEN c_task_id;
1015: FETCH c_task_id into l_dummy_value;
1016: CLOSE c_task_id;
1016: CLOSE c_task_id;
1017:
1018: IF (l_dummy_value = '?') THEN
1019:
1020: OKE_API.set_message(p_app_name => G_APP_NAME ,
1021: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1022: p_token1 => 'VALUE' ,
1023: p_token1_value => 'task_id'
1024: );
1017:
1018: IF (l_dummy_value = '?') THEN
1019:
1020: OKE_API.set_message(p_app_name => G_APP_NAME ,
1021: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1022: p_token1 => 'VALUE' ,
1023: p_token1_value => 'task_id'
1024: );
1025:
1022: p_token1 => 'VALUE' ,
1023: p_token1_value => 'task_id'
1024: );
1025:
1026: p_return_status := OKE_API.G_RET_STS_ERROR;
1027:
1028: END IF;
1029:
1030: END IF;
1030: END IF;
1031:
1032: EXCEPTION
1033: WHEN OTHERS THEN
1034: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1035: OKE_API.set_message(p_app_name => G_APP_NAME ,
1036: p_msg_name => G_UNEXPECTED_ERROR ,
1037: p_token1 => G_SQLCODE_TOKEN ,
1038: p_token1_value => SQLCODE ,
1031:
1032: EXCEPTION
1033: WHEN OTHERS THEN
1034: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1035: OKE_API.set_message(p_app_name => G_APP_NAME ,
1036: p_msg_name => G_UNEXPECTED_ERROR ,
1037: p_token1 => G_SQLCODE_TOKEN ,
1038: p_token1_value => SQLCODE ,
1039: p_token2 => G_SQLERRM_TOKEN ,
1068: l_dummy_value VARCHAR2(1) := '?';
1069:
1070: BEGIN
1071:
1072: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1073:
1074: IF (p_fund_type is not null) OR
1075: (p_fund_type <> OKE_API.G_MISS_CHAR) THEN
1076:
1071:
1072: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1073:
1074: IF (p_fund_type is not null) OR
1075: (p_fund_type <> OKE_API.G_MISS_CHAR) THEN
1076:
1077: OPEN c_fund_type;
1078: FETCH c_fund_type into l_dummy_value;
1079: CLOSE c_fund_type;
1079: CLOSE c_fund_type;
1080:
1081: IF (l_dummy_value = '?') THEN
1082:
1083: OKE_API.set_message(p_app_name => G_APP_NAME ,
1084: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1085: p_token1 => 'VALUE' ,
1086: p_token1_value => 'fund_type'
1087: );
1080:
1081: IF (l_dummy_value = '?') THEN
1082:
1083: OKE_API.set_message(p_app_name => G_APP_NAME ,
1084: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1085: p_token1 => 'VALUE' ,
1086: p_token1_value => 'fund_type'
1087: );
1088:
1085: p_token1 => 'VALUE' ,
1086: p_token1_value => 'fund_type'
1087: );
1088:
1089: p_return_status := OKE_API.G_RET_STS_ERROR;
1090:
1091: END IF;
1092:
1093: END IF;
1093: END IF;
1094:
1095: EXCEPTION
1096: WHEN OTHERS THEN
1097: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1098: OKE_API.set_message(p_app_name => G_APP_NAME ,
1099: p_msg_name => G_UNEXPECTED_ERROR ,
1100: p_token1 => G_SQLCODE_TOKEN ,
1101: p_token1_value => SQLCODE ,
1094:
1095: EXCEPTION
1096: WHEN OTHERS THEN
1097: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1098: OKE_API.set_message(p_app_name => G_APP_NAME ,
1099: p_msg_name => G_UNEXPECTED_ERROR ,
1100: p_token1 => G_SQLCODE_TOKEN ,
1101: p_token1_value => SQLCODE ,
1102: p_token2 => G_SQLERRM_TOKEN ,
1131: l_dummy_value VARCHAR2(1) := '?';
1132:
1133: BEGIN
1134:
1135: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1136:
1137: IF (p_funding_status is not null) OR
1138: (p_funding_status <> OKE_API.G_MISS_CHAR) THEN
1139:
1134:
1135: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1136:
1137: IF (p_funding_status is not null) OR
1138: (p_funding_status <> OKE_API.G_MISS_CHAR) THEN
1139:
1140: OPEN c_funding_status;
1141: FETCH c_funding_status into l_dummy_value;
1142: CLOSE c_funding_status;
1142: CLOSE c_funding_status;
1143:
1144: IF (l_dummy_value = '?') THEN
1145:
1146: OKE_API.set_message(p_app_name => G_APP_NAME ,
1147: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1148: p_token1 => 'VALUE' ,
1149: p_token1_value => 'funding_status'
1150: );
1143:
1144: IF (l_dummy_value = '?') THEN
1145:
1146: OKE_API.set_message(p_app_name => G_APP_NAME ,
1147: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1148: p_token1 => 'VALUE' ,
1149: p_token1_value => 'funding_status'
1150: );
1151:
1148: p_token1 => 'VALUE' ,
1149: p_token1_value => 'funding_status'
1150: );
1151:
1152: p_return_status := OKE_API.G_RET_STS_ERROR;
1153:
1154: END IF;
1155:
1156: END IF;
1156: END IF;
1157:
1158: EXCEPTION
1159: WHEN OTHERS THEN
1160: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1161: OKE_API.set_message(p_app_name => G_APP_NAME ,
1162: p_msg_name => G_UNEXPECTED_ERROR ,
1163: p_token1 => G_SQLCODE_TOKEN ,
1164: p_token1_value => SQLCODE ,
1157:
1158: EXCEPTION
1159: WHEN OTHERS THEN
1160: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1161: OKE_API.set_message(p_app_name => G_APP_NAME ,
1162: p_msg_name => G_UNEXPECTED_ERROR ,
1163: p_token1 => G_SQLCODE_TOKEN ,
1164: p_token1_value => SQLCODE ,
1165: p_token2 => G_SQLERRM_TOKEN ,
1192: l_dummy_value VARCHAR2(1) := '?';
1193:
1194: BEGIN
1195:
1196: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1197:
1198: IF (p_funding_category is null) OR
1199: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1200:
1195:
1196: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1197:
1198: IF (p_funding_category is null) OR
1199: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1200:
1201: OKE_API.set_message(p_app_name => G_APP_NAME ,
1202: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1203: p_token1 => 'VALUE' ,
1197:
1198: IF (p_funding_category is null) OR
1199: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1200:
1201: OKE_API.set_message(p_app_name => G_APP_NAME ,
1202: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1203: p_token1 => 'VALUE' ,
1204: p_token1_value => 'funding_category'
1205: );
1198: IF (p_funding_category is null) OR
1199: (p_funding_category = OKE_API.G_MISS_CHAR) THEN
1200:
1201: OKE_API.set_message(p_app_name => G_APP_NAME ,
1202: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1203: p_token1 => 'VALUE' ,
1204: p_token1_value => 'funding_category'
1205: );
1206:
1203: p_token1 => 'VALUE' ,
1204: p_token1_value => 'funding_category'
1205: );
1206:
1207: p_return_status := OKE_API.G_RET_STS_ERROR;
1208:
1209: ELSE
1210:
1211: OPEN c_funding_category;
1213: CLOSE c_funding_category;
1214:
1215: IF (l_dummy_value = '?') THEN
1216:
1217: OKE_API.set_message(p_app_name => G_APP_NAME ,
1218: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1219: p_token1 => 'VALUE' ,
1220: p_token1_value => 'funding_category'
1221: );
1214:
1215: IF (l_dummy_value = '?') THEN
1216:
1217: OKE_API.set_message(p_app_name => G_APP_NAME ,
1218: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1219: p_token1 => 'VALUE' ,
1220: p_token1_value => 'funding_category'
1221: );
1222:
1219: p_token1 => 'VALUE' ,
1220: p_token1_value => 'funding_category'
1221: );
1222:
1223: p_return_status := OKE_API.G_RET_STS_ERROR;
1224:
1225: END IF;
1226:
1227: END IF;
1227: END IF;
1228:
1229: EXCEPTION
1230: WHEN OTHERS THEN
1231: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1232: OKE_API.set_message(p_app_name => G_APP_NAME ,
1233: p_msg_name => G_UNEXPECTED_ERROR ,
1234: p_token1 => G_SQLCODE_TOKEN ,
1235: p_token1_value => SQLCODE ,
1228:
1229: EXCEPTION
1230: WHEN OTHERS THEN
1231: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1232: OKE_API.set_message(p_app_name => G_APP_NAME ,
1233: p_msg_name => G_UNEXPECTED_ERROR ,
1234: p_token1 => G_SQLCODE_TOKEN ,
1235: p_token1_value => SQLCODE ,
1236: p_token2 => G_SQLERRM_TOKEN ,
1262: l_dummy_value VARCHAR2(1) := '?';
1263:
1264: BEGIN
1265:
1266: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1267:
1268: IF (p_conversion_type is not null) OR
1269: (p_conversion_type <> OKE_API.G_MISS_CHAR) THEN
1270:
1265:
1266: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1267:
1268: IF (p_conversion_type is not null) OR
1269: (p_conversion_type <> OKE_API.G_MISS_CHAR) THEN
1270:
1271: OPEN c_conversion_type;
1272: FETCH c_conversion_type into l_dummy_value;
1273: CLOSE c_conversion_type;
1273: CLOSE c_conversion_type;
1274:
1275: IF (l_dummy_value = '?') THEN
1276:
1277: OKE_API.set_message(p_app_name => G_APP_NAME ,
1278: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1279: p_token1 => 'VALUE' ,
1280: p_token1_value => 'pa_conversion_type'
1281: );
1274:
1275: IF (l_dummy_value = '?') THEN
1276:
1277: OKE_API.set_message(p_app_name => G_APP_NAME ,
1278: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1279: p_token1 => 'VALUE' ,
1280: p_token1_value => 'pa_conversion_type'
1281: );
1282:
1279: p_token1 => 'VALUE' ,
1280: p_token1_value => 'pa_conversion_type'
1281: );
1282:
1283: p_return_status := OKE_API.G_RET_STS_ERROR;
1284:
1285: END IF;
1286:
1287: END IF;
1287: END IF;
1288:
1289: EXCEPTION
1290: WHEN OTHERS THEN
1291: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1292: OKE_API.set_message(p_app_name => G_APP_NAME ,
1293: p_msg_name => G_UNEXPECTED_ERROR ,
1294: p_token1 => G_SQLCODE_TOKEN ,
1295: p_token1_value => SQLCODE ,
1288:
1289: EXCEPTION
1290: WHEN OTHERS THEN
1291: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1292: OKE_API.set_message(p_app_name => G_APP_NAME ,
1293: p_msg_name => G_UNEXPECTED_ERROR ,
1294: p_token1 => G_SQLCODE_TOKEN ,
1295: p_token1_value => SQLCODE ,
1296: p_token2 => G_SQLERRM_TOKEN ,
1318: BEGIN
1319:
1320: l_allocation_in_rec.fund_allocation_id := null;
1321:
1322: IF l_allocation_in_rec.agreement_id = OKE_API.G_MISS_NUM THEN
1323: l_allocation_in_rec.agreement_id := null;
1324: END IF;
1325:
1326: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1322: IF l_allocation_in_rec.agreement_id = OKE_API.G_MISS_NUM THEN
1323: l_allocation_in_rec.agreement_id := null;
1324: END IF;
1325:
1326: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1327: l_allocation_in_rec.amount := null;
1328: END IF;
1329:
1330: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1326: IF l_allocation_in_rec.amount = OKE_API.G_MISS_NUM THEN
1327: l_allocation_in_rec.amount := null;
1328: END IF;
1329:
1330: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1331: l_allocation_in_rec.funding_source_id := null;
1332: END IF;
1333:
1334: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1330: IF l_allocation_in_rec.funding_source_id = OKE_API.G_MISS_NUM THEN
1331: l_allocation_in_rec.funding_source_id := null;
1332: END IF;
1333:
1334: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1335: l_allocation_in_rec.object_id := null;
1336: END IF;
1337:
1338: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1334: IF l_allocation_in_rec.object_id = OKE_API.G_MISS_NUM THEN
1335: l_allocation_in_rec.object_id := null;
1336: END IF;
1337:
1338: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1339: l_allocation_in_rec.k_line_id := null;
1340: END IF;
1341:
1342: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1338: IF l_allocation_in_rec.k_line_id = OKE_API.G_MISS_NUM THEN
1339: l_allocation_in_rec.k_line_id := null;
1340: END IF;
1341:
1342: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1343: l_allocation_in_rec.project_id := null;
1344: END IF;
1345:
1346: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1342: IF l_allocation_in_rec.project_id = OKE_API.G_MISS_NUM THEN
1343: l_allocation_in_rec.project_id := null;
1344: END IF;
1345:
1346: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1347: l_allocation_in_rec.task_id := null;
1348: END IF;
1349:
1350: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1346: IF l_allocation_in_rec.task_id = OKE_API.G_MISS_NUM THEN
1347: l_allocation_in_rec.task_id := null;
1348: END IF;
1349:
1350: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1351: l_allocation_in_rec.fund_type := null;
1352: END IF;
1353:
1354: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1350: IF l_allocation_in_rec.fund_type = OKE_API.G_MISS_CHAR THEN
1351: l_allocation_in_rec.fund_type := null;
1352: END IF;
1353:
1354: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1355: l_allocation_in_rec.hard_limit := null;
1356: END IF;
1357:
1358: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1354: IF l_allocation_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1355: l_allocation_in_rec.hard_limit := null;
1356: END IF;
1357:
1358: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1359: l_allocation_in_rec.funding_status := null;
1360: END IF;
1361:
1362: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1358: IF l_allocation_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1359: l_allocation_in_rec.funding_status := null;
1360: END IF;
1361:
1362: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1363: l_allocation_in_rec.fiscal_year := null;
1364: END IF;
1365:
1366: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1362: IF l_allocation_in_rec.fiscal_year = OKE_API.G_MISS_NUM THEN
1363: l_allocation_in_rec.fiscal_year := null;
1364: END IF;
1365:
1366: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1367: l_allocation_in_rec.reference1 := null;
1368: END IF;
1369:
1370: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1366: IF l_allocation_in_rec.reference1 = OKE_API.G_MISS_CHAR THEN
1367: l_allocation_in_rec.reference1 := null;
1368: END IF;
1369:
1370: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1371: l_allocation_in_rec.reference2 := null;
1372: END IF;
1373:
1374: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1370: IF l_allocation_in_rec.reference2 = OKE_API.G_MISS_CHAR THEN
1371: l_allocation_in_rec.reference2 := null;
1372: END IF;
1373:
1374: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1375: l_allocation_in_rec.reference3 := null;
1376: END IF;
1377:
1378: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1374: IF l_allocation_in_rec.reference3 = OKE_API.G_MISS_CHAR THEN
1375: l_allocation_in_rec.reference3 := null;
1376: END IF;
1377:
1378: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1379: l_allocation_in_rec.pa_conversion_type := null;
1380: END IF;
1381:
1382: IF l_allocation_in_rec.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1378: IF l_allocation_in_rec.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1379: l_allocation_in_rec.pa_conversion_type := null;
1380: END IF;
1381:
1382: IF l_allocation_in_rec.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1383: l_allocation_in_rec.pa_conversion_date := null;
1384: END IF;
1385:
1386: -- syho, bug 2208979
1383: l_allocation_in_rec.pa_conversion_date := null;
1384: END IF;
1385:
1386: -- syho, bug 2208979
1387: IF l_allocation_in_rec.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1388: l_allocation_in_rec.pa_conversion_rate := null;
1389: END IF;
1390: -- syho, bug 2208979
1391:
1388: l_allocation_in_rec.pa_conversion_rate := null;
1389: END IF;
1390: -- syho, bug 2208979
1391:
1392: IF l_allocation_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
1393: l_allocation_in_rec.start_date_active := null;
1394: END IF;
1395:
1396: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1392: IF l_allocation_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
1393: l_allocation_in_rec.start_date_active := null;
1394: END IF;
1395:
1396: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1397: l_allocation_in_rec.end_date_active := null;
1398: END IF;
1399: /*
1400: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1396: IF l_allocation_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
1397: l_allocation_in_rec.end_date_active := null;
1398: END IF;
1399: /*
1400: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1401: l_allocation_in_rec.oke_desc_flex_name := null;
1402: END IF;
1403: */
1404: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1400: IF l_allocation_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
1401: l_allocation_in_rec.oke_desc_flex_name := null;
1402: END IF;
1403: */
1404: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1405: l_allocation_in_rec.oke_attribute_category := null;
1406: END IF;
1407:
1408: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1404: IF l_allocation_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1405: l_allocation_in_rec.oke_attribute_category := null;
1406: END IF;
1407:
1408: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1409: l_allocation_in_rec.oke_attribute1 := null;
1410: END IF;
1411:
1412: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1408: IF l_allocation_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1409: l_allocation_in_rec.oke_attribute1 := null;
1410: END IF;
1411:
1412: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1413: l_allocation_in_rec.oke_attribute2 := null;
1414: END IF;
1415:
1416: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1412: IF l_allocation_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1413: l_allocation_in_rec.oke_attribute2 := null;
1414: END IF;
1415:
1416: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1417: l_allocation_in_rec.oke_attribute3 := null;
1418: END IF;
1419:
1420: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1416: IF l_allocation_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1417: l_allocation_in_rec.oke_attribute3 := null;
1418: END IF;
1419:
1420: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1421: l_allocation_in_rec.oke_attribute4 := null;
1422: END IF;
1423:
1424: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1420: IF l_allocation_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1421: l_allocation_in_rec.oke_attribute4 := null;
1422: END IF;
1423:
1424: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1425: l_allocation_in_rec.oke_attribute5 := null;
1426: END IF;
1427:
1428: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1424: IF l_allocation_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1425: l_allocation_in_rec.oke_attribute5 := null;
1426: END IF;
1427:
1428: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1429: l_allocation_in_rec.oke_attribute6 := null;
1430: END IF;
1431:
1432: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1428: IF l_allocation_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1429: l_allocation_in_rec.oke_attribute6 := null;
1430: END IF;
1431:
1432: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1433: l_allocation_in_rec.oke_attribute7 := null;
1434: END IF;
1435:
1436: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1432: IF l_allocation_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1433: l_allocation_in_rec.oke_attribute7 := null;
1434: END IF;
1435:
1436: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1437: l_allocation_in_rec.oke_attribute8 := null;
1438: END IF;
1439:
1440: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1436: IF l_allocation_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1437: l_allocation_in_rec.oke_attribute8 := null;
1438: END IF;
1439:
1440: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1441: l_allocation_in_rec.oke_attribute9 := null;
1442: END IF;
1443:
1444: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1440: IF l_allocation_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1441: l_allocation_in_rec.oke_attribute9 := null;
1442: END IF;
1443:
1444: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1445: l_allocation_in_rec.oke_attribute10 := null;
1446: END IF;
1447:
1448: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1444: IF l_allocation_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1445: l_allocation_in_rec.oke_attribute10 := null;
1446: END IF;
1447:
1448: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1449: l_allocation_in_rec.oke_attribute11 := null;
1450: END IF;
1451:
1452: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1448: IF l_allocation_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1449: l_allocation_in_rec.oke_attribute11 := null;
1450: END IF;
1451:
1452: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1453: l_allocation_in_rec.oke_attribute12 := null;
1454: END IF;
1455:
1456: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1452: IF l_allocation_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1453: l_allocation_in_rec.oke_attribute12 := null;
1454: END IF;
1455:
1456: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1457: l_allocation_in_rec.oke_attribute13 := null;
1458: END IF;
1459:
1460: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1456: IF l_allocation_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1457: l_allocation_in_rec.oke_attribute13 := null;
1458: END IF;
1459:
1460: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1461: l_allocation_in_rec.oke_attribute14 := null;
1462: END IF;
1463:
1464: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1460: IF l_allocation_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1461: l_allocation_in_rec.oke_attribute14 := null;
1462: END IF;
1463:
1464: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1465: l_allocation_in_rec.oke_attribute15 := null;
1466: END IF;
1467:
1468: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1464: IF l_allocation_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1465: l_allocation_in_rec.oke_attribute15 := null;
1466: END IF;
1467:
1468: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1469: l_allocation_in_rec.revenue_hard_limit := null;
1470: END IF;
1471:
1472: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1468: IF l_allocation_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1469: l_allocation_in_rec.revenue_hard_limit := null;
1470: END IF;
1471:
1472: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1473: l_allocation_in_rec.pa_attribute_category := null;
1474: END IF;
1475:
1476: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1472: IF l_allocation_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1473: l_allocation_in_rec.pa_attribute_category := null;
1474: END IF;
1475:
1476: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1477: l_allocation_in_rec.pa_attribute1 := null;
1478: END IF;
1479:
1480: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1476: IF l_allocation_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1477: l_allocation_in_rec.pa_attribute1 := null;
1478: END IF;
1479:
1480: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1481: l_allocation_in_rec.pa_attribute2 := null;
1482: END IF;
1483:
1484: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1480: IF l_allocation_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1481: l_allocation_in_rec.pa_attribute2 := null;
1482: END IF;
1483:
1484: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1485: l_allocation_in_rec.pa_attribute3 := null;
1486: END IF;
1487:
1488: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1484: IF l_allocation_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1485: l_allocation_in_rec.pa_attribute3 := null;
1486: END IF;
1487:
1488: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1489: l_allocation_in_rec.pa_attribute4 := null;
1490: END IF;
1491:
1492: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1488: IF l_allocation_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1489: l_allocation_in_rec.pa_attribute4 := null;
1490: END IF;
1491:
1492: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1493: l_allocation_in_rec.pa_attribute5 := null;
1494: END IF;
1495:
1496: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1492: IF l_allocation_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1493: l_allocation_in_rec.pa_attribute5 := null;
1494: END IF;
1495:
1496: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1497: l_allocation_in_rec.pa_attribute6 := null;
1498: END IF;
1499:
1500: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1496: IF l_allocation_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1497: l_allocation_in_rec.pa_attribute6 := null;
1498: END IF;
1499:
1500: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1501: l_allocation_in_rec.pa_attribute7 := null;
1502: END IF;
1503:
1504: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1500: IF l_allocation_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1501: l_allocation_in_rec.pa_attribute7 := null;
1502: END IF;
1503:
1504: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1505: l_allocation_in_rec.pa_attribute8 := null;
1506: END IF;
1507:
1508: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1504: IF l_allocation_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1505: l_allocation_in_rec.pa_attribute8 := null;
1506: END IF;
1507:
1508: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1509: l_allocation_in_rec.pa_attribute9 := null;
1510: END IF;
1511:
1512: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1508: IF l_allocation_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1509: l_allocation_in_rec.pa_attribute9 := null;
1510: END IF;
1511:
1512: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1513: l_allocation_in_rec.pa_attribute10 := null;
1514: END IF;
1515:
1516: IF l_allocation_in_rec.funding_category = OKE_API.G_MISS_CHAR THEN
1512: IF l_allocation_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1513: l_allocation_in_rec.pa_attribute10 := null;
1514: END IF;
1515:
1516: IF l_allocation_in_rec.funding_category = OKE_API.G_MISS_CHAR THEN
1517: l_allocation_in_rec.funding_category := null;
1518: END IF;
1519:
1520: return(l_allocation_in_rec);
1563: OPEN c_allocation_row;
1564: FETCH c_allocation_row into l_allocation_row;
1565: CLOSE c_allocation_row;
1566:
1567: IF p_allocation_in_rec_out.agreement_id = OKE_API.G_MISS_NUM THEN
1568: p_allocation_in_rec_out.agreement_id := null;
1569: END IF;
1570:
1571: IF (p_allocation_in_rec_out.funding_source_id = OKE_API.G_MISS_NUM) THEN
1567: IF p_allocation_in_rec_out.agreement_id = OKE_API.G_MISS_NUM THEN
1568: p_allocation_in_rec_out.agreement_id := null;
1569: END IF;
1570:
1571: IF (p_allocation_in_rec_out.funding_source_id = OKE_API.G_MISS_NUM) THEN
1572: p_allocation_in_rec_out.funding_source_id := l_allocation_row.funding_source_id;
1573:
1574: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1575:
1572: p_allocation_in_rec_out.funding_source_id := l_allocation_row.funding_source_id;
1573:
1574: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1575:
1576: OKE_API.set_message(p_app_name => G_APP_NAME ,
1577: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1578: p_token1 => 'VALUE' ,
1579: p_token1_value => 'funding_source_id'
1580: );
1573:
1574: ELSIF (nvl(p_allocation_in_rec_out.funding_source_id, -99) <> l_allocation_row.funding_source_id) THEN
1575:
1576: OKE_API.set_message(p_app_name => G_APP_NAME ,
1577: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1578: p_token1 => 'VALUE' ,
1579: p_token1_value => 'funding_source_id'
1580: );
1581:
1582: RAISE G_EXCEPTION_HALT_VALIDATION;
1583:
1584: END IF;
1585:
1586: IF (p_allocation_in_rec_out.object_id = OKE_API.G_MISS_NUM) THEN
1587: p_allocation_in_rec_out.object_id := l_allocation_row.object_id;
1588:
1589: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1590:
1587: p_allocation_in_rec_out.object_id := l_allocation_row.object_id;
1588:
1589: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1590:
1591: OKE_API.set_message(p_app_name => G_APP_NAME ,
1592: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1593: p_token1 => 'VALUE' ,
1594: p_token1_value => 'object_id'
1595: );
1588:
1589: ELSIF (nvl(p_allocation_in_rec_out.object_id, -99) <> l_allocation_row.object_id) THEN
1590:
1591: OKE_API.set_message(p_app_name => G_APP_NAME ,
1592: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1593: p_token1 => 'VALUE' ,
1594: p_token1_value => 'object_id'
1595: );
1596:
1597: RAISE G_EXCEPTION_HALT_VALIDATION;
1598:
1599: END IF;
1600:
1601: IF (p_allocation_in_rec_out.k_line_id = OKE_API.G_MISS_NUM) THEN
1602: p_allocation_in_rec_out.k_line_id := l_allocation_row.k_line_id;
1603: END IF;
1604:
1605: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1601: IF (p_allocation_in_rec_out.k_line_id = OKE_API.G_MISS_NUM) THEN
1602: p_allocation_in_rec_out.k_line_id := l_allocation_row.k_line_id;
1603: END IF;
1604:
1605: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1606: p_allocation_in_rec_out.pa_conversion_date := l_allocation_row.pa_conversion_date;
1607: END IF;
1608:
1609: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1605: IF p_allocation_in_rec_out.pa_conversion_date = OKE_API.G_MISS_DATE THEN
1606: p_allocation_in_rec_out.pa_conversion_date := l_allocation_row.pa_conversion_date;
1607: END IF;
1608:
1609: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1610: p_allocation_in_rec_out.pa_conversion_type := l_allocation_row.pa_conversion_type;
1611: END IF;
1612:
1613: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1609: IF p_allocation_in_rec_out.pa_conversion_type = OKE_API.G_MISS_CHAR THEN
1610: p_allocation_in_rec_out.pa_conversion_type := l_allocation_row.pa_conversion_type;
1611: END IF;
1612:
1613: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1614: p_allocation_in_rec_out.pa_conversion_rate := l_allocation_row.pa_conversion_rate;
1615: END IF;
1616:
1617: IF (p_allocation_in_rec_out.project_id = OKE_API.G_MISS_NUM) THEN
1613: IF p_allocation_in_rec_out.pa_conversion_rate = OKE_API.G_MISS_NUM THEN
1614: p_allocation_in_rec_out.pa_conversion_rate := l_allocation_row.pa_conversion_rate;
1615: END IF;
1616:
1617: IF (p_allocation_in_rec_out.project_id = OKE_API.G_MISS_NUM) THEN
1618: p_allocation_in_rec_out.project_id := l_allocation_row.project_id;
1619: END IF;
1620:
1621: IF (nvl(p_allocation_in_rec_out.project_id, -99) <> nvl(l_allocation_row.project_id, -99)) THEN
1639: p_flag := 'N';
1640:
1641: END IF;
1642:
1643: IF (p_allocation_in_rec_out.task_id = OKE_API.G_MISS_NUM) THEN
1644: p_allocation_in_rec_out.task_id := l_allocation_row.task_id;
1645: END IF;
1646:
1647: --
1651: IF (nvl(p_allocation_in_rec_out.task_id, -99) <> nvl(l_allocation_row.task_id, -99)) AND
1652: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1653: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1654:
1655: OKE_API.set_message(p_app_name => G_APP_NAME ,
1656: p_msg_name => 'OKE_API_NO_UPDATE' ,
1657: p_token1 => 'VALUE' ,
1658: p_token1_value => 'task_id'
1659: );
1652: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1653: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1654:
1655: OKE_API.set_message(p_app_name => G_APP_NAME ,
1656: p_msg_name => 'OKE_API_NO_UPDATE' ,
1657: p_token1 => 'VALUE' ,
1658: p_token1_value => 'task_id'
1659: );
1660:
1666: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1667: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1668:
1669:
1670: OKE_API.set_message(p_app_name => G_APP_NAME ,
1671: p_msg_name => 'OKE_API_NO_UPDATE' ,
1672: p_token1 => 'VALUE' ,
1673: p_token1_value => 'project_id'
1674: );
1667: (nvl(l_allocation_row.agreement_version, 0) <> 0)) THEN
1668:
1669:
1670: OKE_API.set_message(p_app_name => G_APP_NAME ,
1671: p_msg_name => 'OKE_API_NO_UPDATE' ,
1672: p_token1 => 'VALUE' ,
1673: p_token1_value => 'project_id'
1674: );
1675:
1680: IF (nvl(p_allocation_in_rec_out.k_line_id, -99) <> nvl(l_allocation_row.k_line_id, -99)) AND
1681: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1682: ((nvl(l_allocation_row.agreement_version, 0) <> 0) AND (nvl(l_allocation_row.pa_flag, 'N') = 'N'))) THEN
1683:
1684: OKE_API.set_message(p_app_name => G_APP_NAME ,
1685: p_msg_name => 'OKE_API_NO_UPDATE' ,
1686: p_token1 => 'VALUE' ,
1687: p_token1_value => 'k_line_id'
1688: );
1681: ((nvl(l_allocation_row.created_in_version, -99) <> nvl(l_version, -99)) OR
1682: ((nvl(l_allocation_row.agreement_version, 0) <> 0) AND (nvl(l_allocation_row.pa_flag, 'N') = 'N'))) THEN
1683:
1684: OKE_API.set_message(p_app_name => G_APP_NAME ,
1685: p_msg_name => 'OKE_API_NO_UPDATE' ,
1686: p_token1 => 'VALUE' ,
1687: p_token1_value => 'k_line_id'
1688: );
1689:
1690: RAISE G_EXCEPTION_HALT_VALIDATION;
1691:
1692: END IF;
1693:
1694: IF p_allocation_in_rec_out.start_date_active = OKE_API.G_MISS_DATE THEN
1695: p_allocation_in_rec_out.start_date_active := l_allocation_row.start_date_active;
1696: END IF;
1697:
1698: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1697:
1698: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1699: (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
1700:
1701: OKE_API.set_message(p_app_name => G_APP_NAME ,
1702: p_msg_name => 'OKE_API_NO_UPDATE' ,
1703: p_token1 => 'VALUE' ,
1704: p_token1_value => 'start_date_active'
1705: );
1698: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1699: (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
1700:
1701: OKE_API.set_message(p_app_name => G_APP_NAME ,
1702: p_msg_name => 'OKE_API_NO_UPDATE' ,
1703: p_token1 => 'VALUE' ,
1704: p_token1_value => 'start_date_active'
1705: );
1706:
1707: RAISE G_EXCEPTION_HALT_VALIDATION;
1708:
1709: END IF;
1710:
1711: IF (p_allocation_in_rec_out.amount = OKE_API.G_MISS_NUM) THEN
1712: p_allocation_in_rec_out.amount := l_allocation_row.amount;
1713: END IF;
1714:
1715: --
1733: END IF;
1734:
1735: IF (l_error_value is not null) THEN
1736:
1737: OKE_API.set_message(p_app_name => G_APP_NAME ,
1738: p_msg_name => 'OKE_NO_FUND_CHANGE' ,
1739: p_token1 => 'FIELD' ,
1740: p_token1_value => l_error_value
1741: );
1745: END IF;
1746:
1747: END IF;
1748: */
1749: IF p_allocation_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
1750: p_allocation_in_rec_out.funding_status := l_allocation_row.funding_status;
1751: END IF;
1752:
1753: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1749: IF p_allocation_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
1750: p_allocation_in_rec_out.funding_status := l_allocation_row.funding_status;
1751: END IF;
1752:
1753: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1754: p_allocation_in_rec_out.fund_type := l_allocation_row.fund_type;
1755: END IF;
1756:
1757: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1753: IF p_allocation_in_rec_out.fund_type = OKE_API.G_MISS_CHAR THEN
1754: p_allocation_in_rec_out.fund_type := l_allocation_row.fund_type;
1755: END IF;
1756:
1757: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1758: p_allocation_in_rec_out.end_date_active := l_allocation_row.end_date_active;
1759: END IF;
1760:
1761: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1757: IF p_allocation_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
1758: p_allocation_in_rec_out.end_date_active := l_allocation_row.end_date_active;
1759: END IF;
1760:
1761: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1762: p_allocation_in_rec_out.fiscal_year := l_allocation_row.fiscal_year;
1763: END IF;
1764:
1765: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1761: IF p_allocation_in_rec_out.fiscal_year = OKE_API.G_MISS_NUM THEN
1762: p_allocation_in_rec_out.fiscal_year := l_allocation_row.fiscal_year;
1763: END IF;
1764:
1765: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1766: p_allocation_in_rec_out.hard_limit := l_allocation_row.hard_limit;
1767: END IF;
1768:
1769: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1765: IF (p_allocation_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
1766: p_allocation_in_rec_out.hard_limit := l_allocation_row.hard_limit;
1767: END IF;
1768:
1769: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1770: p_allocation_in_rec_out.reference1 := l_allocation_row.reference1;
1771: END IF;
1772:
1773: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1769: IF p_allocation_in_rec_out.reference1 = OKE_API.G_MISS_CHAR THEN
1770: p_allocation_in_rec_out.reference1 := l_allocation_row.reference1;
1771: END IF;
1772:
1773: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1774: p_allocation_in_rec_out.reference2 := l_allocation_row.reference2;
1775: END IF;
1776:
1777: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1773: IF p_allocation_in_rec_out.reference2 = OKE_API.G_MISS_CHAR THEN
1774: p_allocation_in_rec_out.reference2 := l_allocation_row.reference2;
1775: END IF;
1776:
1777: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1778: p_allocation_in_rec_out.reference3 := l_allocation_row.reference3;
1779: END IF;
1780:
1781: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1777: IF p_allocation_in_rec_out.reference3 = OKE_API.G_MISS_CHAR THEN
1778: p_allocation_in_rec_out.reference3 := l_allocation_row.reference3;
1779: END IF;
1780:
1781: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1782: p_allocation_in_rec_out.oke_attribute_category := l_allocation_row.attribute_category;
1783: END IF;
1784:
1785: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1781: IF p_allocation_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
1782: p_allocation_in_rec_out.oke_attribute_category := l_allocation_row.attribute_category;
1783: END IF;
1784:
1785: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1786: p_allocation_in_rec_out.oke_attribute1 := l_allocation_row.attribute1;
1787: END IF;
1788:
1789: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1785: IF p_allocation_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
1786: p_allocation_in_rec_out.oke_attribute1 := l_allocation_row.attribute1;
1787: END IF;
1788:
1789: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1790: p_allocation_in_rec_out.oke_attribute2 := l_allocation_row.attribute2;
1791: END IF;
1792:
1793: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1789: IF p_allocation_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
1790: p_allocation_in_rec_out.oke_attribute2 := l_allocation_row.attribute2;
1791: END IF;
1792:
1793: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1794: p_allocation_in_rec_out.oke_attribute3 := l_allocation_row.attribute3;
1795: END IF;
1796:
1797: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1793: IF p_allocation_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
1794: p_allocation_in_rec_out.oke_attribute3 := l_allocation_row.attribute3;
1795: END IF;
1796:
1797: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1798: p_allocation_in_rec_out.oke_attribute4 := l_allocation_row.attribute4;
1799: END IF;
1800:
1801: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1797: IF p_allocation_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
1798: p_allocation_in_rec_out.oke_attribute4 := l_allocation_row.attribute4;
1799: END IF;
1800:
1801: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1802: p_allocation_in_rec_out.oke_attribute5 := l_allocation_row.attribute5;
1803: END IF;
1804:
1805: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1801: IF p_allocation_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
1802: p_allocation_in_rec_out.oke_attribute5 := l_allocation_row.attribute5;
1803: END IF;
1804:
1805: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1806: p_allocation_in_rec_out.oke_attribute6 := l_allocation_row.attribute6;
1807: END IF;
1808:
1809: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1805: IF p_allocation_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
1806: p_allocation_in_rec_out.oke_attribute6 := l_allocation_row.attribute6;
1807: END IF;
1808:
1809: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1810: p_allocation_in_rec_out.oke_attribute7 := l_allocation_row.attribute7;
1811: END IF;
1812:
1813: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1809: IF p_allocation_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
1810: p_allocation_in_rec_out.oke_attribute7 := l_allocation_row.attribute7;
1811: END IF;
1812:
1813: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1814: p_allocation_in_rec_out.oke_attribute8 := l_allocation_row.attribute8;
1815: END IF;
1816:
1817: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1813: IF p_allocation_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
1814: p_allocation_in_rec_out.oke_attribute8 := l_allocation_row.attribute8;
1815: END IF;
1816:
1817: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1818: p_allocation_in_rec_out.oke_attribute9 := l_allocation_row.attribute9;
1819: END IF;
1820:
1821: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1817: IF p_allocation_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
1818: p_allocation_in_rec_out.oke_attribute9 := l_allocation_row.attribute9;
1819: END IF;
1820:
1821: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1822: p_allocation_in_rec_out.oke_attribute10 := l_allocation_row.attribute10;
1823: END IF;
1824:
1825: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1821: IF p_allocation_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
1822: p_allocation_in_rec_out.oke_attribute10 := l_allocation_row.attribute10;
1823: END IF;
1824:
1825: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1826: p_allocation_in_rec_out.oke_attribute11 := l_allocation_row.attribute11;
1827: END IF;
1828:
1829: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1825: IF p_allocation_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
1826: p_allocation_in_rec_out.oke_attribute11 := l_allocation_row.attribute11;
1827: END IF;
1828:
1829: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1830: p_allocation_in_rec_out.oke_attribute12 := l_allocation_row.attribute12;
1831: END IF;
1832:
1833: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1829: IF p_allocation_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
1830: p_allocation_in_rec_out.oke_attribute12 := l_allocation_row.attribute12;
1831: END IF;
1832:
1833: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1834: p_allocation_in_rec_out.oke_attribute13 := l_allocation_row.attribute13;
1835: END IF;
1836:
1837: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1833: IF p_allocation_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
1834: p_allocation_in_rec_out.oke_attribute13 := l_allocation_row.attribute13;
1835: END IF;
1836:
1837: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1838: p_allocation_in_rec_out.oke_attribute14 := l_allocation_row.attribute14;
1839: END IF;
1840:
1841: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1837: IF p_allocation_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
1838: p_allocation_in_rec_out.oke_attribute14 := l_allocation_row.attribute14;
1839: END IF;
1840:
1841: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1842: p_allocation_in_rec_out.oke_attribute15 := l_allocation_row.attribute15;
1843: END IF;
1844:
1845: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1841: IF p_allocation_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
1842: p_allocation_in_rec_out.oke_attribute15 := l_allocation_row.attribute15;
1843: END IF;
1844:
1845: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1846: p_allocation_in_rec_out.revenue_hard_limit := l_allocation_row.revenue_hard_limit;
1847: END IF;
1848:
1849: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1845: IF p_allocation_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
1846: p_allocation_in_rec_out.revenue_hard_limit := l_allocation_row.revenue_hard_limit;
1847: END IF;
1848:
1849: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1850: p_allocation_in_rec_out.pa_attribute_category := l_allocation_row.pa_attribute_category;
1851: END IF;
1852:
1853: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1849: IF p_allocation_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
1850: p_allocation_in_rec_out.pa_attribute_category := l_allocation_row.pa_attribute_category;
1851: END IF;
1852:
1853: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1854: p_allocation_in_rec_out.pa_attribute1 := l_allocation_row.pa_attribute1;
1855: END IF;
1856:
1857: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1853: IF p_allocation_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
1854: p_allocation_in_rec_out.pa_attribute1 := l_allocation_row.pa_attribute1;
1855: END IF;
1856:
1857: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1858: p_allocation_in_rec_out.pa_attribute2 := l_allocation_row.pa_attribute2;
1859: END IF;
1860:
1861: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1857: IF p_allocation_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
1858: p_allocation_in_rec_out.pa_attribute2 := l_allocation_row.pa_attribute2;
1859: END IF;
1860:
1861: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1862: p_allocation_in_rec_out.pa_attribute3 := l_allocation_row.pa_attribute3;
1863: END IF;
1864:
1865: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1861: IF p_allocation_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
1862: p_allocation_in_rec_out.pa_attribute3 := l_allocation_row.pa_attribute3;
1863: END IF;
1864:
1865: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1866: p_allocation_in_rec_out.pa_attribute4 := l_allocation_row.pa_attribute4;
1867: END IF;
1868:
1869: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1865: IF p_allocation_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
1866: p_allocation_in_rec_out.pa_attribute4 := l_allocation_row.pa_attribute4;
1867: END IF;
1868:
1869: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1870: p_allocation_in_rec_out.pa_attribute5 := l_allocation_row.pa_attribute5;
1871: END IF;
1872:
1873: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1869: IF p_allocation_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
1870: p_allocation_in_rec_out.pa_attribute5 := l_allocation_row.pa_attribute5;
1871: END IF;
1872:
1873: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1874: p_allocation_in_rec_out.pa_attribute6 := l_allocation_row.pa_attribute6;
1875: END IF;
1876:
1877: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1873: IF p_allocation_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
1874: p_allocation_in_rec_out.pa_attribute6 := l_allocation_row.pa_attribute6;
1875: END IF;
1876:
1877: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1878: p_allocation_in_rec_out.pa_attribute7 := l_allocation_row.pa_attribute7;
1879: END IF;
1880:
1881: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1877: IF p_allocation_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
1878: p_allocation_in_rec_out.pa_attribute7 := l_allocation_row.pa_attribute7;
1879: END IF;
1880:
1881: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1882: p_allocation_in_rec_out.pa_attribute8 := l_allocation_row.pa_attribute8;
1883: END IF;
1884:
1885: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1881: IF p_allocation_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
1882: p_allocation_in_rec_out.pa_attribute8 := l_allocation_row.pa_attribute8;
1883: END IF;
1884:
1885: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1886: p_allocation_in_rec_out.pa_attribute9 := l_allocation_row.pa_attribute9;
1887: END IF;
1888:
1889: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1885: IF p_allocation_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
1886: p_allocation_in_rec_out.pa_attribute9 := l_allocation_row.pa_attribute9;
1887: END IF;
1888:
1889: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1890: p_allocation_in_rec_out.pa_attribute10 := l_allocation_row.pa_attribute10;
1891: END IF;
1892:
1893: IF p_allocation_in_rec_out.funding_category = OKE_API.G_MISS_CHAR THEN
1889: IF p_allocation_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
1890: p_allocation_in_rec_out.pa_attribute10 := l_allocation_row.pa_attribute10;
1891: END IF;
1892:
1893: IF p_allocation_in_rec_out.funding_category = OKE_API.G_MISS_CHAR THEN
1894: p_allocation_in_rec_out.funding_category := l_allocation_row.funding_category;
1895: END IF;
1896:
1897: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1896:
1897: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1898: (nvl(p_allocation_in_rec_out.funding_category, '-99') <> l_allocation_row.funding_category) THEN
1899:
1900: OKE_API.set_message(p_app_name => G_APP_NAME ,
1901: p_msg_name => 'OKE_API_NO_UPDATE' ,
1902: p_token1 => 'VALUE' ,
1903: p_token1_value => 'funding_category'
1904: );
1897: IF (nvl(l_allocation_row.agreement_version, 0) <> 0) AND
1898: (nvl(p_allocation_in_rec_out.funding_category, '-99') <> l_allocation_row.funding_category) THEN
1899:
1900: OKE_API.set_message(p_app_name => G_APP_NAME ,
1901: p_msg_name => 'OKE_API_NO_UPDATE' ,
1902: p_token1 => 'VALUE' ,
1903: p_token1_value => 'funding_category'
1904: );
1905:
1931: validate_funding_source_id(p_funding_source_id => p_allocation_in_rec.funding_source_id ,
1932: p_return_status => l_return_status
1933: );
1934:
1935: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1936:
1937: RAISE G_EXCEPTION_HALT_VALIDATION;
1938:
1939: END IF;
1946: p_funding_source_id => p_allocation_in_rec.funding_source_id ,
1947: p_return_status => l_return_status
1948: );
1949:
1950: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1951:
1952: RAISE G_EXCEPTION_HALT_VALIDATION;
1953:
1954: END IF;
1960: validate_amount(p_amount => p_allocation_in_rec.amount ,
1961: p_return_status => l_return_status
1962: );
1963:
1964: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1965:
1966: RAISE G_EXCEPTION_HALT_VALIDATION;
1967:
1968: END IF;
1976: p_fund_allocation_id => p_allocation_in_rec.fund_allocation_id ,
1977: p_return_status => l_return_status
1978: );
1979:
1980: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1981:
1982: RAISE G_EXCEPTION_HALT_VALIDATION;
1983:
1984: END IF;
1993: p_object_id => p_allocation_in_rec.object_id ,
1994: p_return_status => l_return_status
1995: );
1996:
1997: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1998:
1999: RAISE G_EXCEPTION_HALT_VALIDATION;
2000:
2001: END IF;
2007: validate_task_id(p_task_id => p_allocation_in_rec.task_id ,
2008: p_return_status => l_return_status
2009: );
2010:
2011: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2012:
2013: RAISE G_EXCEPTION_HALT_VALIDATION;
2014:
2015: END IF;
2021: validate_fund_type(p_fund_type => p_allocation_in_rec.fund_type ,
2022: p_return_status => l_return_status
2023: );
2024:
2025: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2026:
2027: RAISE G_EXCEPTION_HALT_VALIDATION;
2028:
2029: END IF;
2035: validate_funding_status(p_funding_status => p_allocation_in_rec.funding_status ,
2036: p_return_status => l_return_status
2037: );
2038:
2039: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2040:
2041: RAISE G_EXCEPTION_HALT_VALIDATION;
2042:
2043: END IF;
2046: validate_conversion_type(p_conversion_type => p_allocation_in_rec.pa_conversion_type ,
2047: p_return_status => l_return_status
2048: );
2049:
2050: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2051:
2052: RAISE G_EXCEPTION_HALT_VALIDATION;
2053:
2054: END IF;
2060: validate_funding_category(p_funding_category => p_allocation_in_rec.funding_category ,
2061: p_return_status => l_return_status
2062: );
2063:
2064: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2065:
2066: RAISE G_EXCEPTION_HALT_VALIDATION;
2067:
2068: END IF;
2100: );
2101:
2102: IF (l_return_status = 'N') THEN
2103:
2104: OKE_API.set_message(p_app_name => 'OKE' ,
2105: p_msg_name => 'OKE_INVALID_EFFDATE_PAIR'
2106: );
2107:
2108: RAISE G_EXCEPTION_HALT_VALIDATION;
2112: --
2113: -- Validate if date range within source date range
2114: --
2115:
2116: IF (p_validation_flag = OKE_API.G_TRUE) THEN
2117:
2118: -- Start date
2119: -- bug 3345170
2120: /*
2126: );
2127:
2128: IF (l_return_status = 'N') THEN
2129:
2130: OKE_API.set_message(p_app_name => G_APP_NAME ,
2131: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2132: p_token1 => 'EFFECTIVE_DATE' ,
2133: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2134: p_token1_translate => OKE_API.G_TRUE ,
2130: OKE_API.set_message(p_app_name => G_APP_NAME ,
2131: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2132: p_token1 => 'EFFECTIVE_DATE' ,
2133: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2134: p_token1_translate => OKE_API.G_TRUE ,
2135: p_token2 => 'OPERATOR' ,
2136: p_token2_value => 'OKE_GREATER_PROMPT' ,
2137: p_token2_translate => OKE_API.G_TRUE ,
2138: p_token3 => 'DATE_SOURCE' ,
2133: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
2134: p_token1_translate => OKE_API.G_TRUE ,
2135: p_token2 => 'OPERATOR' ,
2136: p_token2_value => 'OKE_GREATER_PROMPT' ,
2137: p_token2_translate => OKE_API.G_TRUE ,
2138: p_token3 => 'DATE_SOURCE' ,
2139: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2140: p_token3_translate => OKE_API.G_TRUE
2141: );
2136: p_token2_value => 'OKE_GREATER_PROMPT' ,
2137: p_token2_translate => OKE_API.G_TRUE ,
2138: p_token3 => 'DATE_SOURCE' ,
2139: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2140: p_token3_translate => OKE_API.G_TRUE
2141: );
2142:
2143: RAISE G_EXCEPTION_HALT_VALIDATION;
2144:
2154: );
2155:
2156: IF (l_return_status = 'N') THEN
2157:
2158: OKE_API.set_message(p_app_name => G_APP_NAME ,
2159: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2160: p_token1 => 'EFFECTIVE_DATE' ,
2161: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2162: p_token1_translate => OKE_API.G_TRUE ,
2158: OKE_API.set_message(p_app_name => G_APP_NAME ,
2159: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
2160: p_token1 => 'EFFECTIVE_DATE' ,
2161: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2162: p_token1_translate => OKE_API.G_TRUE ,
2163: p_token2 => 'OPERATOR' ,
2164: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2165: p_token2_translate => OKE_API.G_TRUE ,
2166: p_token3 => 'DATE_SOURCE' ,
2161: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
2162: p_token1_translate => OKE_API.G_TRUE ,
2163: p_token2 => 'OPERATOR' ,
2164: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2165: p_token2_translate => OKE_API.G_TRUE ,
2166: p_token3 => 'DATE_SOURCE' ,
2167: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2168: p_token3_translate => OKE_API.G_TRUE
2169: );
2164: p_token2_value => 'OKE_EARLIER_PROMPT' ,
2165: p_token2_translate => OKE_API.G_TRUE ,
2166: p_token3 => 'DATE_SOURCE' ,
2167: p_token3_value => 'OKE_FUNDING_SOURCE_PROMPT' ,
2168: p_token3_translate => OKE_API.G_TRUE
2169: );
2170:
2171: RAISE G_EXCEPTION_HALT_VALIDATION;
2172:
2187: );
2188:
2189: IF (l_return_status = 'N') THEN
2190:
2191: OKE_API.set_message(p_app_name => 'OKE' ,
2192: p_msg_name => 'OKE_FUND_AMT_EXCEED'
2193: );
2194:
2195: RAISE G_EXCEPTION_HALT_VALIDATION;
2195: RAISE G_EXCEPTION_HALT_VALIDATION;
2196:
2197: ELSIF (l_return_status = 'E') THEN
2198:
2199: OKE_API.set_message(p_app_name => 'OKE' ,
2200: p_msg_name => 'OKE_NEGATIVE_ALLOCATION_SUM'
2201: );
2202:
2203: RAISE G_EXCEPTION_HALT_VALIDATION;
2223: IF (l_return_status = 'N') THEN
2224:
2225: IF (l_type = 'INVOICE') THEN
2226:
2227: OKE_API.set_message(p_app_name => 'OKE' ,
2228: p_msg_name => 'OKE_HARD_LIMIT_EXCEED'
2229: );
2230:
2231: ELSE
2229: );
2230:
2231: ELSE
2232:
2233: OKE_API.set_message(p_app_name => 'OKE' ,
2234: p_msg_name => 'OKE_REV_LIMIT_EXCEED'
2235: );
2236:
2237: END IF;
2241: ELSIF (l_return_status = 'E') THEN
2242:
2243: IF (l_type = 'INVOICE') THEN
2244:
2245: OKE_API.set_message(p_app_name => 'OKE' ,
2246: p_msg_name => 'OKE_NEGATIVE_HARD_LIMIT_SUM'
2247: );
2248:
2249: ELSE
2247: );
2248:
2249: ELSE
2250:
2251: OKE_API.set_message(p_app_name => 'OKE' ,
2252: p_msg_name => 'OKE_NEGATIVE_REV_LIMIT_SUM'
2253: );
2254:
2255: END IF;
2290: IF (l_source_currency = l_projfunc_currency) THEN
2291:
2292: IF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2293:
2294: OKE_API.set_message(p_app_name => 'OKE' ,
2295: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2296: p_token1 => 'VALUE' ,
2297: p_token1_value => 'pa_conversion_type'
2298: );
2291:
2292: IF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2293:
2294: OKE_API.set_message(p_app_name => 'OKE' ,
2295: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2296: p_token1 => 'VALUE' ,
2297: p_token1_value => 'pa_conversion_type'
2298: );
2299:
2300: RAISE G_EXCEPTION_HALT_VALIDATION;
2301:
2302: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2303:
2304: OKE_API.set_message(p_app_name => 'OKE' ,
2305: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2306: p_token1 => 'VALUE' ,
2307: p_token1_value => 'pa_conversion_date'
2308: );
2301:
2302: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2303:
2304: OKE_API.set_message(p_app_name => 'OKE' ,
2305: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2306: p_token1 => 'VALUE' ,
2307: p_token1_value => 'pa_conversion_date'
2308: );
2309:
2310: RAISE G_EXCEPTION_HALT_VALIDATION;
2311:
2312: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2313:
2314: OKE_API.set_message(p_app_name => 'OKE' ,
2315: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2316: p_token1 => 'VALUE' ,
2317: p_token1_value => 'pa_conversion_rate'
2318: );
2311:
2312: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2313:
2314: OKE_API.set_message(p_app_name => 'OKE' ,
2315: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2316: p_token1 => 'VALUE' ,
2317: p_token1_value => 'pa_conversion_rate'
2318: );
2319:
2339: );
2340:
2341: IF (l_return_status = 'N') THEN
2342:
2343: OKE_API.set_message(p_app_name => G_APP_NAME ,
2344: p_msg_name => 'OKE_FUND_NO_RATE'
2345: );
2346:
2347: RAISE G_EXCEPTION_HALT_VALIDATION;
2351: END IF;
2352:
2353: ELSIF (nvl(p_flag, 'N') = 'Y') THEN
2354:
2355: OKE_API.set_message(p_app_name => 'OKE' ,
2356: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2357: p_token1 => 'VALUE' ,
2358: p_token1_value => 'pa_conversion_rate'
2359: );
2352:
2353: ELSIF (nvl(p_flag, 'N') = 'Y') THEN
2354:
2355: OKE_API.set_message(p_app_name => 'OKE' ,
2356: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2357: p_token1 => 'VALUE' ,
2358: p_token1_value => 'pa_conversion_rate'
2359: );
2360:
2367: ELSIF (nvl(upper(p_allocation_in_rec.pa_conversion_type), '-99') <> 'USER') THEN
2368:
2369: IF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2370:
2371: OKE_API.set_message(p_app_name => 'OKE' ,
2372: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2373: p_token1 => 'VALUE' ,
2374: p_token1_value => 'pa_conversion_rate'
2375: );
2368:
2369: IF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2370:
2371: OKE_API.set_message(p_app_name => 'OKE' ,
2372: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2373: p_token1 => 'VALUE' ,
2374: p_token1_value => 'pa_conversion_rate'
2375: );
2376:
2381: END IF;
2382:
2383: ELSIF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2384:
2385: OKE_API.set_message(p_app_name => 'OKE' ,
2386: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2387: p_token1 => 'VALUE' ,
2388: p_token1_value => 'pa_conversion_type'
2389: );
2382:
2383: ELSIF (p_allocation_in_rec.pa_conversion_type is not null) THEN
2384:
2385: OKE_API.set_message(p_app_name => 'OKE' ,
2386: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2387: p_token1 => 'VALUE' ,
2388: p_token1_value => 'pa_conversion_type'
2389: );
2390:
2391: RAISE G_EXCEPTION_HALT_VALIDATION;
2392:
2393: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2394:
2395: OKE_API.set_message(p_app_name => 'OKE' ,
2396: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2397: p_token1 => 'VALUE' ,
2398: p_token1_value => 'pa_conversion_date'
2399: );
2392:
2393: ELSIF (p_allocation_in_rec.pa_conversion_date is not null) THEN
2394:
2395: OKE_API.set_message(p_app_name => 'OKE' ,
2396: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2397: p_token1 => 'VALUE' ,
2398: p_token1_value => 'pa_conversion_date'
2399: );
2400:
2401: RAISE G_EXCEPTION_HALT_VALIDATION;
2402:
2403: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2404:
2405: OKE_API.set_message(p_app_name => 'OKE' ,
2406: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2407: p_token1 => 'VALUE' ,
2408: p_token1_value => 'pa_conversion_rate'
2409: );
2402:
2403: ELSIF (p_allocation_in_rec.pa_conversion_rate is not null) THEN
2404:
2405: OKE_API.set_message(p_app_name => 'OKE' ,
2406: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2407: p_token1 => 'VALUE' ,
2408: p_token1_value => 'pa_conversion_rate'
2409: );
2410:
2423: -- Procedure add_allocation
2424: --
2425: -- Description: This procedure is used to insert record in OKE_K_FUND_ALLOCATIONS table
2426: --
2427: -- Calling subprograms: OKE_API.start_activity
2428: -- OKE_API.end_activity
2429: -- OKE_FUNDINGALLOCATION_PVT.insert_row
2430: -- null_allocation_out
2431: -- validate_attributes
2424: --
2425: -- Description: This procedure is used to insert record in OKE_K_FUND_ALLOCATIONS table
2426: --
2427: -- Calling subprograms: OKE_API.start_activity
2428: -- OKE_API.end_activity
2429: -- OKE_FUNDINGALLOCATION_PVT.insert_row
2430: -- null_allocation_out
2431: -- validate_attributes
2432: -- validate_record
2432: -- validate_record
2433: --
2434:
2435: PROCEDURE add_allocation(p_api_version IN NUMBER ,
2436: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2437: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2438: p_msg_count OUT NOCOPY NUMBER ,
2439: p_msg_data OUT NOCOPY VARCHAR2 ,
2440: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2433: --
2434:
2435: PROCEDURE add_allocation(p_api_version IN NUMBER ,
2436: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2437: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2438: p_msg_count OUT NOCOPY NUMBER ,
2439: p_msg_data OUT NOCOPY VARCHAR2 ,
2440: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2441: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2438: p_msg_count OUT NOCOPY NUMBER ,
2439: p_msg_data OUT NOCOPY VARCHAR2 ,
2440: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2441: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2442: p_validation_flag IN VARCHAR2 := OKE_API.G_TRUE ,
2443: p_return_status OUT NOCOPY VARCHAR2
2444: ) is
2445:
2446: l_return_status VARCHAR2(1);
2454:
2455: --dbms_output.put_line('entering oke_allocation_pvt.add_allocation');
2456: --oke_debug.debug('entering oke_allocation_pvt.add_allocation');
2457:
2458: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2459: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2460:
2461: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2462: p_pkg_name => G_PKG_NAME ,
2455: --dbms_output.put_line('entering oke_allocation_pvt.add_allocation');
2456: --oke_debug.debug('entering oke_allocation_pvt.add_allocation');
2457:
2458: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2459: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2460:
2461: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2462: p_pkg_name => G_PKG_NAME ,
2463: p_init_msg_list => p_init_msg_list ,
2457:
2458: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2459: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2460:
2461: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2462: p_pkg_name => G_PKG_NAME ,
2463: p_init_msg_list => p_init_msg_list ,
2464: l_api_version => G_API_VERSION_NUMBER ,
2465: p_api_version => p_api_version ,
2466: p_api_type => '_PVT' ,
2467: x_return_status => p_return_status
2468: );
2469:
2470: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2471:
2472: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2473:
2474: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2468: );
2469:
2470: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2471:
2472: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2473:
2474: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2475:
2476: RAISE OKE_API.G_EXCEPTION_ERROR;
2470: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2471:
2472: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2473:
2474: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2475:
2476: RAISE OKE_API.G_EXCEPTION_ERROR;
2477:
2478: END IF;
2472: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2473:
2474: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2475:
2476: RAISE OKE_API.G_EXCEPTION_ERROR;
2477:
2478: END IF;
2479:
2480: --
2582: COMMIT WORK;
2583:
2584: END IF;
2585:
2586: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
2587: x_msg_data => p_msg_data
2588: );
2589:
2590: EXCEPTION
2587: x_msg_data => p_msg_data
2588: );
2589:
2590: EXCEPTION
2591: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2592: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2593: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2594: p_pkg_name => G_PKG_NAME ,
2595: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2588: );
2589:
2590: EXCEPTION
2591: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2592: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2593: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2594: p_pkg_name => G_PKG_NAME ,
2595: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2596: x_msg_count => p_msg_count ,
2589:
2590: EXCEPTION
2591: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2592: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2593: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2594: p_pkg_name => G_PKG_NAME ,
2595: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2596: x_msg_count => p_msg_count ,
2597: x_msg_data => p_msg_data ,
2591: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2592: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2593: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2594: p_pkg_name => G_PKG_NAME ,
2595: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2596: x_msg_count => p_msg_count ,
2597: x_msg_data => p_msg_data ,
2598: p_api_type => '_PVT'
2599: );
2597: x_msg_data => p_msg_data ,
2598: p_api_type => '_PVT'
2599: );
2600:
2601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2603: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2604: p_pkg_name => G_PKG_NAME ,
2605: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2598: p_api_type => '_PVT'
2599: );
2600:
2601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2603: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2604: p_pkg_name => G_PKG_NAME ,
2605: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2606: x_msg_count => p_msg_count ,
2599: );
2600:
2601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2603: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2604: p_pkg_name => G_PKG_NAME ,
2605: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2606: x_msg_count => p_msg_count ,
2607: x_msg_data => p_msg_data ,
2601: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2602: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2603: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2604: p_pkg_name => G_PKG_NAME ,
2605: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2606: x_msg_count => p_msg_count ,
2607: x_msg_data => p_msg_data ,
2608: p_api_type => '_PVT'
2609: );
2608: p_api_type => '_PVT'
2609: );
2610:
2611: WHEN OTHERS THEN
2612: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2613: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2614: p_pkg_name => G_PKG_NAME ,
2615: p_exc_name => 'OTHERS' ,
2616: x_msg_count => p_msg_count ,
2609: );
2610:
2611: WHEN OTHERS THEN
2612: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2613: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2614: p_pkg_name => G_PKG_NAME ,
2615: p_exc_name => 'OTHERS' ,
2616: x_msg_count => p_msg_count ,
2617: x_msg_data => p_msg_data ,
2625: -- Procedure update_allocation
2626: --
2627: -- Description: This procedure is used to update record in OKE_K_FUND_ALLOCATIONS table
2628: --
2629: -- Calling subprograms: OKE_API.start_activity
2630: -- OKE_API.end_activity
2631: -- allowable_changes
2632: -- OKE_FUNDINGALLOCATION_PVT.update_allocation
2633: -- validate_fund_allocation_id
2626: --
2627: -- Description: This procedure is used to update record in OKE_K_FUND_ALLOCATIONS table
2628: --
2629: -- Calling subprograms: OKE_API.start_activity
2630: -- OKE_API.end_activity
2631: -- allowable_changes
2632: -- OKE_FUNDINGALLOCATION_PVT.update_allocation
2633: -- validate_fund_allocation_id
2634: -- validate_populate_rec
2636: -- validate_record
2637: --
2638:
2639: PROCEDURE update_allocation(p_api_version IN NUMBER ,
2640: p_init_msg_list IN VARCHAR2 :=OKE_API.G_FALSE ,
2641: p_commit IN VARCHAR2 :=OKE_API.G_FALSE ,
2642: p_msg_count OUT NOCOPY NUMBER ,
2643: p_msg_data OUT NOCOPY VARCHAR2 ,
2644: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2637: --
2638:
2639: PROCEDURE update_allocation(p_api_version IN NUMBER ,
2640: p_init_msg_list IN VARCHAR2 :=OKE_API.G_FALSE ,
2641: p_commit IN VARCHAR2 :=OKE_API.G_FALSE ,
2642: p_msg_count OUT NOCOPY NUMBER ,
2643: p_msg_data OUT NOCOPY VARCHAR2 ,
2644: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2645: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2642: p_msg_count OUT NOCOPY NUMBER ,
2643: p_msg_data OUT NOCOPY VARCHAR2 ,
2644: p_allocation_in_rec IN ALLOCATION_REC_IN_TYPE ,
2645: p_allocation_out_rec OUT NOCOPY ALLOCATION_REC_OUT_TYPE ,
2646: p_validation_flag IN VARCHAR2 := OKE_API.G_TRUE ,
2647: p_return_status OUT NOCOPY VARCHAR2
2648: ) is
2649:
2650: l_api_name CONSTANT VARCHAR2(30) := 'update_allocation';
2661:
2662: --dbms_output.put_line('entering oke_allocation_pvt.update_allocation');
2663: --oke_debug.debug('entering oke_allocation_pvt.update_allocation');
2664:
2665: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2666: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2667:
2668: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2669: p_pkg_name => G_PKG_NAME ,
2662: --dbms_output.put_line('entering oke_allocation_pvt.update_allocation');
2663: --oke_debug.debug('entering oke_allocation_pvt.update_allocation');
2664:
2665: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2666: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2667:
2668: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2669: p_pkg_name => G_PKG_NAME ,
2670: p_init_msg_list => p_init_msg_list ,
2664:
2665: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2666: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2667:
2668: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2669: p_pkg_name => G_PKG_NAME ,
2670: p_init_msg_list => p_init_msg_list ,
2671: l_api_version => G_API_VERSION_NUMBER ,
2672: p_api_version => p_api_version ,
2673: p_api_type => '_PVT' ,
2674: x_return_status => p_return_status
2675: );
2676:
2677: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2678:
2679: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680:
2681: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2675: );
2676:
2677: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2678:
2679: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680:
2681: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2682:
2683: RAISE OKE_API.G_EXCEPTION_ERROR;
2677: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2678:
2679: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680:
2681: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2682:
2683: RAISE OKE_API.G_EXCEPTION_ERROR;
2684:
2685: END IF;
2679: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2680:
2681: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2682:
2683: RAISE OKE_API.G_EXCEPTION_ERROR;
2684:
2685: END IF;
2686:
2687: --
2826:
2827: --dbms_output.put_line('finished oke_allocation_pvt.update_allocation w/ ' || p_return_status);
2828: --oke_debug.debug('finished oke_allocation_pvt.update_allocation w/ ' || p_return_status);
2829:
2830: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
2831: x_msg_data => p_msg_data
2832: );
2833:
2834: EXCEPTION
2831: x_msg_data => p_msg_data
2832: );
2833:
2834: EXCEPTION
2835: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2836: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2837: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2838: p_pkg_name => G_PKG_NAME ,
2839: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2832: );
2833:
2834: EXCEPTION
2835: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2836: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2837: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2838: p_pkg_name => G_PKG_NAME ,
2839: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2840: x_msg_count => p_msg_count ,
2833:
2834: EXCEPTION
2835: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2836: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2837: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2838: p_pkg_name => G_PKG_NAME ,
2839: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2840: x_msg_count => p_msg_count ,
2841: x_msg_data => p_msg_data ,
2835: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
2836: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
2837: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2838: p_pkg_name => G_PKG_NAME ,
2839: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
2840: x_msg_count => p_msg_count ,
2841: x_msg_data => p_msg_data ,
2842: p_api_type => '_PVT'
2843: );
2841: x_msg_data => p_msg_data ,
2842: p_api_type => '_PVT'
2843: );
2844:
2845: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2846: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2847: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2848: p_pkg_name => G_PKG_NAME ,
2849: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2842: p_api_type => '_PVT'
2843: );
2844:
2845: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2846: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2847: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2848: p_pkg_name => G_PKG_NAME ,
2849: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2850: x_msg_count => p_msg_count ,
2843: );
2844:
2845: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2846: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2847: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2848: p_pkg_name => G_PKG_NAME ,
2849: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2850: x_msg_count => p_msg_count ,
2851: x_msg_data => p_msg_data ,
2845: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2846: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2847: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2848: p_pkg_name => G_PKG_NAME ,
2849: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
2850: x_msg_count => p_msg_count ,
2851: x_msg_data => p_msg_data ,
2852: p_api_type => '_PVT'
2853: );
2852: p_api_type => '_PVT'
2853: );
2854:
2855: WHEN OTHERS THEN
2856: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2857: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2858: p_pkg_name => G_PKG_NAME ,
2859: p_exc_name => 'OTHERS' ,
2860: x_msg_count => p_msg_count ,
2853: );
2854:
2855: WHEN OTHERS THEN
2856: p_allocation_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
2857: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
2858: p_pkg_name => G_PKG_NAME ,
2859: p_exc_name => 'OTHERS' ,
2860: x_msg_count => p_msg_count ,
2861: x_msg_data => p_msg_data ,
2870: --
2871: -- Description: This procedure is used to delete record in OKE_K_FUND_ALLOCATIONS table
2872: --
2873: -- Calling subprograms: OKE_FUNDINGALLOCATION_PVT.delete_row
2874: -- OKE_API.start_activity
2875: -- OKE_API.end_activity
2876: -- validate_fund_allocation_id
2877: -- PA_AGREEMENT_PUB.delete_funding
2878: --
2871: -- Description: This procedure is used to delete record in OKE_K_FUND_ALLOCATIONS table
2872: --
2873: -- Calling subprograms: OKE_FUNDINGALLOCATION_PVT.delete_row
2874: -- OKE_API.start_activity
2875: -- OKE_API.end_activity
2876: -- validate_fund_allocation_id
2877: -- PA_AGREEMENT_PUB.delete_funding
2878: --
2879:
2877: -- PA_AGREEMENT_PUB.delete_funding
2878: --
2879:
2880: PROCEDURE delete_allocation(p_api_version IN NUMBER ,
2881: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2882: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2883: p_msg_count OUT NOCOPY NUMBER ,
2884: p_msg_data OUT NOCOPY VARCHAR2 ,
2885: p_fund_allocation_id IN NUMBER ,
2878: --
2879:
2880: PROCEDURE delete_allocation(p_api_version IN NUMBER ,
2881: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2882: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2883: p_msg_count OUT NOCOPY NUMBER ,
2884: p_msg_data OUT NOCOPY VARCHAR2 ,
2885: p_fund_allocation_id IN NUMBER ,
2886: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
2882: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2883: p_msg_count OUT NOCOPY NUMBER ,
2884: p_msg_data OUT NOCOPY VARCHAR2 ,
2885: p_fund_allocation_id IN NUMBER ,
2886: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
2887: p_return_status OUT NOCOPY VARCHAR2
2888: ) is
2889:
2890: l_api_name CONSTANT VARCHAR2(30) := 'delete_allocation';
2928:
2929: --dbms_output.put_line('entering oke_allocation_pvt.delete_allocation');
2930: --oke_debug.debug('entering oke_allocation_pvt.delete_allocation');
2931:
2932: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2933:
2934: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2935: p_pkg_name => G_PKG_NAME ,
2936: p_init_msg_list => p_init_msg_list ,
2930: --oke_debug.debug('entering oke_allocation_pvt.delete_allocation');
2931:
2932: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2933:
2934: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2935: p_pkg_name => G_PKG_NAME ,
2936: p_init_msg_list => p_init_msg_list ,
2937: l_api_version => G_API_VERSION_NUMBER ,
2938: p_api_version => p_api_version ,
2939: p_api_type => '_PVT' ,
2940: x_return_status => p_return_status
2941: );
2942:
2943: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2944:
2945: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2946:
2947: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2941: );
2942:
2943: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2944:
2945: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2946:
2947: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2948:
2949: RAISE OKE_API.G_EXCEPTION_ERROR;
2943: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2944:
2945: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2946:
2947: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2948:
2949: RAISE OKE_API.G_EXCEPTION_ERROR;
2950:
2951: END IF;
2945: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2946:
2947: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2948:
2949: RAISE OKE_API.G_EXCEPTION_ERROR;
2950:
2951: END IF;
2952:
2953: --
2968: CLOSE c_ver;
2969:
2970: IF (l_current_ver <> l_created_ver) THEN
2971:
2972: OKE_API.set_message(p_app_name => G_APP_NAME ,
2973: p_msg_name => 'OKE_VER_NO_ALLOCATION_DELETE'
2974: );
2975:
2976: RAISE OKE_API.G_EXCEPTION_ERROR;
2972: OKE_API.set_message(p_app_name => G_APP_NAME ,
2973: p_msg_name => 'OKE_VER_NO_ALLOCATION_DELETE'
2974: );
2975:
2976: RAISE OKE_API.G_EXCEPTION_ERROR;
2977:
2978: END IF;
2979: --
2980: -- End 7/15/02
3009: -- fnd_client_info.set_org_context(l_project_funding.org_id);
3010: mo_global.set_policy_context('S',l_project_funding.org_id);
3011:
3012: PA_AGREEMENT_PUB.delete_funding(p_api_version_number => p_api_version ,
3013: p_commit => OKE_API.G_FALSE ,
3014: p_init_msg_list => OKE_API.G_FALSE ,
3015: p_msg_count => p_msg_count ,
3016: p_msg_data => p_msg_data ,
3017: p_return_status => p_return_status ,
3010: mo_global.set_policy_context('S',l_project_funding.org_id);
3011:
3012: PA_AGREEMENT_PUB.delete_funding(p_api_version_number => p_api_version ,
3013: p_commit => OKE_API.G_FALSE ,
3014: p_init_msg_list => OKE_API.G_FALSE ,
3015: p_msg_count => p_msg_count ,
3016: p_msg_data => p_msg_data ,
3017: p_return_status => p_return_status ,
3018: p_pm_product_code => G_PRODUCT_CODE ,
3020: p_funding_id => l_project_funding.project_funding_id ,
3021: p_check_y_n => 'Y'
3022: );
3023:
3024: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3025:
3026: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3027:
3028: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3022: );
3023:
3024: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3025:
3026: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3027:
3028: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3029:
3030: RAISE OKE_API.G_EXCEPTION_ERROR;
3024: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3025:
3026: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3027:
3028: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3029:
3030: RAISE OKE_API.G_EXCEPTION_ERROR;
3031:
3032: END IF;
3026: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3027:
3028: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3029:
3030: RAISE OKE_API.G_EXCEPTION_ERROR;
3031:
3032: END IF;
3033:
3034: END LOOP;
3042: COMMIT WORK;
3043:
3044: END IF;
3045:
3046: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
3047: x_msg_data => p_msg_data
3048: );
3049:
3050: EXCEPTION
3047: x_msg_data => p_msg_data
3048: );
3049:
3050: EXCEPTION
3051: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3052: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3053: p_pkg_name => G_PKG_NAME ,
3054: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3055: x_msg_count => p_msg_count ,
3048: );
3049:
3050: EXCEPTION
3051: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3052: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3053: p_pkg_name => G_PKG_NAME ,
3054: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3055: x_msg_count => p_msg_count ,
3056: x_msg_data => p_msg_data ,
3050: EXCEPTION
3051: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3052: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3053: p_pkg_name => G_PKG_NAME ,
3054: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3055: x_msg_count => p_msg_count ,
3056: x_msg_data => p_msg_data ,
3057: p_api_type => '_PVT'
3058: );
3056: x_msg_data => p_msg_data ,
3057: p_api_type => '_PVT'
3058: );
3059:
3060: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3061: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3062: p_pkg_name => G_PKG_NAME ,
3063: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3064: x_msg_count => p_msg_count ,
3057: p_api_type => '_PVT'
3058: );
3059:
3060: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3061: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3062: p_pkg_name => G_PKG_NAME ,
3063: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3064: x_msg_count => p_msg_count ,
3065: x_msg_data => p_msg_data ,
3059:
3060: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3061: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3062: p_pkg_name => G_PKG_NAME ,
3063: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3064: x_msg_count => p_msg_count ,
3065: x_msg_data => p_msg_data ,
3066: p_api_type => '_PVT'
3067: );
3066: p_api_type => '_PVT'
3067: );
3068:
3069: WHEN OTHERS THEN
3070: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3071: p_pkg_name => G_PKG_NAME ,
3072: p_exc_name => 'OTHERS' ,
3073: x_msg_count => p_msg_count ,
3074: x_msg_data => p_msg_data ,