[Home] [Help]
PACKAGE: APPS.IGS_FI_GET_SUAEH
Source
1 PACKAGE IGS_FI_GET_SUAEH AUTHID CURRENT_USER AS
2 /* $Header: IGSFI07S.pls 115.8 2003/05/16 10:52:40 knaraset ship $ */
3 --
4 -- Who When What
5 -- knaraset 29-Apr-03 Modified r_t_suaeh_dtl to add uoo_id, as part of MUS build bug 2829262
6 --
7
8
9 TYPE r_t_suaeh_dtl IS RECORD
10 ( PERSON_ID IGS_EN_SU_ATTEMPT_H_ALL.PERSON_ID%type,
11 COURSE_CD IGS_EN_SU_ATTEMPT_H_ALL.COURSE_CD%type,
12 UNIT_CD IGS_EN_SU_ATTEMPT_H_ALL.UNIT_CD%type,
13 VERSION_NUMBER IGS_EN_SU_ATTEMPT_H_ALL.VERSION_NUMBER%type,
14 CAL_TYPE IGS_EN_SU_ATTEMPT_H_ALL.CAL_TYPE%type,
15 CI_SEQUENCE_NUMBER IGS_EN_SU_ATTEMPT_H_ALL.CI_SEQUENCE_NUMBER%type,
16 HIST_START_DT IGS_EN_SU_ATTEMPT_H_ALL.HIST_START_DT%type,
17 HIST_END_DT IGS_EN_SU_ATTEMPT_H_ALL.HIST_END_DT%type,
18 HIST_WHO IGS_EN_SU_ATTEMPT_H_ALL.HIST_WHO%type,
19 LOCATION_CD IGS_EN_SU_ATTEMPT_H_ALL.LOCATION_CD%type,
20 UNIT_CLASS IGS_EN_SU_ATTEMPT_H_ALL.UNIT_CLASS%type,
21 ENROLLED_DT IGS_EN_SU_ATTEMPT_H_ALL.ENROLLED_DT%type,
22 UNIT_ATTEMPT_STATUS IGS_EN_SU_ATTEMPT_H_ALL.UNIT_ATTEMPT_STATUS%type,
23 ADMINISTRATIVE_UNIT_STATUS IGS_EN_SU_ATTEMPT_H_ALL.ADMINISTRATIVE_UNIT_STATUS%type,
24 AUS_DESCRIPTION IGS_EN_SU_ATTEMPT_H_ALL.AUS_DESCRIPTION%type,
25 DISCONTINUED_DT IGS_EN_SU_ATTEMPT_H_ALL.DISCONTINUED_DT%type,
26 RULE_WAIVED_DT IGS_EN_SU_ATTEMPT_H_ALL.RULE_WAIVED_DT%type,
27 RULE_WAIVED_PERSON_ID IGS_EN_SU_ATTEMPT_H_ALL.RULE_WAIVED_PERSON_ID%type,
28 NO_ASSESSMENT_IND IGS_EN_SU_ATTEMPT_H_ALL.NO_ASSESSMENT_IND%type,
29 EXAM_LOCATION_CD IGS_EN_SU_ATTEMPT_H_ALL.EXAM_LOCATION_CD%type,
30 ELO_DESCRIPTION IGS_EN_SU_ATTEMPT_H_ALL.ELO_DESCRIPTION%type,
31 SUP_UNIT_CD IGS_EN_SU_ATTEMPT_H_ALL.SUP_UNIT_CD%type,
32 SUP_VERSION_NUMBER IGS_EN_SU_ATTEMPT_H_ALL.SUP_VERSION_NUMBER%type,
33 ALTERNATIVE_TITLE IGS_EN_SU_ATTEMPT_H_ALL.ALTERNATIVE_TITLE%type,
34 OVERRIDE_ENROLLED_CP IGS_EN_SU_ATTEMPT_H_ALL.OVERRIDE_ENROLLED_CP%type,
35 OVERRIDE_EFTSU IGS_EN_SU_ATTEMPT_H_ALL.OVERRIDE_EFTSU%type,
36 OVERRIDE_ACHIEVABLE_CP IGS_EN_SU_ATTEMPT_H_ALL.OVERRIDE_ACHIEVABLE_CP%type,
37 OVERRIDE_OUTCOME_DUE_DT IGS_EN_SU_ATTEMPT_H_ALL.OVERRIDE_OUTCOME_DUE_DT%type,
38 OVERRIDE_CREDIT_REASON IGS_EN_SU_ATTEMPT_H_ALL.OVERRIDE_CREDIT_REASON%type,
39 CREATED_BY IGS_EN_SU_ATTEMPT_H_ALL.CREATED_BY%type,
40 CREATION_DATE IGS_EN_SU_ATTEMPT_H_ALL.CREATION_DATE%type,
41 LAST_UPDATED_BY IGS_EN_SU_ATTEMPT_H_ALL.LAST_UPDATED_BY%type,
42 LAST_UPDATE_DATE IGS_EN_SU_ATTEMPT_H_ALL.LAST_UPDATE_DATE%type,
43 LAST_UPDATE_LOGIN IGS_EN_SU_ATTEMPT_H_ALL.LAST_UPDATE_LOGIN%type,
44 DCNT_REASON_CD IGS_EN_SU_ATTEMPT_H_ALL.DCNT_REASON_CD%type,
45 ORG_ID IGS_EN_SU_ATTEMPT_H_ALL.ORG_ID%type,
46 UOO_ID IGS_EN_SU_ATTEMPT_H_ALL.UOO_ID%type
47 );
48
49
50
51 TYPE t_suaeh_dtl IS TABLE OF r_t_suaeh_dtl
52 INDEX BY BINARY_INTEGER;
53 --
54 --
55 gt_empty_table t_suaeh_dtl;
56 --
57 --
58 gt_suaeh_table t_suaeh_dtl;
59 --
60 --
61 gv_table_index BINARY_INTEGER;
62 --
63 --
64 gv_person_id igs_pe_person.person_id%TYPE;
65 --
66 --
67 gv_course_cd IGS_PS_COURSE.COURSE_CD%TYPE;
68 --
69 --
70 gv_unit_cd IGS_PS_UNIT.UNIT_CD%TYPE;
71 --
72 --
73 gv_effective_dt DATE;
74 --
75 -- Routine to save SUA effective history data in a PL/SQL TABLE.
76 PROCEDURE FINP_GET_SUAEH(
77 p_person_id IN NUMBER ,
78 p_course_cd IN IGS_PS_COURSE.course_cd%TYPE ,
79 p_unit_cd IN IGS_PS_UNIT.unit_cd%TYPE ,
80 p_effective_dt IN DATE ,
81 p_table_index IN OUT NOCOPY BINARY_INTEGER ,
82 p_suaeh_table IN OUT NOCOPY IGS_FI_GET_SUAEH.t_suaeh_dtl)
83 ;
84 END IGS_FI_GET_SUAEH;