422: END IF;
423: CLOSE c_course_version;
424: -- Validate that there is only one funding_source_resstriction table
425: -- set to default for a IGS_PS_COURSE version.
426: IF (IGS_PS_VAL_FSr.crsp_val_fsr_default (
427: p_course_cd,
428: p_version_number,
429: p_message_name) = FALSE) THEN
430: RETURN FALSE;
429: p_message_name) = FALSE) THEN
430: RETURN FALSE;
431: END IF;
432: -- validate that all records have there restriction indicator set.
433: IF (IGS_PS_VAL_FSr.crsp_val_fsr_rstrct (
434: p_course_cd,
435: p_version_number,
436: p_message_name) = FALSE) THEN
437: RETURN FALSE;
507: END IF; -- course_award_ind is 'Y'
508: -- Validate the IGS_FI_FND_SRC_RSTN table and that the
509: -- IGS_FI_FUND_SRC is not closed.
510: FOR fs_rec IN c_get_funding_source LOOP
511: IF (IGS_PS_VAL_FSr.crsp_val_fsr_fnd_src(
512: fs_rec.funding_source,
513: p_message_name) = FALSE) THEN
514: v_terminate := TRUE;
515: EXIT; -- premature exit loop