[Home] [Help]
45: l_install VARCHAR2(1);
46:
47: BEGIN
48:
49: p_return_status := OKE_API.G_RET_STS_SUCCESS;
50:
51: IF (p_agreement_org_id is not null) OR
52: (p_agreement_org_id <> OKE_API.G_MISS_NUM) THEN
53:
48:
49: p_return_status := OKE_API.G_RET_STS_SUCCESS;
50:
51: IF (p_agreement_org_id is not null) OR
52: (p_agreement_org_id <> OKE_API.G_MISS_NUM) THEN
53:
54: l_install := fnd_profile.value('PA_BILLING_LICENSED');
55:
56: if (nvl(l_install, 'N') = 'Y') then
68: end if;
69:
70: IF (l_dummy_value = '?') THEN
71:
72: OKE_API.set_message(p_app_name => G_APP_NAME ,
73: p_msg_name => 'OKE_API_INVALID_VALUE' ,
74: p_token1 => 'VALUE' ,
75: p_token1_value => 'agreement_org_id'
76: );
69:
70: IF (l_dummy_value = '?') THEN
71:
72: OKE_API.set_message(p_app_name => G_APP_NAME ,
73: p_msg_name => 'OKE_API_INVALID_VALUE' ,
74: p_token1 => 'VALUE' ,
75: p_token1_value => 'agreement_org_id'
76: );
77:
74: p_token1 => 'VALUE' ,
75: p_token1_value => 'agreement_org_id'
76: );
77:
78: p_return_status := OKE_API.G_RET_STS_ERROR;
79:
80: END IF;
81:
82: END IF;
82: END IF;
83:
84: EXCEPTION
85: WHEN OTHERS THEN
86: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
87: OKE_API.set_message(p_app_name => G_APP_NAME ,
88: p_msg_name => G_UNEXPECTED_ERROR ,
89: p_token1 => G_SQLCODE_TOKEN ,
90: p_token1_value => SQLCODE ,
83:
84: EXCEPTION
85: WHEN OTHERS THEN
86: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
87: OKE_API.set_message(p_app_name => G_APP_NAME ,
88: p_msg_name => G_UNEXPECTED_ERROR ,
89: p_token1 => G_SQLCODE_TOKEN ,
90: p_token1_value => SQLCODE ,
91: p_token2 => G_SQLERRM_TOKEN ,
140: FETCH c_currency into l_min_unit;
141:
142: IF (c_currency%NOTFOUND) THEN
143: CLOSE c_currency;
144: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
145: END IF;
146:
147: CLOSE c_currency;
148: return(l_min_unit);
147: CLOSE c_currency;
148: return(l_min_unit);
149:
150: EXCEPTION
151: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
152: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
153:
154: WHEN OTHERS THEN
155: OKE_API.set_message(p_app_name => G_APP_NAME ,
148: return(l_min_unit);
149:
150: EXCEPTION
151: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
152: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
153:
154: WHEN OTHERS THEN
155: OKE_API.set_message(p_app_name => G_APP_NAME ,
156: p_msg_name => G_UNEXPECTED_ERROR ,
151: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
152: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
153:
154: WHEN OTHERS THEN
155: OKE_API.set_message(p_app_name => G_APP_NAME ,
156: p_msg_name => G_UNEXPECTED_ERROR ,
157: p_token1 => G_SQLCODE_TOKEN ,
158: p_token1_value => SQLCODE ,
159: p_token2 => G_SQLERRM_TOKEN ,
162:
163: IF c_currency%ISOPEN THEN
164: CLOSE c_currency;
165: END IF;
166: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
167:
168: END get_min_unit;
169:
170:
191:
192: IF (c_currency%NOTFOUND) THEN
193:
194: CLOSE c_currency;
195: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
196:
197: END IF;
198:
199: return(l_currency_code);
199: return(l_currency_code);
200: CLOSE c_currency;
201:
202: EXCEPTION
203: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
204: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
205:
206: WHEN OTHERS THEN
207: OKE_API.set_message(p_app_name => G_APP_NAME ,
200: CLOSE c_currency;
201:
202: EXCEPTION
203: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
204: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
205:
206: WHEN OTHERS THEN
207: OKE_API.set_message(p_app_name => G_APP_NAME ,
208: p_msg_name => G_UNEXPECTED_ERROR ,
203: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
204: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
205:
206: WHEN OTHERS THEN
207: OKE_API.set_message(p_app_name => G_APP_NAME ,
208: p_msg_name => G_UNEXPECTED_ERROR ,
209: p_token1 => G_SQLCODE_TOKEN ,
210: p_token1_value => SQLCODE ,
211: p_token2 => G_SQLERRM_TOKEN ,
214:
215: IF c_currency%ISOPEN THEN
216: CLOSE c_currency;
217: END IF;
218: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
219:
220: END get_k_currency;
221:
222:
283: where agreement_id = p_agreement_id;
284:
285: EXCEPTION
286: WHEN OTHERS THEN
287: OKE_API.set_message(p_app_name => G_APP_NAME ,
288: p_msg_name => G_UNEXPECTED_ERROR ,
289: p_token1 => G_SQLCODE_TOKEN ,
290: p_token1_value => SQLCODE ,
291: p_token2 => G_SQLERRM_TOKEN ,
291: p_token2 => G_SQLERRM_TOKEN ,
292: p_token2_value => SQLERRM
293: );
294:
295: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
296:
297: END update_agreement_reference;
298:
299:
316: where project_funding_id = p_project_funding_id;
317:
318: EXCEPTION
319: WHEN OTHERS THEN
320: OKE_API.set_message(p_app_name => G_APP_NAME ,
321: p_msg_name => G_UNEXPECTED_ERROR ,
322: p_token1 => G_SQLCODE_TOKEN ,
323: p_token1_value => SQLCODE ,
324: p_token2 => G_SQLERRM_TOKEN ,
324: p_token2 => G_SQLERRM_TOKEN ,
325: p_token2_value => SQLERRM
326: );
327:
328: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
329:
330: END update_proj_fld_reference;
331:
332:
348: l_return_status VARCHAR2(1);
349:
350: BEGIN
351:
352: p_return_status := OKE_API.G_RET_STS_SUCCESS;
353:
354: IF (p_from_currency <> p_to_currency) THEN
355:
356: IF (p_conversion_type is null) THEN
354: IF (p_from_currency <> p_to_currency) THEN
355:
356: IF (p_conversion_type is null) THEN
357:
358: OKE_API.set_message(p_app_name => G_APP_NAME ,
359: p_msg_name => 'OKE_API_MISSING_VALUE' ,
360: p_token1 => 'VALUE' ,
361: p_token1_value => 'conversion_type'
362: );
355:
356: IF (p_conversion_type is null) THEN
357:
358: OKE_API.set_message(p_app_name => G_APP_NAME ,
359: p_msg_name => 'OKE_API_MISSING_VALUE' ,
360: p_token1 => 'VALUE' ,
361: p_token1_value => 'conversion_type'
362: );
363:
360: p_token1 => 'VALUE' ,
361: p_token1_value => 'conversion_type'
362: );
363:
364: p_return_status := OKE_API.G_RET_STS_ERROR;
365:
366:
367: ELSIF (p_conversion_date is null) THEN
368:
365:
366:
367: ELSIF (p_conversion_date is null) THEN
368:
369: OKE_API.set_message(p_app_name => G_APP_NAME ,
370: p_msg_name => 'OKE_API_MISSING_VALUE' ,
371: p_token1 => 'VALUE' ,
372: p_token1_value => 'conversion_date'
373: );
366:
367: ELSIF (p_conversion_date is null) THEN
368:
369: OKE_API.set_message(p_app_name => G_APP_NAME ,
370: p_msg_name => 'OKE_API_MISSING_VALUE' ,
371: p_token1 => 'VALUE' ,
372: p_token1_value => 'conversion_date'
373: );
374:
371: p_token1 => 'VALUE' ,
372: p_token1_value => 'conversion_date'
373: );
374:
375: p_return_status := OKE_API.G_RET_STS_ERROR;
376:
377: ELSE
378:
379: -- syho, bug 2208979
390: );
391:
392: IF (l_return_status = 'N') THEN
393:
394: OKE_API.set_message(p_app_name => G_APP_NAME ,
395: p_msg_name => 'OKE_FUND_NO_RATE'
396: );
397:
398: p_return_status := OKE_API.G_RET_STS_ERROR;
394: OKE_API.set_message(p_app_name => G_APP_NAME ,
395: p_msg_name => 'OKE_FUND_NO_RATE'
396: );
397:
398: p_return_status := OKE_API.G_RET_STS_ERROR;
399:
400: END IF;
401:
402: ELSE
400: END IF;
401:
402: ELSE
403:
404: OKE_API.set_message(p_app_name => G_APP_NAME ,
405: p_msg_name => 'OKE_API_INVALID_VALUE' ,
406: p_token1 => 'VALUE' ,
407: p_token1_value => 'conversion_rate'
408: );
401:
402: ELSE
403:
404: OKE_API.set_message(p_app_name => G_APP_NAME ,
405: p_msg_name => 'OKE_API_INVALID_VALUE' ,
406: p_token1 => 'VALUE' ,
407: p_token1_value => 'conversion_rate'
408: );
409:
406: p_token1 => 'VALUE' ,
407: p_token1_value => 'conversion_rate'
408: );
409:
410: p_return_status := OKE_API.G_RET_STS_ERROR;
411:
412: END IF;
413:
414: ELSIF (p_conversion_rate is null) THEN
412: END IF;
413:
414: ELSIF (p_conversion_rate is null) THEN
415:
416: OKE_API.set_message(p_app_name => G_APP_NAME ,
417: p_msg_name => 'OKE_API_INVALID_VALUE' ,
418: p_token1 => 'VALUE' ,
419: p_token1_value => 'conversion_rate'
420: );
413:
414: ELSIF (p_conversion_rate is null) THEN
415:
416: OKE_API.set_message(p_app_name => G_APP_NAME ,
417: p_msg_name => 'OKE_API_INVALID_VALUE' ,
418: p_token1 => 'VALUE' ,
419: p_token1_value => 'conversion_rate'
420: );
421:
418: p_token1 => 'VALUE' ,
419: p_token1_value => 'conversion_rate'
420: );
421:
422: p_return_status := OKE_API.G_RET_STS_ERROR;
423:
424: END IF;
425:
426: END IF;
426: END IF;
427:
428: ELSIF (p_conversion_type is not null) THEN
429:
430: OKE_API.set_message(p_app_name => G_APP_NAME ,
431: p_msg_name => 'OKE_API_INVALID_VALUE' ,
432: p_token1 => 'VALUE' ,
433: p_token1_value => 'conversion_type'
434: );
427:
428: ELSIF (p_conversion_type is not null) THEN
429:
430: OKE_API.set_message(p_app_name => G_APP_NAME ,
431: p_msg_name => 'OKE_API_INVALID_VALUE' ,
432: p_token1 => 'VALUE' ,
433: p_token1_value => 'conversion_type'
434: );
435:
432: p_token1 => 'VALUE' ,
433: p_token1_value => 'conversion_type'
434: );
435:
436: p_return_status := OKE_API.G_RET_STS_ERROR;
437:
438: ELSIF (p_conversion_date is not null) THEN
439:
440: OKE_API.set_message(p_app_name => G_APP_NAME ,
436: p_return_status := OKE_API.G_RET_STS_ERROR;
437:
438: ELSIF (p_conversion_date is not null) THEN
439:
440: OKE_API.set_message(p_app_name => G_APP_NAME ,
441: p_msg_name => 'OKE_API_INVALID_VALUE' ,
442: p_token1 => 'VALUE' ,
443: p_token1_value => 'conversion_date'
444: );
437:
438: ELSIF (p_conversion_date is not null) THEN
439:
440: OKE_API.set_message(p_app_name => G_APP_NAME ,
441: p_msg_name => 'OKE_API_INVALID_VALUE' ,
442: p_token1 => 'VALUE' ,
443: p_token1_value => 'conversion_date'
444: );
445:
442: p_token1 => 'VALUE' ,
443: p_token1_value => 'conversion_date'
444: );
445:
446: p_return_status := OKE_API.G_RET_STS_ERROR;
447:
448: ELSIF (p_conversion_rate is not null) THEN
449:
450: OKE_API.set_message(p_app_name => G_APP_NAME ,
446: p_return_status := OKE_API.G_RET_STS_ERROR;
447:
448: ELSIF (p_conversion_rate is not null) THEN
449:
450: OKE_API.set_message(p_app_name => G_APP_NAME ,
451: p_msg_name => 'OKE_API_INVALID_VALUE' ,
452: p_token1 => 'VALUE' ,
453: p_token1_value => 'conversion_rate'
454: );
447:
448: ELSIF (p_conversion_rate is not null) THEN
449:
450: OKE_API.set_message(p_app_name => G_APP_NAME ,
451: p_msg_name => 'OKE_API_INVALID_VALUE' ,
452: p_token1 => 'VALUE' ,
453: p_token1_value => 'conversion_rate'
454: );
455:
452: p_token1 => 'VALUE' ,
453: p_token1_value => 'conversion_rate'
454: );
455:
456: p_return_status := OKE_API.G_RET_STS_ERROR;
457:
458: END IF;
459:
460: END get_conversion;
471: p_return_status OUT NOCOPY VARCHAR2
472: ) is
473: BEGIN
474:
475: p_return_status := OKE_API.G_RET_STS_SUCCESS;
476:
477: IF (p_object_type is null) OR
478: (p_object_type = OKE_API.G_MISS_CHAR) THEN
479:
474:
475: p_return_status := OKE_API.G_RET_STS_SUCCESS;
476:
477: IF (p_object_type is null) OR
478: (p_object_type = OKE_API.G_MISS_CHAR) THEN
479:
480: OKE_API.set_message(p_app_name => G_APP_NAME ,
481: p_msg_name => 'OKE_API_MISSING_VALUE' ,
482: p_token1 => 'VALUE' ,
476:
477: IF (p_object_type is null) OR
478: (p_object_type = OKE_API.G_MISS_CHAR) THEN
479:
480: OKE_API.set_message(p_app_name => G_APP_NAME ,
481: p_msg_name => 'OKE_API_MISSING_VALUE' ,
482: p_token1 => 'VALUE' ,
483: p_token1_value => 'object_type'
484: );
477: IF (p_object_type is null) OR
478: (p_object_type = OKE_API.G_MISS_CHAR) THEN
479:
480: OKE_API.set_message(p_app_name => G_APP_NAME ,
481: p_msg_name => 'OKE_API_MISSING_VALUE' ,
482: p_token1 => 'VALUE' ,
483: p_token1_value => 'object_type'
484: );
485:
482: p_token1 => 'VALUE' ,
483: p_token1_value => 'object_type'
484: );
485:
486: p_return_status := OKE_API.G_RET_STS_ERROR;
487:
488: ELSE
489:
490: IF (upper(p_object_type) <> G_OBJECT_TYPE) THEN
488: ELSE
489:
490: IF (upper(p_object_type) <> G_OBJECT_TYPE) THEN
491:
492: OKE_API.set_message(p_app_name => G_APP_NAME ,
493: p_msg_name => 'OKE_API_INVALID_VALUE' ,
494: p_token1 => 'VALUE' ,
495: p_token1_value => 'object_type'
496: );
489:
490: IF (upper(p_object_type) <> G_OBJECT_TYPE) THEN
491:
492: OKE_API.set_message(p_app_name => G_APP_NAME ,
493: p_msg_name => 'OKE_API_INVALID_VALUE' ,
494: p_token1 => 'VALUE' ,
495: p_token1_value => 'object_type'
496: );
497:
494: p_token1 => 'VALUE' ,
495: p_token1_value => 'object_type'
496: );
497:
498: p_return_status := OKE_API.G_RET_STS_ERROR;
499:
500: END IF;
501:
502: END IF;
516: ) is
517:
518: BEGIN
519:
520: p_return_status := OKE_API.G_RET_STS_SUCCESS;
521:
522: IF (p_amount is null) OR
523: (p_amount = OKE_API.G_MISS_NUM) THEN
524:
519:
520: p_return_status := OKE_API.G_RET_STS_SUCCESS;
521:
522: IF (p_amount is null) OR
523: (p_amount = OKE_API.G_MISS_NUM) THEN
524:
525: OKE_API.set_message(p_app_name => G_APP_NAME ,
526: p_msg_name => 'OKE_API_MISSING_VALUE' ,
527: p_token1 => 'VALUE' ,
521:
522: IF (p_amount is null) OR
523: (p_amount = OKE_API.G_MISS_NUM) THEN
524:
525: OKE_API.set_message(p_app_name => G_APP_NAME ,
526: p_msg_name => 'OKE_API_MISSING_VALUE' ,
527: p_token1 => 'VALUE' ,
528: p_token1_value => 'amount'
529: );
522: IF (p_amount is null) OR
523: (p_amount = OKE_API.G_MISS_NUM) THEN
524:
525: OKE_API.set_message(p_app_name => G_APP_NAME ,
526: p_msg_name => 'OKE_API_MISSING_VALUE' ,
527: p_token1 => 'VALUE' ,
528: p_token1_value => 'amount'
529: );
530:
527: p_token1 => 'VALUE' ,
528: p_token1_value => 'amount'
529: );
530:
531: p_return_status := OKE_API.G_RET_STS_ERROR;
532:
533: ELSIF (p_amount < 0) THEN
534:
535: OKE_API.set_message(p_app_name => G_APP_NAME ,
531: p_return_status := OKE_API.G_RET_STS_ERROR;
532:
533: ELSIF (p_amount < 0) THEN
534:
535: OKE_API.set_message(p_app_name => G_APP_NAME ,
536: p_msg_name => 'OKE_FUND_NEGATIVE_AMT'
537: );
538:
539: p_return_status := OKE_API.G_RET_STS_ERROR;
535: OKE_API.set_message(p_app_name => G_APP_NAME ,
536: p_msg_name => 'OKE_FUND_NEGATIVE_AMT'
537: );
538:
539: p_return_status := OKE_API.G_RET_STS_ERROR;
540:
541: END IF;
542:
543: END validate_amount;
562:
563: BEGIN
564:
565: IF (p_funding_source_id is null) OR
566: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
567:
568: OKE_API.set_message(p_app_name => G_APP_NAME ,
569: p_msg_name => 'OKE_API_MISSING_VALUE' ,
570: p_token1 => 'VALUE' ,
564:
565: IF (p_funding_source_id is null) OR
566: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
567:
568: OKE_API.set_message(p_app_name => G_APP_NAME ,
569: p_msg_name => 'OKE_API_MISSING_VALUE' ,
570: p_token1 => 'VALUE' ,
571: p_token1_value => 'funding_source_id'
572: );
565: IF (p_funding_source_id is null) OR
566: (p_funding_source_id = OKE_API.G_MISS_NUM) THEN
567:
568: OKE_API.set_message(p_app_name => G_APP_NAME ,
569: p_msg_name => 'OKE_API_MISSING_VALUE' ,
570: p_token1 => 'VALUE' ,
571: p_token1_value => 'funding_source_id'
572: );
573:
579: FETCH c_funding_source_id into p_rowid, p_pool_party_id, p_agreement_flag;
580:
581: IF (c_funding_source_id%NOTFOUND) THEN
582:
583: OKE_API.set_message(p_app_name => G_APP_NAME ,
584: p_msg_name => 'OKE_API_INVALID_VALUE' ,
585: p_token1 => 'VALUE' ,
586: p_token1_value => 'funding_source_id'
587: );
580:
581: IF (c_funding_source_id%NOTFOUND) THEN
582:
583: OKE_API.set_message(p_app_name => G_APP_NAME ,
584: p_msg_name => 'OKE_API_INVALID_VALUE' ,
585: p_token1 => 'VALUE' ,
586: p_token1_value => 'funding_source_id'
587: );
588:
597: WHEN G_EXCEPTION_HALT_VALIDATION THEN
598: raise G_EXCEPTION_HALT_VALIDATION;
599:
600: WHEN OTHERS THEN
601: OKE_API.set_message(p_app_name => G_APP_NAME ,
602: p_msg_name => G_UNEXPECTED_ERROR ,
603: p_token1 => G_SQLCODE_TOKEN ,
604: p_token1_value => SQLCODE ,
605: p_token2 => G_SQLERRM_TOKEN ,
609: IF c_funding_source_id%ISOPEN THEN
610: CLOSE c_funding_source_id;
611: END IF;
612:
613: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
614:
615: END validate_funding_source_id;
616:
617:
634: l_dummy_value VARCHAR2(1) := '?';
635:
636: BEGIN
637:
638: p_return_status := OKE_API.G_RET_STS_SUCCESS;
639:
640: IF (p_object_id is null) OR
641: (p_object_id = OKE_API.G_MISS_NUM) THEN
642:
637:
638: p_return_status := OKE_API.G_RET_STS_SUCCESS;
639:
640: IF (p_object_id is null) OR
641: (p_object_id = OKE_API.G_MISS_NUM) THEN
642:
643: OKE_API.set_message(p_app_name => G_APP_NAME ,
644: p_msg_name => 'OKE_API_MISSING_VALUE' ,
645: p_token1 => 'VALUE' ,
639:
640: IF (p_object_id is null) OR
641: (p_object_id = OKE_API.G_MISS_NUM) THEN
642:
643: OKE_API.set_message(p_app_name => G_APP_NAME ,
644: p_msg_name => 'OKE_API_MISSING_VALUE' ,
645: p_token1 => 'VALUE' ,
646: p_token1_value => 'object_id'
647: );
640: IF (p_object_id is null) OR
641: (p_object_id = OKE_API.G_MISS_NUM) THEN
642:
643: OKE_API.set_message(p_app_name => G_APP_NAME ,
644: p_msg_name => 'OKE_API_MISSING_VALUE' ,
645: p_token1 => 'VALUE' ,
646: p_token1_value => 'object_id'
647: );
648:
645: p_token1 => 'VALUE' ,
646: p_token1_value => 'object_id'
647: );
648:
649: p_return_status := OKE_API.G_RET_STS_ERROR;
650:
651: ELSE
652:
653: OPEN c_object_id;
655: CLOSE c_object_id;
656:
657: IF (l_dummy_value = '?') THEN
658:
659: OKE_API.set_message(p_app_name => G_APP_NAME ,
660: p_msg_name => 'OKE_API_INVALID_VALUE' ,
661: p_token1 => 'VALUE' ,
662: p_token1_value => 'object_id'
663: );
656:
657: IF (l_dummy_value = '?') THEN
658:
659: OKE_API.set_message(p_app_name => G_APP_NAME ,
660: p_msg_name => 'OKE_API_INVALID_VALUE' ,
661: p_token1 => 'VALUE' ,
662: p_token1_value => 'object_id'
663: );
664:
661: p_token1 => 'VALUE' ,
662: p_token1_value => 'object_id'
663: );
664:
665: p_return_status := OKE_API.G_RET_STS_ERROR;
666:
667: END IF;
668:
669: END IF;
669: END IF;
670:
671: EXCEPTION
672: WHEN OTHERS THEN
673: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
674: OKE_API.set_message(p_app_name => G_APP_NAME ,
675: p_msg_name => G_UNEXPECTED_ERROR ,
676: p_token1 => G_SQLCODE_TOKEN ,
677: p_token1_value => SQLCODE ,
670:
671: EXCEPTION
672: WHEN OTHERS THEN
673: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
674: OKE_API.set_message(p_app_name => G_APP_NAME ,
675: p_msg_name => G_UNEXPECTED_ERROR ,
676: p_token1 => G_SQLCODE_TOKEN ,
677: p_token1_value => SQLCODE ,
678: p_token2 => G_SQLERRM_TOKEN ,
705: l_dummy_value VARCHAR2(1) := '?';
706:
707: BEGIN
708:
709: p_return_status := OKE_API.G_RET_STS_SUCCESS;
710:
711: IF (p_currency_code is null) OR
712: (p_currency_code = OKE_API.G_MISS_CHAR) THEN
713:
708:
709: p_return_status := OKE_API.G_RET_STS_SUCCESS;
710:
711: IF (p_currency_code is null) OR
712: (p_currency_code = OKE_API.G_MISS_CHAR) THEN
713:
714: OKE_API.set_message(p_app_name => G_APP_NAME ,
715: p_msg_name => 'OKE_API_MISSING_VALUE' ,
716: p_token1 => 'VALUE' ,
710:
711: IF (p_currency_code is null) OR
712: (p_currency_code = OKE_API.G_MISS_CHAR) THEN
713:
714: OKE_API.set_message(p_app_name => G_APP_NAME ,
715: p_msg_name => 'OKE_API_MISSING_VALUE' ,
716: p_token1 => 'VALUE' ,
717: p_token1_value => 'currency_code'
718: );
711: IF (p_currency_code is null) OR
712: (p_currency_code = OKE_API.G_MISS_CHAR) THEN
713:
714: OKE_API.set_message(p_app_name => G_APP_NAME ,
715: p_msg_name => 'OKE_API_MISSING_VALUE' ,
716: p_token1 => 'VALUE' ,
717: p_token1_value => 'currency_code'
718: );
719:
716: p_token1 => 'VALUE' ,
717: p_token1_value => 'currency_code'
718: );
719:
720: p_return_status := OKE_API.G_RET_STS_ERROR;
721:
722: ELSE
723:
724: OPEN c_currency_code;
726: CLOSE c_currency_code;
727:
728: IF (l_dummy_value = '?') THEN
729:
730: OKE_API.set_message(p_app_name => G_APP_NAME ,
731: p_msg_name => 'OKE_API_INVALID_VALUE' ,
732: p_token1 => 'VALUE' ,
733: p_token1_value => 'currency_code'
734: );
727:
728: IF (l_dummy_value = '?') THEN
729:
730: OKE_API.set_message(p_app_name => G_APP_NAME ,
731: p_msg_name => 'OKE_API_INVALID_VALUE' ,
732: p_token1 => 'VALUE' ,
733: p_token1_value => 'currency_code'
734: );
735:
732: p_token1 => 'VALUE' ,
733: p_token1_value => 'currency_code'
734: );
735:
736: p_return_status := OKE_API.G_RET_STS_ERROR;
737:
738: END IF;
739:
740: END IF;
740: END IF;
741:
742: EXCEPTION
743: WHEN OTHERS THEN
744: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
745: OKE_API.set_message(p_app_name => G_APP_NAME ,
746: p_msg_name => G_UNEXPECTED_ERROR ,
747: p_token1 => G_SQLCODE_TOKEN ,
748: p_token1_value => SQLCODE ,
741:
742: EXCEPTION
743: WHEN OTHERS THEN
744: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
745: OKE_API.set_message(p_app_name => G_APP_NAME ,
746: p_msg_name => G_UNEXPECTED_ERROR ,
747: p_token1 => G_SQLCODE_TOKEN ,
748: p_token1_value => SQLCODE ,
749: p_token2 => G_SQLERRM_TOKEN ,
799: l_project_id NUMBER;
800:
801: BEGIN
802:
803: p_return_status := OKE_API.G_RET_STS_SUCCESS;
804:
805: IF (p_agreement_id is null) OR
806: (p_agreement_id = OKE_API.G_MISS_NUM) THEN
807:
802:
803: p_return_status := OKE_API.G_RET_STS_SUCCESS;
804:
805: IF (p_agreement_id is null) OR
806: (p_agreement_id = OKE_API.G_MISS_NUM) THEN
807:
808: OKE_API.set_message(p_app_name => G_APP_NAME ,
809: p_msg_name => 'OKE_API_MISSING_VALUE' ,
810: p_token1 => 'VALUE' ,
804:
805: IF (p_agreement_id is null) OR
806: (p_agreement_id = OKE_API.G_MISS_NUM) THEN
807:
808: OKE_API.set_message(p_app_name => G_APP_NAME ,
809: p_msg_name => 'OKE_API_MISSING_VALUE' ,
810: p_token1 => 'VALUE' ,
811: p_token1_value => 'agreement_id'
812: );
805: IF (p_agreement_id is null) OR
806: (p_agreement_id = OKE_API.G_MISS_NUM) THEN
807:
808: OKE_API.set_message(p_app_name => G_APP_NAME ,
809: p_msg_name => 'OKE_API_MISSING_VALUE' ,
810: p_token1 => 'VALUE' ,
811: p_token1_value => 'agreement_id'
812: );
813:
810: p_token1 => 'VALUE' ,
811: p_token1_value => 'agreement_id'
812: );
813:
814: p_return_status := OKE_API.G_RET_STS_ERROR;
815:
816: ELSE
817:
818: OPEN c_agreement_id;
820: CLOSE c_agreement_id;
821:
822: IF (l_dummy_value = '?') THEN
823:
824: OKE_API.set_message(p_app_name => G_APP_NAME ,
825: p_msg_name => 'OKE_API_INVALID_VALUE' ,
826: p_token1 => 'VALUE' ,
827: p_token1_value => 'agreement_id'
828: );
821:
822: IF (l_dummy_value = '?') THEN
823:
824: OKE_API.set_message(p_app_name => G_APP_NAME ,
825: p_msg_name => 'OKE_API_INVALID_VALUE' ,
826: p_token1 => 'VALUE' ,
827: p_token1_value => 'agreement_id'
828: );
829:
826: p_token1 => 'VALUE' ,
827: p_token1_value => 'agreement_id'
828: );
829:
830: p_return_status := OKE_API.G_RET_STS_ERROR;
831:
832: END IF;
833:
834: OPEN c_master_project;
836: CLOSE c_master_project;
837:
838: IF (l_project_id is null) THEN
839:
840: OKE_API.set_message(p_app_name => G_APP_NAME ,
841: p_msg_name => 'OKE_API_INVALID_VALUE' ,
842: p_token1 => 'VALUE' ,
843: p_token1_value => 'agreement_id'
844: );
837:
838: IF (l_project_id is null) THEN
839:
840: OKE_API.set_message(p_app_name => G_APP_NAME ,
841: p_msg_name => 'OKE_API_INVALID_VALUE' ,
842: p_token1 => 'VALUE' ,
843: p_token1_value => 'agreement_id'
844: );
845:
842: p_token1 => 'VALUE' ,
843: p_token1_value => 'agreement_id'
844: );
845:
846: p_return_status := OKE_API.G_RET_STS_ERROR;
847:
848: ELSE
849:
850: l_dummy_value := '?';
853: CLOSE c_project;
854:
855: IF (l_dummy_value = 'x') THEN
856:
857: OKE_API.set_message(p_app_name => G_APP_NAME ,
858: p_msg_name => 'OKE_API_INVALID_VALUE' ,
859: p_token1 => 'VALUE' ,
860: p_token1_value => 'agreement_id'
861: );
854:
855: IF (l_dummy_value = 'x') THEN
856:
857: OKE_API.set_message(p_app_name => G_APP_NAME ,
858: p_msg_name => 'OKE_API_INVALID_VALUE' ,
859: p_token1 => 'VALUE' ,
860: p_token1_value => 'agreement_id'
861: );
862:
859: p_token1 => 'VALUE' ,
860: p_token1_value => 'agreement_id'
861: );
862:
863: p_return_status := OKE_API.G_RET_STS_ERROR;
864:
865: END IF;
866:
867: END IF;
869: END IF;
870:
871: EXCEPTION
872: WHEN OTHERS THEN
873: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
874: OKE_API.set_message(p_app_name => G_APP_NAME ,
875: p_msg_name => G_UNEXPECTED_ERROR ,
876: p_token1 => G_SQLCODE_TOKEN ,
877: p_token1_value => SQLCODE ,
870:
871: EXCEPTION
872: WHEN OTHERS THEN
873: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
874: OKE_API.set_message(p_app_name => G_APP_NAME ,
875: p_msg_name => G_UNEXPECTED_ERROR ,
876: p_token1 => G_SQLCODE_TOKEN ,
877: p_token1_value => SQLCODE ,
878: p_token2 => G_SQLERRM_TOKEN ,
907: l_dummy_value varchar2(1) := '?';
908:
909: BEGIN
910:
911: p_return_status := OKE_API.G_RET_STS_SUCCESS;
912:
913: OPEN c_agreement_id;
914: FETCH c_agreement_id into l_dummy_value;
915: CLOSE c_agreement_id;
915: CLOSE c_agreement_id;
916:
917: IF (l_dummy_value = '?') THEN
918:
919: OKE_API.set_message(p_app_name => G_APP_NAME ,
920: p_msg_name => 'OKE_API_INVALID_VALUE' ,
921: p_token1 => 'VALUE' ,
922: p_token1_value => 'agreement_id'
923: );
916:
917: IF (l_dummy_value = '?') THEN
918:
919: OKE_API.set_message(p_app_name => G_APP_NAME ,
920: p_msg_name => 'OKE_API_INVALID_VALUE' ,
921: p_token1 => 'VALUE' ,
922: p_token1_value => 'agreement_id'
923: );
924:
921: p_token1 => 'VALUE' ,
922: p_token1_value => 'agreement_id'
923: );
924:
925: p_return_status := OKE_API.G_RET_STS_ERROR;
926:
927: END IF;
928:
929: EXCEPTION
927: END IF;
928:
929: EXCEPTION
930: WHEN G_RESOURCE_BUSY THEN
931: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
932: OKE_API.set_message(p_app_name => G_APP_NAME ,
933: p_msg_name => 'OKE_ROW_LOCKED' ,
934: p_token1 => 'SOURCE' ,
935: p_token1_value => 'OKE_AGREEMENT_PROMPT' ,
928:
929: EXCEPTION
930: WHEN G_RESOURCE_BUSY THEN
931: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
932: OKE_API.set_message(p_app_name => G_APP_NAME ,
933: p_msg_name => 'OKE_ROW_LOCKED' ,
934: p_token1 => 'SOURCE' ,
935: p_token1_value => 'OKE_AGREEMENT_PROMPT' ,
936: p_token1_translate => OKE_API.G_TRUE ,
932: OKE_API.set_message(p_app_name => G_APP_NAME ,
933: p_msg_name => 'OKE_ROW_LOCKED' ,
934: p_token1 => 'SOURCE' ,
935: p_token1_value => 'OKE_AGREEMENT_PROMPT' ,
936: p_token1_translate => OKE_API.G_TRUE ,
937: p_token2 => 'ID' ,
938: p_token2_value => p_agreement_id
939: );
940:
942: CLOSE c_agreement_id;
943: END IF;
944:
945: WHEN OTHERS THEN
946: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
947: OKE_API.set_message(p_app_name => G_APP_NAME ,
948: p_msg_name => G_UNEXPECTED_ERROR ,
949: p_token1 => G_SQLCODE_TOKEN ,
950: p_token1_value => SQLCODE ,
943: END IF;
944:
945: WHEN OTHERS THEN
946: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
947: OKE_API.set_message(p_app_name => G_APP_NAME ,
948: p_msg_name => G_UNEXPECTED_ERROR ,
949: p_token1 => G_SQLCODE_TOKEN ,
950: p_token1_value => SQLCODE ,
951: p_token2 => G_SQLERRM_TOKEN ,
979: l_dummy_value varchar2(1) := '?';
980:
981: BEGIN
982:
983: p_return_status := OKE_API.G_RET_STS_SUCCESS;
984:
985: OPEN c_project_funding;
986: FETCH c_project_funding into l_dummy_value;
987: CLOSE c_project_funding;
987: CLOSE c_project_funding;
988:
989: EXCEPTION
990: WHEN G_RESOURCE_BUSY THEN
991: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
992: OKE_API.set_message(p_app_name => G_APP_NAME ,
993: p_msg_name => 'OKE_ROW_LOCKED' ,
994: p_token1 => 'SOURCE' ,
995: p_token1_value => 'OKE_PRJ_FUNDING_PROMPT' ,
988:
989: EXCEPTION
990: WHEN G_RESOURCE_BUSY THEN
991: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
992: OKE_API.set_message(p_app_name => G_APP_NAME ,
993: p_msg_name => 'OKE_ROW_LOCKED' ,
994: p_token1 => 'SOURCE' ,
995: p_token1_value => 'OKE_PRJ_FUNDING_PROMPT' ,
996: p_token1_translate => OKE_API.G_TRUE ,
992: OKE_API.set_message(p_app_name => G_APP_NAME ,
993: p_msg_name => 'OKE_ROW_LOCKED' ,
994: p_token1 => 'SOURCE' ,
995: p_token1_value => 'OKE_PRJ_FUNDING_PROMPT' ,
996: p_token1_translate => OKE_API.G_TRUE ,
997: p_token2 => 'ID' ,
998: p_token2_value => null
999: );
1000:
1002: CLOSE c_project_funding;
1003: END IF;
1004:
1005: WHEN OTHERS THEN
1006: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1007: OKE_API.set_message(p_app_name => G_APP_NAME ,
1008: p_msg_name => G_UNEXPECTED_ERROR ,
1009: p_token1 => G_SQLCODE_TOKEN ,
1010: p_token1_value => SQLCODE ,
1003: END IF;
1004:
1005: WHEN OTHERS THEN
1006: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1007: OKE_API.set_message(p_app_name => G_APP_NAME ,
1008: p_msg_name => G_UNEXPECTED_ERROR ,
1009: p_token1 => G_SQLCODE_TOKEN ,
1010: p_token1_value => SQLCODE ,
1011: p_token2 => G_SQLERRM_TOKEN ,
1037: lock_agreement_id(p_agreement_id => p_agreement_id ,
1038: p_return_status => l_return_status
1039: );
1040:
1041: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1042:
1043: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044:
1045: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1039: );
1040:
1041: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1042:
1043: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044:
1045: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1046:
1047: RAISE OKE_API.G_EXCEPTION_ERROR;
1041: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1042:
1043: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044:
1045: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1046:
1047: RAISE OKE_API.G_EXCEPTION_ERROR;
1048:
1049: END IF;
1043: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044:
1045: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1046:
1047: RAISE OKE_API.G_EXCEPTION_ERROR;
1048:
1049: END IF;
1050:
1051: lock_project_funding(p_agreement_id => p_agreement_id ,
1051: lock_project_funding(p_agreement_id => p_agreement_id ,
1052: p_return_status => l_return_status
1053: );
1054:
1055: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1056:
1057: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058:
1059: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1053: );
1054:
1055: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1056:
1057: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058:
1059: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1060:
1061: RAISE OKE_API.G_EXCEPTION_ERROR;
1055: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
1056:
1057: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058:
1059: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1060:
1061: RAISE OKE_API.G_EXCEPTION_ERROR;
1062:
1063: END IF;
1057: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
1058:
1059: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
1060:
1061: RAISE OKE_API.G_EXCEPTION_ERROR;
1062:
1063: END IF;
1064:
1065: END lock_agreement;
1090: l_dummy_value VARCHAR2(1) := '?';
1091:
1092: BEGIN
1093:
1094: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1095:
1096: IF (p_k_party_id is null) OR
1097: (p_k_party_id = OKE_API.G_MISS_NUM) THEN
1098:
1093:
1094: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1095:
1096: IF (p_k_party_id is null) OR
1097: (p_k_party_id = OKE_API.G_MISS_NUM) THEN
1098:
1099: OKE_API.set_message(p_app_name => G_APP_NAME ,
1100: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1101: p_token1 => 'VALUE' ,
1095:
1096: IF (p_k_party_id is null) OR
1097: (p_k_party_id = OKE_API.G_MISS_NUM) THEN
1098:
1099: OKE_API.set_message(p_app_name => G_APP_NAME ,
1100: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1101: p_token1 => 'VALUE' ,
1102: p_token1_value => 'k_party_id'
1103: );
1096: IF (p_k_party_id is null) OR
1097: (p_k_party_id = OKE_API.G_MISS_NUM) THEN
1098:
1099: OKE_API.set_message(p_app_name => G_APP_NAME ,
1100: p_msg_name => 'OKE_API_MISSING_VALUE' ,
1101: p_token1 => 'VALUE' ,
1102: p_token1_value => 'k_party_id'
1103: );
1104:
1101: p_token1 => 'VALUE' ,
1102: p_token1_value => 'k_party_id'
1103: );
1104:
1105: p_return_status := OKE_API.G_RET_STS_ERROR;
1106:
1107: ELSE
1108:
1109: OPEN c_party_id;
1111: CLOSE c_party_id;
1112:
1113: IF (l_dummy_value = '?') THEN
1114:
1115: OKE_API.set_message(p_app_name => G_APP_NAME ,
1116: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1117: p_token1 => 'VALUE' ,
1118: p_token1_value => 'k_party_id'
1119: );
1112:
1113: IF (l_dummy_value = '?') THEN
1114:
1115: OKE_API.set_message(p_app_name => G_APP_NAME ,
1116: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1117: p_token1 => 'VALUE' ,
1118: p_token1_value => 'k_party_id'
1119: );
1120:
1117: p_token1 => 'VALUE' ,
1118: p_token1_value => 'k_party_id'
1119: );
1120:
1121: p_return_status := OKE_API.G_RET_STS_ERROR;
1122:
1123: END IF;
1124:
1125: END IF;
1125: END IF;
1126:
1127: EXCEPTION
1128: WHEN OTHERS THEN
1129: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1130: OKE_API.set_message(p_app_name => G_APP_NAME ,
1131: p_msg_name => G_UNEXPECTED_ERROR ,
1132: p_token1 => G_SQLCODE_TOKEN ,
1133: p_token1_value => SQLCODE ,
1126:
1127: EXCEPTION
1128: WHEN OTHERS THEN
1129: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1130: OKE_API.set_message(p_app_name => G_APP_NAME ,
1131: p_msg_name => G_UNEXPECTED_ERROR ,
1132: p_token1 => G_SQLCODE_TOKEN ,
1133: p_token1_value => SQLCODE ,
1134: p_token2 => G_SQLERRM_TOKEN ,
1164: l_dummy_value VARCHAR2(1) := '?';
1165:
1166: BEGIN
1167:
1168: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1169:
1170: IF (p_funding_status is not null) THEN
1171:
1172: OPEN c_funding_status;
1174: CLOSE c_funding_status;
1175:
1176: IF (l_dummy_value = '?') THEN
1177:
1178: OKE_API.set_message(p_app_name => G_APP_NAME ,
1179: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1180: p_token1 => 'VALUE' ,
1181: p_token1_value => 'funding_status'
1182: );
1175:
1176: IF (l_dummy_value = '?') THEN
1177:
1178: OKE_API.set_message(p_app_name => G_APP_NAME ,
1179: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1180: p_token1 => 'VALUE' ,
1181: p_token1_value => 'funding_status'
1182: );
1183:
1180: p_token1 => 'VALUE' ,
1181: p_token1_value => 'funding_status'
1182: );
1183:
1184: p_return_status := OKE_API.G_RET_STS_ERROR;
1185:
1186: END IF;
1187:
1188: END IF;
1188: END IF;
1189:
1190: EXCEPTION
1191: WHEN OTHERS THEN
1192: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1193: OKE_API.set_message(p_app_name => G_APP_NAME ,
1194: p_msg_name => G_UNEXPECTED_ERROR ,
1195: p_token1 => G_SQLCODE_TOKEN ,
1196: p_token1_value => SQLCODE ,
1189:
1190: EXCEPTION
1191: WHEN OTHERS THEN
1192: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1193: OKE_API.set_message(p_app_name => G_APP_NAME ,
1194: p_msg_name => G_UNEXPECTED_ERROR ,
1195: p_token1 => G_SQLCODE_TOKEN ,
1196: p_token1_value => SQLCODE ,
1197: p_token2 => G_SQLERRM_TOKEN ,
1224: l_dummy_value VARCHAR2(1) := '?';
1225:
1226: BEGIN
1227:
1228: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1229:
1230: IF (p_conversion_type is not null) THEN
1231:
1232: OPEN c_type;
1234: CLOSE c_type;
1235:
1236: IF (l_dummy_value = '?') THEN
1237:
1238: OKE_API.set_message(p_app_name => G_APP_NAME ,
1239: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1240: p_token1 => 'VALUE' ,
1241: p_token1_value => 'conversion_type'
1242: );
1235:
1236: IF (l_dummy_value = '?') THEN
1237:
1238: OKE_API.set_message(p_app_name => G_APP_NAME ,
1239: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1240: p_token1 => 'VALUE' ,
1241: p_token1_value => 'conversion_type'
1242: );
1243:
1240: p_token1 => 'VALUE' ,
1241: p_token1_value => 'conversion_type'
1242: );
1243:
1244: p_return_status := OKE_API.G_RET_STS_ERROR;
1245:
1246: END IF;
1247:
1248: END IF;
1248: END IF;
1249:
1250: EXCEPTION
1251: WHEN OTHERS THEN
1252: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1253: OKE_API.set_message(p_app_name => G_APP_NAME ,
1254: p_msg_name => G_UNEXPECTED_ERROR ,
1255: p_token1 => G_SQLCODE_TOKEN ,
1256: p_token1_value => SQLCODE ,
1249:
1250: EXCEPTION
1251: WHEN OTHERS THEN
1252: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1253: OKE_API.set_message(p_app_name => G_APP_NAME ,
1254: p_msg_name => G_UNEXPECTED_ERROR ,
1255: p_token1 => G_SQLCODE_TOKEN ,
1256: p_token1_value => SQLCODE ,
1257: p_token2 => G_SQLERRM_TOKEN ,
1285: l_dummy_value VARCHAR2(1) := '?';
1286:
1287: BEGIN
1288:
1289: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1290:
1291: IF (p_pool_party_id is not null) THEN
1292:
1293: OPEN c_pool_party_id;
1295: CLOSE c_pool_party_id;
1296:
1297: IF (l_dummy_value = '?') THEN
1298:
1299: OKE_API.set_message(p_app_name => G_APP_NAME ,
1300: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1301: p_token1 => 'VALUE' ,
1302: p_token1_value => 'pool_party_id'
1303: );
1296:
1297: IF (l_dummy_value = '?') THEN
1298:
1299: OKE_API.set_message(p_app_name => G_APP_NAME ,
1300: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1301: p_token1 => 'VALUE' ,
1302: p_token1_value => 'pool_party_id'
1303: );
1304:
1301: p_token1 => 'VALUE' ,
1302: p_token1_value => 'pool_party_id'
1303: );
1304:
1305: p_return_status := OKE_API.G_RET_STS_ERROR;
1306:
1307: END IF;
1308:
1309: END IF;
1309: END IF;
1310:
1311: EXCEPTION
1312: WHEN G_RESOURCE_BUSY THEN
1313: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1314: OKE_API.set_message(p_app_name => G_APP_NAME ,
1315: p_msg_name => 'OKE_ROW_LOCKED' ,
1316: p_token1 => 'SOURCE' ,
1317: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1310:
1311: EXCEPTION
1312: WHEN G_RESOURCE_BUSY THEN
1313: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1314: OKE_API.set_message(p_app_name => G_APP_NAME ,
1315: p_msg_name => 'OKE_ROW_LOCKED' ,
1316: p_token1 => 'SOURCE' ,
1317: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1318: p_token1_translate => OKE_API.G_TRUE ,
1314: OKE_API.set_message(p_app_name => G_APP_NAME ,
1315: p_msg_name => 'OKE_ROW_LOCKED' ,
1316: p_token1 => 'SOURCE' ,
1317: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1318: p_token1_translate => OKE_API.G_TRUE ,
1319: p_token2 => 'ID' ,
1320: p_token2_value => p_pool_party_id
1321: );
1322:
1324: CLOSE c_pool_party_id;
1325: END IF;
1326:
1327: WHEN OTHERS THEN
1328: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1329: OKE_API.set_message(p_app_name => G_APP_NAME ,
1330: p_msg_name => G_UNEXPECTED_ERROR ,
1331: p_token1 => G_SQLCODE_TOKEN ,
1332: p_token1_value => SQLCODE ,
1325: END IF;
1326:
1327: WHEN OTHERS THEN
1328: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1329: OKE_API.set_message(p_app_name => G_APP_NAME ,
1330: p_msg_name => G_UNEXPECTED_ERROR ,
1331: p_token1 => G_SQLCODE_TOKEN ,
1332: p_token1_value => SQLCODE ,
1333: p_token2 => G_SQLERRM_TOKEN ,
1369: l_flag VARCHAR2(1);
1370:
1371: BEGIN
1372:
1373: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1374:
1375: IF (p_pool_party_id is not null) OR
1376: (p_pool_party_id <> OKE_API.G_MISS_NUM) THEN
1377:
1372:
1373: p_return_status := OKE_API.G_RET_STS_SUCCESS;
1374:
1375: IF (p_pool_party_id is not null) OR
1376: (p_pool_party_id <> OKE_API.G_MISS_NUM) THEN
1377:
1378: OPEN c_pool_party_id;
1379: FETCH c_pool_party_id into l_currency_code;
1380:
1380:
1381: IF (c_pool_party_id%NOTFOUND) THEN
1382:
1383: CLOSE c_pool_party_id;
1384: p_return_status := OKE_API.G_RET_STS_ERROR;
1385: OKE_API.set_message(p_app_name => G_APP_NAME ,
1386: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1387: p_token1 => 'VALUE' ,
1388: p_token1_value => 'pool_party_id, k_party_id'
1381: IF (c_pool_party_id%NOTFOUND) THEN
1382:
1383: CLOSE c_pool_party_id;
1384: p_return_status := OKE_API.G_RET_STS_ERROR;
1385: OKE_API.set_message(p_app_name => G_APP_NAME ,
1386: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1387: p_token1 => 'VALUE' ,
1388: p_token1_value => 'pool_party_id, k_party_id'
1389: );
1382:
1383: CLOSE c_pool_party_id;
1384: p_return_status := OKE_API.G_RET_STS_ERROR;
1385: OKE_API.set_message(p_app_name => G_APP_NAME ,
1386: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1387: p_token1 => 'VALUE' ,
1388: p_token1_value => 'pool_party_id, k_party_id'
1389: );
1390:
1391: ELSE
1392:
1393: IF (l_currency_code <> p_currency_code) THEN
1394:
1395: p_return_status := OKE_API.G_RET_STS_ERROR;
1396: OKE_API.set_message(p_app_name => G_APP_NAME ,
1397: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1398: p_token1 => 'VALUE' ,
1399: p_token1_value => 'currency_code'
1392:
1393: IF (l_currency_code <> p_currency_code) THEN
1394:
1395: p_return_status := OKE_API.G_RET_STS_ERROR;
1396: OKE_API.set_message(p_app_name => G_APP_NAME ,
1397: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1398: p_token1 => 'VALUE' ,
1399: p_token1_value => 'currency_code'
1400: );
1393: IF (l_currency_code <> p_currency_code) THEN
1394:
1395: p_return_status := OKE_API.G_RET_STS_ERROR;
1396: OKE_API.set_message(p_app_name => G_APP_NAME ,
1397: p_msg_name => 'OKE_API_INVALID_VALUE' ,
1398: p_token1 => 'VALUE' ,
1399: p_token1_value => 'currency_code'
1400: );
1401: ELSE
1413: x_return_status => l_return_status );
1414:
1415: IF (l_return_status = 'N') THEN
1416:
1417: p_return_status := OKE_API.G_RET_STS_ERROR;
1418: OKE_API.set_message(p_app_name => G_APP_NAME ,
1419: p_msg_name => 'OKE_FUND_EXCEED_POOL'
1420: );
1421:
1414:
1415: IF (l_return_status = 'N') THEN
1416:
1417: p_return_status := OKE_API.G_RET_STS_ERROR;
1418: OKE_API.set_message(p_app_name => G_APP_NAME ,
1419: p_msg_name => 'OKE_FUND_EXCEED_POOL'
1420: );
1421:
1422: -- bug 3346170
1428: x_return_status => l_return_status );
1429:
1430: IF (l_return_status = 'N') THEN
1431:
1432: p_return_status := OKE_API.G_RET_STS_ERROR;
1433: OKE_API.set_message(p_app_name => G_APP_NAME ,
1434: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1435: p_token1 => 'EFFECTIVE_DATE' ,
1436: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1429:
1430: IF (l_return_status = 'N') THEN
1431:
1432: p_return_status := OKE_API.G_RET_STS_ERROR;
1433: OKE_API.set_message(p_app_name => G_APP_NAME ,
1434: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1435: p_token1 => 'EFFECTIVE_DATE' ,
1436: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1437: p_token1_translate => OKE_API.G_TRUE ,
1433: OKE_API.set_message(p_app_name => G_APP_NAME ,
1434: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1435: p_token1 => 'EFFECTIVE_DATE' ,
1436: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1437: p_token1_translate => OKE_API.G_TRUE ,
1438: p_token2 => 'OPERATOR' ,
1439: p_token2_value => 'OKE_GREATER_PROMPT' ,
1440: p_token2_translate => OKE_API.G_TRUE ,
1441: p_token3 => 'DATE_SOURCE' ,
1436: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1437: p_token1_translate => OKE_API.G_TRUE ,
1438: p_token2 => 'OPERATOR' ,
1439: p_token2_value => 'OKE_GREATER_PROMPT' ,
1440: p_token2_translate => OKE_API.G_TRUE ,
1441: p_token3 => 'DATE_SOURCE' ,
1442: p_token3_value => 'OKE_POOL_PARTY_PROMPT' ,
1443: p_token3_translate => OKE_API.G_TRUE
1444: );
1439: p_token2_value => 'OKE_GREATER_PROMPT' ,
1440: p_token2_translate => OKE_API.G_TRUE ,
1441: p_token3 => 'DATE_SOURCE' ,
1442: p_token3_value => 'OKE_POOL_PARTY_PROMPT' ,
1443: p_token3_translate => OKE_API.G_TRUE
1444: );
1445:
1446: ELSE
1447:
1451: x_return_status => l_return_status );
1452:
1453: IF (l_return_status = 'N') THEN
1454:
1455: p_return_status := OKE_API.G_RET_STS_ERROR;
1456: OKE_API.set_message(p_app_name => G_APP_NAME ,
1457: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1458: p_token1 => 'EFFECTIVE_DATE' ,
1459: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1452:
1453: IF (l_return_status = 'N') THEN
1454:
1455: p_return_status := OKE_API.G_RET_STS_ERROR;
1456: OKE_API.set_message(p_app_name => G_APP_NAME ,
1457: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1458: p_token1 => 'EFFECTIVE_DATE' ,
1459: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1460: p_token1_translate => OKE_API.G_TRUE ,
1456: OKE_API.set_message(p_app_name => G_APP_NAME ,
1457: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1458: p_token1 => 'EFFECTIVE_DATE' ,
1459: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1460: p_token1_translate => OKE_API.G_TRUE ,
1461: p_token2 => 'OPERATOR' ,
1462: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1463: p_token2_translate => OKE_API.G_TRUE ,
1464: p_token3 => 'DATE_SOURCE' ,
1459: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1460: p_token1_translate => OKE_API.G_TRUE ,
1461: p_token2 => 'OPERATOR' ,
1462: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1463: p_token2_translate => OKE_API.G_TRUE ,
1464: p_token3 => 'DATE_SOURCE' ,
1465: p_token3_value => 'OKE_POOL_PARTY_PROMPT' ,
1466: p_token3_translate => OKE_API.G_TRUE
1467: );
1462: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1463: p_token2_translate => OKE_API.G_TRUE ,
1464: p_token3 => 'DATE_SOURCE' ,
1465: p_token3_value => 'OKE_POOL_PARTY_PROMPT' ,
1466: p_token3_translate => OKE_API.G_TRUE
1467: );
1468: END IF;
1469:
1470: END IF;
1480: END IF;
1481:
1482: EXCEPTION
1483: WHEN G_RESOURCE_BUSY THEN
1484: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1485: OKE_API.set_message(p_app_name => G_APP_NAME ,
1486: p_msg_name => 'OKE_ROW_LOCKED' ,
1487: p_token1 => 'SOURCE' ,
1488: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1481:
1482: EXCEPTION
1483: WHEN G_RESOURCE_BUSY THEN
1484: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1485: OKE_API.set_message(p_app_name => G_APP_NAME ,
1486: p_msg_name => 'OKE_ROW_LOCKED' ,
1487: p_token1 => 'SOURCE' ,
1488: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1489: p_token1_translate => OKE_API.G_TRUE ,
1485: OKE_API.set_message(p_app_name => G_APP_NAME ,
1486: p_msg_name => 'OKE_ROW_LOCKED' ,
1487: p_token1 => 'SOURCE' ,
1488: p_token1_value => 'OKE_POOL_PARTY_PROMPT' ,
1489: p_token1_translate => OKE_API.G_TRUE ,
1490: p_token2 => 'ID' ,
1491: p_token2_value => p_pool_party_id
1492: );
1493:
1495: CLOSE c_pool_party_id;
1496: END IF;
1497:
1498: WHEN OTHERS THEN
1499: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1500: OKE_API.set_message(p_app_name => G_APP_NAME ,
1501: p_msg_name => G_UNEXPECTED_ERROR ,
1502: p_token1 => G_SQLCODE_TOKEN ,
1503: p_token1_value => SQLCODE ,
1496: END IF;
1497:
1498: WHEN OTHERS THEN
1499: p_return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
1500: OKE_API.set_message(p_app_name => G_APP_NAME ,
1501: p_msg_name => G_UNEXPECTED_ERROR ,
1502: p_token1 => G_SQLCODE_TOKEN ,
1503: p_token1_value => SQLCODE ,
1504: p_token2 => G_SQLERRM_TOKEN ,
1533: validate_object_type(p_object_type => p_funding_in_rec.object_type ,
1534: p_return_status => l_return_status
1535: );
1536:
1537: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1538:
1539: RAISE G_EXCEPTION_HALT_VALIDATION;
1540:
1541: END IF;
1547: validate_object_id(p_object_id => p_funding_in_rec.object_id ,
1548: p_return_status => l_return_status
1549: );
1550:
1551: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1552:
1553: RAISE G_EXCEPTION_HALT_VALIDATION;
1554:
1555: END IF;
1561: validate_currency_code(p_currency_code => p_funding_in_rec.currency_code ,
1562: p_return_status => l_return_status
1563: );
1564:
1565: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1566:
1567: RAISE G_EXCEPTION_HALT_VALIDATION;
1568:
1569: END IF;
1575: p_k_party_id => p_funding_in_rec.k_party_id ,
1576: p_return_status => l_return_status
1577: );
1578:
1579: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1580:
1581: RAISE G_EXCEPTION_HALT_VALIDATION;
1582:
1583: END IF;
1589: validate_amount(p_amount => p_funding_in_rec.amount ,
1590: p_return_status => l_return_status
1591: );
1592:
1593: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1594:
1595: RAISE G_EXCEPTION_HALT_VALIDATION;
1596:
1597: END IF;
1603: validate_funding_status(p_funding_status => p_funding_in_rec.funding_status ,
1604: p_return_status => l_return_status
1605: );
1606:
1607: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1608:
1609: RAISE G_EXCEPTION_HALT_VALIDATION;
1610:
1611: END IF;
1617: validate_conversion_type(p_conversion_type => p_funding_in_rec.k_conversion_type ,
1618: p_return_status => l_return_status
1619: );
1620:
1621: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1622:
1623: RAISE G_EXCEPTION_HALT_VALIDATION;
1624:
1625: END IF;
1631: validate_pool_party_id(p_pool_party_id => p_funding_in_rec.pool_party_id ,
1632: p_return_status => l_return_status
1633: );
1634:
1635: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1636:
1637: RAISE G_EXCEPTION_HALT_VALIDATION;
1638:
1639: END IF;
1645: -- p_k_header_id => p_funding_in_rec.object_id ,
1646: p_return_status => l_return_status
1647: );
1648:
1649: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1650:
1651: RAISE G_EXCEPTION_HALT_VALIDATION;
1652:
1653: END IF;
1682: );
1683:
1684: IF (l_return_status = 'N') THEN
1685:
1686: OKE_API.set_message(p_app_name => G_APP_NAME ,
1687: p_msg_name => 'OKE_INVALID_EFFDATE_PAIR'
1688: );
1689:
1690: RAISE G_EXCEPTION_HALT_VALIDATION;
1704: p_funding_source_id => p_funding_in_rec.funding_source_id ,
1705: p_return_status => l_return_status
1706: );
1707:
1708: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1709:
1710: RAISE G_EXCEPTION_HALT_VALIDATION;
1711:
1712: END IF;
1731: p_conversion_rate => p_funding_in_rec.k_conversion_rate ,
1732: p_return_status => l_return_status
1733: );
1734:
1735: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
1736:
1737: RAISE G_EXCEPTION_HALT_VALIDATION;
1738:
1739: END IF;
1745: -- Hard limit cannot be negative
1746: --
1747: IF (nvl(p_funding_in_rec.hard_limit, 0) < 0) THEN
1748:
1749: OKE_API.set_message(p_app_name => G_APP_NAME ,
1750: p_msg_name => 'OKE_NEGATIVE_HARD_LIMIT'
1751: );
1752:
1753: RAISE G_EXCEPTION_HALT_VALIDATION;
1755: END IF;
1756:
1757: IF (nvl(p_funding_in_rec.revenue_hard_limit, 0) < 0) THEN
1758:
1759: OKE_API.set_message(p_app_name => G_APP_NAME ,
1760: p_msg_name => 'OKE_NEGATIVE_REVENUE_LIMIT'
1761: );
1762:
1763: RAISE G_EXCEPTION_HALT_VALIDATION;
1774: );
1775:
1776: IF (l_return_status <> 'Y') THEN
1777:
1778: OKE_API.set_message(p_app_name => G_APP_NAME ,
1779: p_msg_name => 'OKE_HARD_LIMIT_EXCEED_FUND'
1780: );
1781:
1782: RAISE G_EXCEPTION_HALT_VALIDATION;
1789: );
1790:
1791: IF (l_return_status <> 'Y') THEN
1792:
1793: OKE_API.set_message(p_app_name => G_APP_NAME ,
1794: p_msg_name => 'OKE_REV_LIMIT_EXCEED_FUND'
1795: );
1796:
1797: RAISE G_EXCEPTION_HALT_VALIDATION;
1814: IF (l_return_status = 'N') THEN
1815:
1816: IF (l_type = 'INVOICE') THEN
1817:
1818: OKE_API.set_message(p_app_name => G_APP_NAME ,
1819: p_msg_name => 'OKE_HARD_LIMIT_EXCEED'
1820: );
1821:
1822: ELSE
1820: );
1821:
1822: ELSE
1823:
1824: OKE_API.set_message(p_app_name => G_APP_NAME ,
1825: p_msg_name => 'OKE_REV_LIMIT_EXCEED'
1826: );
1827:
1828: END IF;
1832: ELSIF (l_return_status = 'E') THEN
1833:
1834: IF (l_type = 'INVOICE') THEN
1835:
1836: OKE_API.set_message(p_app_name => G_APP_NAME ,
1837: p_msg_name => 'OKE_NEGATIVE_HARD_LIMIT_SUM'
1838: );
1839:
1840: ELSE
1838: );
1839:
1840: ELSE
1841:
1842: OKE_API.set_message(p_app_name => G_APP_NAME ,
1843: p_msg_name => 'OKE_NEGATIVE_REV_LIMIT_SUM'
1844: );
1845:
1846: END IF;
1859: );
1860:
1861: IF (l_return_status = 'N') THEN
1862:
1863: OKE_API.set_message(p_app_name => G_APP_NAME ,
1864: p_msg_name => 'OKE_FUND_AMT_EXCEED'
1865: );
1866:
1867: RAISE G_EXCEPTION_HALT_VALIDATION;
1867: RAISE G_EXCEPTION_HALT_VALIDATION;
1868:
1869: ELSIF (l_return_status = 'E') THEN
1870:
1871: OKE_API.set_message(p_app_name => G_APP_NAME ,
1872: p_msg_name => 'OKE_NEGATIVE_ALLOCATION_SUM'
1873: );
1874:
1875: RAISE G_EXCEPTION_HALT_VALIDATION;
1887: x_return_status => l_return_status);
1888:
1889: IF (l_return_status = 'N') THEN
1890:
1891: OKE_API.set_message(p_app_name => G_APP_NAME ,
1892: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1893: p_token1 => 'EFFECTIVE_DATE' ,
1894: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1895: p_token1_translate => OKE_API.G_TRUE ,
1891: OKE_API.set_message(p_app_name => G_APP_NAME ,
1892: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1893: p_token1 => 'EFFECTIVE_DATE' ,
1894: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1895: p_token1_translate => OKE_API.G_TRUE ,
1896: p_token2 => 'OPERATOR' ,
1897: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1898: p_token2_translate => OKE_API.G_TRUE ,
1899: p_token3 => 'DATE_SOURCE' ,
1894: p_token1_value => 'OKE_EFFECTIVE_FROM_PROMPT' ,
1895: p_token1_translate => OKE_API.G_TRUE ,
1896: p_token2 => 'OPERATOR' ,
1897: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1898: p_token2_translate => OKE_API.G_TRUE ,
1899: p_token3 => 'DATE_SOURCE' ,
1900: p_token3_value => 'OKE_EARLIEST_ALLOC_PROMPT' ,
1901: p_token3_translate => OKE_API.G_TRUE
1902: );
1897: p_token2_value => 'OKE_EARLIER_PROMPT' ,
1898: p_token2_translate => OKE_API.G_TRUE ,
1899: p_token3 => 'DATE_SOURCE' ,
1900: p_token3_value => 'OKE_EARLIEST_ALLOC_PROMPT' ,
1901: p_token3_translate => OKE_API.G_TRUE
1902: );
1903:
1904: RAISE G_EXCEPTION_HALT_VALIDATION;
1905:
1911: x_return_status => l_return_status);
1912:
1913: IF (l_return_status = 'N') THEN
1914:
1915: OKE_API.set_message(p_app_name => G_APP_NAME ,
1916: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1917: p_token1 => 'EFFECTIVE_DATE' ,
1918: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1919: p_token1_translate => OKE_API.G_TRUE ,
1915: OKE_API.set_message(p_app_name => G_APP_NAME ,
1916: p_msg_name => 'OKE_FUND_INVALID_PTY_DATE' ,
1917: p_token1 => 'EFFECTIVE_DATE' ,
1918: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1919: p_token1_translate => OKE_API.G_TRUE ,
1920: p_token2 => 'OPERATOR' ,
1921: p_token2_value => 'OKE_GREATER_PROMPT' ,
1922: p_token2_translate => OKE_API.G_TRUE ,
1923: p_token3 => 'DATE_SOURCE' ,
1918: p_token1_value => 'OKE_EFFECTIVE_TO_PROMPT' ,
1919: p_token1_translate => OKE_API.G_TRUE ,
1920: p_token2 => 'OPERATOR' ,
1921: p_token2_value => 'OKE_GREATER_PROMPT' ,
1922: p_token2_translate => OKE_API.G_TRUE ,
1923: p_token3 => 'DATE_SOURCE' ,
1924: p_token3_value => 'OKE_LATEST_ALLOC_PROMPT' ,
1925: p_token3_translate => OKE_API.G_TRUE
1926: );
1921: p_token2_value => 'OKE_GREATER_PROMPT' ,
1922: p_token2_translate => OKE_API.G_TRUE ,
1923: p_token3 => 'DATE_SOURCE' ,
1924: p_token3_value => 'OKE_LATEST_ALLOC_PROMPT' ,
1925: p_token3_translate => OKE_API.G_TRUE
1926: );
1927:
1928: RAISE G_EXCEPTION_HALT_VALIDATION;
1929:
1949: BEGIN
1950:
1951: l_funding_in_rec.funding_source_id := null;
1952:
1953: IF l_funding_in_rec.pool_party_id = OKE_API.G_MISS_NUM THEN
1954: l_funding_in_rec.pool_party_id := null;
1955: END IF;
1956:
1957: IF l_funding_in_rec.object_type = OKE_API.G_MISS_CHAR THEN
1953: IF l_funding_in_rec.pool_party_id = OKE_API.G_MISS_NUM THEN
1954: l_funding_in_rec.pool_party_id := null;
1955: END IF;
1956:
1957: IF l_funding_in_rec.object_type = OKE_API.G_MISS_CHAR THEN
1958: l_funding_in_rec.object_type := null;
1959: END IF;
1960:
1961: IF l_funding_in_rec.object_id= OKE_API.G_MISS_NUM THEN
1957: IF l_funding_in_rec.object_type = OKE_API.G_MISS_CHAR THEN
1958: l_funding_in_rec.object_type := null;
1959: END IF;
1960:
1961: IF l_funding_in_rec.object_id= OKE_API.G_MISS_NUM THEN
1962: l_funding_in_rec.object_id := null;
1963: END IF;
1964:
1965: IF l_funding_in_rec.k_party_id= OKE_API.G_MISS_NUM THEN
1961: IF l_funding_in_rec.object_id= OKE_API.G_MISS_NUM THEN
1962: l_funding_in_rec.object_id := null;
1963: END IF;
1964:
1965: IF l_funding_in_rec.k_party_id= OKE_API.G_MISS_NUM THEN
1966: l_funding_in_rec.k_party_id := null;
1967: END IF;
1968:
1969: IF l_funding_in_rec.amount= OKE_API.G_MISS_NUM THEN
1965: IF l_funding_in_rec.k_party_id= OKE_API.G_MISS_NUM THEN
1966: l_funding_in_rec.k_party_id := null;
1967: END IF;
1968:
1969: IF l_funding_in_rec.amount= OKE_API.G_MISS_NUM THEN
1970: l_funding_in_rec.amount := null;
1971: END IF;
1972:
1973: IF l_funding_in_rec.currency_code = OKE_API.G_MISS_CHAR THEN
1969: IF l_funding_in_rec.amount= OKE_API.G_MISS_NUM THEN
1970: l_funding_in_rec.amount := null;
1971: END IF;
1972:
1973: IF l_funding_in_rec.currency_code = OKE_API.G_MISS_CHAR THEN
1974: l_funding_in_rec.currency_code := null;
1975: END IF;
1976:
1977: IF l_funding_in_rec.agreement_number = OKE_API.G_MISS_CHAR THEN
1973: IF l_funding_in_rec.currency_code = OKE_API.G_MISS_CHAR THEN
1974: l_funding_in_rec.currency_code := null;
1975: END IF;
1976:
1977: IF l_funding_in_rec.agreement_number = OKE_API.G_MISS_CHAR THEN
1978: l_funding_in_rec.agreement_number := null;
1979: END IF;
1980:
1981: IF l_funding_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1977: IF l_funding_in_rec.agreement_number = OKE_API.G_MISS_CHAR THEN
1978: l_funding_in_rec.agreement_number := null;
1979: END IF;
1980:
1981: IF l_funding_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1982: l_funding_in_rec.funding_status := null;
1983: END IF;
1984:
1985: IF l_funding_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1981: IF l_funding_in_rec.funding_status = OKE_API.G_MISS_CHAR THEN
1982: l_funding_in_rec.funding_status := null;
1983: END IF;
1984:
1985: IF l_funding_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1986: l_funding_in_rec.hard_limit := null;
1987: END IF;
1988:
1989: IF l_funding_in_rec.k_conversion_type = OKE_API.G_MISS_CHAR THEN
1985: IF l_funding_in_rec.hard_limit = OKE_API.G_MISS_NUM THEN
1986: l_funding_in_rec.hard_limit := null;
1987: END IF;
1988:
1989: IF l_funding_in_rec.k_conversion_type = OKE_API.G_MISS_CHAR THEN
1990: l_funding_in_rec.k_conversion_type := null;
1991: END IF;
1992:
1993: IF l_funding_in_rec.k_conversion_date = OKE_API.G_MISS_DATE THEN
1989: IF l_funding_in_rec.k_conversion_type = OKE_API.G_MISS_CHAR THEN
1990: l_funding_in_rec.k_conversion_type := null;
1991: END IF;
1992:
1993: IF l_funding_in_rec.k_conversion_date = OKE_API.G_MISS_DATE THEN
1994: l_funding_in_rec.k_conversion_date := null;
1995: END IF;
1996:
1997: -- syho, bug 2208979
1994: l_funding_in_rec.k_conversion_date := null;
1995: END IF;
1996:
1997: -- syho, bug 2208979
1998: IF l_funding_in_rec.k_conversion_rate = OKE_API.G_MISS_NUM THEN
1999: l_funding_in_rec.k_conversion_rate := null;
2000: END IF;
2001: -- syho, bug 2208979
2002:
1999: l_funding_in_rec.k_conversion_rate := null;
2000: END IF;
2001: -- syho, bug 2208979
2002:
2003: IF l_funding_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
2004: l_funding_in_rec.start_date_active := null;
2005: END IF;
2006:
2007: IF l_funding_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
2003: IF l_funding_in_rec.start_date_active = OKE_API.G_MISS_DATE THEN
2004: l_funding_in_rec.start_date_active := null;
2005: END IF;
2006:
2007: IF l_funding_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
2008: l_funding_in_rec.end_date_active := null;
2009: END IF;
2010: /*
2011: IF l_funding_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2007: IF l_funding_in_rec.end_date_active = OKE_API.G_MISS_DATE THEN
2008: l_funding_in_rec.end_date_active := null;
2009: END IF;
2010: /*
2011: IF l_funding_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2012: l_funding_in_rec.oke_desc_flex_name := null;
2013: END IF;
2014: */
2015: IF l_funding_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2011: IF l_funding_in_rec.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2012: l_funding_in_rec.oke_desc_flex_name := null;
2013: END IF;
2014: */
2015: IF l_funding_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2016: l_funding_in_rec.oke_attribute_category := null;
2017: END IF;
2018:
2019: IF l_funding_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2015: IF l_funding_in_rec.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2016: l_funding_in_rec.oke_attribute_category := null;
2017: END IF;
2018:
2019: IF l_funding_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2020: l_funding_in_rec.oke_attribute1 := null;
2021: END IF;
2022:
2023: IF l_funding_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2019: IF l_funding_in_rec.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2020: l_funding_in_rec.oke_attribute1 := null;
2021: END IF;
2022:
2023: IF l_funding_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2024: l_funding_in_rec.oke_attribute2 := null;
2025: END IF;
2026:
2027: IF l_funding_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2023: IF l_funding_in_rec.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2024: l_funding_in_rec.oke_attribute2 := null;
2025: END IF;
2026:
2027: IF l_funding_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2028: l_funding_in_rec.oke_attribute3 := null;
2029: END IF;
2030:
2031: IF l_funding_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2027: IF l_funding_in_rec.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2028: l_funding_in_rec.oke_attribute3 := null;
2029: END IF;
2030:
2031: IF l_funding_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2032: l_funding_in_rec.oke_attribute4 := null;
2033: END IF;
2034:
2035: IF l_funding_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2031: IF l_funding_in_rec.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2032: l_funding_in_rec.oke_attribute4 := null;
2033: END IF;
2034:
2035: IF l_funding_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2036: l_funding_in_rec.oke_attribute5 := null;
2037: END IF;
2038:
2039: IF l_funding_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2035: IF l_funding_in_rec.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2036: l_funding_in_rec.oke_attribute5 := null;
2037: END IF;
2038:
2039: IF l_funding_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2040: l_funding_in_rec.oke_attribute6 := null;
2041: END IF;
2042:
2043: IF l_funding_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2039: IF l_funding_in_rec.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2040: l_funding_in_rec.oke_attribute6 := null;
2041: END IF;
2042:
2043: IF l_funding_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2044: l_funding_in_rec.oke_attribute7 := null;
2045: END IF;
2046:
2047: IF l_funding_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2043: IF l_funding_in_rec.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2044: l_funding_in_rec.oke_attribute7 := null;
2045: END IF;
2046:
2047: IF l_funding_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2048: l_funding_in_rec.oke_attribute8 := null;
2049: END IF;
2050:
2051: IF l_funding_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2047: IF l_funding_in_rec.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2048: l_funding_in_rec.oke_attribute8 := null;
2049: END IF;
2050:
2051: IF l_funding_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2052: l_funding_in_rec.oke_attribute9 := null;
2053: END IF;
2054:
2055: IF l_funding_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2051: IF l_funding_in_rec.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2052: l_funding_in_rec.oke_attribute9 := null;
2053: END IF;
2054:
2055: IF l_funding_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2056: l_funding_in_rec.oke_attribute10 := null;
2057: END IF;
2058:
2059: IF l_funding_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2055: IF l_funding_in_rec.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2056: l_funding_in_rec.oke_attribute10 := null;
2057: END IF;
2058:
2059: IF l_funding_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2060: l_funding_in_rec.oke_attribute11 := null;
2061: END IF;
2062:
2063: IF l_funding_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2059: IF l_funding_in_rec.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2060: l_funding_in_rec.oke_attribute11 := null;
2061: END IF;
2062:
2063: IF l_funding_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2064: l_funding_in_rec.oke_attribute12 := null;
2065: END IF;
2066:
2067: IF l_funding_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2063: IF l_funding_in_rec.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2064: l_funding_in_rec.oke_attribute12 := null;
2065: END IF;
2066:
2067: IF l_funding_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2068: l_funding_in_rec.oke_attribute13 := null;
2069: END IF;
2070:
2071: IF l_funding_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2067: IF l_funding_in_rec.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2068: l_funding_in_rec.oke_attribute13 := null;
2069: END IF;
2070:
2071: IF l_funding_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2072: l_funding_in_rec.oke_attribute14 := null;
2073: END IF;
2074:
2075: IF l_funding_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2071: IF l_funding_in_rec.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2072: l_funding_in_rec.oke_attribute14 := null;
2073: END IF;
2074:
2075: IF l_funding_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2076: l_funding_in_rec.oke_attribute15 := null;
2077: END IF;
2078:
2079: IF l_funding_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2075: IF l_funding_in_rec.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2076: l_funding_in_rec.oke_attribute15 := null;
2077: END IF;
2078:
2079: IF l_funding_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2080: l_funding_in_rec.pa_attribute_category := null;
2081: END IF;
2082:
2083: IF l_funding_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2079: IF l_funding_in_rec.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2080: l_funding_in_rec.pa_attribute_category := null;
2081: END IF;
2082:
2083: IF l_funding_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2084: l_funding_in_rec.pa_attribute1 := null;
2085: END IF;
2086:
2087: IF l_funding_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2083: IF l_funding_in_rec.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2084: l_funding_in_rec.pa_attribute1 := null;
2085: END IF;
2086:
2087: IF l_funding_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2088: l_funding_in_rec.pa_attribute2 := null;
2089: END IF;
2090:
2091: IF l_funding_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2087: IF l_funding_in_rec.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2088: l_funding_in_rec.pa_attribute2 := null;
2089: END IF;
2090:
2091: IF l_funding_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2092: l_funding_in_rec.pa_attribute3 := null;
2093: END IF;
2094:
2095: IF l_funding_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2091: IF l_funding_in_rec.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2092: l_funding_in_rec.pa_attribute3 := null;
2093: END IF;
2094:
2095: IF l_funding_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2096: l_funding_in_rec.pa_attribute4 := null;
2097: END IF;
2098:
2099: IF l_funding_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2095: IF l_funding_in_rec.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2096: l_funding_in_rec.pa_attribute4 := null;
2097: END IF;
2098:
2099: IF l_funding_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2100: l_funding_in_rec.pa_attribute5 := null;
2101: END IF;
2102:
2103: IF l_funding_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2099: IF l_funding_in_rec.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2100: l_funding_in_rec.pa_attribute5 := null;
2101: END IF;
2102:
2103: IF l_funding_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2104: l_funding_in_rec.pa_attribute6 := null;
2105: END IF;
2106:
2107: IF l_funding_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2103: IF l_funding_in_rec.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2104: l_funding_in_rec.pa_attribute6 := null;
2105: END IF;
2106:
2107: IF l_funding_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2108: l_funding_in_rec.pa_attribute7 := null;
2109: END IF;
2110:
2111: IF l_funding_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2107: IF l_funding_in_rec.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2108: l_funding_in_rec.pa_attribute7 := null;
2109: END IF;
2110:
2111: IF l_funding_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2112: l_funding_in_rec.pa_attribute8 := null;
2113: END IF;
2114:
2115: IF l_funding_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2111: IF l_funding_in_rec.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2112: l_funding_in_rec.pa_attribute8 := null;
2113: END IF;
2114:
2115: IF l_funding_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2116: l_funding_in_rec.pa_attribute9 := null;
2117: END IF;
2118:
2119: IF l_funding_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2115: IF l_funding_in_rec.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2116: l_funding_in_rec.pa_attribute9 := null;
2117: END IF;
2118:
2119: IF l_funding_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2120: l_funding_in_rec.pa_attribute10 := null;
2121: END IF;
2122:
2123: IF l_funding_in_rec.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2119: IF l_funding_in_rec.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2120: l_funding_in_rec.pa_attribute10 := null;
2121: END IF;
2122:
2123: IF l_funding_in_rec.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2124: l_funding_in_rec.pa_attribute11 := null;
2125: END IF;
2126:
2127: IF l_funding_in_rec.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2123: IF l_funding_in_rec.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2124: l_funding_in_rec.pa_attribute11 := null;
2125: END IF;
2126:
2127: IF l_funding_in_rec.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2128: l_funding_in_rec.pa_attribute12 := null;
2129: END IF;
2130:
2131: IF l_funding_in_rec.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2127: IF l_funding_in_rec.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2128: l_funding_in_rec.pa_attribute12 := null;
2129: END IF;
2130:
2131: IF l_funding_in_rec.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2132: l_funding_in_rec.pa_attribute13 := null;
2133: END IF;
2134:
2135: IF l_funding_in_rec.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2131: IF l_funding_in_rec.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2132: l_funding_in_rec.pa_attribute13 := null;
2133: END IF;
2134:
2135: IF l_funding_in_rec.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2136: l_funding_in_rec.pa_attribute14 := null;
2137: END IF;
2138:
2139: IF l_funding_in_rec.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2135: IF l_funding_in_rec.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2136: l_funding_in_rec.pa_attribute14 := null;
2137: END IF;
2138:
2139: IF l_funding_in_rec.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2140: l_funding_in_rec.pa_attribute15 := null;
2141: END IF;
2142:
2143: IF l_funding_in_rec.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2139: IF l_funding_in_rec.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2140: l_funding_in_rec.pa_attribute15 := null;
2141: END IF;
2142:
2143: IF l_funding_in_rec.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2144: l_funding_in_rec.pa_attribute16 := null;
2145: END IF;
2146:
2147: IF l_funding_in_rec.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2143: IF l_funding_in_rec.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2144: l_funding_in_rec.pa_attribute16 := null;
2145: END IF;
2146:
2147: IF l_funding_in_rec.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2148: l_funding_in_rec.pa_attribute17 := null;
2149: END IF;
2150:
2151: IF l_funding_in_rec.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2147: IF l_funding_in_rec.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2148: l_funding_in_rec.pa_attribute17 := null;
2149: END IF;
2150:
2151: IF l_funding_in_rec.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2152: l_funding_in_rec.pa_attribute18 := null;
2153: END IF;
2154:
2155: IF l_funding_in_rec.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2151: IF l_funding_in_rec.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2152: l_funding_in_rec.pa_attribute18 := null;
2153: END IF;
2154:
2155: IF l_funding_in_rec.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2156: l_funding_in_rec.pa_attribute19 := null;
2157: END IF;
2158:
2159: IF l_funding_in_rec.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2155: IF l_funding_in_rec.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2156: l_funding_in_rec.pa_attribute19 := null;
2157: END IF;
2158:
2159: IF l_funding_in_rec.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2160: l_funding_in_rec.pa_attribute20 := null;
2161: END IF;
2162:
2163: IF l_funding_in_rec.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2159: IF l_funding_in_rec.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2160: l_funding_in_rec.pa_attribute20 := null;
2161: END IF;
2162:
2163: IF l_funding_in_rec.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2164: l_funding_in_rec.pa_attribute21 := null;
2165: END IF;
2166:
2167: IF l_funding_in_rec.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2163: IF l_funding_in_rec.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2164: l_funding_in_rec.pa_attribute21 := null;
2165: END IF;
2166:
2167: IF l_funding_in_rec.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2168: l_funding_in_rec.pa_attribute22 := null;
2169: END IF;
2170:
2171: IF l_funding_in_rec.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2167: IF l_funding_in_rec.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2168: l_funding_in_rec.pa_attribute22 := null;
2169: END IF;
2170:
2171: IF l_funding_in_rec.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2172: l_funding_in_rec.pa_attribute23 := null;
2173: END IF;
2174:
2175: IF l_funding_in_rec.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2171: IF l_funding_in_rec.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2172: l_funding_in_rec.pa_attribute23 := null;
2173: END IF;
2174:
2175: IF l_funding_in_rec.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2176: l_funding_in_rec.pa_attribute24 := null;
2177: END IF;
2178:
2179: IF l_funding_in_rec.pa_attribute25 = OKE_API.G_MISS_CHAR THEN
2175: IF l_funding_in_rec.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2176: l_funding_in_rec.pa_attribute24 := null;
2177: END IF;
2178:
2179: IF l_funding_in_rec.pa_attribute25 = OKE_API.G_MISS_CHAR THEN
2180: l_funding_in_rec.pa_attribute25 := null;
2181: END IF;
2182:
2183: IF l_funding_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
2179: IF l_funding_in_rec.pa_attribute25 = OKE_API.G_MISS_CHAR THEN
2180: l_funding_in_rec.pa_attribute25 := null;
2181: END IF;
2182:
2183: IF l_funding_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
2184: l_funding_in_rec.revenue_hard_limit := null;
2185: END IF;
2186:
2187: IF l_funding_in_rec.agreement_org_id = OKE_API.G_MISS_NUM THEN
2183: IF l_funding_in_rec.revenue_hard_limit = OKE_API.G_MISS_NUM THEN
2184: l_funding_in_rec.revenue_hard_limit := null;
2185: END IF;
2186:
2187: IF l_funding_in_rec.agreement_org_id = OKE_API.G_MISS_NUM THEN
2188: l_funding_in_rec.agreement_org_id := null;
2189: END IF;
2190:
2191: return(l_funding_in_rec);
2224: CLOSE c_funding_row;
2225:
2226: p_funding_in_rec_out := p_funding_in_rec;
2227:
2228: IF (p_funding_in_rec_out.object_type = OKE_API.G_MISS_CHAR) THEN
2229: p_funding_in_rec_out.object_type := l_funding_row.object_type;
2230:
2231: ELSIF (nvl(p_funding_in_rec_out.object_type, '-99') <> l_funding_row.object_type) THEN
2232:
2229: p_funding_in_rec_out.object_type := l_funding_row.object_type;
2230:
2231: ELSIF (nvl(p_funding_in_rec_out.object_type, '-99') <> l_funding_row.object_type) THEN
2232:
2233: OKE_API.set_message(p_app_name => G_APP_NAME ,
2234: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2235: p_token1 => 'VALUE' ,
2236: p_token1_value => 'object_type'
2237: );
2230:
2231: ELSIF (nvl(p_funding_in_rec_out.object_type, '-99') <> l_funding_row.object_type) THEN
2232:
2233: OKE_API.set_message(p_app_name => G_APP_NAME ,
2234: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2235: p_token1 => 'VALUE' ,
2236: p_token1_value => 'object_type'
2237: );
2238:
2239: RAISE G_EXCEPTION_HALT_VALIDATION;
2240:
2241: END IF;
2242:
2243: IF (p_funding_in_rec_out.object_id = OKE_API.G_MISS_NUM) THEN
2244: p_funding_in_rec_out.object_id := l_funding_row.object_id;
2245:
2246: ELSIF (nvl(p_funding_in_rec_out.object_id, -99) <> l_funding_row.object_id) THEN
2247:
2244: p_funding_in_rec_out.object_id := l_funding_row.object_id;
2245:
2246: ELSIF (nvl(p_funding_in_rec_out.object_id, -99) <> l_funding_row.object_id) THEN
2247:
2248: OKE_API.set_message(p_app_name => G_APP_NAME ,
2249: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2250: p_token1 => 'VALUE' ,
2251: p_token1_value => 'object_id'
2252: );
2245:
2246: ELSIF (nvl(p_funding_in_rec_out.object_id, -99) <> l_funding_row.object_id) THEN
2247:
2248: OKE_API.set_message(p_app_name => G_APP_NAME ,
2249: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2250: p_token1 => 'VALUE' ,
2251: p_token1_value => 'object_id'
2252: );
2253:
2254: RAISE G_EXCEPTION_HALT_VALIDATION;
2255:
2256: END IF;
2257:
2258: IF (p_funding_in_rec_out.pool_party_id = OKE_API.G_MISS_NUM) THEN
2259: p_funding_in_rec_out.pool_party_id := l_funding_row.pool_party_id;
2260:
2261: ELSIF (nvl(p_funding_in_rec_out.pool_party_id, -99) <> nvl(l_funding_row.pool_party_id, -99)) THEN
2262:
2259: p_funding_in_rec_out.pool_party_id := l_funding_row.pool_party_id;
2260:
2261: ELSIF (nvl(p_funding_in_rec_out.pool_party_id, -99) <> nvl(l_funding_row.pool_party_id, -99)) THEN
2262:
2263: OKE_API.set_message(p_app_name => G_APP_NAME ,
2264: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2265: p_token1 => 'VALUE' ,
2266: p_token1_value => 'pool_party_id'
2267: );
2260:
2261: ELSIF (nvl(p_funding_in_rec_out.pool_party_id, -99) <> nvl(l_funding_row.pool_party_id, -99)) THEN
2262:
2263: OKE_API.set_message(p_app_name => G_APP_NAME ,
2264: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2265: p_token1 => 'VALUE' ,
2266: p_token1_value => 'pool_party_id'
2267: );
2268:
2269: RAISE G_EXCEPTION_HALT_VALIDATION;
2270:
2271: END IF;
2272:
2273: IF (p_funding_in_rec_out.k_party_id = OKE_API.G_MISS_NUM) THEN
2274: p_funding_in_rec_out.k_party_id := l_funding_row.k_party_id;
2275:
2276: ELSIF (nvl(p_funding_in_rec_out.k_party_id, -99) <> nvl(l_funding_row.k_party_id, -99)) THEN
2277:
2274: p_funding_in_rec_out.k_party_id := l_funding_row.k_party_id;
2275:
2276: ELSIF (nvl(p_funding_in_rec_out.k_party_id, -99) <> nvl(l_funding_row.k_party_id, -99)) THEN
2277:
2278: OKE_API.set_message(p_app_name => G_APP_NAME ,
2279: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2280: p_token1 => 'VALUE' ,
2281: p_token1_value => 'k_party_id'
2282: );
2275:
2276: ELSIF (nvl(p_funding_in_rec_out.k_party_id, -99) <> nvl(l_funding_row.k_party_id, -99)) THEN
2277:
2278: OKE_API.set_message(p_app_name => G_APP_NAME ,
2279: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2280: p_token1 => 'VALUE' ,
2281: p_token1_value => 'k_party_id'
2282: );
2283:
2284: RAISE G_EXCEPTION_HALT_VALIDATION;
2285:
2286: END IF;
2287:
2288: IF (p_funding_in_rec_out.amount = OKE_API.G_MISS_NUM) THEN
2289: p_funding_in_rec_out.amount := l_funding_row.amount;
2290: END IF;
2291:
2292: IF (p_funding_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
2288: IF (p_funding_in_rec_out.amount = OKE_API.G_MISS_NUM) THEN
2289: p_funding_in_rec_out.amount := l_funding_row.amount;
2290: END IF;
2291:
2292: IF (p_funding_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
2293: p_funding_in_rec_out.hard_limit := l_funding_row.hard_limit;
2294: END IF;
2295:
2296: IF (p_funding_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM) THEN
2292: IF (p_funding_in_rec_out.hard_limit = OKE_API.G_MISS_NUM) THEN
2293: p_funding_in_rec_out.hard_limit := l_funding_row.hard_limit;
2294: END IF;
2295:
2296: IF (p_funding_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM) THEN
2297: p_funding_in_rec_out.revenue_hard_limit := l_funding_row.revenue_hard_limit;
2298: END IF;
2299:
2300: IF (p_funding_in_rec_out.agreement_org_id = OKE_API.G_MISS_NUM) THEN
2296: IF (p_funding_in_rec_out.revenue_hard_limit = OKE_API.G_MISS_NUM) THEN
2297: p_funding_in_rec_out.revenue_hard_limit := l_funding_row.revenue_hard_limit;
2298: END IF;
2299:
2300: IF (p_funding_in_rec_out.agreement_org_id = OKE_API.G_MISS_NUM) THEN
2301: p_funding_in_rec_out.agreement_org_id := l_funding_row.agreement_org_id;
2302: END IF;
2303:
2304: IF p_funding_in_rec_out.currency_code = OKE_API.G_MISS_CHAR THEN
2300: IF (p_funding_in_rec_out.agreement_org_id = OKE_API.G_MISS_NUM) THEN
2301: p_funding_in_rec_out.agreement_org_id := l_funding_row.agreement_org_id;
2302: END IF;
2303:
2304: IF p_funding_in_rec_out.currency_code = OKE_API.G_MISS_CHAR THEN
2305: p_funding_in_rec_out.currency_code := l_funding_row.currency_code;
2306:
2307: ELSIF (nvl(upper(p_funding_in_rec_out.currency_code), '-99') <> l_funding_row.currency_code) THEN
2308:
2305: p_funding_in_rec_out.currency_code := l_funding_row.currency_code;
2306:
2307: ELSIF (nvl(upper(p_funding_in_rec_out.currency_code), '-99') <> l_funding_row.currency_code) THEN
2308:
2309: OKE_API.set_message(p_app_name => G_APP_NAME ,
2310: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2311: p_token1 => 'VALUE' ,
2312: p_token1_value => 'currency_code'
2313: );
2306:
2307: ELSIF (nvl(upper(p_funding_in_rec_out.currency_code), '-99') <> l_funding_row.currency_code) THEN
2308:
2309: OKE_API.set_message(p_app_name => G_APP_NAME ,
2310: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2311: p_token1 => 'VALUE' ,
2312: p_token1_value => 'currency_code'
2313: );
2314:
2315: RAISE G_EXCEPTION_HALT_VALIDATION;
2316:
2317: END IF;
2318:
2319: IF p_funding_in_rec_out.agreement_number = OKE_API.G_MISS_CHAR THEN
2320: p_funding_in_rec_out.agreement_number := l_funding_row.agreement_number;
2321:
2322: ELSIF (nvl(p_funding_in_rec_out.agreement_number, '-99') <> nvl(l_funding_row.agreement_number, '-99')) THEN
2323:
2322: ELSIF (nvl(p_funding_in_rec_out.agreement_number, '-99') <> nvl(l_funding_row.agreement_number, '-99')) THEN
2323:
2324: IF (l_funding_row.agreement_flag = 'Y') THEN
2325:
2326: OKE_API.set_message(p_app_name => G_APP_NAME ,
2327: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2328: p_token1 => 'VALUE' ,
2329: p_token1_value => 'agreement_number'
2330: );
2323:
2324: IF (l_funding_row.agreement_flag = 'Y') THEN
2325:
2326: OKE_API.set_message(p_app_name => G_APP_NAME ,
2327: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2328: p_token1 => 'VALUE' ,
2329: p_token1_value => 'agreement_number'
2330: );
2331:
2334: END IF;
2335:
2336: END IF;
2337:
2338: IF p_funding_in_rec_out.k_conversion_type = OKE_API.G_MISS_CHAR THEN
2339: p_funding_in_rec_out.k_conversion_type := l_funding_row.k_conversion_type;
2340: END IF;
2341:
2342: IF p_funding_in_rec_out.k_conversion_date = OKE_API.G_MISS_DATE THEN
2338: IF p_funding_in_rec_out.k_conversion_type = OKE_API.G_MISS_CHAR THEN
2339: p_funding_in_rec_out.k_conversion_type := l_funding_row.k_conversion_type;
2340: END IF;
2341:
2342: IF p_funding_in_rec_out.k_conversion_date = OKE_API.G_MISS_DATE THEN
2343: p_funding_in_rec_out.k_conversion_date := l_funding_row.k_conversion_date;
2344: END IF;
2345:
2346: -- syho, bug 2208979
2343: p_funding_in_rec_out.k_conversion_date := l_funding_row.k_conversion_date;
2344: END IF;
2345:
2346: -- syho, bug 2208979
2347: IF p_funding_in_rec_out.k_conversion_rate = OKE_API.G_MISS_NUM THEN
2348: p_funding_in_rec_out.k_conversion_rate := l_funding_row.k_conversion_rate;
2349: END IF;
2350:
2351: IF (upper(p_funding_in_rec_out.k_conversion_type) <> 'USER') AND
2352: (nvl(to_char(p_funding_in_rec_out.k_conversion_date, 'YYYYMMDD'), '19000101') <> nvl(to_char(l_funding_row.k_conversion_date, 'YYYYMMDD'), '19000101') OR
2353: nvl(p_funding_in_rec_out.k_conversion_type, '-99') <> nvl(l_funding_row.k_conversion_type, '-99')) AND
2354: (p_funding_in_rec_out.k_conversion_rate is not null) THEN
2355:
2356: OKE_API.set_message(p_app_name => G_APP_NAME ,
2357: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2358: p_token1 => 'VALUE' ,
2359: p_token1_value => 'k_conversion_rate'
2360: );
2353: nvl(p_funding_in_rec_out.k_conversion_type, '-99') <> nvl(l_funding_row.k_conversion_type, '-99')) AND
2354: (p_funding_in_rec_out.k_conversion_rate is not null) THEN
2355:
2356: OKE_API.set_message(p_app_name => G_APP_NAME ,
2357: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2358: p_token1 => 'VALUE' ,
2359: p_token1_value => 'k_conversion_rate'
2360: );
2361:
2371: p_flag := 'Y';
2372:
2373: END IF;
2374:
2375: IF p_funding_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
2376: p_funding_in_rec_out.funding_status := l_funding_row.funding_status;
2377: END IF;
2378:
2379: IF p_funding_in_rec_out.start_date_active = OKE_API.G_MISS_DATE THEN
2375: IF p_funding_in_rec_out.funding_status = OKE_API.G_MISS_CHAR THEN
2376: p_funding_in_rec_out.funding_status := l_funding_row.funding_status;
2377: END IF;
2378:
2379: IF p_funding_in_rec_out.start_date_active = OKE_API.G_MISS_DATE THEN
2380: p_funding_in_rec_out.start_date_active := l_funding_row.start_date_active;
2381: END IF;
2382:
2383: IF p_funding_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
2379: IF p_funding_in_rec_out.start_date_active = OKE_API.G_MISS_DATE THEN
2380: p_funding_in_rec_out.start_date_active := l_funding_row.start_date_active;
2381: END IF;
2382:
2383: IF p_funding_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
2384: p_funding_in_rec_out.end_date_active := l_funding_row.end_date_active;
2385: END IF;
2386: /*
2387: IF p_funding_in_rec_out.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2383: IF p_funding_in_rec_out.end_date_active = OKE_API.G_MISS_DATE THEN
2384: p_funding_in_rec_out.end_date_active := l_funding_row.end_date_active;
2385: END IF;
2386: /*
2387: IF p_funding_in_rec_out.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2388: p_funding_in_rec_out.oke_desc_flex_name := null;
2389: END IF;
2390: */
2391: IF p_funding_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2387: IF p_funding_in_rec_out.oke_desc_flex_name = OKE_API.G_MISS_CHAR THEN
2388: p_funding_in_rec_out.oke_desc_flex_name := null;
2389: END IF;
2390: */
2391: IF p_funding_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2392: p_funding_in_rec_out.oke_attribute_category := l_funding_row.attribute_category;
2393: END IF;
2394:
2395: IF p_funding_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2391: IF p_funding_in_rec_out.oke_attribute_category = OKE_API.G_MISS_CHAR THEN
2392: p_funding_in_rec_out.oke_attribute_category := l_funding_row.attribute_category;
2393: END IF;
2394:
2395: IF p_funding_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2396: p_funding_in_rec_out.oke_attribute1 := l_funding_row.attribute1;
2397: END IF;
2398:
2399: IF p_funding_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2395: IF p_funding_in_rec_out.oke_attribute1 = OKE_API.G_MISS_CHAR THEN
2396: p_funding_in_rec_out.oke_attribute1 := l_funding_row.attribute1;
2397: END IF;
2398:
2399: IF p_funding_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2400: p_funding_in_rec_out.oke_attribute2 := l_funding_row.attribute2;
2401: END IF;
2402:
2403: IF p_funding_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2399: IF p_funding_in_rec_out.oke_attribute2 = OKE_API.G_MISS_CHAR THEN
2400: p_funding_in_rec_out.oke_attribute2 := l_funding_row.attribute2;
2401: END IF;
2402:
2403: IF p_funding_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2404: p_funding_in_rec_out.oke_attribute3 := l_funding_row.attribute3;
2405: END IF;
2406:
2407: IF p_funding_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2403: IF p_funding_in_rec_out.oke_attribute3 = OKE_API.G_MISS_CHAR THEN
2404: p_funding_in_rec_out.oke_attribute3 := l_funding_row.attribute3;
2405: END IF;
2406:
2407: IF p_funding_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2408: p_funding_in_rec_out.oke_attribute4 := l_funding_row.attribute4;
2409: END IF;
2410:
2411: IF p_funding_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2407: IF p_funding_in_rec_out.oke_attribute4 = OKE_API.G_MISS_CHAR THEN
2408: p_funding_in_rec_out.oke_attribute4 := l_funding_row.attribute4;
2409: END IF;
2410:
2411: IF p_funding_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2412: p_funding_in_rec_out.oke_attribute5 := l_funding_row.attribute5;
2413: END IF;
2414:
2415: IF p_funding_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2411: IF p_funding_in_rec_out.oke_attribute5 = OKE_API.G_MISS_CHAR THEN
2412: p_funding_in_rec_out.oke_attribute5 := l_funding_row.attribute5;
2413: END IF;
2414:
2415: IF p_funding_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2416: p_funding_in_rec_out.oke_attribute6 := l_funding_row.attribute6;
2417: END IF;
2418:
2419: IF p_funding_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2415: IF p_funding_in_rec_out.oke_attribute6 = OKE_API.G_MISS_CHAR THEN
2416: p_funding_in_rec_out.oke_attribute6 := l_funding_row.attribute6;
2417: END IF;
2418:
2419: IF p_funding_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2420: p_funding_in_rec_out.oke_attribute7 := l_funding_row.attribute7;
2421: END IF;
2422:
2423: IF p_funding_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2419: IF p_funding_in_rec_out.oke_attribute7 = OKE_API.G_MISS_CHAR THEN
2420: p_funding_in_rec_out.oke_attribute7 := l_funding_row.attribute7;
2421: END IF;
2422:
2423: IF p_funding_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2424: p_funding_in_rec_out.oke_attribute8 := l_funding_row.attribute8;
2425: END IF;
2426:
2427: IF p_funding_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2423: IF p_funding_in_rec_out.oke_attribute8 = OKE_API.G_MISS_CHAR THEN
2424: p_funding_in_rec_out.oke_attribute8 := l_funding_row.attribute8;
2425: END IF;
2426:
2427: IF p_funding_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2428: p_funding_in_rec_out.oke_attribute9 := l_funding_row.attribute9;
2429: END IF;
2430:
2431: IF p_funding_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2427: IF p_funding_in_rec_out.oke_attribute9 = OKE_API.G_MISS_CHAR THEN
2428: p_funding_in_rec_out.oke_attribute9 := l_funding_row.attribute9;
2429: END IF;
2430:
2431: IF p_funding_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2432: p_funding_in_rec_out.oke_attribute10 := l_funding_row.attribute10;
2433: END IF;
2434:
2435: IF p_funding_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2431: IF p_funding_in_rec_out.oke_attribute10 = OKE_API.G_MISS_CHAR THEN
2432: p_funding_in_rec_out.oke_attribute10 := l_funding_row.attribute10;
2433: END IF;
2434:
2435: IF p_funding_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2436: p_funding_in_rec_out.oke_attribute11 := l_funding_row.attribute11;
2437: END IF;
2438:
2439: IF p_funding_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2435: IF p_funding_in_rec_out.oke_attribute11 = OKE_API.G_MISS_CHAR THEN
2436: p_funding_in_rec_out.oke_attribute11 := l_funding_row.attribute11;
2437: END IF;
2438:
2439: IF p_funding_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2440: p_funding_in_rec_out.oke_attribute12 := l_funding_row.attribute12;
2441: END IF;
2442:
2443: IF p_funding_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2439: IF p_funding_in_rec_out.oke_attribute12 = OKE_API.G_MISS_CHAR THEN
2440: p_funding_in_rec_out.oke_attribute12 := l_funding_row.attribute12;
2441: END IF;
2442:
2443: IF p_funding_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2444: p_funding_in_rec_out.oke_attribute13 := l_funding_row.attribute13;
2445: END IF;
2446:
2447: IF p_funding_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2443: IF p_funding_in_rec_out.oke_attribute13 = OKE_API.G_MISS_CHAR THEN
2444: p_funding_in_rec_out.oke_attribute13 := l_funding_row.attribute13;
2445: END IF;
2446:
2447: IF p_funding_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2448: p_funding_in_rec_out.oke_attribute14 := l_funding_row.attribute14;
2449: END IF;
2450:
2451: IF p_funding_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2447: IF p_funding_in_rec_out.oke_attribute14 = OKE_API.G_MISS_CHAR THEN
2448: p_funding_in_rec_out.oke_attribute14 := l_funding_row.attribute14;
2449: END IF;
2450:
2451: IF p_funding_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2452: p_funding_in_rec_out.oke_attribute15 := l_funding_row.attribute15;
2453: END IF;
2454:
2455: IF p_funding_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2451: IF p_funding_in_rec_out.oke_attribute15 = OKE_API.G_MISS_CHAR THEN
2452: p_funding_in_rec_out.oke_attribute15 := l_funding_row.attribute15;
2453: END IF;
2454:
2455: IF p_funding_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2456: p_funding_in_rec_out.pa_attribute_category := l_funding_row.pa_attribute_category;
2457: END IF;
2458:
2459: IF p_funding_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2455: IF p_funding_in_rec_out.pa_attribute_category = OKE_API.G_MISS_CHAR THEN
2456: p_funding_in_rec_out.pa_attribute_category := l_funding_row.pa_attribute_category;
2457: END IF;
2458:
2459: IF p_funding_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2460: p_funding_in_rec_out.pa_attribute1 := l_funding_row.pa_attribute1;
2461: END IF;
2462:
2463: IF p_funding_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2459: IF p_funding_in_rec_out.pa_attribute1 = OKE_API.G_MISS_CHAR THEN
2460: p_funding_in_rec_out.pa_attribute1 := l_funding_row.pa_attribute1;
2461: END IF;
2462:
2463: IF p_funding_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2464: p_funding_in_rec_out.pa_attribute2 := l_funding_row.pa_attribute2;
2465: END IF;
2466:
2467: IF p_funding_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2463: IF p_funding_in_rec_out.pa_attribute2 = OKE_API.G_MISS_CHAR THEN
2464: p_funding_in_rec_out.pa_attribute2 := l_funding_row.pa_attribute2;
2465: END IF;
2466:
2467: IF p_funding_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2468: p_funding_in_rec_out.pa_attribute3 := l_funding_row.pa_attribute3;
2469: END IF;
2470:
2471: IF p_funding_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2467: IF p_funding_in_rec_out.pa_attribute3 = OKE_API.G_MISS_CHAR THEN
2468: p_funding_in_rec_out.pa_attribute3 := l_funding_row.pa_attribute3;
2469: END IF;
2470:
2471: IF p_funding_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2472: p_funding_in_rec_out.pa_attribute4 := l_funding_row.pa_attribute4;
2473: END IF;
2474:
2475: IF p_funding_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2471: IF p_funding_in_rec_out.pa_attribute4 = OKE_API.G_MISS_CHAR THEN
2472: p_funding_in_rec_out.pa_attribute4 := l_funding_row.pa_attribute4;
2473: END IF;
2474:
2475: IF p_funding_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2476: p_funding_in_rec_out.pa_attribute5 := l_funding_row.pa_attribute5;
2477: END IF;
2478:
2479: IF p_funding_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2475: IF p_funding_in_rec_out.pa_attribute5 = OKE_API.G_MISS_CHAR THEN
2476: p_funding_in_rec_out.pa_attribute5 := l_funding_row.pa_attribute5;
2477: END IF;
2478:
2479: IF p_funding_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2480: p_funding_in_rec_out.pa_attribute6 := l_funding_row.pa_attribute6;
2481: END IF;
2482:
2483: IF p_funding_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2479: IF p_funding_in_rec_out.pa_attribute6 = OKE_API.G_MISS_CHAR THEN
2480: p_funding_in_rec_out.pa_attribute6 := l_funding_row.pa_attribute6;
2481: END IF;
2482:
2483: IF p_funding_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2484: p_funding_in_rec_out.pa_attribute7 := l_funding_row.pa_attribute7;
2485: END IF;
2486:
2487: IF p_funding_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2483: IF p_funding_in_rec_out.pa_attribute7 = OKE_API.G_MISS_CHAR THEN
2484: p_funding_in_rec_out.pa_attribute7 := l_funding_row.pa_attribute7;
2485: END IF;
2486:
2487: IF p_funding_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2488: p_funding_in_rec_out.pa_attribute8 := l_funding_row.pa_attribute8;
2489: END IF;
2490:
2491: IF p_funding_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2487: IF p_funding_in_rec_out.pa_attribute8 = OKE_API.G_MISS_CHAR THEN
2488: p_funding_in_rec_out.pa_attribute8 := l_funding_row.pa_attribute8;
2489: END IF;
2490:
2491: IF p_funding_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2492: p_funding_in_rec_out.pa_attribute9 := l_funding_row.pa_attribute9;
2493: END IF;
2494:
2495: IF p_funding_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2491: IF p_funding_in_rec_out.pa_attribute9 = OKE_API.G_MISS_CHAR THEN
2492: p_funding_in_rec_out.pa_attribute9 := l_funding_row.pa_attribute9;
2493: END IF;
2494:
2495: IF p_funding_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2496: p_funding_in_rec_out.pa_attribute10 := l_funding_row.pa_attribute10;
2497: END IF;
2498:
2499: IF p_funding_in_rec_out.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2495: IF p_funding_in_rec_out.pa_attribute10 = OKE_API.G_MISS_CHAR THEN
2496: p_funding_in_rec_out.pa_attribute10 := l_funding_row.pa_attribute10;
2497: END IF;
2498:
2499: IF p_funding_in_rec_out.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2500: p_funding_in_rec_out.pa_attribute11 := l_funding_row.pa_attribute11;
2501: END IF;
2502:
2503: IF p_funding_in_rec_out.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2499: IF p_funding_in_rec_out.pa_attribute11 = OKE_API.G_MISS_CHAR THEN
2500: p_funding_in_rec_out.pa_attribute11 := l_funding_row.pa_attribute11;
2501: END IF;
2502:
2503: IF p_funding_in_rec_out.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2504: p_funding_in_rec_out.pa_attribute12 := l_funding_row.pa_attribute12;
2505: END IF;
2506:
2507: IF p_funding_in_rec_out.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2503: IF p_funding_in_rec_out.pa_attribute12 = OKE_API.G_MISS_CHAR THEN
2504: p_funding_in_rec_out.pa_attribute12 := l_funding_row.pa_attribute12;
2505: END IF;
2506:
2507: IF p_funding_in_rec_out.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2508: p_funding_in_rec_out.pa_attribute13 := l_funding_row.pa_attribute13;
2509: END IF;
2510:
2511: IF p_funding_in_rec_out.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2507: IF p_funding_in_rec_out.pa_attribute13 = OKE_API.G_MISS_CHAR THEN
2508: p_funding_in_rec_out.pa_attribute13 := l_funding_row.pa_attribute13;
2509: END IF;
2510:
2511: IF p_funding_in_rec_out.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2512: p_funding_in_rec_out.pa_attribute14 := l_funding_row.pa_attribute14;
2513: END IF;
2514:
2515: IF p_funding_in_rec_out.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2511: IF p_funding_in_rec_out.pa_attribute14 = OKE_API.G_MISS_CHAR THEN
2512: p_funding_in_rec_out.pa_attribute14 := l_funding_row.pa_attribute14;
2513: END IF;
2514:
2515: IF p_funding_in_rec_out.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2516: p_funding_in_rec_out.pa_attribute15 := l_funding_row.pa_attribute15;
2517: END IF;
2518:
2519: IF p_funding_in_rec_out.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2515: IF p_funding_in_rec_out.pa_attribute15 = OKE_API.G_MISS_CHAR THEN
2516: p_funding_in_rec_out.pa_attribute15 := l_funding_row.pa_attribute15;
2517: END IF;
2518:
2519: IF p_funding_in_rec_out.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2520: p_funding_in_rec_out.pa_attribute16 := l_funding_row.pa_attribute16;
2521: END IF;
2522:
2523: IF p_funding_in_rec_out.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2519: IF p_funding_in_rec_out.pa_attribute16 = OKE_API.G_MISS_CHAR THEN
2520: p_funding_in_rec_out.pa_attribute16 := l_funding_row.pa_attribute16;
2521: END IF;
2522:
2523: IF p_funding_in_rec_out.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2524: p_funding_in_rec_out.pa_attribute17 := l_funding_row.pa_attribute17;
2525: END IF;
2526:
2527: IF p_funding_in_rec_out.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2523: IF p_funding_in_rec_out.pa_attribute17 = OKE_API.G_MISS_CHAR THEN
2524: p_funding_in_rec_out.pa_attribute17 := l_funding_row.pa_attribute17;
2525: END IF;
2526:
2527: IF p_funding_in_rec_out.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2528: p_funding_in_rec_out.pa_attribute18 := l_funding_row.pa_attribute18;
2529: END IF;
2530:
2531: IF p_funding_in_rec_out.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2527: IF p_funding_in_rec_out.pa_attribute18 = OKE_API.G_MISS_CHAR THEN
2528: p_funding_in_rec_out.pa_attribute18 := l_funding_row.pa_attribute18;
2529: END IF;
2530:
2531: IF p_funding_in_rec_out.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2532: p_funding_in_rec_out.pa_attribute19 := l_funding_row.pa_attribute19;
2533: END IF;
2534:
2535: IF p_funding_in_rec_out.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2531: IF p_funding_in_rec_out.pa_attribute19 = OKE_API.G_MISS_CHAR THEN
2532: p_funding_in_rec_out.pa_attribute19 := l_funding_row.pa_attribute19;
2533: END IF;
2534:
2535: IF p_funding_in_rec_out.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2536: p_funding_in_rec_out.pa_attribute20 := l_funding_row.pa_attribute20;
2537: END IF;
2538:
2539: IF p_funding_in_rec_out.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2535: IF p_funding_in_rec_out.pa_attribute20 = OKE_API.G_MISS_CHAR THEN
2536: p_funding_in_rec_out.pa_attribute20 := l_funding_row.pa_attribute20;
2537: END IF;
2538:
2539: IF p_funding_in_rec_out.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2540: p_funding_in_rec_out.pa_attribute21 := l_funding_row.pa_attribute21;
2541: END IF;
2542:
2543: IF p_funding_in_rec_out.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2539: IF p_funding_in_rec_out.pa_attribute21 = OKE_API.G_MISS_CHAR THEN
2540: p_funding_in_rec_out.pa_attribute21 := l_funding_row.pa_attribute21;
2541: END IF;
2542:
2543: IF p_funding_in_rec_out.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2544: p_funding_in_rec_out.pa_attribute22 := l_funding_row.pa_attribute22;
2545: END IF;
2546:
2547: IF p_funding_in_rec_out.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2543: IF p_funding_in_rec_out.pa_attribute22 = OKE_API.G_MISS_CHAR THEN
2544: p_funding_in_rec_out.pa_attribute22 := l_funding_row.pa_attribute22;
2545: END IF;
2546:
2547: IF p_funding_in_rec_out.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2548: p_funding_in_rec_out.pa_attribute23 := l_funding_row.pa_attribute23;
2549: END IF;
2550:
2551: IF p_funding_in_rec_out.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2547: IF p_funding_in_rec_out.pa_attribute23 = OKE_API.G_MISS_CHAR THEN
2548: p_funding_in_rec_out.pa_attribute23 := l_funding_row.pa_attribute23;
2549: END IF;
2550:
2551: IF p_funding_in_rec_out.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2552: p_funding_in_rec_out.pa_attribute24 := l_funding_row.pa_attribute24;
2553: END IF;
2554:
2555: IF p_funding_in_rec_out.pa_attribute25 = OKE_API.G_MISS_CHAR THEN
2551: IF p_funding_in_rec_out.pa_attribute24 = OKE_API.G_MISS_CHAR THEN
2552: p_funding_in_rec_out.pa_attribute24 := l_funding_row.pa_attribute24;
2553: END IF;
2554:
2555: IF p_funding_in_rec_out.pa_attribute25 = OKE_API.G_MISS_CHAR THEN
2556: p_funding_in_rec_out.pa_attribute25 := l_funding_row.pa_attribute25;
2557: END IF;
2558:
2559: p_previous_amount := l_funding_row.previous_amount;
2590: validate_object_id(p_object_id => p_k_header_id ,
2591: p_return_status => l_return_status
2592: );
2593:
2594: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2595:
2596: RAISE G_EXCEPTION_HALT_VALIDATION;
2597:
2598: END IF;
2604: validate_currency_code(p_currency_code => p_source_currency ,
2605: p_return_status => l_return_status
2606: );
2607:
2608: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2609:
2610: RAISE G_EXCEPTION_HALT_VALIDATION;
2611:
2612: END IF;
2618: validate_conversion_type(p_conversion_type => p_conversion_type ,
2619: p_return_status => l_return_status
2620: );
2621:
2622: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2623:
2624: RAISE G_EXCEPTION_HALT_VALIDATION;
2625:
2626: END IF;
2628: validate_conversion_type(p_conversion_type => p_pa_conversion_type ,
2629: p_return_status => l_return_status
2630: );
2631:
2632: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2633:
2634: RAISE G_EXCEPTION_HALT_VALIDATION;
2635:
2636: END IF;
2643: p_k_party_id => p_party_id ,
2644: p_return_status => l_return_status
2645: );
2646:
2647: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2648:
2649: RAISE G_EXCEPTION_HALT_VALIDATION;
2650:
2651: END IF;
2657: validate_pool_party_id(p_pool_party_id => p_pool_party_id ,
2658: p_return_status => l_return_status
2659: );
2660:
2661: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2662:
2663: RAISE G_EXCEPTION_HALT_VALIDATION;
2664:
2665: END IF;
2672: p_object_id => p_k_header_id ,
2673: p_return_status => l_return_status
2674: );
2675:
2676: IF (l_return_status <> OKE_API.G_RET_STS_SUCCESS) THEN
2677:
2678: RAISE G_EXCEPTION_HALT_VALIDATION;
2679:
2680: END IF;
2732: CLOSE c_party;
2733:
2734: IF (l_dummy_value = '?') THEN
2735:
2736: OKE_API.set_message(p_app_name => G_APP_NAME ,
2737: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2738: p_token1 => 'VALUE' ,
2739: p_token1_value => 'party_id'
2740: );
2733:
2734: IF (l_dummy_value = '?') THEN
2735:
2736: OKE_API.set_message(p_app_name => G_APP_NAME ,
2737: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2738: p_token1 => 'VALUE' ,
2739: p_token1_value => 'party_id'
2740: );
2741:
2749: FETCH c_pool_party into p_currency_code, p_start_date;
2750:
2751: IF (c_pool_party%NOTFOUND) THEN
2752:
2753: OKE_API.set_message(p_app_name => G_APP_NAME ,
2754: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2755: p_token1 => 'VALUE' ,
2756: p_token1_value => 'pool_party_id and party_id'
2757: );
2750:
2751: IF (c_pool_party%NOTFOUND) THEN
2752:
2753: OKE_API.set_message(p_app_name => G_APP_NAME ,
2754: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2755: p_token1 => 'VALUE' ,
2756: p_token1_value => 'pool_party_id and party_id'
2757: );
2758:
2773: FETCH c_pool_party into l_pool_currency;
2774:
2775: IF (c_pool_party%NOTFOUND) THEN
2776:
2777: OKE_API.set_message(p_app_name => G_APP_NAME ,
2778: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2779: p_token1 => 'VALUE' ,
2780: p_token1_value => 'pool_party_id and party_id'
2781: );
2774:
2775: IF (c_pool_party%NOTFOUND) THEN
2776:
2777: OKE_API.set_message(p_app_name => G_APP_NAME ,
2778: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2779: p_token1 => 'VALUE' ,
2780: p_token1_value => 'pool_party_id and party_id'
2781: );
2782:
2789: CLOSE c_pool_party;
2790:
2791: IF (l_pool_currency <> p_source_currency) THEN
2792:
2793: OKE_API.set_message(p_app_name => G_APP_NAME ,
2794: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2795: p_token1 => 'VALUE' ,
2796: p_token1_value => 'pool_party_id'
2797: );
2790:
2791: IF (l_pool_currency <> p_source_currency) THEN
2792:
2793: OKE_API.set_message(p_app_name => G_APP_NAME ,
2794: p_msg_name => 'OKE_API_INVALID_VALUE' ,
2795: p_token1 => 'VALUE' ,
2796: p_token1_value => 'pool_party_id'
2797: );
2798:
2814:
2815: raise G_EXCEPTION_HALT_VALIDATION;
2816:
2817: WHEN OTHERS THEN
2818: OKE_API.set_message(p_app_name => G_APP_NAME ,
2819: p_msg_name => G_UNEXPECTED_ERROR ,
2820: p_token1 => G_SQLCODE_TOKEN ,
2821: p_token1_value => SQLCODE ,
2822: p_token2 => G_SQLERRM_TOKEN ,
2830: IF c_party%ISOPEN THEN
2831: CLOSE c_party;
2832: END IF;
2833:
2834: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2835:
2836: END validate_agreement_party;
2837:
2838:
2846: -- Procedure create_funding
2847: --
2848: -- Description: This procedure is used to insert record in OKE_K_FUNDING_SOURCES table
2849: --
2850: -- Calling subprograms: OKE_API.start_activity
2851: -- OKE_API.end_activity
2852: -- OKE_FUNDINGSOURCE_PVT.insert_row
2853: -- null_funding_out
2854: -- validate_attributes
2847: --
2848: -- Description: This procedure is used to insert record in OKE_K_FUNDING_SOURCES table
2849: --
2850: -- Calling subprograms: OKE_API.start_activity
2851: -- OKE_API.end_activity
2852: -- OKE_FUNDINGSOURCE_PVT.insert_row
2853: -- null_funding_out
2854: -- validate_attributes
2855: -- validate_record
2855: -- validate_record
2856: --
2857:
2858: PROCEDURE create_funding(p_api_version IN NUMBER ,
2859: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2860: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2861: p_msg_count OUT NOCOPY NUMBER ,
2862: p_msg_data OUT NOCOPY VARCHAR2 ,
2863: p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
2856: --
2857:
2858: PROCEDURE create_funding(p_api_version IN NUMBER ,
2859: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
2860: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
2861: p_msg_count OUT NOCOPY NUMBER ,
2862: p_msg_data OUT NOCOPY VARCHAR2 ,
2863: p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
2864: p_funding_out_rec OUT NOCOPY FUNDING_REC_OUT_TYPE ,
2876:
2877: --dbms_output.put_line('entering oke_fundsource_pvt.create_funding');
2878: --oke_debug.debug('entering oke_fundsource_pvt.create_funding');
2879:
2880: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2881: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2882:
2883: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2884: p_pkg_name => G_PKG_NAME ,
2877: --dbms_output.put_line('entering oke_fundsource_pvt.create_funding');
2878: --oke_debug.debug('entering oke_fundsource_pvt.create_funding');
2879:
2880: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2881: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2882:
2883: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2884: p_pkg_name => G_PKG_NAME ,
2885: p_init_msg_list => p_init_msg_list ,
2879:
2880: p_return_status := OKE_API.G_RET_STS_SUCCESS;
2881: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
2882:
2883: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
2884: p_pkg_name => G_PKG_NAME ,
2885: p_init_msg_list => p_init_msg_list ,
2886: l_api_version => G_API_VERSION_NUMBER ,
2887: p_api_version => p_api_version ,
2888: p_api_type => '_PVT' ,
2889: x_return_status => p_return_status
2890: );
2891:
2892: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2893:
2894: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2895:
2896: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2890: );
2891:
2892: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2893:
2894: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2895:
2896: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2897:
2898: RAISE OKE_API.G_EXCEPTION_ERROR;
2892: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
2893:
2894: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2895:
2896: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2897:
2898: RAISE OKE_API.G_EXCEPTION_ERROR;
2899:
2900: END IF;
2894: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
2895:
2896: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
2897:
2898: RAISE OKE_API.G_EXCEPTION_ERROR;
2899:
2900: END IF;
2901:
2902: --
3012:
3013: -- dbms_output.put_line('finished oke_fundsource_pvt.create_funding');
3014: --oke_debug.debug('finished oke_fundsource_pvt.create_funding');
3015:
3016: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
3017: x_msg_data => p_msg_data
3018: );
3019:
3020: EXCEPTION
3017: x_msg_data => p_msg_data
3018: );
3019:
3020: EXCEPTION
3021: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3022: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3023: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3024: p_pkg_name => G_PKG_NAME ,
3025: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3018: );
3019:
3020: EXCEPTION
3021: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3022: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3023: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3024: p_pkg_name => G_PKG_NAME ,
3025: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3026: x_msg_count => p_msg_count ,
3019:
3020: EXCEPTION
3021: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3022: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3023: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3024: p_pkg_name => G_PKG_NAME ,
3025: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3026: x_msg_count => p_msg_count ,
3027: x_msg_data => p_msg_data ,
3021: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3022: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3023: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3024: p_pkg_name => G_PKG_NAME ,
3025: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3026: x_msg_count => p_msg_count ,
3027: x_msg_data => p_msg_data ,
3028: p_api_type => '_PVT'
3029: );
3027: x_msg_data => p_msg_data ,
3028: p_api_type => '_PVT'
3029: );
3030:
3031: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3032: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3033: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3034: p_pkg_name => G_PKG_NAME ,
3035: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3028: p_api_type => '_PVT'
3029: );
3030:
3031: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3032: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3033: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3034: p_pkg_name => G_PKG_NAME ,
3035: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3036: x_msg_count => p_msg_count ,
3029: );
3030:
3031: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3032: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3033: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3034: p_pkg_name => G_PKG_NAME ,
3035: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3036: x_msg_count => p_msg_count ,
3037: x_msg_data => p_msg_data ,
3031: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3032: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3033: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3034: p_pkg_name => G_PKG_NAME ,
3035: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3036: x_msg_count => p_msg_count ,
3037: x_msg_data => p_msg_data ,
3038: p_api_type => '_PVT'
3039: );
3038: p_api_type => '_PVT'
3039: );
3040:
3041: WHEN OTHERS THEN
3042: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3043: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3044: p_pkg_name => G_PKG_NAME ,
3045: p_exc_name => 'OTHERS' ,
3046: x_msg_count => p_msg_count ,
3039: );
3040:
3041: WHEN OTHERS THEN
3042: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3043: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3044: p_pkg_name => G_PKG_NAME ,
3045: p_exc_name => 'OTHERS' ,
3046: x_msg_count => p_msg_count ,
3047: x_msg_data => p_msg_data ,
3055: -- Procedure: update_funding
3056: --
3057: -- Description: This procedure is used to update record in OKE_FUNDING_SOURCES table
3058: --
3059: -- Calling subprograms: OKE_API.start_activity
3060: -- OKE_API.end_activity
3061: -- OKE_FUNDINGSOURCE_PVT.update_row
3062: -- validate_funding_source_id
3063: -- validate_populate_rec
3056: --
3057: -- Description: This procedure is used to update record in OKE_FUNDING_SOURCES table
3058: --
3059: -- Calling subprograms: OKE_API.start_activity
3060: -- OKE_API.end_activity
3061: -- OKE_FUNDINGSOURCE_PVT.update_row
3062: -- validate_funding_source_id
3063: -- validate_populate_rec
3064: -- validate_attributes
3065: -- validate_record
3066: --
3067:
3068: PROCEDURE update_funding(p_api_version IN NUMBER ,
3069: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3070: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
3071: p_msg_count OUT NOCOPY NUMBER ,
3072: p_msg_data OUT NOCOPY VARCHAR2 ,
3073: p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
3066: --
3067:
3068: PROCEDURE update_funding(p_api_version IN NUMBER ,
3069: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3070: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
3071: p_msg_count OUT NOCOPY NUMBER ,
3072: p_msg_data OUT NOCOPY VARCHAR2 ,
3073: p_funding_in_rec IN FUNDING_REC_IN_TYPE ,
3074: p_funding_out_rec OUT NOCOPY FUNDING_REC_OUT_TYPE ,
3090:
3091: --dbms_output.put_line('entering oke_fundsource_pvt.update_funding');
3092: --oke_debug.debug('entering oke_fundsource_pvt.update_funding');
3093:
3094: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3095: p_funding_out_rec.funding_source_id := p_funding_in_rec.funding_source_id;
3096: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
3097:
3098: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3092: --oke_debug.debug('entering oke_fundsource_pvt.update_funding');
3093:
3094: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3095: p_funding_out_rec.funding_source_id := p_funding_in_rec.funding_source_id;
3096: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
3097:
3098: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3099: p_pkg_name => G_PKG_NAME ,
3100: p_init_msg_list => p_init_msg_list ,
3094: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3095: p_funding_out_rec.funding_source_id := p_funding_in_rec.funding_source_id;
3096: p_funding_out_rec.return_status := OKE_API.G_RET_STS_SUCCESS;
3097:
3098: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3099: p_pkg_name => G_PKG_NAME ,
3100: p_init_msg_list => p_init_msg_list ,
3101: l_api_version => G_API_VERSION_NUMBER ,
3102: p_api_version => p_api_version ,
3103: p_api_type => '_PVT' ,
3104: x_return_status => p_return_status
3105: );
3106:
3107: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3108:
3109: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3110:
3111: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3105: );
3106:
3107: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3108:
3109: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3110:
3111: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3112:
3113: RAISE OKE_API.G_EXCEPTION_ERROR;
3107: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3108:
3109: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3110:
3111: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3112:
3113: RAISE OKE_API.G_EXCEPTION_ERROR;
3114:
3115: END IF;
3109: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3110:
3111: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3112:
3113: RAISE OKE_API.G_EXCEPTION_ERROR;
3114:
3115: END IF;
3116:
3117: --
3228: COMMIT WORK;
3229:
3230: END IF;
3231:
3232: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
3233: x_msg_data => p_msg_data
3234: );
3235:
3236: EXCEPTION
3233: x_msg_data => p_msg_data
3234: );
3235:
3236: EXCEPTION
3237: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3238: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3239: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3240: p_pkg_name => G_PKG_NAME ,
3241: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3234: );
3235:
3236: EXCEPTION
3237: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3238: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3239: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3240: p_pkg_name => G_PKG_NAME ,
3241: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3242: x_msg_count => p_msg_count ,
3235:
3236: EXCEPTION
3237: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3238: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3239: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3240: p_pkg_name => G_PKG_NAME ,
3241: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3242: x_msg_count => p_msg_count ,
3243: x_msg_data => p_msg_data ,
3237: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3238: p_funding_out_rec.return_status := OKE_API.G_RET_STS_ERROR;
3239: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3240: p_pkg_name => G_PKG_NAME ,
3241: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3242: x_msg_count => p_msg_count ,
3243: x_msg_data => p_msg_data ,
3244: p_api_type => '_PVT'
3245: );
3243: x_msg_data => p_msg_data ,
3244: p_api_type => '_PVT'
3245: );
3246:
3247: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3248: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3249: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3250: p_pkg_name => G_PKG_NAME ,
3251: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3244: p_api_type => '_PVT'
3245: );
3246:
3247: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3248: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3249: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3250: p_pkg_name => G_PKG_NAME ,
3251: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3252: x_msg_count => p_msg_count ,
3245: );
3246:
3247: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3248: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3249: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3250: p_pkg_name => G_PKG_NAME ,
3251: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3252: x_msg_count => p_msg_count ,
3253: x_msg_data => p_msg_data ,
3247: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3248: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3249: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3250: p_pkg_name => G_PKG_NAME ,
3251: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3252: x_msg_count => p_msg_count ,
3253: x_msg_data => p_msg_data ,
3254: p_api_type => '_PVT'
3255: );
3254: p_api_type => '_PVT'
3255: );
3256:
3257: WHEN OTHERS THEN
3258: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3259: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3260: p_pkg_name => G_PKG_NAME ,
3261: p_exc_name => 'OTHERS' ,
3262: x_msg_count => p_msg_count ,
3255: );
3256:
3257: WHEN OTHERS THEN
3258: p_funding_out_rec.return_status := OKE_API.G_RET_STS_UNEXP_ERROR;
3259: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3260: p_pkg_name => G_PKG_NAME ,
3261: p_exc_name => 'OTHERS' ,
3262: x_msg_count => p_msg_count ,
3263: x_msg_data => p_msg_data ,
3272: -- Procedure: delete_funding
3273: --
3274: -- Description: This procedure is used to delete record in OKE_K_FUNDING_SOURCES table
3275: --
3276: -- Calling subprograms: OKE_API.start_activity
3277: -- OKE_API.end_activity
3278: -- OKE_FUNDINGSOURCE_PVT.delete_row
3279: -- PA_AGREEMENT_PUB.delete_agreement
3280: -- validate_funding_source_id
3273: --
3274: -- Description: This procedure is used to delete record in OKE_K_FUNDING_SOURCES table
3275: --
3276: -- Calling subprograms: OKE_API.start_activity
3277: -- OKE_API.end_activity
3278: -- OKE_FUNDINGSOURCE_PVT.delete_row
3279: -- PA_AGREEMENT_PUB.delete_agreement
3280: -- validate_funding_source_id
3281: --
3280: -- validate_funding_source_id
3281: --
3282:
3283: PROCEDURE delete_funding(p_api_version IN NUMBER ,
3284: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
3285: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3286: p_msg_count OUT NOCOPY NUMBER ,
3287: p_msg_data OUT NOCOPY VARCHAR2 ,
3288: p_funding_source_id IN NUMBER ,
3281: --
3282:
3283: PROCEDURE delete_funding(p_api_version IN NUMBER ,
3284: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
3285: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3286: p_msg_count OUT NOCOPY NUMBER ,
3287: p_msg_data OUT NOCOPY VARCHAR2 ,
3288: p_funding_source_id IN NUMBER ,
3289: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
3285: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3286: p_msg_count OUT NOCOPY NUMBER ,
3287: p_msg_data OUT NOCOPY VARCHAR2 ,
3288: p_funding_source_id IN NUMBER ,
3289: -- p_agreement_flag IN VARCHAR2 := OKE_API.G_FALSE ,
3290: p_return_status OUT NOCOPY VARCHAR2
3291: ) is
3292:
3293: cursor c_agreement (p_funding_source_id NUMBER,
3309:
3310: -- dbms_output.put_line('entering oke_fundsource_pvt.delete_funding');
3311: --oke_debug.debug('entering oke_fundsource_pvt.delete_funding');
3312:
3313: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3314:
3315: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3316: p_pkg_name => G_PKG_NAME ,
3317: p_init_msg_list => p_init_msg_list ,
3311: --oke_debug.debug('entering oke_fundsource_pvt.delete_funding');
3312:
3313: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3314:
3315: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3316: p_pkg_name => G_PKG_NAME ,
3317: p_init_msg_list => p_init_msg_list ,
3318: l_api_version => G_API_VERSION_NUMBER ,
3319: p_api_version => p_api_version ,
3320: p_api_type => '_PVT' ,
3321: x_return_status => p_return_status
3322: );
3323:
3324: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3325:
3326: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3327:
3328: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3322: );
3323:
3324: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3325:
3326: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3327:
3328: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3329:
3330: RAISE OKE_API.G_EXCEPTION_ERROR;
3324: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3325:
3326: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3327:
3328: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3329:
3330: RAISE OKE_API.G_EXCEPTION_ERROR;
3331:
3332: END IF;
3326: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3327:
3328: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3329:
3330: RAISE OKE_API.G_EXCEPTION_ERROR;
3331:
3332: END IF;
3333:
3334: --
3370: -- dbms_output.put_line('calling pa_agreement_pub.delete_agreement from oke_fundsource_pvt');
3371: --oke_debug.debug('calling pa_agreement_pub.delete_agreement from oke_fundsource_pvt');
3372:
3373: PA_AGREEMENT_PUB.delete_agreement(p_api_version_number => p_api_version ,
3374: p_commit => OKE_API.G_FALSE ,
3375: p_init_msg_list => OKE_API.G_FALSE ,
3376: p_msg_count => p_msg_count ,
3377: p_msg_data => p_msg_data ,
3378: p_return_status => p_return_status ,
3371: --oke_debug.debug('calling pa_agreement_pub.delete_agreement from oke_fundsource_pvt');
3372:
3373: PA_AGREEMENT_PUB.delete_agreement(p_api_version_number => p_api_version ,
3374: p_commit => OKE_API.G_FALSE ,
3375: p_init_msg_list => OKE_API.G_FALSE ,
3376: p_msg_count => p_msg_count ,
3377: p_msg_data => p_msg_data ,
3378: p_return_status => p_return_status ,
3379: p_pm_product_code => G_PRODUCT_CODE ,
3380: p_pm_agreement_reference => l_agreement.pm_agreement_reference ,
3381: p_agreement_id => null
3382: );
3383:
3384: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3385:
3386: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3387:
3388: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3382: );
3383:
3384: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3385:
3386: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3387:
3388: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3389:
3390: RAISE OKE_API.G_EXCEPTION_ERROR;
3384: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3385:
3386: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3387:
3388: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3389:
3390: RAISE OKE_API.G_EXCEPTION_ERROR;
3391:
3392: END IF;
3386: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3387:
3388: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3389:
3390: RAISE OKE_API.G_EXCEPTION_ERROR;
3391:
3392: END IF;
3393:
3394: END LOOP;
3403: COMMIT WORK;
3404:
3405: END IF;
3406:
3407: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
3408: x_msg_data => p_msg_data
3409: );
3410:
3411: EXCEPTION
3408: x_msg_data => p_msg_data
3409: );
3410:
3411: EXCEPTION
3412: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3413: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3414: p_pkg_name => G_PKG_NAME ,
3415: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3416: x_msg_count => p_msg_count ,
3409: );
3410:
3411: EXCEPTION
3412: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3413: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3414: p_pkg_name => G_PKG_NAME ,
3415: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3416: x_msg_count => p_msg_count ,
3417: x_msg_data => p_msg_data ,
3411: EXCEPTION
3412: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
3413: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3414: p_pkg_name => G_PKG_NAME ,
3415: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
3416: x_msg_count => p_msg_count ,
3417: x_msg_data => p_msg_data ,
3418: p_api_type => '_PVT'
3419: );
3417: x_msg_data => p_msg_data ,
3418: p_api_type => '_PVT'
3419: );
3420:
3421: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3422: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3423: p_pkg_name => G_PKG_NAME ,
3424: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3425: x_msg_count => p_msg_count ,
3418: p_api_type => '_PVT'
3419: );
3420:
3421: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3422: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3423: p_pkg_name => G_PKG_NAME ,
3424: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3425: x_msg_count => p_msg_count ,
3426: x_msg_data => p_msg_data ,
3420:
3421: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3422: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3423: p_pkg_name => G_PKG_NAME ,
3424: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
3425: x_msg_count => p_msg_count ,
3426: x_msg_data => p_msg_data ,
3427: p_api_type => '_PVT'
3428: );
3427: p_api_type => '_PVT'
3428: );
3429:
3430: WHEN OTHERS THEN
3431: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
3432: p_pkg_name => G_PKG_NAME ,
3433: p_exc_name => 'OTHERS' ,
3434: x_msg_count => p_msg_count ,
3435: x_msg_data => p_msg_data ,
3445: --
3446: -- Description: This procedure is used by Oracle Form to get the existing agreement record
3447: -- and create a funding record in OKE
3448: --
3449: -- Calling subprograms: OKE_API.start_activity
3450: -- OKE_API.end_activity
3451: -- OKE_FUNDSOURCE_PVT.create_funding
3452: -- OKE_ALLOCATION_PVT.add_allocation
3453: -- OKE_FUNDING_UTIL_PKG.check_single_org
3446: -- Description: This procedure is used by Oracle Form to get the existing agreement record
3447: -- and create a funding record in OKE
3448: --
3449: -- Calling subprograms: OKE_API.start_activity
3450: -- OKE_API.end_activity
3451: -- OKE_FUNDSOURCE_PVT.create_funding
3452: -- OKE_ALLOCATION_PVT.add_allocation
3453: -- OKE_FUNDING_UTIL_PKG.check_single_org
3454: -- OKE_FUNDING_UTIL_PKG.update_source_flag
3459: -- update_agreement_reference
3460: -- update_proj_fld_reference
3461: --
3462:
3463: PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3464: p_api_version IN NUMBER ,
3465: p_msg_count OUT NOCOPY NUMBER ,
3466: p_msg_data OUT NOCOPY VARCHAR2 ,
3467: p_commit IN VARCHAR2:= OKE_API.G_FALSE ,
3463: PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
3464: p_api_version IN NUMBER ,
3465: p_msg_count OUT NOCOPY NUMBER ,
3466: p_msg_data OUT NOCOPY VARCHAR2 ,
3467: p_commit IN VARCHAR2:= OKE_API.G_FALSE ,
3468: p_pool_party_id IN NUMBER ,
3469: p_customer_id IN NUMBER ,
3470: p_customer_number IN VARCHAR2 ,
3471: --p_pool_currency IN VARCHAR2 ,
3578: BEGIN
3579:
3580: --oke_debug.debug('entering fetch_create_funding..');
3581:
3582: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3583:
3584: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3585: p_pkg_name => G_PKG_NAME ,
3586: p_init_msg_list => p_init_msg_list ,
3580: --oke_debug.debug('entering fetch_create_funding..');
3581:
3582: p_return_status := OKE_API.G_RET_STS_SUCCESS;
3583:
3584: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
3585: p_pkg_name => G_PKG_NAME ,
3586: p_init_msg_list => p_init_msg_list ,
3587: l_api_version => G_API_VERSION_NUMBER ,
3588: p_api_version => p_api_version ,
3589: p_api_type => '_PVT' ,
3590: x_return_status => p_return_status
3591: );
3592:
3593: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3594:
3595: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3596:
3597: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3591: );
3592:
3593: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3594:
3595: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3596:
3597: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3598:
3599: RAISE OKE_API.G_EXCEPTION_ERROR;
3593: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3594:
3595: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3596:
3597: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3598:
3599: RAISE OKE_API.G_EXCEPTION_ERROR;
3600:
3601: END IF;
3595: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3596:
3597: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
3598:
3599: RAISE OKE_API.G_EXCEPTION_ERROR;
3600:
3601: END IF;
3602:
3603: --oke_debug.debug('oke_api.start_activity finished successfully');
3599: RAISE OKE_API.G_EXCEPTION_ERROR;
3600:
3601: END IF;
3602:
3603: --oke_debug.debug('oke_api.start_activity finished successfully');
3604:
3605: -- l_fund_currency := p_currency_code;
3606:
3607: IF (p_pool_party_id is not null) THEN
3609: validate_pool_party_id(p_pool_party_id => p_pool_party_id ,
3610: p_return_status => p_return_status
3611: );
3612:
3613: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3614:
3615: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3616:
3617: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3611: );
3612:
3613: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3614:
3615: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3616:
3617: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3618:
3619: RAISE OKE_API.G_EXCEPTION_ERROR;
3613: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3614:
3615: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3616:
3617: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3618:
3619: RAISE OKE_API.G_EXCEPTION_ERROR;
3620:
3621: END IF;
3615: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3616:
3617: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3618:
3619: RAISE OKE_API.G_EXCEPTION_ERROR;
3620:
3621: END IF;
3622:
3623: -- END IF;
3635: IF (l_end_date is not null) AND
3636: (p_expiration_date is null or
3637: p_expiration_date > l_end_date) THEN
3638:
3639: OKE_API.set_message(p_app_name => G_APP_NAME ,
3640: p_msg_name => 'OKE_AGREEMENT_END_DATE'
3641: );
3642:
3643: RAISE OKE_API.G_EXCEPTION_ERROR;
3639: OKE_API.set_message(p_app_name => G_APP_NAME ,
3640: p_msg_name => 'OKE_AGREEMENT_END_DATE'
3641: );
3642:
3643: RAISE OKE_API.G_EXCEPTION_ERROR;
3644:
3645: END IF; */
3646: /*
3647: IF (p_agreement_currency <> p_source_currency) THEN
3720: -- bug 3346170
3721: /* IF (p_pool_party_id is not null) THEN
3722: IF (nvl(to_char(l_start_date, 'YYYYMMDD'), '19000101') > to_char(l_project_funding.date_allocated, 'YYYYMMDD')) THEN
3723:
3724: OKE_API.set_message(p_app_name => G_APP_NAME ,
3725: p_msg_name => 'OKE_PA_FUND_POOL_DATE'
3726: );
3727:
3728: RAISE OKE_API.G_EXCEPTION_ERROR;
3724: OKE_API.set_message(p_app_name => G_APP_NAME ,
3725: p_msg_name => 'OKE_PA_FUND_POOL_DATE'
3726: );
3727:
3728: RAISE OKE_API.G_EXCEPTION_ERROR;
3729:
3730: END IF;
3731: END IF;
3732: */
3922: END IF;
3923:
3924: --oke_debug.debug('calling create_funding');
3925: create_funding(p_api_version => p_api_version ,
3926: p_init_msg_list => OKE_API.G_FALSE ,
3927: p_msg_count => p_msg_count ,
3928: p_msg_data => p_msg_data ,
3929: p_funding_in_rec => l_funding_in_rec ,
3930: p_funding_out_rec => l_funding_out_rec ,
3931: p_return_status => p_return_status
3932: );
3933: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
3934:
3935: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3936:
3937: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3938:
3939: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3933: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
3934:
3935: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3936:
3937: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3938:
3939: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3940:
3941: RAISE OKE_API.G_EXCEPTION_ERROR;
3935: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3936:
3937: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3938:
3939: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3940:
3941: RAISE OKE_API.G_EXCEPTION_ERROR;
3942:
3943: END IF;
3937: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3938:
3939: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3940:
3941: RAISE OKE_API.G_EXCEPTION_ERROR;
3942:
3943: END IF;
3944:
3945: --
3964: l_allocation_in_rec.funding_source_id := l_funding_out_rec.funding_source_id;
3965:
3966: --oke_debug.debug('converted_amount ' || l_allocation_in_rec.amount);
3967: OKE_ALLOCATION_PVT.add_allocation(p_api_version => p_api_version ,
3968: p_init_msg_list => OKE_API.G_FALSE ,
3969: p_commit => OKE_API.G_FALSE ,
3970: p_msg_count => p_msg_count ,
3971: p_msg_data => p_msg_data ,
3972: p_allocation_in_rec => l_allocation_in_rec ,
3965:
3966: --oke_debug.debug('converted_amount ' || l_allocation_in_rec.amount);
3967: OKE_ALLOCATION_PVT.add_allocation(p_api_version => p_api_version ,
3968: p_init_msg_list => OKE_API.G_FALSE ,
3969: p_commit => OKE_API.G_FALSE ,
3970: p_msg_count => p_msg_count ,
3971: p_msg_data => p_msg_data ,
3972: p_allocation_in_rec => l_allocation_in_rec ,
3973: p_allocation_out_rec => l_allocation_out_rec ,
3975: );
3976:
3977: --oke_debug.debug('finished calling oke_allocation_pvt.add_allocation w/ status' || p_return_status);
3978:
3979: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3980:
3981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3982:
3983: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3977: --oke_debug.debug('finished calling oke_allocation_pvt.add_allocation w/ status' || p_return_status);
3978:
3979: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3980:
3981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3982:
3983: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3984:
3985: RAISE OKE_API.G_EXCEPTION_ERROR;
3979: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
3980:
3981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3982:
3983: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3984:
3985: RAISE OKE_API.G_EXCEPTION_ERROR;
3986:
3987: END IF;
3981: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
3982:
3983: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
3984:
3985: RAISE OKE_API.G_EXCEPTION_ERROR;
3986:
3987: END IF;
3988:
3989: --
4002: --oke_debug.debug('calling oke_funding_util.update_alloc_version');
4003:
4004: OKE_FUNDING_UTIL_PKG.update_alloc_version(x_fund_allocation_id => l_allocation_out_rec.fund_allocation_id ,
4005: x_version_add => 1 ,
4006: x_commit => OKE_API.G_FALSE
4007: );
4008:
4009: EXIT WHEN (i = l_allocation_in_tbl.LAST);
4010: i := l_allocation_in_tbl.NEXT(i);
4035: l_funding_in_rec.funding_source_id := l_funding_out_rec.funding_source_id ;
4036:
4037: --oke_debug.debug('calling create_funding');
4038: update_funding(p_api_version => p_api_version ,
4039: p_init_msg_list => OKE_API.G_FALSE ,
4040: p_msg_count => p_msg_count ,
4041: p_msg_data => p_msg_data ,
4042: p_funding_in_rec => l_funding_in_rec ,
4043: p_funding_out_rec => l_funding_out_rec ,
4044: p_return_status => p_return_status
4045: );
4046: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4047:
4048: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4049:
4050: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4051:
4052: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4046: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4047:
4048: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4049:
4050: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4051:
4052: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4053:
4054: RAISE OKE_API.G_EXCEPTION_ERROR;
4048: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4049:
4050: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4051:
4052: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4053:
4054: RAISE OKE_API.G_EXCEPTION_ERROR;
4055:
4056: END IF;
4050: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4051:
4052: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4053:
4054: RAISE OKE_API.G_EXCEPTION_ERROR;
4055:
4056: END IF;
4057:
4058: --
4074: -- update the agreement_flag in OKE_FUNDING_SOURCES table
4075: --
4076:
4077: OKE_FUNDING_UTIL_PKG.update_source_flag(x_funding_source_id => l_funding_out_rec.funding_source_id ,
4078: x_commit => OKE_API.G_FALSE
4079: );
4080:
4081: IF FND_API.to_boolean(p_commit) THEN
4082:
4083: COMMIT WORK;
4084:
4085: END IF;
4086:
4087: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
4088: x_msg_data => p_msg_data
4089: );
4090:
4091: EXCEPTION
4088: x_msg_data => p_msg_data
4089: );
4090:
4091: EXCEPTION
4092: WHEN OKE_API.G_EXCEPTION_ERROR THEN
4093: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4094: p_pkg_name => G_PKG_NAME ,
4095: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4096: x_msg_count => p_msg_count ,
4089: );
4090:
4091: EXCEPTION
4092: WHEN OKE_API.G_EXCEPTION_ERROR THEN
4093: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4094: p_pkg_name => G_PKG_NAME ,
4095: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4096: x_msg_count => p_msg_count ,
4097: x_msg_data => p_msg_data ,
4091: EXCEPTION
4092: WHEN OKE_API.G_EXCEPTION_ERROR THEN
4093: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4094: p_pkg_name => G_PKG_NAME ,
4095: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4096: x_msg_count => p_msg_count ,
4097: x_msg_data => p_msg_data ,
4098: p_api_type => '_PVT'
4099: );
4097: x_msg_data => p_msg_data ,
4098: p_api_type => '_PVT'
4099: );
4100:
4101: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4102: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4103: p_pkg_name => G_PKG_NAME ,
4104: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4105: x_msg_count => p_msg_count ,
4098: p_api_type => '_PVT'
4099: );
4100:
4101: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4102: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4103: p_pkg_name => G_PKG_NAME ,
4104: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4105: x_msg_count => p_msg_count ,
4106: x_msg_data => p_msg_data ,
4100:
4101: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4102: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4103: p_pkg_name => G_PKG_NAME ,
4104: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4105: x_msg_count => p_msg_count ,
4106: x_msg_data => p_msg_data ,
4107: p_api_type => '_PVT'
4108: );
4107: p_api_type => '_PVT'
4108: );
4109:
4110: WHEN OTHERS THEN
4111: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4112: p_pkg_name => G_PKG_NAME ,
4113: p_exc_name => 'OTHERS' ,
4114: x_msg_count => p_msg_count ,
4115: x_msg_data => p_msg_data ,
4123: --
4124: -- Description: This procedure is used to get the existing agreement record
4125: -- and create a funding record in OKE
4126: --
4127: -- Calling subprograms: OKE_API.start_activity
4128: -- OKE_API.end_activity
4129: -- OKE_FUNDSOURCE_PVT.create_funding
4130: -- OKE_ALLOCATION_PVT.add_allocation
4131: -- OKE_FUNDING_UTIL_PKG.check_single_org
4124: -- Description: This procedure is used to get the existing agreement record
4125: -- and create a funding record in OKE
4126: --
4127: -- Calling subprograms: OKE_API.start_activity
4128: -- OKE_API.end_activity
4129: -- OKE_FUNDSOURCE_PVT.create_funding
4130: -- OKE_ALLOCATION_PVT.add_allocation
4131: -- OKE_FUNDING_UTIL_PKG.check_single_org
4132: -- OKE_FUNDING_UTIL_PKG.update_source_flag
4141: -- update_agreement_reference
4142: -- update_proj_fld_reference
4143: --
4144:
4145: PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
4146: p_api_version IN NUMBER ,
4147: p_msg_count OUT NOCOPY NUMBER ,
4148: p_msg_data OUT NOCOPY VARCHAR2 ,
4149: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
4145: PROCEDURE fetch_create_funding(p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
4146: p_api_version IN NUMBER ,
4147: p_msg_count OUT NOCOPY NUMBER ,
4148: p_msg_data OUT NOCOPY VARCHAR2 ,
4149: p_commit IN VARCHAR2 := OKE_API.G_FALSE ,
4150: p_pool_party_id IN NUMBER ,
4151: p_party_id IN NUMBER ,
4152: --p_source_currency IN VARCHAR2 ,
4153: p_agreement_id IN NUMBER ,
4234:
4235: --oke_debug.debug('entering fetch_create_funding..');
4236: --dbms_output.put_line('entering fetch_create_funding..');
4237:
4238: p_return_status := OKE_API.G_RET_STS_SUCCESS;
4239:
4240: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
4241: p_pkg_name => G_PKG_NAME ,
4242: p_init_msg_list => p_init_msg_list ,
4236: --dbms_output.put_line('entering fetch_create_funding..');
4237:
4238: p_return_status := OKE_API.G_RET_STS_SUCCESS;
4239:
4240: l_return_status := OKE_API.START_ACTIVITY(p_api_name => l_api_name ,
4241: p_pkg_name => G_PKG_NAME ,
4242: p_init_msg_list => p_init_msg_list ,
4243: l_api_version => G_API_VERSION_NUMBER ,
4244: p_api_version => p_api_version ,
4245: p_api_type => '_PVT' ,
4246: x_return_status => p_return_status
4247: );
4248:
4249: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4250:
4251: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4252:
4253: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
4247: );
4248:
4249: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4250:
4251: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4252:
4253: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
4254:
4255: RAISE OKE_API.G_EXCEPTION_ERROR;
4249: IF (l_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4250:
4251: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4252:
4253: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
4254:
4255: RAISE OKE_API.G_EXCEPTION_ERROR;
4256:
4257: END IF;
4251: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4252:
4253: ELSIF (l_return_status = OKE_API.G_RET_STS_ERROR) THEN
4254:
4255: RAISE OKE_API.G_EXCEPTION_ERROR;
4256:
4257: END IF;
4258:
4259: --
4325:
4326: IF (l_update_flag = 'N') AND
4327: (l_agreement.agreement_currency_code <> p_source_currency) THEN
4328:
4329: OKE_API.set_message(p_app_name => G_APP_NAME ,
4330: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4331: p_token1 => 'VALUE' ,
4332: p_token1_value => 'p_source_currency'
4333: );
4326: IF (l_update_flag = 'N') AND
4327: (l_agreement.agreement_currency_code <> p_source_currency) THEN
4328:
4329: OKE_API.set_message(p_app_name => G_APP_NAME ,
4330: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4331: p_token1 => 'VALUE' ,
4332: p_token1_value => 'p_source_currency'
4333: );
4334:
4331: p_token1 => 'VALUE' ,
4332: p_token1_value => 'p_source_currency'
4333: );
4334:
4335: RAISE OKE_API.G_EXCEPTION_ERROR;
4336:
4337: END IF;
4338: */
4339: --
4353: -- Check if pool party currency = agreement currency
4354: --
4355: IF (nvl(l_pool_currency, l_agreement.agreement_currency_code) <> l_agreement.agreement_currency_code) THEN
4356:
4357: OKE_API.set_message(p_app_name => G_APP_NAME ,
4358: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4359: p_token1 => 'VALUE' ,
4360: p_token1_value => 'p_pool_party_id'
4361: );
4354: --
4355: IF (nvl(l_pool_currency, l_agreement.agreement_currency_code) <> l_agreement.agreement_currency_code) THEN
4356:
4357: OKE_API.set_message(p_app_name => G_APP_NAME ,
4358: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4359: p_token1 => 'VALUE' ,
4360: p_token1_value => 'p_pool_party_id'
4361: );
4362:
4359: p_token1 => 'VALUE' ,
4360: p_token1_value => 'p_pool_party_id'
4361: );
4362:
4363: RAISE OKE_API.G_EXCEPTION_ERROR;
4364:
4365: END IF;
4366:
4367: l_contract_currency := get_k_currency(p_header_id => p_k_header_id);
4379: p_conversion_rate => l_conversion_rate ,
4380: p_return_status => p_return_status
4381: );
4382:
4383: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4384:
4385: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4386:
4387: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4381: );
4382:
4383: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4384:
4385: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4386:
4387: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4388:
4389: RAISE OKE_API.G_EXCEPTION_ERROR;
4383: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4384:
4385: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4386:
4387: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4388:
4389: RAISE OKE_API.G_EXCEPTION_ERROR;
4390:
4391: END IF;
4385: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4386:
4387: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4388:
4389: RAISE OKE_API.G_EXCEPTION_ERROR;
4390:
4391: END IF;
4392:
4393: --
4399: IF (l_update_flag = 'N') THEN
4400:
4401: IF (p_pa_conversion_type is not null) THEN
4402:
4403: OKE_API.set_message(p_app_name => G_APP_NAME ,
4404: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4405: p_token1 => 'VALUE' ,
4406: p_token1_value => 'pa_conversion_type'
4407: );
4400:
4401: IF (p_pa_conversion_type is not null) THEN
4402:
4403: OKE_API.set_message(p_app_name => G_APP_NAME ,
4404: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4405: p_token1 => 'VALUE' ,
4406: p_token1_value => 'pa_conversion_type'
4407: );
4408:
4405: p_token1 => 'VALUE' ,
4406: p_token1_value => 'pa_conversion_type'
4407: );
4408:
4409: RAISE OKE_API.G_EXCEPTION_ERROR;
4410:
4411: END IF;
4412:
4413: IF (p_pa_conversion_date is not null) THEN
4411: END IF;
4412:
4413: IF (p_pa_conversion_date is not null) THEN
4414:
4415: OKE_API.set_message(p_app_name => G_APP_NAME ,
4416: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4417: p_token1 => 'VALUE' ,
4418: p_token1_value => 'pa_conversion_date'
4419: );
4412:
4413: IF (p_pa_conversion_date is not null) THEN
4414:
4415: OKE_API.set_message(p_app_name => G_APP_NAME ,
4416: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4417: p_token1 => 'VALUE' ,
4418: p_token1_value => 'pa_conversion_date'
4419: );
4420:
4417: p_token1 => 'VALUE' ,
4418: p_token1_value => 'pa_conversion_date'
4419: );
4420:
4421: RAISE OKE_API.G_EXCEPTION_ERROR;
4422:
4423: END IF;
4424:
4425: IF (p_pa_conversion_rate is not null) THEN
4423: END IF;
4424:
4425: IF (p_pa_conversion_rate is not null) THEN
4426:
4427: OKE_API.set_message(p_app_name => G_APP_NAME ,
4428: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4429: p_token1 => 'VALUE' ,
4430: p_token1_value => 'pa_conversion_rate'
4431: );
4424:
4425: IF (p_pa_conversion_rate is not null) THEN
4426:
4427: OKE_API.set_message(p_app_name => G_APP_NAME ,
4428: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4429: p_token1 => 'VALUE' ,
4430: p_token1_value => 'pa_conversion_rate'
4431: );
4432:
4429: p_token1 => 'VALUE' ,
4430: p_token1_value => 'pa_conversion_rate'
4431: );
4432:
4433: RAISE OKE_API.G_EXCEPTION_ERROR;
4434:
4435: END IF;
4436:
4437: ELSIF (p_source_currency <> l_agreement.agreement_currency_code) THEN
4445: p_conversion_rate => l_pa_conversion_rate ,
4446: p_return_status => p_return_status
4447: );
4448:
4449: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4450:
4451: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4452:
4453: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4447: );
4448:
4449: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4450:
4451: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4452:
4453: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4454:
4455: RAISE OKE_API.G_EXCEPTION_ERROR;
4449: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4450:
4451: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4452:
4453: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4454:
4455: RAISE OKE_API.G_EXCEPTION_ERROR;
4456:
4457: END IF;
4451: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4452:
4453: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4454:
4455: RAISE OKE_API.G_EXCEPTION_ERROR;
4456:
4457: END IF;
4458:
4459: -- syho, 2/11/02
4458:
4459: -- syho, 2/11/02
4460: ELSIF (l_pa_conversion_rate is not null) THEN
4461:
4462: OKE_API.set_message(p_app_name => G_APP_NAME ,
4463: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4464: p_token1 => 'VALUE' ,
4465: p_token1_value => 'pa_conversion_rate'
4466: );
4459: -- syho, 2/11/02
4460: ELSIF (l_pa_conversion_rate is not null) THEN
4461:
4462: OKE_API.set_message(p_app_name => G_APP_NAME ,
4463: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4464: p_token1 => 'VALUE' ,
4465: p_token1_value => 'pa_conversion_rate'
4466: );
4467:
4464: p_token1 => 'VALUE' ,
4465: p_token1_value => 'pa_conversion_rate'
4466: );
4467:
4468: RAISE OKE_API.G_EXCEPTION_ERROR;
4469:
4470: ELSIF (p_pa_conversion_type is not null) THEN
4471:
4472: OKE_API.set_message(p_app_name => G_APP_NAME ,
4468: RAISE OKE_API.G_EXCEPTION_ERROR;
4469:
4470: ELSIF (p_pa_conversion_type is not null) THEN
4471:
4472: OKE_API.set_message(p_app_name => G_APP_NAME ,
4473: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4474: p_token1 => 'VALUE' ,
4475: p_token1_value => 'pa_conversion_type'
4476: );
4469:
4470: ELSIF (p_pa_conversion_type is not null) THEN
4471:
4472: OKE_API.set_message(p_app_name => G_APP_NAME ,
4473: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4474: p_token1 => 'VALUE' ,
4475: p_token1_value => 'pa_conversion_type'
4476: );
4477:
4474: p_token1 => 'VALUE' ,
4475: p_token1_value => 'pa_conversion_type'
4476: );
4477:
4478: RAISE OKE_API.G_EXCEPTION_ERROR;
4479:
4480: ELSIF (p_pa_conversion_date is not null) THEN
4481:
4482: OKE_API.set_message(p_app_name => G_APP_NAME ,
4478: RAISE OKE_API.G_EXCEPTION_ERROR;
4479:
4480: ELSIF (p_pa_conversion_date is not null) THEN
4481:
4482: OKE_API.set_message(p_app_name => G_APP_NAME ,
4483: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4484: p_token1 => 'VALUE' ,
4485: p_token1_value => 'pa_conversion_date'
4486: );
4479:
4480: ELSIF (p_pa_conversion_date is not null) THEN
4481:
4482: OKE_API.set_message(p_app_name => G_APP_NAME ,
4483: p_msg_name => 'OKE_API_INVALID_VALUE' ,
4484: p_token1 => 'VALUE' ,
4485: p_token1_value => 'pa_conversion_date'
4486: );
4487:
4484: p_token1 => 'VALUE' ,
4485: p_token1_value => 'pa_conversion_date'
4486: );
4487:
4488: RAISE OKE_API.G_EXCEPTION_ERROR;
4489:
4490: END IF;
4491: -- syho, 2/11/02
4492: */
4527: -- bug 3346710
4528: /* IF (p_pool_party_id is not null) THEN
4529: IF (nvl(to_char(l_start_date, 'YYYYMMDD'), '19000101') > to_char(l_project_funding.date_allocated, 'YYYYMMDD')) THEN
4530:
4531: OKE_API.set_message(p_app_name => G_APP_NAME ,
4532: p_msg_name => 'OKE_PA_FUND_POOL_DATE'
4533: );
4534:
4535: RAISE OKE_API.G_EXCEPTION_ERROR;
4531: OKE_API.set_message(p_app_name => G_APP_NAME ,
4532: p_msg_name => 'OKE_PA_FUND_POOL_DATE'
4533: );
4534:
4535: RAISE OKE_API.G_EXCEPTION_ERROR;
4536:
4537: END IF;
4538: END IF;
4539: */
4738: l_funding_in_rec.pa_attribute25 := l_agreement.attribute25 ;
4739:
4740: --oke_debug.debug('calling create_funding');
4741: create_funding(p_api_version => p_api_version ,
4742: p_init_msg_list => OKE_API.G_FALSE ,
4743: p_msg_count => p_msg_count ,
4744: p_msg_data => p_msg_data ,
4745: p_funding_in_rec => l_funding_in_rec ,
4746: p_funding_out_rec => l_funding_out_rec ,
4747: p_return_status => p_return_status
4748: );
4749: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4750:
4751: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4752:
4753: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4754:
4755: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4749: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4750:
4751: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4752:
4753: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4754:
4755: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4756:
4757: RAISE OKE_API.G_EXCEPTION_ERROR;
4751: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4752:
4753: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4754:
4755: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4756:
4757: RAISE OKE_API.G_EXCEPTION_ERROR;
4758:
4759: END IF;
4753: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4754:
4755: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4756:
4757: RAISE OKE_API.G_EXCEPTION_ERROR;
4758:
4759: END IF;
4760:
4761: --
4779: l_allocation_in_rec.funding_source_id := l_funding_out_rec.funding_source_id;
4780:
4781: --oke_debug.debug('converted_amount ' || l_allocation_in_rec.amount);
4782: OKE_ALLOCATION_PVT.add_allocation(p_api_version => p_api_version ,
4783: p_init_msg_list => OKE_API.G_FALSE ,
4784: p_commit => OKE_API.G_FALSE ,
4785: p_msg_count => p_msg_count ,
4786: p_msg_data => p_msg_data ,
4787: p_allocation_in_rec => l_allocation_in_rec ,
4780:
4781: --oke_debug.debug('converted_amount ' || l_allocation_in_rec.amount);
4782: OKE_ALLOCATION_PVT.add_allocation(p_api_version => p_api_version ,
4783: p_init_msg_list => OKE_API.G_FALSE ,
4784: p_commit => OKE_API.G_FALSE ,
4785: p_msg_count => p_msg_count ,
4786: p_msg_data => p_msg_data ,
4787: p_allocation_in_rec => l_allocation_in_rec ,
4788: p_allocation_out_rec => l_allocation_out_rec ,
4790: );
4791:
4792: --oke_debug.debug('finished calling oke_allocation_pvt.add_allocation w/ status' || p_return_status);
4793:
4794: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4795:
4796: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4797:
4798: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4792: --oke_debug.debug('finished calling oke_allocation_pvt.add_allocation w/ status' || p_return_status);
4793:
4794: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4795:
4796: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4797:
4798: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4799:
4800: RAISE OKE_API.G_EXCEPTION_ERROR;
4794: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4795:
4796: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4797:
4798: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4799:
4800: RAISE OKE_API.G_EXCEPTION_ERROR;
4801:
4802: END IF;
4796: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4797:
4798: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4799:
4800: RAISE OKE_API.G_EXCEPTION_ERROR;
4801:
4802: END IF;
4803:
4804: --
4817: --oke_debug.debug('calling oke_funding_util.update_alloc_version');
4818:
4819: OKE_FUNDING_UTIL_PKG.update_alloc_version(x_fund_allocation_id => l_allocation_out_rec.fund_allocation_id ,
4820: x_version_add => 1 ,
4821: x_commit => OKE_API.G_FALSE
4822: );
4823:
4824: EXIT WHEN (i = l_allocation_in_tbl.LAST);
4825: i := l_allocation_in_tbl.NEXT(i);
4847: l_funding_in_rec.funding_source_id := l_funding_out_rec.funding_source_id ;
4848:
4849: --oke_debug.debug('calling create_funding');
4850: update_funding(p_api_version => p_api_version ,
4851: p_init_msg_list => OKE_API.G_FALSE ,
4852: p_msg_count => p_msg_count ,
4853: p_msg_data => p_msg_data ,
4854: p_funding_in_rec => l_funding_in_rec ,
4855: p_funding_out_rec => l_funding_out_rec ,
4856: p_return_status => p_return_status
4857: );
4858: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4859:
4860: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4861:
4862: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4863:
4864: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4858: --oke_debug.debug('finished create_funding w/status ' || p_return_status);
4859:
4860: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4861:
4862: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4863:
4864: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4865:
4866: RAISE OKE_API.G_EXCEPTION_ERROR;
4860: IF (p_return_status = OKE_API.G_RET_STS_UNEXP_ERROR) THEN
4861:
4862: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4863:
4864: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4865:
4866: RAISE OKE_API.G_EXCEPTION_ERROR;
4867:
4868: END IF;
4862: RAISE OKE_API.G_EXCEPTION_UNEXPECTED_ERROR;
4863:
4864: ELSIF (p_return_status = OKE_API.G_RET_STS_ERROR) THEN
4865:
4866: RAISE OKE_API.G_EXCEPTION_ERROR;
4867:
4868: END IF;
4869:
4870: --
4889: -- update the agreement_flag in OKE_FUNDING_SOURCES table
4890: --
4891:
4892: OKE_FUNDING_UTIL_PKG.update_source_flag(x_funding_source_id => l_funding_out_rec.funding_source_id ,
4893: x_commit => OKE_API.G_FALSE
4894: );
4895:
4896: IF FND_API.to_boolean(p_commit) THEN
4897:
4898: COMMIT WORK;
4899:
4900: END IF;
4901:
4902: OKE_API.END_ACTIVITY(x_msg_count => p_msg_count ,
4903: x_msg_data => p_msg_data
4904: );
4905:
4906: EXCEPTION
4903: x_msg_data => p_msg_data
4904: );
4905:
4906: EXCEPTION
4907: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
4908: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4909: p_pkg_name => G_PKG_NAME ,
4910: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4911: x_msg_count => p_msg_count ,
4904: );
4905:
4906: EXCEPTION
4907: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
4908: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4909: p_pkg_name => G_PKG_NAME ,
4910: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4911: x_msg_count => p_msg_count ,
4912: x_msg_data => p_msg_data ,
4906: EXCEPTION
4907: WHEN OKE_API.G_EXCEPTION_ERROR OR G_EXCEPTION_HALT_VALIDATION THEN
4908: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4909: p_pkg_name => G_PKG_NAME ,
4910: p_exc_name => 'OKE_API.G_RET_STS_ERROR' ,
4911: x_msg_count => p_msg_count ,
4912: x_msg_data => p_msg_data ,
4913: p_api_type => '_PVT'
4914: );
4912: x_msg_data => p_msg_data ,
4913: p_api_type => '_PVT'
4914: );
4915:
4916: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4917: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4918: p_pkg_name => G_PKG_NAME ,
4919: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4920: x_msg_count => p_msg_count ,
4913: p_api_type => '_PVT'
4914: );
4915:
4916: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4917: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4918: p_pkg_name => G_PKG_NAME ,
4919: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4920: x_msg_count => p_msg_count ,
4921: x_msg_data => p_msg_data ,
4915:
4916: WHEN OKE_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4917: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4918: p_pkg_name => G_PKG_NAME ,
4919: p_exc_name => 'OKE_API.G_RET_STS_UNEXP_ERROR' ,
4920: x_msg_count => p_msg_count ,
4921: x_msg_data => p_msg_data ,
4922: p_api_type => '_PVT'
4923: );
4922: p_api_type => '_PVT'
4923: );
4924:
4925: WHEN OTHERS THEN
4926: p_return_status := OKE_API.HANDLE_EXCEPTIONS(p_api_name => l_api_name ,
4927: p_pkg_name => G_PKG_NAME ,
4928: p_exc_name => 'OTHERS' ,
4929: x_msg_count => p_msg_count ,
4930: x_msg_data => p_msg_data ,