[Home] [Help]
60: l_debug_str VARCHAR2(32000);
61: g_person_status VARCHAR2(6) := 'NEW';
62: g_nonimg_form_id NUMBER(15);
63: TYPE g_address_rec_type IS TABLE OF IGS_SV_ADDRESSES%ROWTYPE INDEX BY BINARY_INTEGER;
64: TYPE g_edu_rec_type IS TABLE OF IGS_SV_PRGMS_INFO%ROWTYPE INDEX BY BINARY_INTEGER;
65: TYPE g_dependent_rec_type IS TABLE OF IGS_SV_DEPDNT_INFO%ROWTYPE INDEX BY BINARY_INTEGER;
66: TYPE g_convictions_rec_type IS TABLE OF IGS_SV_CONVICTIONS%ROWTYPE INDEX BY BINARY_INTEGER;
67: TYPE g_empl_rec_type IS TABLE OF IGS_SV_EMPL_INFO%ROWTYPE INDEX BY BINARY_INTEGER;
68: TYPE g_parallel_batches_tbl IS TABLE OF IGS_SV_BATCHES.BATCH_ID%TYPE INDEX BY BINARY_INTEGER;
2216: Date Created By : Oct 14, 2002
2217:
2218: Purpose : Validate the information that is pertaining
2219: to the Education Block information.
2220: (IGS_SV_PRGMS_INFO).
2221:
2222: Remarks : Return result:
2223: 'S' - record found and validated
2224: 'E' - validation error
2231:
2232: ******************************************************************/
2233: FUNCTION Validate_Edu_Info (
2234: p_person_rec IN t_student_rec,
2235: p_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE
2236: ) RETURN VARCHAR2
2237: IS
2238:
2239: l_api_name CONSTANT VARCHAR(30) := 'Validate_Edu_Info';
2507: Date Created By : Oct 14, 2002
2508:
2509: Purpose : Validate information pertaining to the Program
2510: information block for the student.
2511: (IGS_SV_PRGMS_INFO).
2512:
2513: Remarks : Return result:
2514: 'S' - record found and validated
2515: 'E' - validation error
2521: ------------------------------------------------------------------------
2522:
2523: ******************************************************************/
2524: FUNCTION Get_Othr_Prgm_Info(
2525: p_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE
2526: ) RETURN VARCHAR2
2527: IS
2528: l_api_name CONSTANT VARCHAR(30) := 'Get_Othr_Prgm_Info';
2529:
2661: FUNCTION Validate_Prgm_Info (
2662: p_person_rec IN t_student_rec,
2663: p_data_rec IN OUT NOCOPY g_edu_rec_type,
2664: p_records OUT NOCOPY NUMBER , -- Number of program records found
2665: p_auth_drp_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE
2666: ) RETURN VARCHAR2
2667: IS
2668:
2669: l_api_name CONSTANT VARCHAR(30) := 'Validate_Prgm_Info';
2682: FROM igs_pe_nonimg_stat
2683: WHERE nonimg_form_id = p_person_rec.form_id
2684: AND nonimg_stat_id NOT IN
2685: ( SELECT NVL(form_status_id,0)
2686: FROM igs_sv_prgms_info prg,
2687: igs_sv_persons pr
2688: WHERE prg.person_id = pr.person_id
2689: AND prg.batch_id = pr.batch_id
2690: AND pr.record_status <> 'E'
2705: FROM igs_pe_ev_form_stat
2706: WHERE ev_form_id = p_person_rec.form_id
2707: AND ev_form_stat_id NOT IN
2708: ( SELECT NVL(form_status_id,0)
2709: FROM igs_sv_prgms_info prg,
2710: igs_sv_persons pr
2711: WHERE prg.person_id = pr.person_id
2712: AND pr.record_status <> 'E'
2713: AND prg.batch_id = pr.batch_id
2726: prgms.prgm_start_date,
2727: prgms.prgm_end_date,
2728: prgms.remarks,
2729: prgms.auth_action_code
2730: FROM igs_sv_prgms_info prgms,
2731: igs_sv_persons pr
2732: WHERE prgms.person_id = pr.person_id
2733: AND pr.record_status <> 'E'
2734: AND prgms.person_id = p_person_rec.person_id
2734: AND prgms.person_id = p_person_rec.person_id
2735: AND prgms.prgm_action_type = 'DB'
2736: AND prgms.batch_id IN
2737: ( SELECT max(prs.batch_id)
2738: FROM igs_sv_prgms_info prs,
2739: igs_sv_persons pr
2740: WHERE prs.person_id = pr.person_id
2741: AND prs.batch_id = pr.batch_id
2742: AND pr.record_status <> 'E'
2747: CURSOR c_res IS
2748: SELECT prgms.prgm_start_date,
2749: prgms.prgm_end_date,
2750: prgms.remarks
2751: FROM igs_sv_prgms_info prgms,
2752: igs_sv_persons pr
2753: WHERE prgms.person_id = pr.person_id
2754: AND prgms.batch_id = pr.batch_id
2755: AND pr.record_status <> 'E'
5248:
5249: Date Created By : Oct 14, 2002
5250:
5251: Purpose : Get Education information on the student
5252: (IGS_SV_PRGMS_INFO).
5253:
5254: Remarks :
5255:
5256: Change History
5258: ------------------------------------------------------------------------
5259:
5260: ******************************************************************/
5261: FUNCTION Get_Edu_Info (
5262: p_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE -- Data record
5263: ) RETURN VARCHAR2 -- 'S' Record found, 'N' - not found. 'U' - Unexpected error
5264: IS
5265:
5266: l_api_name CONSTANT VARCHAR2(25) := 'Get_Edu_Info';
5279: english_reqd_met ,
5280: not_reqd_reason ,
5281: educ_lvl_remarks ,
5282: remarks
5283: FROM igs_sv_prgms_info cr
5284: WHERE cr.person_id = p_data_rec.person_id
5285: --AND cr.prgm_action_type='EP'
5286: AND cr.batch_id IN
5287: ( SELECT max(prs.batch_id)
5284: WHERE cr.person_id = p_data_rec.person_id
5285: --AND cr.prgm_action_type='EP'
5286: AND cr.batch_id IN
5287: ( SELECT max(prs.batch_id)
5288: FROM igs_sv_prgms_info prs,
5289: igs_sv_persons pr
5290: WHERE prs.person_id = pr.person_id
5291: AND prs.batch_id = pr.batch_id
5292: AND pr.record_status <> 'E'
6232:
6233: Date Created By : Oct 14, 2002
6234:
6235: Purpose : Insert education information on the student
6236: (IGS_SV_PRGMS_INFO).
6237:
6238: Remarks :
6239:
6240: Change History
6243:
6244: ******************************************************************/
6245: PROCEDURE Insert_Edu_Info (
6246: p_edu_type IN VARCHAR2,
6247: p_data_rec IN IGS_SV_PRGMS_INFO%ROWTYPE,
6248: p_auth_drp_data_rec IN IGS_SV_PRGMS_INFO%ROWTYPE
6249: )
6250: IS
6251:
6244: ******************************************************************/
6245: PROCEDURE Insert_Edu_Info (
6246: p_edu_type IN VARCHAR2,
6247: p_data_rec IN IGS_SV_PRGMS_INFO%ROWTYPE,
6248: p_auth_drp_data_rec IN IGS_SV_PRGMS_INFO%ROWTYPE
6249: )
6250: IS
6251:
6252: l_api_name CONSTANT VARCHAR(30) := 'Insert_Edu_Info';
6254: l_action VARCHAR2(30);
6255: l_btch_id NUMBER(14);
6256: l_tag_code VARCHAR2(30);
6257: l_edu_status VARCHAR2(10);
6258: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
6259:
6260: l_education_level igs_pe_nonimg_form.education_level%TYPE;
6261: l_primary_major igs_pe_nonimg_form.primary_major%TYPE;
6262: l_secondary_major igs_pe_nonimg_form.secondary_major%TYPE;
6261: l_primary_major igs_pe_nonimg_form.primary_major%TYPE;
6262: l_secondary_major igs_pe_nonimg_form.secondary_major%TYPE;
6263: l_minor igs_pe_nonimg_form.minor%TYPE;
6264: l_length_of_study igs_pe_nonimg_form.length_of_study%TYPE;
6265: l_prgm_start_date igs_Sv_prgms_info.prgm_start_date%TYPE;
6266: l_prgm_end_date igs_Sv_prgms_info.prgm_end_date%TYPE;
6267: l_english_reqd igs_pe_nonimg_form.english_reqd%TYPE;
6268: l_english_reqd_met igs_pe_nonimg_form.english_reqd_met%TYPE;
6269: l_not_reqd_reason igs_pe_nonimg_form.not_reqd_reason%TYPE;
6262: l_secondary_major igs_pe_nonimg_form.secondary_major%TYPE;
6263: l_minor igs_pe_nonimg_form.minor%TYPE;
6264: l_length_of_study igs_pe_nonimg_form.length_of_study%TYPE;
6265: l_prgm_start_date igs_Sv_prgms_info.prgm_start_date%TYPE;
6266: l_prgm_end_date igs_Sv_prgms_info.prgm_end_date%TYPE;
6267: l_english_reqd igs_pe_nonimg_form.english_reqd%TYPE;
6268: l_english_reqd_met igs_pe_nonimg_form.english_reqd_met%TYPE;
6269: l_not_reqd_reason igs_pe_nonimg_form.not_reqd_reason%TYPE;
6270: l_educ_lvl_remarks igs_pe_nonimg_form.educ_lvl_remarks%TYPE;
6380: p_data_rec.person_id,
6381: l_action,
6382: l_tag_code,
6383: 'SEND',
6384: 'IGS_SV_PRGMS_INFO',
6385: p_data_rec.prgm_action_type);
6386:
6387: l_cur_rec.person_id := p_data_rec.person_id;
6388: l_edu_status := Get_Othr_Prgm_Info (p_data_rec => l_cur_rec);
6428: p_data_rec.person_id,
6429: l_action,
6430: 'SV_PRGMS',
6431: 'SEND',
6432: 'IGS_SV_PRGMS_INFO',
6433: p_data_rec.prgm_action_type);
6434: END IF;
6435:
6436: INSERT INTO igs_sv_prgms_info (
6432: 'IGS_SV_PRGMS_INFO',
6433: p_data_rec.prgm_action_type);
6434: END IF;
6435:
6436: INSERT INTO igs_sv_prgms_info (
6437: batch_id ,
6438: person_id ,
6439: prgm_action_type ,
6440: print_form ,
6507: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
6508: END IF;
6509: IF p_edu_type = 'PRGM' THEN
6510: IF p_auth_drp_data_rec.prgm_action_type = 'DB' THEN
6511: UPDATE igs_sv_prgms_info
6512: SET authorization_reason =p_auth_drp_data_rec.authorization_reason,
6513: auth_action_code = p_auth_drp_data_rec.auth_action_code,
6514: prgm_start_date = p_auth_drp_data_rec.prgm_start_date,
6515: prgm_end_date = p_auth_drp_data_rec.prgm_end_date,
8451:
8452: END Update_Personal_Info;
8453:
8454: FUNCTION Get_EV_Prgm_Info (
8455: p_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE -- Data record
8456: ) RETURN VARCHAR2 -- 'S' Record found, 'N' - not found. 'U' - Unexpected error
8457: IS
8458:
8459: l_api_name CONSTANT VARCHAR2(25) := 'Get_EV_Prgm_Info';
8465: effective_date,
8466: termination_reason,
8467: end_prgm_reason,
8468: remarks
8469: FROM igs_sv_prgms_info
8470: WHERE person_id = p_data_rec.person_id AND
8471: batch_id IN
8472: ( SELECT max(prg.batch_id)
8473: FROM igs_sv_prgms_info prg,
8469: FROM igs_sv_prgms_info
8470: WHERE person_id = p_data_rec.person_id AND
8471: batch_id IN
8472: ( SELECT max(prg.batch_id)
8473: FROM igs_sv_prgms_info prg,
8474: igs_sv_persons pr
8475: WHERE prg.person_id = pr.person_id
8476: AND prg.batch_id = pr.batch_id
8477: AND pr.record_status <> 'E'
8552:
8553: END Get_EV_Prgm_Info;
8554:
8555: FUNCTION Get_nonimg_Prgm_Info (
8556: p_data_rec IN OUT NOCOPY IGS_SV_PRGMS_INFO%ROWTYPE -- Data record
8557: ) RETURN VARCHAR2 -- 'S' Record found, 'N' - not found. 'U' - Unexpected error
8558: IS
8559:
8560: l_api_name CONSTANT VARCHAR2(25) := 'Get_nonimg_Prgm_Info';
8566: prgm_end_date,
8567: remarks,
8568: termination_reason,
8569: print_form
8570: FROM igs_sv_prgms_info
8571: WHERE person_id = p_data_rec.person_id AND
8572: batch_id IN
8573: ( SELECT max(prg.batch_id)
8574: FROM igs_sv_prgms_info prg,
8570: FROM igs_sv_prgms_info
8571: WHERE person_id = p_data_rec.person_id AND
8572: batch_id IN
8573: ( SELECT max(prg.batch_id)
8574: FROM igs_sv_prgms_info prg,
8575: igs_sv_persons pr
8576: WHERE prg.person_id = pr.person_id
8577: AND prg.batch_id = pr.batch_id
8578: AND pr.record_status <> 'E'
8671: ) RETURN VARCHAR2
8672: IS
8673:
8674: l_api_name CONSTANT VARCHAR2(30) := 'Update_Program_Info';
8675: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8676: l_status VARCHAR2(1);
8677: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8678: l_count NUMBER(10);
8679: l_cur_prgm_rec g_edu_rec_type;
8673:
8674: l_api_name CONSTANT VARCHAR2(30) := 'Update_Program_Info';
8675: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8676: l_status VARCHAR2(1);
8677: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8678: l_count NUMBER(10);
8679: l_cur_prgm_rec g_edu_rec_type;
8680: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8681: BEGIN
8676: l_status VARCHAR2(1);
8677: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8678: l_count NUMBER(10);
8679: l_cur_prgm_rec g_edu_rec_type;
8680: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8681: BEGIN
8682:
8683: Put_Log_Msg(l_api_name||' begins ',0);
8684: /* Debug */
8946: ) RETURN VARCHAR2
8947: IS
8948:
8949: l_api_name CONSTANT VARCHAR2(30) := 'Update_EV_Program_Info';
8950: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8951: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8952: l_status VARCHAR2(1);
8953: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8954: l_count NUMBER(10);
8947: IS
8948:
8949: l_api_name CONSTANT VARCHAR2(30) := 'Update_EV_Program_Info';
8950: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8951: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8952: l_status VARCHAR2(1);
8953: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8954: l_count NUMBER(10);
8955: l_cur_prgm_rec g_edu_rec_type;
8949: l_api_name CONSTANT VARCHAR2(30) := 'Update_EV_Program_Info';
8950: l_cur_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8951: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8952: l_status VARCHAR2(1);
8953: l_prev_rec IGS_SV_PRGMS_INFO%ROWTYPE;
8954: l_count NUMBER(10);
8955: l_cur_prgm_rec g_edu_rec_type;
8956:
8957: BEGIN
10155: DELETE FROM igs_sv_legal_info WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10156:
10157: DELETE FROM igs_sv_oth_info WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10158:
10159: DELETE FROM igs_sv_prgms_info WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10160:
10161: DELETE FROM igs_sv_prgms_info WHERE batch_id > p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10162:
10163: DELETE FROM igs_sv_persons WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL );
10157: DELETE FROM igs_sv_oth_info WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10158:
10159: DELETE FROM igs_sv_prgms_info WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10160:
10161: DELETE FROM igs_sv_prgms_info WHERE batch_id > p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL ) ;
10162:
10163: DELETE FROM igs_sv_persons WHERE batch_id = p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL );
10164:
10165: DELETE FROM igs_sv_persons WHERE batch_id > p_batch_id AND ( person_id = p_person_id OR p_person_id IS NULL );
10374: l_person_sevis_id IGS_SV_PERSONS.SEVIS_USER_ID%TYPE;
10375: l_issue_rec IGS_SV_PERSONS%ROWTYPE;
10376: l_bio_rec IGS_SV_BIO_INFO%ROWTYPE;
10377: l_oth_rec IGS_SV_OTH_INFO%ROWTYPE;
10378: l_edu_rec IGS_SV_PRGMS_INFO%ROWTYPE;
10379: l_fin_rec IGS_SV_FINANCE_INFO %ROWTYPE;
10380: l_dep_rec g_dependent_rec_type;
10381: l_f_addr_rec g_address_rec_type;
10382: l_us_addr_rec g_address_rec_type;
10384: l_exist NUMBER(25);
10385: l_submiter_id NUMBER(25);
10386: l_submiter_number hz_parties.party_number%TYPE;
10387: no_show_status VARCHAR2(1);
10388: l_cur_authdrp_rec IGS_SV_PRGMS_INFO%ROWTYPE;
10389: l_btch_id igs_sv_batches.batch_id%TYPE;
10390:
10391: CURSOR C_EV_CUR IS
10392: SELECT fr.person_id, min(ev_form_id) form_id, pr.party_number person_number, fr.no_show_flag, fr.reprint_reason reprint_reason
10396: (SELECT st.ev_form_id FROM igs_pe_ev_form_stat st
10397: WHERE st.action_type IN ('TR','ED')
10398: AND st.ev_form_id = fr.ev_form_id
10399: AND st.ev_form_stat_id IN
10400: ( SELECT NVL(prs.form_status_id,0) FROM igs_sv_prgms_info prs, igs_sv_persons pr
10401: WHERE prs.person_id = pr.person_id AND prs.batch_id = pr.batch_id
10402: AND pr.record_status <> 'E' AND prs.person_id = fr.person_id)
10403: ) AND fr.sevis_school_identifier = p_org_party_id AND
10404: (
10422: WHERE st.action_type IN ('T','C')
10423: AND st.nonimg_form_id = fr.nonimg_form_id
10424: AND st.nonimg_stat_id IN
10425: ( SELECT NVL(prs.form_status_id,0)
10426: FROM igs_sv_prgms_info prs, igs_sv_persons pr
10427: WHERE prs.person_id = pr.person_id AND prs.batch_id = pr.batch_id
10428: AND pr.record_status <> 'E' AND prs.person_id = fr.person_id
10429: ) )
10430: AND fr.sevis_school_identifier = p_org_party_id AND