53: ***************************************************************/
54:
55: CURSOR cur_ref_code_type IS
56: SELECT reference_cd_type
57: FROM igs_ge_ref_cd_type
58: WHERE unit_section_occurrence_flag ='Y' AND
59: restricted_flag='Y' AND
60: closed_ind ='N' AND
61: mandatory_flag ='Y' ;
58: WHERE unit_section_occurrence_flag ='Y' AND
59: restricted_flag='Y' AND
60: closed_ind ='N' AND
61: mandatory_flag ='Y' ;
62: l_ref_cd_type igs_ge_ref_cd_type.reference_cd_type%TYPE;
63:
64: CURSOR cur_ref_code( ref_cd_type IN igs_ge_ref_cd.reference_cd_type%TYPE) IS
65: SELECT reference_cd,description
66: FROM igs_ge_ref_cd
60: closed_ind ='N' AND
61: mandatory_flag ='Y' ;
62: l_ref_cd_type igs_ge_ref_cd_type.reference_cd_type%TYPE;
63:
64: CURSOR cur_ref_code( ref_cd_type IN igs_ge_ref_cd.reference_cd_type%TYPE) IS
65: SELECT reference_cd,description
66: FROM igs_ge_ref_cd
67: WHERE default_flag ='Y' AND
68: reference_cd_type = ref_cd_type ;
62: l_ref_cd_type igs_ge_ref_cd_type.reference_cd_type%TYPE;
63:
64: CURSOR cur_ref_code( ref_cd_type IN igs_ge_ref_cd.reference_cd_type%TYPE) IS
65: SELECT reference_cd,description
66: FROM igs_ge_ref_cd
67: WHERE default_flag ='Y' AND
68: reference_cd_type = ref_cd_type ;
69: l_ref_cd cur_ref_code%ROWTYPE;
70: l_usec_ref_id NUMBER;