503: retcode := 0;
504: l_cal_type := LTRIM(RTRIM(SUBSTR(p_award_year,1,10)));
505: l_seq_number := TO_NUMBER(SUBSTR(p_award_year,11));
506:
507: l_error := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','ERROR');
508: l_chk_profile := igf_ap_gen.check_profile;
509: IF l_chk_profile = 'N' THEN
510: fnd_message.set_name('IGF','IGF_AP_LGCY_PROC_NOT_RUN');
511: fnd_file.put_line(fnd_file.log,RPAD(l_error,12) || fnd_message.get);
504: l_cal_type := LTRIM(RTRIM(SUBSTR(p_award_year,1,10)));
505: l_seq_number := TO_NUMBER(SUBSTR(p_award_year,11));
506:
507: l_error := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','ERROR');
508: l_chk_profile := igf_ap_gen.check_profile;
509: IF l_chk_profile = 'N' THEN
510: fnd_message.set_name('IGF','IGF_AP_LGCY_PROC_NOT_RUN');
511: fnd_file.put_line(fnd_file.log,RPAD(l_error,12) || fnd_message.get);
512: RETURN;
511: fnd_file.put_line(fnd_file.log,RPAD(l_error,12) || fnd_message.get);
512: RETURN;
513: END IF;
514:
515: l_chk_batch := igf_ap_gen.check_batch(p_batch_id,'PROFILE');
516: IF l_chk_batch = 'N' THEN
517: fnd_message.set_name('IGF','IGF_GR_BATCH_DOES_NOT_EXIST');
518: add_log_table_process(NULL,l_error,fnd_message.get);
519: l_terminate_flag := TRUE;
562: -- here the check is there to see if the person number is repetitive so skip the person
563: IF NOT check_dup_person(l_get_records.person_number) THEN
564: lv_base_id := NULL;
565: lv_person_id := NULL;
566: igf_ap_gen.check_person(l_get_records.person_number,l_cal_type,l_seq_number,lv_person_id,lv_base_id);
567: IF lv_person_id IS NULL THEN
568: fnd_message.set_name('IGF','IGF_AP_PE_NOT_EXIST');
569: add_log_table_process(l_get_records.person_number,l_error,fnd_message.get);
570: l_error_flag := TRUE;
1118: l_get_batch_desc c_get_batch_desc%ROWTYPE;
1119:
1120: BEGIN
1121:
1122: l_person_number := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','PERSON_NUMBER');
1123: l_batch_id := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','BATCH_ID');
1124: l_award_yr := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','AWARD_YEAR');
1125: l_yes_no := igf_ap_gen.get_lookup_meaning('IGF_AP_YES_NO',p_del_ind);
1126:
1119:
1120: BEGIN
1121:
1122: l_person_number := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','PERSON_NUMBER');
1123: l_batch_id := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','BATCH_ID');
1124: l_award_yr := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','AWARD_YEAR');
1125: l_yes_no := igf_ap_gen.get_lookup_meaning('IGF_AP_YES_NO',p_del_ind);
1126:
1127: OPEN c_get_batch_desc(p_batch_id);
1120: BEGIN
1121:
1122: l_person_number := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','PERSON_NUMBER');
1123: l_batch_id := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','BATCH_ID');
1124: l_award_yr := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','AWARD_YEAR');
1125: l_yes_no := igf_ap_gen.get_lookup_meaning('IGF_AP_YES_NO',p_del_ind);
1126:
1127: OPEN c_get_batch_desc(p_batch_id);
1128: FETCH c_get_batch_desc INTO l_get_batch_desc;
1121:
1122: l_person_number := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','PERSON_NUMBER');
1123: l_batch_id := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','BATCH_ID');
1124: l_award_yr := igf_ap_gen.get_lookup_meaning('IGF_AW_LOOKUPS_MSG','AWARD_YEAR');
1125: l_yes_no := igf_ap_gen.get_lookup_meaning('IGF_AP_YES_NO',p_del_ind);
1126:
1127: OPEN c_get_batch_desc(p_batch_id);
1128: FETCH c_get_batch_desc INTO l_get_batch_desc;
1129: CLOSE c_get_batch_desc;