[Home] [Help]
1014: BEGIN -- grdp_prc_gac
1015: -- This process manages the initial allocation of IGS_GR_GRADUAND records to
1016: -- ceremonies by creating IGS_GR_AWD_CRMN records and the
1017: -- re-alloaction of graduands when IGS_GR_AWD_CEREMONY and
1018: -- IGS_GR_AWD_CRM_US_GP records are closed.
1019: -- The process finds closed IGS_GR_AWD_CEREMONY records for the specified
1020: -- IGS_GR_CRMN_ROUND, calls GENP_PRC_AWC_CLOSE to re-allocate any associated
1021: -- graduands.
1022: -- The process finds closed IGS_GR_AWD_CRM_US_GP records for the specified
1018: -- IGS_GR_AWD_CRM_US_GP records are closed.
1019: -- The process finds closed IGS_GR_AWD_CEREMONY records for the specified
1020: -- IGS_GR_CRMN_ROUND, calls GENP_PRC_AWC_CLOSE to re-allocate any associated
1021: -- graduands.
1022: -- The process finds closed IGS_GR_AWD_CRM_US_GP records for the specified
1023: -- IGS_GR_CRMN_ROUND, calls GENP_PRC_ACUSG_CLOSE to re-allocate any associated
1024: -- graduands.
1025: -- The process finds any IGS_GR_GRADUAND records for the specified IGS_GR_CRMN_ROUND,
1026: -- location_cd, and IGS_GR_STAT which do not have an existing
1074: acusg.award_course_cd,
1075: acusg.award_crs_version_number,
1076: acusg.award_cd,
1077: acusg.us_group_number
1078: FROM IGS_GR_AWD_CRM_US_GP acusg
1079: WHERE acusg.grd_cal_type = p_grd_cal_type AND
1080: acusg.grd_ci_sequence_number = p_grd_ci_sequence_number AND
1081: acusg.closed_ind = 'Y';
1082: CURSOR c_gr IS
1158: Fnd_Message.Set_Name('IGS', v_message_name);
1159: App_Exception.Raise_Exception;
1160: END IF;
1161: END LOOP; -- c_awc
1162: -- 3.1 Find closed IGS_GR_AWD_CRM_US_GP records for the specified
1163: -- IGS_GR_CRMN_ROUND and loop through them.
1164: FOR v_acusg_rec IN c_acusg LOOP
1165: -- 3.2 Call GENP_PRC_ACUSG_CLOSE to process the graduands for the
1166: -- IGS_GR_AWD_CRM_US_GP record and then delete it.
1162: -- 3.1 Find closed IGS_GR_AWD_CRM_US_GP records for the specified
1163: -- IGS_GR_CRMN_ROUND and loop through them.
1164: FOR v_acusg_rec IN c_acusg LOOP
1165: -- 3.2 Call GENP_PRC_ACUSG_CLOSE to process the graduands for the
1166: -- IGS_GR_AWD_CRM_US_GP record and then delete it.
1167: IF IGS_GR_PRC_GAC.grdp_prc_acusg_close(
1168: p_grd_cal_type,
1169: p_grd_ci_sequence_number,
1170: v_acusg_rec.ceremony_number,
1643: l_message_name VARCHAR2(200);
1644:
1645: BEGIN -- grdp_upd_gac_order
1646: -- Set the IGS_GR_AWD_CRMN.order_in_presentation based on the
1647: -- IGS_GR_AWD_CEREMONY.order_in_ceremony, IGS_GR_AWD_CRM_US_GP.order_in_award
1648: -- and the parameters passed.
1649:
1650: --Block for Parameter Validation/Splitting of Parameters
1651: retcode:=0;
1717: CURSOR c_acusg (
1718: cp_ceremony_number IGS_GR_CRMN.ceremony_number%TYPE) IS
1719: SELECT /*+ INDEX(acusg acusg_pk)*/
1720: 'X'
1721: FROM IGS_GR_AWD_CRM_US_GP acusg
1722: WHERE acusg.grd_cal_type = p_grd_cal_type AND
1723: acusg.grd_ci_sequence_number = p_grd_ci_sequence_number AND
1724: acusg.ceremony_number = cp_ceremony_number AND
1725: acusg.closed_ind = 'Y' AND
1819: RETURN;
1820: END IF;
1821: CLOSE c_awc;
1822: --5. Check if the IGS_GR_CRMN has any related graduand_award_cermony
1823: -- records linked to closed IGS_GR_AWD_CRM_US_GP records.
1824: OPEN c_acusg(
1825: v_gc_rec.ceremony_number);
1826: FETCH c_acusg INTO v_acusg_exists;
1827: IF c_acusg%FOUND THEN
1918: 'IGS_GR_GRADUAND gr, ' ||
1919: 'IGS_GR_STAT gst, ' ||
1920: 'IGS_PE_PERSON pe, ' ||
1921: 'IGS_GR_AWD_CEREMONY awc, ' ||
1922: 'IGS_GR_AWD_CRM_US_GP acusg, '||
1923: 'IGS_GR_APRV_STAT gas ' ||
1924: 'WHERE gac.grd_cal_type=''' || p_grd_cal_type || ''' AND ' ||
1925: 'gac.grd_ci_sequence_number=' || TO_CHAR(p_grd_ci_sequence_number) || ' AND '||
1926: 'gac.ceremony_number=' || TO_CHAR(v_gc_rec.ceremony_number) || ' AND '||