1432: WHERE base_id = p_base_id;
1433:
1434: CURSOR c_get_object_id(p_school_code igf_ap_isir_matched_all.first_college%TYPE) IS
1435: SELECT hz.party_id party_id
1436: FROM hz_parties hz,
1437: igs_or_org_alt_ids oli,
1438: igs_or_org_alt_idtyp olt
1439: WHERE oli.org_structure_id = hz.party_number
1440: AND oli.org_alternate_id_type = olt.org_alternate_id_type
1442: AND hz.status = 'A'
1443: AND olt.system_id_type = 'FED_SCH_CD'
1444: AND oli.org_alternate_id = p_school_code;
1445:
1446: CURSOR c_rel_exists(p_subject_id hz_parties.party_id%TYPE,
1447: p_object_id hz_parties.party_id%TYPE) IS
1448: SELECT 'X'
1449: FROM hz_relationships
1450: WHERE subject_id = p_subject_id
1443: AND olt.system_id_type = 'FED_SCH_CD'
1444: AND oli.org_alternate_id = p_school_code;
1445:
1446: CURSOR c_rel_exists(p_subject_id hz_parties.party_id%TYPE,
1447: p_object_id hz_parties.party_id%TYPE) IS
1448: SELECT 'X'
1449: FROM hz_relationships
1450: WHERE subject_id = p_subject_id
1451: AND object_id = p_object_id
1451: AND object_id = p_object_id
1452: AND relationship_code='ATTENDS_INSTITUTION'
1453: AND SYSDATE BETWEEN start_date AND NVL(end_date, SYSDATE);
1454:
1455: l_subject_id hz_parties.party_id%TYPE;
1456: l_object_id hz_parties.party_id%TYPE;
1457: l_school_code igf_ap_isir_matched_all.first_college%TYPE;
1458: l_rel_exists c_rel_exists%ROWTYPE;
1459:
1452: AND relationship_code='ATTENDS_INSTITUTION'
1453: AND SYSDATE BETWEEN start_date AND NVL(end_date, SYSDATE);
1454:
1455: l_subject_id hz_parties.party_id%TYPE;
1456: l_object_id hz_parties.party_id%TYPE;
1457: l_school_code igf_ap_isir_matched_all.first_college%TYPE;
1458: l_rel_exists c_rel_exists%ROWTYPE;
1459:
1460: lv_return_status VARCHAR2(1) ;
1460: lv_return_status VARCHAR2(1) ;
1461: lv_msg_count NUMBER;
1462: lv_msg_data VARCHAR2(2000);
1463: lv_party_relationship_id hz_relationships.relationship_id%TYPE ;
1464: lv_party_id hz_parties.party_id%TYPE ;
1465: lv_party_number hz_parties.party_number%TYPE ;
1466: lv_last_update_date hz_parties.last_update_date%TYPE ;
1467: lv_object_version_number hz_relationships.object_version_number%TYPE;
1468:
1461: lv_msg_count NUMBER;
1462: lv_msg_data VARCHAR2(2000);
1463: lv_party_relationship_id hz_relationships.relationship_id%TYPE ;
1464: lv_party_id hz_parties.party_id%TYPE ;
1465: lv_party_number hz_parties.party_number%TYPE ;
1466: lv_last_update_date hz_parties.last_update_date%TYPE ;
1467: lv_object_version_number hz_relationships.object_version_number%TYPE;
1468:
1469:
1462: lv_msg_data VARCHAR2(2000);
1463: lv_party_relationship_id hz_relationships.relationship_id%TYPE ;
1464: lv_party_id hz_parties.party_id%TYPE ;
1465: lv_party_number hz_parties.party_number%TYPE ;
1466: lv_last_update_date hz_parties.last_update_date%TYPE ;
1467: lv_object_version_number hz_relationships.object_version_number%TYPE;
1468:
1469:
1470: BEGIN