DBA Data[Home] [Help]

APPS.IGS_AD_IMP_025 dependencies on IGS_PE_RACE

Line 1491: || Purpose : Multiple Races TD (This procedure is to import data from interface table IGS_PE_RACE_INT to IGS_PE_RACE)

1487: p_batch_id IN NUMBER ) AS
1488: /*
1489: || Created By :pkpatel
1490: || Created On :5-FEB-2003
1491: || Purpose : Multiple Races TD (This procedure is to import data from interface table IGS_PE_RACE_INT to IGS_PE_RACE)
1492: ||
1493: || Known limitations, enhancements or remarks :
1494: || Change History :
1495: || Who When What

Line 1512: FROM igs_pe_race_int ai, igs_ad_interface_all i

1508:
1509: --Pick up the records for processing from the Races Interface Table
1510: CURSOR race_cur(cp_interface_run_id igs_ad_interface_all.interface_run_id%TYPE) IS
1511: SELECT ai.*,i.person_id
1512: FROM igs_pe_race_int ai, igs_ad_interface_all i
1513: WHERE ai.interface_id = i.interface_id AND
1514: ai.status = '2' AND
1515: ai.interface_run_id=cp_interface_run_id AND
1516: i.interface_run_id = cp_interface_run_id;

Line 1519: CURSOR dup_chk_race_cur(cp_person_id igs_pe_race.person_id%TYPE, cp_race_cd igs_pe_race.race_cd%TYPE) IS

1515: ai.interface_run_id=cp_interface_run_id AND
1516: i.interface_run_id = cp_interface_run_id;
1517:
1518: --Cursor to check whether the Record in Interface Table already exists in OSS table
1519: CURSOR dup_chk_race_cur(cp_person_id igs_pe_race.person_id%TYPE, cp_race_cd igs_pe_race.race_cd%TYPE) IS
1520: SELECT pr.race_cd
1521: FROM igs_pe_race pr
1522: WHERE pr.person_id = cp_person_id AND
1523: pr.race_cd = cp_race_cd;

Line 1521: FROM igs_pe_race pr

1517:
1518: --Cursor to check whether the Record in Interface Table already exists in OSS table
1519: CURSOR dup_chk_race_cur(cp_person_id igs_pe_race.person_id%TYPE, cp_race_cd igs_pe_race.race_cd%TYPE) IS
1520: SELECT pr.race_cd
1521: FROM igs_pe_race pr
1522: WHERE pr.person_id = cp_person_id AND
1523: pr.race_cd = cp_race_cd;
1524:
1525: -- Start Local Procedure crt_pe_race

Line 1545: igs_pe_race_pkg.insert_row (

1541: l_debug_str, NULL,
1542: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1543: END IF;
1544:
1545: igs_pe_race_pkg.insert_row (
1546: x_rowid => l_rowid,
1547: x_person_id => p_race_rec.person_id,
1548: x_race_cd => p_race_rec.race_cd,
1549: x_mode => 'R'

Line 1551: UPDATE igs_pe_race_int

1547: x_person_id => p_race_rec.person_id,
1548: x_race_cd => p_race_rec.race_cd,
1549: x_mode => 'R'
1550: );
1551: UPDATE igs_pe_race_int
1552: SET status = '1',
1553: error_code = NULL
1554: WHERE interface_race_id = p_race_rec.interface_race_id;
1555:

Line 1559: UPDATE igs_pe_race_int

1555:
1556: EXCEPTION
1557: WHEN OTHERS THEN
1558: -- Person Race Insertion Failed
1559: UPDATE igs_pe_race_int
1560: SET status = '3',
1561: error_code = 'E322'
1562: WHERE interface_race_id = p_race_rec.interface_race_id;
1563: -- Call Log detail

Line 1585: igs_ad_imp_001.logerrormessage(p_race_rec.interface_race_id,'E322','IGS_PE_RACE_INT');

1581: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1582: END IF;
1583:
1584: IF l_enable_log = 'Y' THEN
1585: igs_ad_imp_001.logerrormessage(p_race_rec.interface_race_id,'E322','IGS_PE_RACE_INT');
1586: END IF;
1587:
1588: END crt_pe_race;
1589:

Line 1595: l_error_code igs_pe_race_int.error_code%TYPE;

1591: FUNCTION validate_race_record(p_race_rec IN race_cur%ROWTYPE)
1592: RETURN BOOLEAN IS
1593:
1594: l_exists VARCHAR2(1);
1595: l_error_code igs_pe_race_int.error_code%TYPE;
1596: BEGIN
1597: -- Call Log header
1598:
1599: IF NOT(igs_pe_pers_imp_001.validate_lookup_type_code('PE_RACE',p_race_rec.race_cd,8405))

Line 1612: UPDATE igs_pe_race_int

1608: RETURN TRUE;
1609: EXCEPTION
1610: WHEN OTHERS THEN
1611:
1612: UPDATE igs_pe_race_int
1613: SET status = '3',
1614: error_code = l_error_code
1615: WHERE interface_race_id = p_race_rec.interface_race_id;
1616:

Line 1640: igs_ad_imp_001.logerrormessage(p_race_rec.interface_race_id,l_error_code,'IGS_PE_RACE_INT');

1636: NULL,NULL,NULL,NULL,TO_CHAR(l_request_id));
1637: END IF;
1638:
1639: IF l_enable_log = 'Y' THEN
1640: igs_ad_imp_001.logerrormessage(p_race_rec.interface_race_id,l_error_code,'IGS_PE_RACE_INT');
1641: END IF;
1642:
1643: RETURN FALSE;
1644: END validate_race_record;

Line 1677: UPDATE igs_pe_race_int pri

1673: l_rule := igs_ad_imp_001.find_source_cat_rule(p_source_type_id, 'PERSON_TYPE');
1674:
1675: -- Update all the duplicate records with status 1 and match_ind 18
1676:
1677: UPDATE igs_pe_race_int pri
1678: SET status='1',
1679: match_ind='18'
1680: WHERE pri.status='2'
1681: AND pri.interface_run_id = l_interface_run_id

Line 1684: FROM igs_pe_race pr,

1680: WHERE pri.status='2'
1681: AND pri.interface_run_id = l_interface_run_id
1682: AND EXISTS
1683: (SELECT 1
1684: FROM igs_pe_race pr,
1685: igs_ad_interface_all ai
1686: WHERE pri.interface_id=ai.interface_id
1687: AND ai.interface_run_id = l_interface_run_id
1688: AND pr.person_id=ai.person_id

Line 1711: UPDATE igs_pe_race_int

1707: IF validate_race_record(race_rec) THEN
1708: crt_pe_race(race_rec);
1709: END IF;
1710: ELSE
1711: UPDATE igs_pe_race_int
1712: SET status = '1',
1713: match_ind = '18'
1714: WHERE interface_race_id = race_rec.interface_race_id;
1715: END IF;