APPS.IGS_AD_IMP_007 dependencies on IGS_AD_HLTH_INS_INT_ALL

Line 1328: FROM igs_ad_hlth_ins_int_all hii, igs_ad_interface_all i

1324: || (reverse chronological order - newest change first)
1325: */
1326: CURSOR hlth_ins(cp_interface_run_id igs_ad_interface_all.interface_run_id%TYPE) IS
1327: SELECT hii.*, i.person_id
1328: FROM igs_ad_hlth_ins_int_all hii, igs_ad_interface_all i
1329: WHERE hii.interface_run_id = cp_interface_run_id
1330: AND i.interface_id = hii.interface_id
1331: AND i.interface_run_id = cp_interface_run_id
1332: AND hii.status = '2';

Line 1435: igs_ad_imp_001.logerrormessage(HLTH_INS_REC.Interface_hlth_Id,'E322','IGS_AD_HLTH_INS_INT_ALL');

1431: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1432: END IF;
1433:
1434: IF l_enable_log = 'Y' THEN
1435: igs_ad_imp_001.logerrormessage(HLTH_INS_REC.Interface_hlth_Id,'E322','IGS_AD_HLTH_INS_INT_ALL');
1436: END IF;
1437:
1438: END Crt_Pe_hlth_ins;
1439:

Line 1515: igs_ad_imp_001.logerrormessage(hlth_ins_rec.Interface_hlth_Id,p_error_code,'IGS_AD_HLTH_INS_INT_ALL');

1511: status = '3'
1512: WHERE interface_hlth_id = hlth_ins_rec.interface_hlth_id;
1513:
1514: IF l_enable_log = 'Y' THEN
1515: igs_ad_imp_001.logerrormessage(hlth_ins_rec.Interface_hlth_Id,p_error_code,'IGS_AD_HLTH_INS_INT_ALL');
1516: END IF;
1517:
1518: l_check := 'TRUE';
1519: END;

Line 1546: UPDATE igs_ad_hlth_ins_int_all

1542: l_rule := Igs_Ad_Imp_001.FIND_SOURCE_CAT_RULE(p_source_type_id, 'PERSON_HEALTH_INSURANCE');
1543:
1544: -- If rule is E or I, then if the match_ind is not null, the combination is invalid
1545: IF l_rule IN ('E','I') THEN
1546: UPDATE igs_ad_hlth_ins_int_all
1547: SET status = cst_stat_val_3,
1548: ERROR_CODE = cst_err_val_695 -- Error code depicting incorrect combination
1549: WHERE match_ind IS NOT NULL
1550: AND status = cst_stat_val_2

Line 1556: UPDATE igs_ad_hlth_ins_int_all mi

1552: END IF;
1553:
1554: -- If rule is E and duplicate exists, update match_ind to 19 and status to 1
1555: IF l_rule = 'E' THEN
1556: UPDATE igs_ad_hlth_ins_int_all mi
1557: SET status = cst_stat_val_1,
1558: match_ind = cst_mi_val_19
1559: WHERE mi.interface_run_id = l_interface_run_id
1560: AND mi.status = cst_stat_val_2

Line 1573: UPDATE igs_ad_hlth_ins_int_all

1569:
1570: -- If rule is R and there match_ind is 18,19,22 or 23 then the records must have been
1571: -- processed in prior runs and didn't get updated .. update to status 1
1572: IF l_rule = 'R' THEN
1573: UPDATE igs_ad_hlth_ins_int_all
1574: SET status = cst_stat_val_1
1575: WHERE interface_run_id = l_interface_run_id
1576: AND match_ind IN (cst_mi_val_18,cst_mi_val_19,cst_mi_val_22,cst_mi_val_23)
1577: AND status=cst_stat_val_2;

Line 1582: UPDATE igs_ad_hlth_ins_int_all

1578: END IF;
1579:
1580: -- If rule is R and match_ind is neither 21 nor 25 then error
1581: IF l_rule = 'R' THEN
1582: UPDATE igs_ad_hlth_ins_int_all
1583: SET status = cst_stat_val_3,
1584: ERROR_CODE = cst_err_val_695
1585: WHERE interface_run_id = l_interface_run_id
1586: AND (match_ind IS NOT NULL AND match_ind NOT IN (cst_mi_val_21,cst_mi_val_25))

Line 1592: UPDATE igs_ad_hlth_ins_int_all mi

1588: END IF;
1589:
1590: -- If rule is R, set duplicated records with no discrepancy to status 1 and match_ind 23
1591: IF l_rule = 'R' THEN
1592: UPDATE igs_ad_hlth_ins_int_all mi
1593: SET status = cst_stat_val_1,
1594: match_ind = cst_mi_val_23
1595: WHERE mi.interface_run_id = l_interface_run_id
1596: AND mi.match_ind IS NULL

Line 1633: UPDATE igs_ad_hlth_ins_int_all mi

1629: END IF;
1630:
1631: -- If rule in R records still exist, they are duplicates and have discrepancy .. update status=3,match_ind=20
1632: IF l_rule = 'R' THEN
1633: UPDATE igs_ad_hlth_ins_int_all mi
1634: SET status = cst_stat_val_3,
1635: match_ind = cst_mi_val_20,
1636: dup_hlth_ins_id = (SELECT health_ins_id
1637: FROM igs_pe_hlth_ins_all pe, igs_ad_interface_all ii

Line 1749: igs_ad_imp_001.logerrormessage(hlth_ins_rec.INTERFACE_HLTH_ID,'E014','IGS_AD_HLTH_INS_INT_ALL');

1745: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1746: END IF;
1747:
1748: IF l_enable_log = 'Y' THEN
1749: igs_ad_imp_001.logerrormessage(hlth_ins_rec.INTERFACE_HLTH_ID,'E014','IGS_AD_HLTH_INS_INT_ALL');
1750: END IF;
1751:
1752:
1753: END;

Line 1818: igs_ad_imp_001.logerrormessage(hlth_ins_rec.INTERFACE_HLTH_ID,'E014','IGS_AD_HLTH_INS_INT_ALL');

1814: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1815: END IF;
1816:
1817: IF l_enable_log = 'Y' THEN
1818: igs_ad_imp_001.logerrormessage(hlth_ins_rec.INTERFACE_HLTH_ID,'E014','IGS_AD_HLTH_INS_INT_ALL');
1819: END IF;
1820: END;
1821: END IF; -- if match_ind
1822: END IF; -- if rule