199: (new_references.pro_pra_sequence_number IS NULL) OR
200: (new_references.pro_sequence_number IS NULL))) THEN
201: NULL;
202: ELSE
203: IF NOT IGS_PR_RU_OU_PKG.Get_PK_For_Validation (
204: new_references.progression_rule_cat,
205: new_references.pro_pra_sequence_number,
206: new_references.pro_sequence_number
207: )THEN
396: Close cur_rowid;
397:
398: END GET_FK_IGS_PR_OU_TYPE;
399:
400: PROCEDURE GET_FK_IGS_PR_RU_OU (
401: x_progression_rule_cat IN VARCHAR2,
402: x_pra_sequence_number IN NUMBER,
403: x_sequence_number IN NUMBER
404: ) AS
424: Return;
425: END IF;
426: Close cur_rowid;
427:
428: END GET_FK_IGS_PR_RU_OU;
429:
430: PROCEDURE GET_FK_IGS_PR_SDT_PR_RU_CK (
431: x_person_id IN NUMBER,
432: x_course_cd IN VARCHAR2,
474: || Who When What
475: || (reverse chronological order - newest change first)
476: */
477: CURSOR c_parent (
478: cp_progression_rule_cat IGS_PR_RU_OU.progression_rule_cat%TYPE,
479: cp_pro_pra_sequence_number IGS_PR_RU_OU.pra_sequence_number%TYPE,
480: cp_sequence_number IGS_PR_RU_OU.sequence_number%TYPE ) IS
481: SELECT 1
482: FROM IGS_PR_RU_OU pro
475: || (reverse chronological order - newest change first)
476: */
477: CURSOR c_parent (
478: cp_progression_rule_cat IGS_PR_RU_OU.progression_rule_cat%TYPE,
479: cp_pro_pra_sequence_number IGS_PR_RU_OU.pra_sequence_number%TYPE,
480: cp_sequence_number IGS_PR_RU_OU.sequence_number%TYPE ) IS
481: SELECT 1
482: FROM IGS_PR_RU_OU pro
483: WHERE pro.progression_rule_cat = cp_progression_rule_cat AND
476: */
477: CURSOR c_parent (
478: cp_progression_rule_cat IGS_PR_RU_OU.progression_rule_cat%TYPE,
479: cp_pro_pra_sequence_number IGS_PR_RU_OU.pra_sequence_number%TYPE,
480: cp_sequence_number IGS_PR_RU_OU.sequence_number%TYPE ) IS
481: SELECT 1
482: FROM IGS_PR_RU_OU pro
483: WHERE pro.progression_rule_cat = cp_progression_rule_cat AND
484: pro.pra_sequence_number = cp_pro_pra_sequence_number AND
478: cp_progression_rule_cat IGS_PR_RU_OU.progression_rule_cat%TYPE,
479: cp_pro_pra_sequence_number IGS_PR_RU_OU.pra_sequence_number%TYPE,
480: cp_sequence_number IGS_PR_RU_OU.sequence_number%TYPE ) IS
481: SELECT 1
482: FROM IGS_PR_RU_OU pro
483: WHERE pro.progression_rule_cat = cp_progression_rule_cat AND
484: pro.pra_sequence_number = cp_pro_pra_sequence_number AND
485: pro.sequence_number = cp_sequence_number AND
486: pro.logical_delete_dt is NULL;