39: PROCEDURE derive_clsrnk_data
40: (
41: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type,
42: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
43: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
44: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type
45: );
46:
47: /*
40: (
41: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type,
42: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
43: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
44: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type
45: );
46:
47: /*
48: validate_db_cons function performs all the data integrity validation
49: */
50: FUNCTION validate_db_cons
51: (
52: p_person_id IN igs_pe_person.person_id%type,
53: p_cal_type IN igs_ca_inst.cal_type%type,
54: p_sequence_number IN igs_ca_inst.sequence_number%type,
55: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type
56: )
57: RETURN VARCHAR2;
50: FUNCTION validate_db_cons
51: (
52: p_person_id IN igs_pe_person.person_id%type,
53: p_cal_type IN igs_ca_inst.cal_type%type,
54: p_sequence_number IN igs_ca_inst.sequence_number%type,
55: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type
56: )
57: RETURN VARCHAR2;
58:
105: l_api_version CONSTANT NUMBER := 1.0;
106:
107: -- variables declared to fetch data from derive_clsrnk_data
108: l_person_id igs_pe_person.person_id%type;
109: l_cal_type igs_ca_inst.cal_type%type;
110: l_sequence_number igs_ca_inst.sequence_number%type;
111:
112: l_return VARCHAR2(1) ;
113:
106:
107: -- variables declared to fetch data from derive_clsrnk_data
108: l_person_id igs_pe_person.person_id%type;
109: l_cal_type igs_ca_inst.cal_type%type;
110: l_sequence_number igs_ca_inst.sequence_number%type;
111:
112: l_return VARCHAR2(1) ;
113:
114: BEGIN -- main begin
317: PROCEDURE derive_clsrnk_data
318: (
319: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type,
320: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
321: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
322: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type
323: )
324: IS
325: /*************************************************************
318: (
319: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type,
320: p_person_id OUT NOCOPY igs_pe_person.person_id%type,
321: p_cal_type OUT NOCOPY igs_ca_inst.cal_type%type,
322: p_sequence_number OUT NOCOPY igs_ca_inst.sequence_number%type
323: )
324: IS
325: /*************************************************************
326: Created By : smanglm
349: /*
350: get cal_type and sequence_number
351: */
352: DECLARE
353: l_start_dt igs_ca_inst.start_dt%TYPE;
354: l_end_dt igs_ca_inst.end_dt%TYPE;
355: l_return_status VARCHAR2(2000);
356: BEGIN
357: IGS_GE_GEN_003.GET_CALENDAR_INSTANCE
350: get cal_type and sequence_number
351: */
352: DECLARE
353: l_start_dt igs_ca_inst.start_dt%TYPE;
354: l_end_dt igs_ca_inst.end_dt%TYPE;
355: l_return_status VARCHAR2(2000);
356: BEGIN
357: IGS_GE_GEN_003.GET_CALENDAR_INSTANCE
358: (
383:
384: FUNCTION validate_db_cons
385: (
386: p_person_id IN igs_pe_person.person_id%type,
387: p_cal_type IN igs_ca_inst.cal_type%type,
388: p_sequence_number IN igs_ca_inst.sequence_number%type,
389: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type
390: )
391: RETURN VARCHAR2
384: FUNCTION validate_db_cons
385: (
386: p_person_id IN igs_pe_person.person_id%type,
387: p_cal_type IN igs_ca_inst.cal_type%type,
388: p_sequence_number IN igs_ca_inst.sequence_number%type,
389: p_lgcy_clsrnk_rec IN lgcy_clsrnk_rec_type
390: )
391: RETURN VARCHAR2
392: /*************************************************************