456: l_gl_date := l_open_gl_date;
457:
458: IF (l_gl_date IS NULL) THEN
459: FND_MESSAGE.SET_NAME('SQLAP','AP_DISTS_NO_OPEN_FUT_PERIOD');
460: APP_EXCEPTION.RAISE_EXCEPTION;
461: END IF;
462: END IF;
463:
464: /* cc number is stored in the segment1 so get it */
471: WHEN OTHERS THEN
472: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
473: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
474: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
475: APP_EXCEPTION.RAISE_EXCEPTION;
476: END;
477:
478:
479: /* Get the different status of the CC */
495: WHEN OTHERS THEN
496: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
497: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
498: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
499: APP_EXCEPTION.RAISE_EXCEPTION;
500: END;
501:
502:
503: /* Check whether the status of the CC is valid to be matched */
518: WHEN OTHERS THEN
519: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
520: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
521: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
522: APP_EXCEPTION.RAISE_EXCEPTION;
523: END;
524:
525: IF x_form_name = 'APXINWKB' THEN
526: /* Check whether it is the Match button(dist id is NULL) that is pressed or the Distribute button */
546: WHEN OTHERS THEN
547: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
548: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
549: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
550: APP_EXCEPTION.RAISE_EXCEPTION;
551: END;
552:
553: /* Get the fiscal year for the Payment Forecast Date */
554: BEGIN
562: WHEN OTHERS THEN
563: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
564: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
565: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
566: APP_EXCEPTION.RAISE_EXCEPTION;
567: END;
568:
569: /* Even if one Payment Forecast Date fiscal year does not match
570: the fiscal year of the invoice stop processing and return false */
594: WHEN OTHERS THEN
595: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
596: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
597: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
598: APP_EXCEPTION.RAISE_EXCEPTION;
599: END;
600:
601:
602: /* Get the fiscal year for the Payment Forecast Date */
611: WHEN OTHERS THEN
612: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
613: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
614: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
615: APP_EXCEPTION.RAISE_EXCEPTION;
616: END;
617:
618:
619:
662: WHEN OTHERS THEN
663: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
664: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
665: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
666: APP_EXCEPTION.RAISE_EXCEPTION;
667: END;
668:
669:
670: BEGIN
678: WHEN OTHERS THEN
679: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
680: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
681: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
682: APP_EXCEPTION.RAISE_EXCEPTION;
683: END;
684:
685: IF (l_fiscal_year_invoice = l_fiscal_year_pf) THEN
686: l_status := TRUE;
715: WHEN OTHERS THEN
716: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
717: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
718: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
719: APP_EXCEPTION.RAISE_EXCEPTION;
720: END;
721:
722: BEGIN
723: SELECT DISTINCT period_year
730: WHEN OTHERS THEN
731: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
732: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
733: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
734: APP_EXCEPTION.RAISE_EXCEPTION;
735: END;
736:
737:
738: IF (l_fiscal_year_invoice = l_fiscal_year_pf) THEN
766: WHEN OTHERS THEN
767: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
768: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
769: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
770: APP_EXCEPTION.RAISE_EXCEPTION;
771: END;
772:
773: BEGIN
774: SELECT DISTINCT period_year
781: WHEN OTHERS THEN
782: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
783: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
784: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
785: APP_EXCEPTION.RAISE_EXCEPTION;
786: END;
787:
788: IF (l_fiscal_year_invoice = l_fiscal_year_pf) THEN
789: l_status := TRUE;
815: WHEN OTHERS THEN
816: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
817: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
818: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
819: APP_EXCEPTION.RAISE_EXCEPTION;
820: END;
821:
822: END IF;
823:
833: WHEN OTHERS THEN
834: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
835: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
836: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
837: APP_EXCEPTION.RAISE_EXCEPTION;
838: END;
839:
840: BEGIN
841: SELECT DISTINCT period_year
848: WHEN OTHERS THEN
849: FND_MESSAGE.SET_NAME('IGC', 'IGC_LOGGING_UNEXP_ERROR');
850: FND_MESSAGE.SET_TOKEN('CODE', SQLCODE);
851: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
852: APP_EXCEPTION.RAISE_EXCEPTION;
853: END;
854:
855: IF (l_fiscal_year_invoice = l_fiscal_year_pf) THEN
856: l_status := TRUE;