449: );
450: IF (l_c_manage_acc IS NULL) THEN
451: l_b_error := TRUE;
452: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
453: fnd_message.set_name('IGS',l_c_message_name);
454: fnd_msg_pub.add;
455: RAISE fnd_api.g_exc_error;
456: END IF;
457: END IF;
459:
460: IF (p_person_id IS NOT NULL AND p_api_person_id IS NOT NULL) THEN
461: l_b_error := TRUE;
462: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
463: fnd_message.set_name('IGS','IGS_FI_PRSID_ALTID_INVALID');
464: fnd_message.set_token('PERSON_ID',p_person_id);
465: fnd_message.set_token('API_PERS_ID',p_api_person_id);
466: fnd_msg_pub.add;
467: END IF;
460: IF (p_person_id IS NOT NULL AND p_api_person_id IS NOT NULL) THEN
461: l_b_error := TRUE;
462: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
463: fnd_message.set_name('IGS','IGS_FI_PRSID_ALTID_INVALID');
464: fnd_message.set_token('PERSON_ID',p_person_id);
465: fnd_message.set_token('API_PERS_ID',p_api_person_id);
466: fnd_msg_pub.add;
467: END IF;
468: END IF;
461: l_b_error := TRUE;
462: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
463: fnd_message.set_name('IGS','IGS_FI_PRSID_ALTID_INVALID');
464: fnd_message.set_token('PERSON_ID',p_person_id);
465: fnd_message.set_token('API_PERS_ID',p_api_person_id);
466: fnd_msg_pub.add;
467: END IF;
468: END IF;
469:
470: -- check if the user has provided either person_id or alternate person details
471: IF (p_person_id IS NULL AND p_api_person_id IS NULL) THEN
472: l_b_error := TRUE;
473: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
474: fnd_message.set_name('IGS','IGS_FI_PRSID_OR_ALTID');
475: fnd_msg_pub.add;
476: END IF;
477: END IF;
478:
481: l_b_ret_status := validate_prsn(p_person_id);
482: IF NOT l_b_ret_status THEN
483: l_b_error := TRUE;
484: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
485: fnd_message.set_name('IGS','IGS_FI_INVALID_PRS_ID');
486: fnd_message.set_token('PERSON_ID',p_person_id);
487: fnd_msg_pub.add;
488: END IF;
489: END IF;
482: IF NOT l_b_ret_status THEN
483: l_b_error := TRUE;
484: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
485: fnd_message.set_name('IGS','IGS_FI_INVALID_PRS_ID');
486: fnd_message.set_token('PERSON_ID',p_person_id);
487: fnd_msg_pub.add;
488: END IF;
489: END IF;
490: END IF;
501:
502: IF NOT l_b_ret_status THEN
503: l_b_error := TRUE;
504: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
505: fnd_message.set_name('IGS','IGS_FI_INVALID_ALT_PERS_ID_TYP');
506: fnd_message.set_token('API_PERS_ID_TYPE',p_alt_person_id_type);
507: fnd_msg_pub.add;
508: END IF;
509: END IF;
502: IF NOT l_b_ret_status THEN
503: l_b_error := TRUE;
504: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
505: fnd_message.set_name('IGS','IGS_FI_INVALID_ALT_PERS_ID_TYP');
506: fnd_message.set_token('API_PERS_ID_TYPE',p_alt_person_id_type);
507: fnd_msg_pub.add;
508: END IF;
509: END IF;
510: END IF;
520:
521: IF NOT l_b_ret_status THEN
522: l_b_error := TRUE;
523: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
524: fnd_message.set_name('IGS','IGS_FI_INVALID_ALT_PERS_ID');
525: fnd_message.set_token('API_PERS_ID',p_api_person_id);
526: fnd_msg_pub.add;
527: END IF;
528: END IF;
521: IF NOT l_b_ret_status THEN
522: l_b_error := TRUE;
523: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
524: fnd_message.set_name('IGS','IGS_FI_INVALID_ALT_PERS_ID');
525: fnd_message.set_token('API_PERS_ID',p_api_person_id);
526: fnd_msg_pub.add;
527: END IF;
528: END IF;
529: END IF;
531: -- validate sponsor code parameter
532: IF p_sponsor_code IS NULL THEN
533: l_b_error := TRUE;
534: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
535: fnd_message.set_name('IGS','IGS_FI_SPNSR_CD_NULL');
536: fnd_msg_pub.add;
537: END IF;
538: ELSE
539: l_b_ret_status := validate_spnsr_cd(p_sponsor_code);
539: l_b_ret_status := validate_spnsr_cd(p_sponsor_code);
540: IF NOT l_b_ret_status THEN
541: l_b_error := TRUE;
542: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
543: fnd_message.set_name('IGS','IGS_FI_INVALID_SPNSR_CD');
544: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
545: fnd_msg_pub.add;
546: END IF;
547: END IF;
540: IF NOT l_b_ret_status THEN
541: l_b_error := TRUE;
542: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
543: fnd_message.set_name('IGS','IGS_FI_INVALID_SPNSR_CD');
544: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
545: fnd_msg_pub.add;
546: END IF;
547: END IF;
548: END IF;
550: -- validate Award Calendar Instance parameters
551: IF (p_awd_ci_cal_type IS NULL OR p_awd_ci_sequence_number IS NULL) THEN
552: l_b_error := TRUE;
553: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
554: fnd_message.set_name('IGS','IGS_FI_AWD_INST_NULL');
555: fnd_msg_pub.add;
556: END IF;
557: ELSE
558: l_b_ret_status := validate_award_cal_inst(p_awd_ci_cal_type,p_awd_ci_sequence_number);
558: l_b_ret_status := validate_award_cal_inst(p_awd_ci_cal_type,p_awd_ci_sequence_number);
559: IF NOT l_b_ret_status THEN
560: l_b_error := TRUE;
561: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
562: fnd_message.set_name('IGS','IGS_FI_INVALID_AWD_CAL_INST');
563: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
564: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
565: fnd_msg_pub.add;
566: END IF;
559: IF NOT l_b_ret_status THEN
560: l_b_error := TRUE;
561: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
562: fnd_message.set_name('IGS','IGS_FI_INVALID_AWD_CAL_INST');
563: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
564: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
565: fnd_msg_pub.add;
566: END IF;
567: END IF;
560: l_b_error := TRUE;
561: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
562: fnd_message.set_name('IGS','IGS_FI_INVALID_AWD_CAL_INST');
563: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
564: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
565: fnd_msg_pub.add;
566: END IF;
567: END IF;
568:
576: IF l_c_message_name IS NOT NULL THEN
577: l_b_error := TRUE;
578: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
579: IF l_c_message_name = 'IGF_SP_INVALID_AWD_YR_STATUS' THEN
580: fnd_message.set_name('IGF',l_c_message_name);
581: ELSE
582: fnd_message.set_name('IGS',l_c_message_name);
583: END IF;
584: fnd_msg_pub.add;
578: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
579: IF l_c_message_name = 'IGF_SP_INVALID_AWD_YR_STATUS' THEN
580: fnd_message.set_name('IGF',l_c_message_name);
581: ELSE
582: fnd_message.set_name('IGS',l_c_message_name);
583: END IF;
584: fnd_msg_pub.add;
585: END IF;
586: END IF;
589: -- validate Load Calendar Instance parameters
590: IF (p_ld_cal_type IS NULL OR p_ld_ci_sequence_number IS NULL ) THEN
591: l_b_error := TRUE;
592: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
593: fnd_message.set_name('IGS','IGS_FI_LD_INST_NULL');
594: fnd_msg_pub.add;
595: END IF;
596: ELSE
597: l_b_ret_status := validate_load_cal_inst(p_ld_cal_type,p_ld_ci_sequence_number);
597: l_b_ret_status := validate_load_cal_inst(p_ld_cal_type,p_ld_ci_sequence_number);
598: IF NOT l_b_ret_status THEN
599: l_b_error := TRUE;
600: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
601: fnd_message.set_name('IGS','IGS_FI_INVALID_TRM_CAL_INST');
602: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
603: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
604: fnd_msg_pub.add;
605: END IF;
598: IF NOT l_b_ret_status THEN
599: l_b_error := TRUE;
600: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
601: fnd_message.set_name('IGS','IGS_FI_INVALID_TRM_CAL_INST');
602: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
603: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
604: fnd_msg_pub.add;
605: END IF;
606: END IF;
599: l_b_error := TRUE;
600: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
601: fnd_message.set_name('IGS','IGS_FI_INVALID_TRM_CAL_INST');
602: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
603: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
604: fnd_msg_pub.add;
605: END IF;
606: END IF;
607: END IF;
609: -- Validate Amount parameter
610: IF (p_amount IS NULL OR p_amount < 0) THEN
611: l_b_error := TRUE;
612: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
613: fnd_message.set_name('IGS','IGS_FI_INVALID_SPR_AMT');
614: fnd_msg_pub.add;
615: END IF;
616: END IF;
617:
631:
632: IF NOT l_b_ret_status THEN
633: l_b_error := TRUE;
634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
635: fnd_message.set_name('IGS','IGS_FI_SPNR_INACTIVE');
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
632: IF NOT l_b_ret_status THEN
633: l_b_error := TRUE;
634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
635: fnd_message.set_name('IGS','IGS_FI_SPNR_INACTIVE');
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
640: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
633: l_b_error := TRUE;
634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
635: fnd_message.set_name('IGS','IGS_FI_SPNR_INACTIVE');
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
640: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
641: fnd_msg_pub.add;
634: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
635: fnd_message.set_name('IGS','IGS_FI_SPNR_INACTIVE');
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
640: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
641: fnd_msg_pub.add;
642: END IF;
635: fnd_message.set_name('IGS','IGS_FI_SPNR_INACTIVE');
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
640: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
641: fnd_msg_pub.add;
642: END IF;
643: END IF;
636: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
637: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
638: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
639: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
640: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
641: fnd_msg_pub.add;
642: END IF;
643: END IF;
644: END IF;
656: p_ld_cal_type,
657: p_ld_ci_sequence_number);
658: IF l_b_ret_status THEN
659: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
660: fnd_message.set_name('IGS','IGS_FI_SPNR_STDNT_EXISTS');
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
657: p_ld_ci_sequence_number);
658: IF l_b_ret_status THEN
659: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
660: fnd_message.set_name('IGS','IGS_FI_SPNR_STDNT_EXISTS');
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
658: IF l_b_ret_status THEN
659: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
660: fnd_message.set_name('IGS','IGS_FI_SPNR_STDNT_EXISTS');
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
666: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
659: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
660: fnd_message.set_name('IGS','IGS_FI_SPNR_STDNT_EXISTS');
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
666: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
667: fnd_msg_pub.add;
660: fnd_message.set_name('IGS','IGS_FI_SPNR_STDNT_EXISTS');
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
666: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
667: fnd_msg_pub.add;
668: RAISE fnd_api.g_exc_error;
661: fnd_message.set_token('PERSON_ID',NVL(p_person_id,l_n_person_id));
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
666: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
667: fnd_msg_pub.add;
668: RAISE fnd_api.g_exc_error;
669: END IF;
662: fnd_message.set_token('SPONSOR_CODE',p_sponsor_code);
663: fnd_message.set_token('AWARD_YR_TYPE',p_awd_ci_cal_type);
664: fnd_message.set_token('AWARD_YR_CAL_SEQ',p_awd_ci_sequence_number);
665: fnd_message.set_token('LOAD_CAL_TYPE',p_ld_cal_type);
666: fnd_message.set_token('LOAD_CAL_SEQ',p_ld_ci_sequence_number);
667: fnd_msg_pub.add;
668: RAISE fnd_api.g_exc_error;
669: END IF;
670: ELSE