[Home] [Help]
369: enquiry_appl_number= lv_enquiry_appl_number,
370: sales_lead_id = l_sales_lead_id
371: WHERE rowid = p_inquiry_dtls_rec.rowid;
372: ELSE
373: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
374: ROLLBACK TO perinq_save;
375: UPDATE igr_i_appl_int
376: SET status = '3',
377: error_code = 'E322',
618: /* setting the validation flag to true by default */
619: p_validation := TRUE;
620: /* Validation for inquiry date */
621: IF( p_inquiry_dtls_rec.inquiry_dt> SYSDATE) THEN
622: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E349', 8405);
623: UPDATE
624: igr_i_appl_int
625: SET
626: status = '3',
639: CLOSE c_birth_date;
640:
641: IF ((l_birth_date IS NOT NULL) AND (l_birth_date > p_inquiry_dtls_rec.inquiry_dt)) THEN
642:
643: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E583', 8405);
644: UPDATE
645: igr_i_appl_int
646: SET
647: status = '3',
657: OPEN c_deceased (p_inquiry_dtls_rec.person_id);
658: FETCH c_deceased INTO lv_deceased_ind;
659: CLOSE c_deceased;
660: IF lv_deceased_ind = 'Y' THEN
661: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E528', 8405);
662: UPDATE
663: igr_i_appl_int
664: SET
665: status = '3',
675: /* validation for inquiry status */
676: OPEN c_inquiry_status (p_inquiry_dtls_rec.inquiry_status);
677: FETCH c_inquiry_status INTO lv_exist;
678: IF c_inquiry_status%NOTFOUND THEN
679: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E302', 8405);
680: UPDATE
681: igr_i_appl_int
682: SET
683: status = '3',
699: /* validation for inquiry source type */
700: OPEN c_inquiry_source_type (p_inquiry_dtls_rec.inquiry_source_type);
701: FETCH c_inquiry_source_type INTO lv_exist;
702: IF c_inquiry_source_type%NOTFOUND THEN
703: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E303', 8405);
704: UPDATE
705: igr_i_appl_int
706: SET
707: status = '3',
722: /*validation for inquiry_type_id */
723: OPEN c_inquiry_type_id (p_inquiry_dtls_rec.inquiry_type_id);
724: FETCH c_inquiry_type_id INTO lv_exist;
725: IF c_inquiry_type_id%NOTFOUND THEN
726: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E313', 8405);
727: UPDATE
728: igr_i_appl_int
729: SET
730: status = '3',
745:
746: /* validation for Package items Reduction indicator */
747: IF p_inquiry_dtls_rec.pkg_reduct_ind IS NOT NULL THEN
748: IF p_inquiry_dtls_rec.pkg_reduct_ind NOT IN ('Y','N') THEN
749: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E360', 8405);
750: UPDATE igr_i_appl_int
751: SET status = '3',
752: error_code = 'E360' ,/*Error code for validation for field Package items Reduction Ind */
753: error_text = l_error_text
762: /* validation for inquiry entry level id */
763: OPEN c_inquiry_entry_level_id (p_inquiry_dtls_rec.inquiry_entry_level_id);
764: FETCH c_inquiry_entry_level_id INTO lv_exist;
765: IF c_inquiry_entry_level_id%NOTFOUND THEN
766: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E305', 8405);
767: UPDATE
768: igr_i_appl_int
769: SET
770: status = '3',
788: OPEN c_registering_person_id (p_inquiry_dtls_rec.registering_person_id);
789: FETCH c_registering_person_id INTO lv_exist;
790:
791: IF c_registering_person_id%NOTFOUND THEN
792: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E306', 8405);
793:
794: UPDATE igr_i_appl_int
795: SET status = '3',
796: error_code = 'E306' , /*Error code for validation for field Registering person Id*/
809:
810: /* validation for override process indicator */
811: IF p_inquiry_dtls_rec.override_process_ind IS NOT NULL THEN
812: IF p_inquiry_dtls_rec.override_process_ind NOT IN ('Y','N') THEN
813: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E307', 8405);
814: UPDATE igr_i_appl_int
815: SET status = '3',
816: error_code = 'E307' ,/*Error code for validation for field Override Process Ind */
817: error_text = l_error_text
827: OPEN c_edu_goal_id (p_inquiry_dtls_rec.edu_goal_id);
828: FETCH c_edu_goal_id INTO lv_exist;
829:
830: IF c_edu_goal_id%NOTFOUND THEN
831: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E308', 8405);
832: UPDATE igr_i_appl_int
833: SET status = '3',
834: error_code = 'E308', /*Error code for validation for field Education Goal Id*/
835: error_text = l_error_text
849: IF p_inquiry_dtls_rec.inquiry_school_of_interest_id IS NOT NULL THEN
850: OPEN c_inq_school_of_interest_id (p_inquiry_dtls_rec.inquiry_school_of_interest_id);
851: FETCH c_inq_school_of_interest_id INTO lv_exist;
852: IF c_inq_school_of_interest_id%NOTFOUND THEN
853: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E309', 8405);
854: UPDATE igr_i_appl_int
855: SET status = '3',
856: error_code = 'E309' ,/*Error code for validation for field Inquiry School of Interest Id*/
857: error_text = l_error_text
873: IF p_inquiry_dtls_rec.learn_source_id IS NOT NULL THEN
874: OPEN c_learn_source_id (p_inquiry_dtls_rec.learn_source_id);
875: FETCH c_learn_source_id INTO lv_exist;
876: IF c_learn_source_id%NOTFOUND THEN
877: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E310', 8405);
878: UPDATE igr_i_appl_int
879: SET status = '3',
880: error_code = 'E310' ,/*Error code for validation for field Learn Source Id*/
881: error_text = l_error_text
895: IF p_inquiry_dtls_rec.influence_source_id IS NOT NULL THEN
896: OPEN c_influence_source_id (p_inquiry_dtls_rec.influence_source_id);
897: FETCH c_influence_source_id INTO lv_exist;
898: IF c_influence_source_id%NOTFOUND THEN
899: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E311', 8405);
900: UPDATE igr_i_appl_int
901: SET status = '3',
902: error_code = 'E311' ,/*Error code for validation for field Influence Source Id*/
903: error_text = l_error_text
939: P_ATTRIBUTE20 => p_inquiry_dtls_rec.attribute20,
940: P_DESC_FLEX_NAME => 'IGR_S_INQUIRY_FLEX'
941: ) THEN
942:
943: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E008', 8405);
944: UPDATE igr_i_appl_int
945: SET status = '3',
946: error_code = 'E008' ,/*Using this Error code for validation for field Flex Field as no error code specified for this*/
947: error_text = l_error_text
960:
961:
962: FETCH c_acad_cal_type_ci INTO lv_exist;
963: IF c_acad_cal_type_ci%NOTFOUND THEN
964: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E301', 8405);
965: UPDATE igr_i_appl_int
966: SET status = '3',
967: error_code = 'E301' ,/*Using this Error code for validation for field Acad Cal type ci seq number as no specific error code specified for this*/
968: error_text = l_error_text
985:
986:
987: FETCH c_adm_cal_type_ci INTO lv_exist;
988: IF c_adm_cal_type_ci%NOTFOUND THEN
989: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E301', 8405);
990: UPDATE igr_i_appl_int
991: SET status = '3',
992: error_code = 'E301' ,/* Using this Error code for validation for field Adm Cal type ci seq number as no specific error code specified*/
993: error_text = l_error_text
1008: OPEN c_source_promotion(p_inquiry_dtls_rec.source_promotion_id);
1009: FETCH c_source_promotion INTO lv_exist;
1010:
1011: IF c_source_promotion%NOTFOUND THEN
1012: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E584', 8405);
1013: UPDATE
1014: igr_i_appl_int
1015: SET
1016: status = '3',
1138: OPEN c_val_acad_int(p_inquiry_lines_rec.product_category_id, p_inquiry_lines_rec.product_category_set_id );
1139: FETCH c_val_acad_int INTO lv_exists;
1140: IF c_val_acad_int%NOTFOUND THEN
1141:
1142: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E314', 8405);
1143:
1144: UPDATE
1145: igr_i_lines_int
1146: SET
1276: error_text = NULL
1277: WHERE rowid = v_inquiry_lines_rec.rowid;
1278: ELSE
1279:
1280: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
1281: ROLLBACK TO perinqlin_save;
1282: UPDATE igr_i_lines_int
1283: SET status = '3',
1284: error_code = 'E322',
1290:
1291: EXCEPTION
1292: WHEN OTHERS THEN
1293: ROLLBACK TO perinqlin_save;
1294: l_error_text := igs_ad_gen_016.get_lkup_meaning ('IMPORT_ERROR_CODE', 'E322', 8405);
1295: UPDATE igr_i_lines_int
1296: SET status = '3',
1297: error_code = 'E322' ,
1298: error_text = l_error_text