APPS.IGS_AD_IMP_007 dependencies on IGS_PE_MIL_SERVICES

Line 100: l_MILIT_SERVICE_ID igs_pe_mil_services_all.milit_service_id%TYPE;

96: l_rule VARCHAR2(1);
97: l_error_code VARCHAR2(10);
98: l_status VARCHAR2(10);
99: l_check VARCHAR2(10);
100: l_MILIT_SERVICE_ID igs_pe_mil_services_all.milit_service_id%TYPE;
101: l_processed_records NUMBER(5) := 0 ;
102: l_prog_label VARCHAR2(4000);
103: l_label VARCHAR2(4000);
104: l_debug_str VARCHAR2(4000);

Line 134: IGS_PE_MIL_SERVICES_pkg.INSERT_ROW (

130: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
131: END IF;
132:
133: l_org_id := igs_ge_gen_003.get_org_id;
134: IGS_PE_MIL_SERVICES_pkg.INSERT_ROW (
135: X_ROWID => l_rowid,
136: X_Org_Id => l_org_id,
137: x_MILIT_SERVICE_ID => l_milt_id,
138: x_PERSON_ID => MILITARY_REC.PERSON_ID ,

Line 344: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii

340: match_ind = cst_mi_val_19
341: WHERE mi.interface_run_id = l_interface_run_id
342: AND mi.status = cst_stat_val_2
343: AND EXISTS ( SELECT '1'
344: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii
345: WHERE ii.interface_run_id = l_interface_run_id
346: AND ii.interface_id = mi.interface_id
347: AND ii.person_id = pe.person_id
348: AND pe.military_type_cd = UPPER(mi.military_type_cd)

Line 381: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii

377: WHERE mi.interface_run_id = l_interface_run_id
378: AND mi.match_ind IS NULL
379: AND mi.status = cst_stat_val_2
380: AND EXISTS ( SELECT '1'
381: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii
382: WHERE ii.interface_run_id = l_interface_run_id
383: AND ii.interface_id = mi.interface_id
384: AND ii.person_id = pe.person_id
385: AND pe.military_type_cd = UPPER(mi.military_type_cd)

Line 419: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii

415: UPDATE igs_ad_military_int_all mi
416: SET status = cst_stat_val_3,
417: match_ind = cst_mi_val_20,
418: dup_milit_service_id = (SELECT milit_service_id
419: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii
420: WHERE mi.interface_run_id = l_interface_run_id
421: AND ii.interface_id = mi.interface_id
422: AND ii.person_id = pe.person_id
423: AND pe.military_type_cd = UPPER(mi.military_type_cd)

Line 429: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii

425: WHERE mi.interface_run_id = l_interface_run_id
426: AND mi.match_ind IS NULL
427: AND mi.status = cst_stat_val_2
428: AND EXISTS (SELECT '1'
429: FROM igs_pe_mil_services_all pe, igs_ad_interface_all ii
430: WHERE ii.interface_run_id = l_interface_run_id
431: AND ii.interface_id = mi.interface_id
432: AND ii.person_id = pe.person_id
433: AND pe.military_type_cd = UPPER(mi.military_type_cd)

Line 457: FROM igs_pe_mil_services mi

453: CURSOR chk_dup_milit(cp_military_type_cd VARCHAR2,
454: cp_person_id VARCHAR2,
455: cp_start_date igs_ad_military_int_all.start_date%TYPE) IS
456: SELECT rowid,mi.*
457: FROM igs_pe_mil_services mi
458: WHERE UPPER(military_type_cd) = UPPER(cp_military_type_cd)
459: AND person_id = cp_person_id
460: AND TRUNC(start_date) = TRUNC(cp_start_date);
461: dup_milit_rec chk_dup_milit%ROWTYPE;

Line 471: igs_pe_mil_services_pkg.update_row(

467: CLOSE chk_dup_milit;
468: IF dup_milit_rec.military_type_cd IS NOT NULL THEN
469: IF l_rule = 'I' THEN
470: BEGIN
471: igs_pe_mil_services_pkg.update_row(
472: x_rowid=> dup_milit_rec.rowid,
473: x_milit_service_id=> dup_milit_rec.milit_service_id,
474: x_person_id=> dup_milit_rec.person_id,
475: x_start_date=> NVL(TRUNC(military_rec.start_date),dup_milit_rec.start_date),

Line 540: igs_pe_mil_services_pkg.update_row(

536: END;
537: ELSIF l_rule = 'R' THEN
538: IF MILITARY_REC.match_ind = cst_mi_val_21 THEN
539: BEGIN
540: igs_pe_mil_services_pkg.update_row(
541: x_rowid=> dup_milit_rec.rowid,
542: x_milit_service_id=> dup_milit_rec.milit_service_id,
543: x_person_id=>dup_milit_rec.person_id,
544: x_start_date=> NVL(TRUNC(military_rec.start_date),dup_milit_rec.start_date),