[Home] [Help]
837: errbuf OUT NOCOPY VARCHAR2,
838: retcode OUT NOCOPY NUMBER,
839: p_person_id IN VARCHAR2,
840: p_person_grp_id IN VARCHAR2,
841: p_course_cd IN IGS_PS_COURSE.course_cd%TYPE ,
842: p_fee_cal IN VARCHAR2,
843: p_fee_category IN IGS_EN_STDNT_PS_ATT_ALL.FEE_CAT%TYPE,
844: p_fee_type IN IGS_FI_FEE_TYPE_ALL.FEE_TYPE%TYPE,
845: p_trace_on IN VARCHAR2,
1299: p_fee_cal_type igs_ca_inst.cal_type%TYPE ;
1300: p_fee_ci_sequence_number igs_ca_inst.sequence_number%TYPE;
1301: BEGIN
1302: -- finp_prc_hecs_pymnt_optn
1303: -- Routine to control processing student's IGS_PS_COURSE attempt HECS payment option
1304: -- on the basis of their assessed liability and any up front payments made
1305: --Block for Parameter Validation/Splitting of Parameters
1306:
1307:
1379: (reverse chronological order - newest change first)
1380: ***************************************************************/
1381:
1382: BEGIN -- finp_prc_sca_unconf
1383: -- Process finance details for unconfirmed student IGS_PS_COURSE attempts. This
1384: -- routine is called from ADMP_DEL_SCA_UNCONF when deleting unconfirmed
1385: -- student IGS_PS_COURSE attempts.
1386: -- IGS_GE_NOTE: The call to IGS_FI_PRC_FEE_ASS.finp_ins_enr_fee performs a commit,
1387: -- this means that all outstanding transactions will be committed.
1381:
1382: BEGIN -- finp_prc_sca_unconf
1383: -- Process finance details for unconfirmed student IGS_PS_COURSE attempts. This
1384: -- routine is called from ADMP_DEL_SCA_UNCONF when deleting unconfirmed
1385: -- student IGS_PS_COURSE attempts.
1386: -- IGS_GE_NOTE: The call to IGS_FI_PRC_FEE_ASS.finp_ins_enr_fee performs a commit,
1387: -- this means that all outstanding transactions will be committed.
1388: DECLARE
1389: cst_unconfirm CONSTANT VARCHAR2(10) := 'UNCONFIRM';
1600: p_fee_cal_type IGS_FI_FEE_AS.fee_cal_type%TYPE,
1601: p_fee_ci_sequence_number IGS_FI_FEE_AS.fee_ci_sequence_number%TYPE)
1602: RETURN VARCHAR2 AS
1603: BEGIN -- finpl_prc_this_crs_liable
1604: -- Check if this IGS_PS_COURSE is liable for the fees
1605: DECLARE
1606: v_dummy VARCHAR2(1);
1607:
1608: -- Enh # 2122257
1651: p_fee_ci_sequence_number IGS_FI_FEE_AS.fee_ci_sequence_number%TYPE,
1652: p_fee_type IGS_FI_FEE_AS.FEE_TYPE%TYPE)
1653: RETURN VARCHAR2 AS
1654: BEGIN -- finpl_prc_another_crs_liable
1655: -- Check if another IGS_PS_COURSE is liable for the fees
1656: DECLARE
1657: cst_unconfirm CONSTANT VARCHAR2(10) := 'UNCONFIRM';
1658: v_dummy VARCHAR2(1);
1659:
1742: RETURN;
1743: END IF;
1744: -- Initialise the output parameter
1745: p_delete_sca_ind := 'Y';
1746: -- Only process unconfirmed IGS_PS_COURSE attempts
1747: IF p_course_attempt_status <> cst_unconfirm THEN
1748: RETURN;
1749: END IF;
1750: -- Check if a fee assessment exists for the IGS_PE_PERSON
1753: v_fas_rec.course_cd IS NULL THEN
1754: IF v_fas_rec.course_cd = p_course_cd THEN
1755: v_delete_sca_ind := 'N';
1756: END IF;
1757: -- Check if an assessed debt liability exists for the IGS_PS_COURSE attempt
1758: FOR v_fasdv_rec IN c_fasdv(
1759: v_fas_rec.course_cd) LOOP
1760: IF v_fasdv_rec.course_cd IS NOT NULL THEN
1761: -- Process this IGS_PS_COURSE attempt
1757: -- Check if an assessed debt liability exists for the IGS_PS_COURSE attempt
1758: FOR v_fasdv_rec IN c_fasdv(
1759: v_fas_rec.course_cd) LOOP
1760: IF v_fasdv_rec.course_cd IS NOT NULL THEN
1761: -- Process this IGS_PS_COURSE attempt
1762: finpl_prc_end_fee_contract(
1763: p_person_id,
1764: p_course_cd);
1765: IF v_fasdv_rec.assessment_amount <> 0 THEN