455: );
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:
468: FROM po_headers
469: WHERE po_header_id = x_po_header_id;
470: EXCEPTION
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;
469: WHERE po_header_id = x_po_header_id;
470: EXCEPTION
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:
470: EXCEPTION
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:
492: /* No need to check for validation if its a PO, bug # 5687596*/
493: WHEN NO_DATA_FOUND THEN
494: RETURN TRUE;
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;
493: WHEN NO_DATA_FOUND THEN
494: RETURN TRUE;
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:
494: RETURN TRUE;
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:
515: FROM AP_SYSTEM_PARAMETERS)
516: AND l_gl_date BETWEEN START_DATE AND END_DATE;
517: EXCEPTION
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;
516: AND l_gl_date BETWEEN START_DATE AND END_DATE;
517: EXCEPTION
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:
517: EXCEPTION
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
543: AND cc_det_pf_line_num = c_for_each_dist_in_po1.distribution_num;
544:
545: EXCEPTION
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;
544:
545: EXCEPTION
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:
545: EXCEPTION
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 */
559: FROM AP_SYSTEM_PARAMETERS)
560: AND l_CC_DET_PF_DATE BETWEEN START_DATE AND END_DATE;
561: EXCEPTION
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;
560: AND l_CC_DET_PF_DATE BETWEEN START_DATE AND END_DATE;
561: EXCEPTION
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:
561: EXCEPTION
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
591: AND CC_ACCT_LINE_NUM = x_shipment_num)
592: AND CC_DET_PF_LINE_NUM = x_po_dist_num;
593: EXCEPTION
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;
592: AND CC_DET_PF_LINE_NUM = x_po_dist_num;
593: EXCEPTION
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:
593: EXCEPTION
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:
608: FROM AP_SYSTEM_PARAMETERS)
609: AND l_pf_date BETWEEN START_DATE AND END_DATE;
610: EXCEPTION
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;
609: AND l_pf_date BETWEEN START_DATE AND END_DATE;
610: EXCEPTION
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:
610: EXCEPTION
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:
659: WHERE cc_acct_line_id = c_get_cc_acct_line_id1.cc_acct_line_id
660: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
661: EXCEPTION
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;
660: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
661: EXCEPTION
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:
661: EXCEPTION
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:
675: FROM AP_SYSTEM_PARAMETERS)
676: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
677: EXCEPTION
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;
676: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
677: EXCEPTION
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:
677: EXCEPTION
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
712: WHERE cc_acct_line_id = c_get_cc_acct_line_id1.cc_acct_line_id
713: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
714: EXCEPTION
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;
713: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
714: EXCEPTION
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:
714: EXCEPTION
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
727: FROM AP_SYSTEM_PARAMETERS)
728: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
729: EXCEPTION
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;
728: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
729: EXCEPTION
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:
729: EXCEPTION
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:
763: WHERE cc_acct_line_id = c_get_cc_acct_line_id1.cc_acct_line_id
764: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
765: EXCEPTION
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;
764: AND cc_det_pf_line_num = c_get_distribution_num1.distribution_num;
765: EXCEPTION
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:
765: EXCEPTION
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
778: FROM AP_SYSTEM_PARAMETERS)
779: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
780: EXCEPTION
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;
779: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
780: EXCEPTION
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:
780: EXCEPTION
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
812: FROM po_line_locations
813: WHERE line_location_id = l_line_location_id;
814: EXCEPTION
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;
813: WHERE line_location_id = l_line_location_id;
814: EXCEPTION
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:
814: EXCEPTION
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;
830: WHERE cc_acct_line_id = c_get_cc_acct_line_id1.cc_acct_line_id
831: AND cc_det_pf_line_num = x_po_dist_num;
832: EXCEPTION
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;
831: AND cc_det_pf_line_num = x_po_dist_num;
832: EXCEPTION
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:
832: EXCEPTION
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
845: FROM AP_SYSTEM_PARAMETERS)
846: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
847: EXCEPTION
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;
846: AND l_cc_det_pf_date BETWEEN START_DATE AND END_DATE;
847: EXCEPTION
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:
847: EXCEPTION
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