[Home] [Help]
479: 'OFFICIAL', 'TRANSCRIPT',
480: 'UNOFFICIAL', 'TRANSCRIPT',
481: 'TRANSCRIPT')
482: INTO l_doc_type
483: FROM dual;
484: --
485: -- Get prev num of copies placed by the student
486: --
487: OPEN cur_num_stu_ords (NVL (p_item_number, 999999999999999));
1430: IF plan_subs.period_of_plan = 'YEARS' THEN
1431: --Get the number of years lapsed between date fee was paid and sysdate
1432: SELECT NVL ((MONTHS_BETWEEN (SYSDATE, plan_subs.fee_paid_date) / 12), 0)
1433: INTO lnyearspassed
1434: FROM DUAL;
1435: IF lnyearspassed >= 0 THEN -- Plan is still Valid
1436: -- See if the student has already availed all the allowed number of copies.
1437: IF (plan_subs.quantity_limit - plan_subs.num_of_copies) > 0 THEN
1438: lnfree := 'Y';
1450: ELSIF plan_subs.period_of_plan = 'MONTHS' THEN
1451: --Get the number of Months lapsed between date fee was paid and sysdate
1452: SELECT NVL (MONTHS_BETWEEN (plan_subs.fee_paid_date, SYSDATE), 0)
1453: INTO lnyearspassed
1454: FROM DUAL;
1455: IF lnyearspassed >= 0 THEN -- Plan is still Valid
1456: -- See if the student has already availed all the allowed number of copies.
1457: lncopies_availded := plan_subs.quantity_limit - plan_subs.num_of_copies;
1458:
1568: CLOSE c_deliv_type;
1569: --
1570: SELECT igs_as_doc_details_s.NEXTVAL
1571: INTO l_item_number
1572: FROM DUAL;
1573: --
1574: OPEN cur_doc_setup;
1575: FETCH cur_doc_setup INTO l_lifetime_fee;
1576: CLOSE cur_doc_setup;