The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE beforerowdelete AS
------------------------------------------------------------------
--Created by : SMVK, Oracle India
--Date created: 08-Jan-2002
--
--Purpose: Only planned unit section status are allowed for deletion
--
--
--Known limitations/enhancements and/or remarks:
--
--Change History:
--Who When What
-------------------------------------------------------------------
BEGIN
-- Only planned unit status are allowed for deletion
IF old_references.unit_section_status <> 'PLANNED' THEN
fnd_message.set_name('IGS','IGS_PS_USEC_NO_DEL_ALLOWED');
END beforerowdelete;
SELECT unit_attempt_status
FROM igs_en_su_attempt_all
WHERE uoo_id= cp_n_uoo_id
AND unit_attempt_status NOT IN ('DISCONTIN', 'DROPPED')
AND ROWNUM <2 ;
SELECT 1
FROM igs_en_su_attempt_all
WHERE uoo_id = cp_n_uoo_id
AND ROWNUM < 2 ;
SELECT DISTINCT unit_attempt_status
FROM igs_en_su_attempt_all
WHERE uoo_id = cp_n_uoo_id
AND unit_attempt_status NOT IN ('DISCONTIN','DROPPED','COMPLETED','DUPLICATE');
SELECT a.s_unit_status
FROM igs_ps_unit_stat a,
igs_ps_unit_ver_all b,
igs_ps_unit_ofr_opt_all c
WHERE a.unit_status = b.unit_status
AND b.unit_cd = c.unit_cd
AND b.version_number = c.version_number
AND c.uoo_id = cp_n_uoo_id;
SELECT meaning
FROM igs_lookup_values
WHERE lookup_type = cp_c_lookup_type
AND lookup_code = cp_c_lookup_code
AND enabled_flag = 'Y'
AND NVL(closed_ind,'N') = 'N'
AND SYSDATE BETWEEN NVL(START_DATE_ACTIVE, SYSDATE) AND NVL(END_DATE_ACTIVE,SYSDATE);
PROCEDURE beforerowupdate AS
------------------------------------------------------------------
--Created by : smvk, Oracle India
--Date created: 03-Jan-2003
--
--Purpose: once the unit section status is changed to any other status
-- from planned, then it cannot go back to planned.
--
--
--Known limitations/enhancements and/or remarks:
--
--Change History:
--Who When What
--smvk 30-Dec-2005 Bug #4089230, Modified the procedure to call check_status_transition
-- when the unit section is getting modified.
--sarakshi 26-Jul-2004 Bug#3793607, added validation regarding the unit section status
-------------------------------------------------------------------
BEGIN
-- if the unit section status is getting modified, calling the procedure check_status_transition
-- to check whether the transition is valid.
IF new_references.unit_section_status <> old_references.unit_section_status THEN
check_status_transition( p_n_uoo_id => new_references.uoo_id,
p_c_old_usec_sts => old_references.unit_section_status,
p_c_new_usec_sts => new_references.unit_section_status);
END beforerowupdate;
x_last_update_date IN DATE ,
x_last_updated_by IN NUMBER ,
x_last_update_login IN NUMBER ,
x_org_id IN NUMBER ,
x_ss_enrol_ind IN VARCHAR2 ,
x_dir_enrollment IN NUMBER ,
x_enr_from_wlst IN NUMBER ,
x_inq_not_wlst IN NUMBER ,
x_rev_account_cd IN VARCHAR2 ,
x_anon_unit_grading_ind IN VARCHAR2 ,
x_anon_assess_grading_ind IN VARCHAR2 ,
X_NON_STD_USEC_IND IN VARCHAR2 ,
x_auditable_ind IN VARCHAR2,
x_audit_permission_ind IN VARCHAR2,
x_not_multiple_section_flag IN VARCHAR2,
x_sup_uoo_id IN NUMBER ,
x_relation_type VARCHAR2 ,
x_default_enroll_flag VARCHAR2,
x_abort_flag VARCHAR2
) AS
/*************************************************************
Created By : kdande@in
Date Created By :2000/05/11
Purpose :
Know limitations, enhancements or remarks
Change History
Who When What
vvutukur 05-Aug-2003 Enh#3045069.PSP Enh Build. Added column not_multiple_section_flag.
shtatiko 06-NOV-2001 Added auditable_ind and audit_permission_ind as part of Bug# 2636716.
rgangara 07-May-2001 Added ss_enrol_ind Col
(reverse chronological order - newest change first)
***************************************************************/
CURSOR cur_old_ref_values IS
SELECT *
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE rowid = x_rowid;
IF (cur_old_ref_values%NOTFOUND) AND (p_action NOT IN ('INSERT','VALIDATE_INSERT')) THEN
Close cur_old_ref_values;
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
IF (p_action = 'UPDATE') THEN
new_references.creation_date := old_references.creation_date;
new_references.last_update_date := x_last_update_date;
new_references.last_updated_by := x_last_updated_by;
new_references.last_update_login := x_last_update_login;
PROCEDURE BeforeRowInsertUpdateDelete1(
p_inserting IN BOOLEAN ,
p_updating IN BOOLEAN ,
p_deleting IN BOOLEAN
) AS
v_unit_cd IGS_PS_UNIT_OFR_OPT_ALL.unit_cd%TYPE;
IF (p_inserting OR p_updating) AND
( NVL(new_references.non_std_usec_ind,'N') = 'Y' AND
new_references.unit_section_start_date IS NULL
)THEN
fnd_message.set_name ('IGS','IGS_EN_OFFSET_DT_NULL');
ELSE -- p_inserting or p_updating
v_unit_cd := new_references.unit_cd;
IF p_inserting THEN
-- Validate calendar type.
-- As part of the bug# 1956374 changed to the below call from IGS_PS_VAL_UOo.crsp_val_uo_cal_type
IF IGS_AS_VAL_UAI.crsp_val_uo_cal_type (
new_references.cal_type,
v_message_name) = FALSE THEN
Fnd_Message.Set_Name('IGS','IGS_PS_UOO_UAI_CANNOT_CREATE');
IF p_inserting OR p_updating THEN
-- Validate grading schema.
IF IGS_AS_VAL_GSG.assp_val_gs_cur_fut (
new_references.grading_schema_cd,
new_references.gs_version_number,
v_message_name) = FALSE THEN
Fnd_Message.Set_Name('IGS',v_message_name);
IF p_inserting or p_updating THEN
IF NOT (new_references.ss_enrol_ind = 'Y' or new_references.ivrs_available_ind = 'Y') THEN
Fnd_Message.Set_Name('IGS','IGS_PS_ONE_UNIT_ENR_MTHD');
END BeforeRowInsertUpdateDelete1;
SELECT load_cal_type,load_ci_sequence_number
FROM igs_ca_teach_to_load_v
WHERE teach_cal_type=cp_cal_type
AND teach_ci_sequence_number=cp_sequence_number;
SELECT teach_cal_type,teach_ci_sequence_number
FROM igs_ca_load_to_teach_v
WHERE load_cal_type=cp_cal_type
AND load_ci_sequence_number=cp_sequence_number;
SELECT 'X'
FROM igs_ps_unit_ofr_opt_all
WHERE cal_type=cp_cal_type
AND ci_sequence_number=cp_sequence_number
AND call_number=p_call_number
AND (rowid <> p_rowid OR (p_rowid IS NULL))
AND ROWNUM = 1;
SELECT 'x' FROM hz_parties hp,igs_pe_hz_parties pe
WHERE hp.party_id = pe.party_id
AND pe.oss_org_unit_cd =new_references.owner_org_unit_cd;
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
fnd_message.set_name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
Fnd_Message.Set_Name ('FND', 'FORM_RECORD_DELETED');
SELECT call_number
FROM igs_ps_usec_cal_nums a,
igs_ca_teach_to_load_v b
WHERE a.calender_type = b.load_cal_type AND
a.ci_sequence_number = b.load_ci_sequence_number AND
b.teach_cal_type = cp_c_cal_type AND
b.teach_ci_sequence_number = cp_n_seq_num
FOR UPDATE OF call_number;
SELECT MAX(call_number)
FROM igs_ps_usec_cal_nums a,
igs_ca_teach_to_load_v b
WHERE a.calender_type = b.load_cal_type AND
a.ci_sequence_number = b.load_ci_sequence_number AND
b.teach_cal_type = cp_c_cal_type AND
b.teach_ci_sequence_number = cp_n_seq_num;
SELECT rowid ROW_ID, unit_section_call_number_id call_id
FROM igs_ps_usec_cal_nums
WHERE calender_type = cp_cal_type AND
ci_sequence_number = cp_seq_num;
SELECT load_cal_type lcal_type, load_ci_sequence_number lseq_num
FROM igs_ca_teach_to_load_v
WHERE
teach_cal_type = cp_cal_type AND
teach_ci_sequence_number = cp_seq_num;
igs_ps_usec_cal_nums_pkg.update_row( x_mode => 'R',
x_rowid => rec_call_number.row_id,
x_unit_section_call_number_id => rec_call_number.call_id,
x_calender_type => rec_teach_to_load.lcal_type,
x_ci_sequence_number => rec_teach_to_load.lseq_num,
x_call_number => l_n_max_cal_num);
igs_ps_usec_cal_nums_pkg.insert_row ( x_rowid => l_c_rowid,
x_unit_section_call_number_id => l_n_usc_number_id,
x_calender_type => rec_teach_to_load.lcal_type,
x_ci_sequence_number => rec_teach_to_load.lseq_num,
x_call_number => l_n_max_cal_num,
x_mode => 'R' );
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE sup_uoo_id=x_uoo_id;
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE unit_cd = x_unit_cd
AND version_number = x_version_number
AND cal_type = x_cal_type
AND ci_sequence_number = x_ci_sequence_number
AND location_cd = x_location_cd
AND unit_class = x_unit_class
FOR UPDATE NOWAIT;
SELECT unit_section_status
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE unit_cd = x_unit_cd
AND version_number = x_version_number
AND cal_type = x_cal_type
AND ci_sequence_number = x_ci_sequence_number
AND location_cd = x_location_cd
AND unit_class = x_unit_class;
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE uoo_id = x_uoo_id
AND (l_rowid IS NULL OR rowid <> l_rowid)
FOR UPDATE NOWAIT;
SELECT unit_section_status
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE uoo_id = x_uoo_id
AND (l_rowid IS NULL OR rowid <> l_rowid);
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE grading_schema_cd = x_grading_schema_cd
AND gs_version_number = x_version_number ;
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE location_cd = x_location_cd ;
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE unit_contact = x_person_id ;
SELECT rowid
FROM IGS_PS_UNIT_OFR_OPT_ALL
WHERE unit_cd = x_unit_cd
AND version_number = x_version_number
AND cal_type = x_cal_type
AND ci_sequence_number = x_ci_sequence_number ;
x_last_update_date IN DATE ,
x_last_updated_by IN NUMBER ,
x_last_update_login IN NUMBER ,
x_org_id IN NUMBER ,
x_ss_enrol_ind IN VARCHAR2 ,
x_dir_enrollment IN NUMBER ,
x_enr_from_wlst IN NUMBER ,
x_inq_not_wlst IN NUMBER ,
x_rev_account_cd IN VARCHAR2 ,
x_anon_unit_grading_ind IN VARCHAR2 ,
x_anon_assess_grading_ind IN VARCHAR2 ,
X_NON_STD_USEC_IND IN VARCHAR2,
x_auditable_ind IN VARCHAR2,
x_audit_permission_ind IN VARCHAR2,
x_not_multiple_section_flag IN VARCHAR2,
x_sup_uoo_id IN NUMBER ,
x_relation_type VARCHAR2 ,
x_default_enroll_flag VARCHAR2,
x_abort_flag VARCHAR2
) AS
/*************************************************************
Created By : kdande@in
Date Created By : 2000/05/11
Purpose :
Know limitations, enhancements or remarks
Change History
Who When What
smvk 21-Jul-2004 Bug # 3765800. Adding billing_hrs.
sarakshi 12-Apr-2004 Bug#3555871, call_number function is only called for profile option of USER_DEFINED
vvutukur 05-Aug-2003 Enh#3045069.PSP Enh Build. Added column not_multiple_section_flag.
shtatiko 06-NOV-2002 bug# 2616716, Added auditable_ind and audit_permission_ind columns
sarakshi 18-Sep-2002 bug#2563596, added check for cal type associated to a load cal
msrinivi 17-Aug-2001 Added new col rev_account_cd bug 1882122
rgangara 07-May-2001 Added ss_enrol_ind column
(reverse chronological order - newest change first)
***************************************************************/
--Bug#2563596,Check that teach calendar is associated to a load calendar
CURSOR cur_teach_to_load(cp_cal_type igs_ca_teach_to_load_v.teach_cal_type%TYPE,
cp_sequence_number igs_ca_teach_to_load_v.teach_ci_sequence_number%TYPE)
IS
SELECT load_cal_type,load_ci_sequence_number
FROM igs_ca_teach_to_load_v
WHERE teach_cal_type=cp_cal_type
AND teach_ci_sequence_number=cp_sequence_number;
SELECT ucp.rowid,ucp.*
FROM igs_ps_usec_cps ucp
WHERE ucp.uoo_id= cp_c_uoo_id
AND ucp.billing_credit_points IS NOT NULL;
x_last_update_date,
x_last_updated_by,
x_last_update_login,
x_org_id,
x_ss_enrol_ind,
x_dir_enrollment,
x_enr_from_wlst,
x_inq_not_wlst,
x_rev_account_cd,
x_anon_unit_grading_ind,
x_anon_assess_grading_ind,
x_non_std_usec_ind,
x_auditable_ind,
x_audit_permission_ind,
x_not_multiple_section_flag,
x_sup_uoo_id ,
x_relation_type ,
x_default_enroll_flag,
x_abort_flag
);
IF (p_action = 'INSERT') THEN
-- Call all the procedures related to Before Insert.
BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE,p_updating=>FALSE,p_deleting=>FALSE );
ELSIF (p_action = 'UPDATE') THEN
-- Call all the procedures related to Before Update.
beforerowupdate;
BeforeRowInsertUpdateDelete1 ( p_inserting => FALSE,p_updating=>TRUE,p_deleting=>FALSE );
igs_ps_usec_cps_pkg.update_row(
x_rowid =>l_c_audit_credit.rowid,
x_unit_sec_credit_points_id =>l_c_audit_credit.unit_sec_credit_points_id,
x_uoo_id =>l_c_audit_credit.uoo_id,
x_minimum_credit_points =>l_c_audit_credit.minimum_credit_points,
x_maximum_credit_points =>l_c_audit_credit.maximum_credit_points,
x_variable_increment =>l_c_audit_credit.variable_increment,
x_lecture_credit_points =>l_c_audit_credit.lecture_credit_points,
x_lab_credit_points =>l_c_audit_credit.lab_credit_points,
x_other_credit_points =>l_c_audit_credit.other_credit_points,
x_clock_hours =>l_c_audit_credit.clock_hours,
x_work_load_cp_lecture =>l_c_audit_credit.work_load_cp_lecture,
x_work_load_cp_lab =>l_c_audit_credit.work_load_cp_lab,
x_continuing_education_units =>l_c_audit_credit.continuing_education_units,
x_work_load_other =>l_c_audit_credit.work_load_other,
x_contact_hrs_lecture =>l_c_audit_credit.contact_hrs_lecture,
x_contact_hrs_lab =>l_c_audit_credit.contact_hrs_lab,
x_contact_hrs_other =>l_c_audit_credit.contact_hrs_other,
x_non_schd_required_hrs =>l_c_audit_credit.non_schd_required_hrs,
x_exclude_from_max_cp_limit =>l_c_audit_credit.exclude_from_max_cp_limit,
x_mode =>'R',
x_claimable_hours =>l_c_audit_credit.claimable_hours,
x_achievable_credit_points =>l_c_audit_credit.achievable_credit_points,
x_enrolled_credit_points =>l_c_audit_credit.enrolled_credit_points,
x_billing_credit_points =>NULL,
x_billing_hrs => l_c_audit_credit.billing_hrs
);
ELSIF (p_action = 'DELETE') THEN
-- Call all the procedures related to Before Delete.
beforerowdelete;
BeforeRowInsertUpdateDelete1 ( p_inserting => FALSE,p_updating=>FALSE,p_deleting=>TRUE);
ELSIF (p_action = 'VALIDATE_INSERT') THEN
IF Get_PK_For_Validation (New_References.unit_cd,
New_References.version_number,
New_References.cal_type,
New_References.ci_sequence_number,
New_References.location_cd,
New_References.unit_class) THEN
Fnd_Message.Set_Name ('IGS', 'IGS_GE_MULTI_ORG_DUP_REC');
ELSIF (p_action = 'VALIDATE_UPDATE') THEN
beforerowupdate;
ELSIF (p_action = 'VALIDATE_DELETE') THEN
beforerowdelete;
IF p_action IN ( 'INSERT', 'VALIDATE_INSERT') THEN
--Bug#2563596,Check that teach calendar is associated to a load calendar
OPEN cur_teach_to_load(x_cal_type,x_ci_sequence_number);
ELSIF p_action IN ('UPDATE','VALIDATE_UPDATE') THEN
IF ((old_references.call_number = new_references.call_number) OR
(new_references.call_number IS NULL)) THEN
NULL;
Purpose : Inserts into table IGS_PS_USEC_REF values inherited from igs_ps_unit_ver and IGS_PS_USEC_REF_CD
: mandatory ref code types for unit_section with default ref code id's for the current uoo_id
: at unit_section level
Known limitations, enhancements or remarks:
Change History :
Who When What
stutta 14-May-2004 Passing 'N' as default value for X_CLASS_SCHED_EXCLUSION_FLAG in call
to igs_ps_usec_ref_pkg.INSERT_ROW
*************************************************************************/
CURSOR c_igs_ge_ref_cd_type
IS
SELECT
reference_cd_type
FROM
igs_ge_ref_cd_type
WHERE
mandatory_flag ='Y'
AND
unit_section_flag ='Y'
AND
restricted_flag='Y'
AND
closed_ind = 'N';
SELECT
reference_cd_type,reference_cd,description
FROM
igs_ge_ref_cd
WHERE
reference_cd_type = p_c_reference_cd_type
AND
default_flag = 'Y';
SELECT
SHORT_TITLE,
SUBTITLE_MODIFIABLE_FLAG,
RECORD_EXCLUSION_FLAG ,
TITLE ,
SUBTITLE_ID ,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1 ,
ATTRIBUTE2 ,
ATTRIBUTE3 ,
ATTRIBUTE4 ,
ATTRIBUTE5 ,
ATTRIBUTE6 ,
ATTRIBUTE7 ,
ATTRIBUTE8 ,
ATTRIBUTE9 ,
ATTRIBUTE10 ,
ATTRIBUTE11 ,
ATTRIBUTE12 ,
ATTRIBUTE13 ,
ATTRIBUTE14 ,
ATTRIBUTE15 ,
ATTRIBUTE16 ,
ATTRIBUTE17 ,
ATTRIBUTE18 ,
ATTRIBUTE19 ,
ATTRIBUTE20
FROM
igs_ps_unit_ofr_opt_all uoo,
igs_ps_unit_ver uv
WHERE
uv.unit_cd = uoo.unit_cd
AND
uv.version_number = uoo.version_number
AND
uoo.uoo_id = p_n_uoo_id;
igs_ps_usec_ref_pkg.INSERT_ROW (
X_ROWID => l_c_rowid1,
X_UNIT_SECTION_REFERENCE_ID => ln_usec_ref_id,
X_UOO_ID => p_n_uoo_id,
X_CLASS_SCHED_EXCLUSION_FLAG => 'N',
X_SHORT_TITLE => cur_igs_ps_unit_ver.Short_title,
X_SUBTITLE => NULL ,
X_SUBTITLE_MODIFIABLE_FLAG => cur_igs_ps_unit_ver.Subtitle_modifiable_flag,
X_REGISTRATION_EXCLUSION_FLAG => NULL ,
X_RECORD_EXCLUSION_FLAG => cur_igs_ps_unit_ver.Record_exclusion_flag ,
X_TITLE => cur_igs_ps_unit_ver.Title ,
X_SUBTITLE_ID => cur_igs_ps_unit_ver.Subtitle_id,
X_ATTRIBUTE_CATEGORY => cur_igs_ps_unit_ver.Attribute_category,
X_ATTRIBUTE1 => cur_igs_ps_unit_ver.Attribute1 ,
X_ATTRIBUTE2 => cur_igs_ps_unit_ver.Attribute2 ,
X_ATTRIBUTE3 => cur_igs_ps_unit_ver.Attribute3 ,
X_ATTRIBUTE4 => cur_igs_ps_unit_ver.Attribute4 ,
X_ATTRIBUTE5 => cur_igs_ps_unit_ver.Attribute5 ,
X_ATTRIBUTE6 => cur_igs_ps_unit_ver.Attribute6 ,
X_ATTRIBUTE7 => cur_igs_ps_unit_ver.Attribute7 ,
X_ATTRIBUTE8 => cur_igs_ps_unit_ver.Attribute8 ,
X_ATTRIBUTE9 => cur_igs_ps_unit_ver.Attribute9 ,
X_ATTRIBUTE10 => cur_igs_ps_unit_ver.Attribute10 ,
X_ATTRIBUTE11 => cur_igs_ps_unit_ver.Attribute11 ,
X_ATTRIBUTE12 => cur_igs_ps_unit_ver.Attribute12 ,
X_ATTRIBUTE13 => cur_igs_ps_unit_ver.Attribute13 ,
X_ATTRIBUTE14 => cur_igs_ps_unit_ver.Attribute14 ,
X_ATTRIBUTE15 => cur_igs_ps_unit_ver.Attribute15 ,
X_ATTRIBUTE16 => cur_igs_ps_unit_ver.Attribute16 ,
X_ATTRIBUTE17 => cur_igs_ps_unit_ver.Attribute17 ,
X_ATTRIBUTE18 => cur_igs_ps_unit_ver.Attribute18 ,
X_ATTRIBUTE19 => cur_igs_ps_unit_ver.Attribute19 ,
X_ATTRIBUTE20 => cur_igs_ps_unit_ver.Attribute20 ,
X_MODE => 'R'
);
igs_ps_usec_ref_cd_pkg.INSERT_ROW (
X_ROWID => l_c_rowid2,
X_UNIT_SECTION_REFERENCE_CD_ID => ln_usec_ref_cd_id,
X_UNIT_SECTION_REFERENCE_ID => ln_usec_ref_id,
X_MODE => 'R',
x_reference_code_type => cur_igs_ge_ref_cd.reference_cd_type,
x_reference_code => cur_igs_ge_ref_cd.reference_cd,
x_reference_code_desc => cur_igs_ge_ref_cd.description
);
SELECT uoo_id
FROM
IGS_PS_UNIT_OFR_OPT
WHERE
row_id = x_rowid;
IF (p_action = 'INSERT') THEN
l_rowid:=NULL;
procedure INSERT_ROW (
X_ROWID in out NOCOPY VARCHAR2,
x_UNIT_CD IN VARCHAR2,
x_VERSION_NUMBER IN NUMBER,
x_CAL_TYPE IN VARCHAR2,
x_CI_SEQUENCE_NUMBER IN NUMBER,
x_LOCATION_CD IN VARCHAR2,
x_UNIT_CLASS IN VARCHAR2,
x_UOO_ID IN NUMBER,
x_IVRS_AVAILABLE_IND IN VARCHAR2,
x_CALL_NUMBER IN OUT NOCOPY NUMBER,
x_UNIT_SECTION_STATUS IN VARCHAR2,
x_UNIT_SECTION_START_DATE IN DATE,
x_UNIT_SECTION_END_DATE IN DATE,
x_ENROLLMENT_ACTUAL IN NUMBER,
x_WAITLIST_ACTUAL IN NUMBER,
x_OFFERED_IND IN VARCHAR2,
x_STATE_FINANCIAL_AID IN VARCHAR2,
x_GRADING_SCHEMA_PRCDNCE_IND IN VARCHAR2,
x_FEDERAL_FINANCIAL_AID IN VARCHAR2,
x_UNIT_QUOTA IN NUMBER,
x_UNIT_QUOTA_RESERVED_PLACES IN NUMBER,
x_INSTITUTIONAL_FINANCIAL_AID IN VARCHAR2,
x_UNIT_CONTACT IN NUMBER,
x_GRADING_SCHEMA_CD IN VARCHAR2,
x_GS_VERSION_NUMBER IN NUMBER,
x_owner_org_unit_cd IN VARCHAR2 ,
x_attendance_required_ind IN VARCHAR2 ,
x_reserved_seating_allowed IN VARCHAR2 ,
x_special_permission_ind IN VARCHAR2 ,
x_ss_display_ind IN VARCHAR2 ,
X_MODE in VARCHAR2 ,
x_org_id IN NUMBER,
x_ss_enrol_ind IN VARCHAR2 ,
x_dir_enrollment IN NUMBER ,
x_enr_from_wlst IN NUMBER ,
x_inq_not_wlst IN NUMBER ,
x_rev_account_cd IN VARCHAR2 ,
x_anon_unit_grading_ind IN VARCHAR2 ,
x_anon_assess_grading_ind IN VARCHAR2 ,
X_NON_STD_USEC_IND IN VARCHAR2 ,
x_auditable_ind IN VARCHAR2,
x_audit_permission_ind IN VARCHAR2,
x_not_multiple_section_flag IN VARCHAR2,
x_sup_uoo_id IN NUMBER ,
x_relation_type VARCHAR2 ,
x_default_enroll_flag VARCHAR2,
x_abort_flag VARCHAR2
) AS
/*************************************************************
Created By : kdande@in
Date Created By : 2000/05/11
Purpose :
Know limitations, enhancements or remarks
Change History
Who When What
vvutukur 05-Aug-2003 Enh#3045069.PSP Enh Build. Added column not_multiple_section_flag.
shtatiko 06-NOV-2002 Added auditable_ind and audit_permission_ind as part of Bug# 2636716
sbaliga 13-feb-2002 Assigned igs_ge_gen_003.get_org_id to x_org_id in call to before_dml
as part of SWCR006 build.
rgangara 07-May-2001 Ss_enrol_ind column added
(reverse chronological order - newest change first)
***************************************************************/
cursor C is select ROWID from IGS_PS_UNIT_OFR_OPT_ALL
where UNIT_CD = X_UNIT_CD
and VERSION_NUMBER = X_VERSION_NUMBER
and LOCATION_CD = X_LOCATION_CD
and UNIT_CLASS = X_UNIT_CLASS
and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
and CAL_TYPE = X_CAL_TYPE;
X_LAST_UPDATE_DATE DATE;
X_LAST_UPDATED_BY NUMBER;
X_LAST_UPDATE_LOGIN NUMBER;
X_PROGRAM_UPDATE_DATE DATE;
X_LAST_UPDATE_DATE := SYSDATE;
X_LAST_UPDATED_BY := 1;
X_LAST_UPDATE_LOGIN := 0;
X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if X_LAST_UPDATED_BY is NULL then
X_LAST_UPDATED_BY := -1;
X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if X_LAST_UPDATE_LOGIN is NULL then
X_LAST_UPDATE_LOGIN := -1;
X_PROGRAM_UPDATE_DATE := NULL;
X_PROGRAM_UPDATE_DATE := SYSDATE;
p_action=>'INSERT',
x_rowid=>X_ROWID,
x_unit_cd=>X_UNIT_CD,
x_version_number=>X_VERSION_NUMBER,
x_cal_type=>X_CAL_TYPE,
x_ci_sequence_number=>X_CI_SEQUENCE_NUMBER,
x_location_cd=>X_LOCATION_CD,
x_unit_class=>X_UNIT_CLASS,
x_uoo_id=>X_UOO_ID,
x_ivrs_available_ind=>NVL(X_IVRS_AVAILABLE_IND,'Y' ),
x_call_number=>X_CALL_NUMBER,
x_unit_section_status=>X_UNIT_SECTION_STATUS,
x_unit_section_start_date=>X_UNIT_SECTION_START_DATE,
x_unit_section_end_date=>X_UNIT_SECTION_END_DATE,
x_enrollment_actual=>X_ENROLLMENT_ACTUAL,
x_waitlist_actual=>X_WAITLIST_ACTUAL,
x_offered_ind=>NVL(X_OFFERED_IND,'Y' ),
x_state_financial_aid=>X_STATE_FINANCIAL_AID,
x_grading_schema_prcdnce_ind=>NVL(X_GRADING_SCHEMA_PRCDNCE_IND,'N' ),
x_federal_financial_aid=>X_FEDERAL_FINANCIAL_AID,
x_unit_quota=>X_UNIT_QUOTA,
x_unit_quota_reserved_places=>X_UNIT_QUOTA_RESERVED_PLACES,
x_institutional_financial_aid=>X_INSTITUTIONAL_FINANCIAL_AID,
x_unit_contact=>X_UNIT_CONTACT,
x_grading_schema_cd=>X_GRADING_SCHEMA_CD,
x_gs_version_number=>X_GS_VERSION_NUMBER,
x_owner_org_unit_cd =>X_OWNER_ORG_UNIT_CD,
x_attendance_required_ind =>NVL(X_ATTENDANCE_REQUIRED_IND,'N'),
x_reserved_seating_allowed =>NVL(X_RESERVED_SEATING_ALLOWED,'Y'),
x_special_permission_ind => NVL(X_SPECIAL_PERMISSION_IND,'N'),
x_ss_display_ind => NVL(X_SS_DISPLAY_IND,'N'),
x_creation_date=>X_LAST_UPDATE_DATE,
x_created_by=>X_LAST_UPDATED_BY,
x_last_update_date=>X_LAST_UPDATE_DATE,
x_last_updated_by=>X_LAST_UPDATED_BY,
x_last_update_login=>X_LAST_UPDATE_LOGIN,
x_org_id=>igs_ge_gen_003.get_org_id,
x_ss_enrol_ind => X_SS_ENROL_IND,
x_dir_enrollment =>X_DIR_ENROLLMENT,
x_enr_from_wlst =>X_ENR_FROM_WLST ,
x_inq_not_wlst =>X_INQ_NOT_WLST,
x_rev_account_cd => x_rev_account_cd ,
x_anon_unit_grading_ind => x_anon_unit_grading_ind,
x_anon_assess_grading_ind => x_anon_assess_grading_ind,
x_non_std_usec_ind => x_non_std_usec_ind,
x_auditable_ind => x_auditable_ind,
x_audit_permission_ind => x_audit_permission_ind,
x_not_multiple_section_flag => x_not_multiple_section_flag,
x_sup_uoo_id => x_sup_uoo_id ,
x_relation_type => x_relation_type ,
x_default_enroll_flag => x_default_enroll_flag,
x_abort_flag => x_abort_flag
);
insert into IGS_PS_UNIT_OFR_OPT_ALL (
UNIT_CD
,VERSION_NUMBER
,CAL_TYPE
,CI_SEQUENCE_NUMBER
,LOCATION_CD
,UNIT_CLASS
,UOO_ID
,IVRS_AVAILABLE_IND
,CALL_NUMBER
,UNIT_SECTION_STATUS
,UNIT_SECTION_START_DATE
,UNIT_SECTION_END_DATE
,ENROLLMENT_ACTUAL
,WAITLIST_ACTUAL
,OFFERED_IND
,STATE_FINANCIAL_AID
,GRADING_SCHEMA_PRCDNCE_IND
,FEDERAL_FINANCIAL_AID
,UNIT_QUOTA
,UNIT_QUOTA_RESERVED_PLACES
,INSTITUTIONAL_FINANCIAL_AID
,UNIT_CONTACT
,GRADING_SCHEMA_CD
,GS_VERSION_NUMBER
,owner_org_unit_cd
,attendance_required_ind
,reserved_seating_allowed
,special_permission_ind
,ss_display_ind
,CREATION_DATE
,CREATED_BY
,LAST_UPDATE_DATE
,LAST_UPDATED_BY
,LAST_UPDATE_LOGIN
,REQUEST_ID
,PROGRAM_ID
,PROGRAM_APPLICATION_ID
,PROGRAM_UPDATE_DATE
,ORG_ID
,SS_ENROL_IND
,DIR_ENROLLMENT
,ENR_FROM_WLST
,INQ_NOT_WLST
,rev_account_cd
,anon_unit_grading_ind
,anon_assess_grading_ind
,non_std_usec_ind,
auditable_ind,
audit_permission_ind,
not_multiple_section_flag,
sup_uoo_id,
relation_type,
default_enroll_flag,
abort_flag
) values (
NEW_REFERENCES.UNIT_CD
,NEW_REFERENCES.VERSION_NUMBER
,NEW_REFERENCES.CAL_TYPE
,NEW_REFERENCES.CI_SEQUENCE_NUMBER
,NEW_REFERENCES.LOCATION_CD
,NEW_REFERENCES.UNIT_CLASS
,NEW_REFERENCES.UOO_ID
,NEW_REFERENCES.IVRS_AVAILABLE_IND
,x_call_number
,NEW_REFERENCES.UNIT_SECTION_STATUS
,NEW_REFERENCES.UNIT_SECTION_START_DATE
,NEW_REFERENCES.UNIT_SECTION_END_DATE
,NEW_REFERENCES.ENROLLMENT_ACTUAL
,NEW_REFERENCES.WAITLIST_ACTUAL
,NEW_REFERENCES.OFFERED_IND
,NEW_REFERENCES.STATE_FINANCIAL_AID
,NEW_REFERENCES.GRADING_SCHEMA_PRCDNCE_IND
,NEW_REFERENCES.FEDERAL_FINANCIAL_AID
,NEW_REFERENCES.UNIT_QUOTA
,NEW_REFERENCES.UNIT_QUOTA_RESERVED_PLACES
,NEW_REFERENCES.INSTITUTIONAL_FINANCIAL_AID
,NEW_REFERENCES.UNIT_CONTACT
,NEW_REFERENCES.GRADING_SCHEMA_CD
,NEW_REFERENCES.GS_VERSION_NUMBER
,NEW_REFERENCES.owner_org_unit_cd
,NEW_REFERENCES.attendance_required_ind
,NEW_REFERENCES.reserved_seating_allowed
,NEW_REFERENCES.special_permission_ind
,NEW_REFERENCES.ss_display_ind
,X_LAST_UPDATE_DATE
,X_LAST_UPDATED_BY
,X_LAST_UPDATE_DATE
,X_LAST_UPDATED_BY
,X_LAST_UPDATE_LOGIN
,X_REQUEST_ID
,X_PROGRAM_ID
,X_PROGRAM_APPLICATION_ID
,X_PROGRAM_UPDATE_DATE
,NEW_REFERENCES.ORG_ID
,NEW_REFERENCES.SS_ENROL_IND
,NEW_REFERENCES.DIR_ENROLLMENT
,NEW_REFERENCES.ENR_FROM_WLST
,NEW_REFERENCES.INQ_NOT_WLST
,new_references.rev_account_cd
,new_references.anon_unit_grading_ind
,new_references.anon_assess_grading_ind
,new_references.non_std_usec_ind,
new_references.auditable_ind,
new_references.audit_permission_ind,
new_references.not_multiple_section_flag,
new_references.sup_uoo_id,
new_references.relation_type,
new_references.default_enroll_flag,
new_references.abort_flag
);
p_action => 'INSERT' ,
x_rowid => X_ROWID
);
end INSERT_ROW;
cursor c1 is select
UOO_ID
, IVRS_AVAILABLE_IND
, CALL_NUMBER
, UNIT_SECTION_STATUS
, UNIT_SECTION_START_DATE
, UNIT_SECTION_END_DATE
, ENROLLMENT_ACTUAL
, WAITLIST_ACTUAL
, OFFERED_IND
, STATE_FINANCIAL_AID
, GRADING_SCHEMA_PRCDNCE_IND
, FEDERAL_FINANCIAL_AID
, UNIT_QUOTA
, UNIT_QUOTA_RESERVED_PLACES
, INSTITUTIONAL_FINANCIAL_AID
, UNIT_CONTACT
, GRADING_SCHEMA_CD
, GS_VERSION_NUMBER
, OWNER_ORG_UNIT_CD
, ATTENDANCE_REQUIRED_IND
, RESERVED_SEATING_ALLOWED
, SPECIAL_PERMISSION_IND
, SS_DISPLAY_IND
, SS_ENROL_IND
, DIR_ENROLLMENT
, ENR_FROM_WLST
, INQ_NOT_WLST
, rev_account_cd
, anon_unit_grading_ind
, anon_assess_grading_ind
, NON_STD_USEC_IND,
auditable_ind,
audit_permission_ind,
not_multiple_section_flag,
sup_uoo_id,
relation_type,
default_enroll_flag,
abort_flag
from IGS_PS_UNIT_OFR_OPT_ALL
where ROWID = X_ROWID
for update nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
Procedure UPDATE_ROW (
X_ROWID in VARCHAR2,
x_UNIT_CD IN VARCHAR2,
x_VERSION_NUMBER IN NUMBER,
x_CAL_TYPE IN VARCHAR2,
x_CI_SEQUENCE_NUMBER IN NUMBER,
x_LOCATION_CD IN VARCHAR2,
x_UNIT_CLASS IN VARCHAR2,
x_UOO_ID IN NUMBER,
x_IVRS_AVAILABLE_IND IN VARCHAR2,
x_CALL_NUMBER IN NUMBER,
x_UNIT_SECTION_STATUS IN VARCHAR2,
x_UNIT_SECTION_START_DATE IN DATE,
x_UNIT_SECTION_END_DATE IN DATE,
x_ENROLLMENT_ACTUAL IN NUMBER,
x_WAITLIST_ACTUAL IN NUMBER,
x_OFFERED_IND IN VARCHAR2,
x_STATE_FINANCIAL_AID IN VARCHAR2,
x_GRADING_SCHEMA_PRCDNCE_IND IN VARCHAR2,
x_FEDERAL_FINANCIAL_AID IN VARCHAR2,
x_UNIT_QUOTA IN NUMBER,
x_UNIT_QUOTA_RESERVED_PLACES IN NUMBER,
x_INSTITUTIONAL_FINANCIAL_AID IN VARCHAR2,
x_UNIT_CONTACT IN NUMBER,
x_GRADING_SCHEMA_CD IN VARCHAR2,
x_GS_VERSION_NUMBER IN NUMBER,
x_owner_org_unit_cd IN VARCHAR2 ,
x_attendance_required_ind IN VARCHAR2 ,
x_reserved_seating_allowed IN VARCHAR2 ,
x_special_permission_ind IN VARCHAR2 ,
x_ss_display_ind IN VARCHAR2 ,
X_MODE in VARCHAR2 ,
x_ss_enrol_ind IN VARCHAR2 ,
x_dir_enrollment IN NUMBER ,
x_enr_from_wlst IN NUMBER ,
x_inq_not_wlst IN NUMBER ,
x_rev_account_cd IN VARCHAR2 ,
x_anon_unit_grading_ind IN VARCHAR2 ,
x_anon_assess_grading_ind IN VARCHAR2 ,
X_NON_STD_USEC_IND IN VARCHAR2,
x_auditable_ind IN VARCHAR2,
x_audit_permission_ind IN VARCHAR2,
x_not_multiple_section_flag IN VARCHAR2,
x_sup_uoo_id IN NUMBER ,
x_relation_type VARCHAR2 ,
x_default_enroll_flag VARCHAR2,
x_abort_flag VARCHAR2
) AS
/*************************************************************
Created By : kdande@in
Date Created By : 2000/05/11
Purpose :
Know limitations, enhancements or remarks
Change History
Who When What
bdeviset 03-MAY-2006 Bug# 5204703. Modified the if condition for calling
'Enroll Students From Waitlist Process' CP.
vvutukur 05-Aug-2003 Enh#3045069.PSP Enh Build. Added column not_multiple_section_flag.
shtatiko 06-NOV-2002 Added auditable_ind and audit_permission_ind as part of Bug# 2636716.
(reverse chronological order - newest change first)
***************************************************************/
X_LAST_UPDATE_DATE DATE;
X_LAST_UPDATED_BY NUMBER;
X_LAST_UPDATE_LOGIN NUMBER;
X_PROGRAM_UPDATE_DATE DATE;
X_LAST_UPDATE_DATE := SYSDATE;
X_LAST_UPDATED_BY := 1;
X_LAST_UPDATE_LOGIN := 0;
X_LAST_UPDATED_BY := FND_GLOBAL.USER_ID;
if X_LAST_UPDATED_BY is NULL then
X_LAST_UPDATED_BY := -1;
X_LAST_UPDATE_LOGIN :=FND_GLOBAL.LOGIN_ID;
if X_LAST_UPDATE_LOGIN is NULL then
X_LAST_UPDATE_LOGIN := -1;
p_action=>'UPDATE',
x_rowid=>X_ROWID,
x_unit_cd=>X_UNIT_CD,
x_version_number=>X_VERSION_NUMBER,
x_cal_type=>X_CAL_TYPE,
x_ci_sequence_number=>X_CI_SEQUENCE_NUMBER,
x_location_cd=>X_LOCATION_CD,
x_unit_class=>X_UNIT_CLASS,
x_uoo_id=>X_UOO_ID,
x_ivrs_available_ind=>NVL(X_IVRS_AVAILABLE_IND,'Y' ),
x_call_number=>X_CALL_NUMBER,
x_unit_section_status=>X_UNIT_SECTION_STATUS,
x_unit_section_start_date=>X_UNIT_SECTION_START_DATE,
x_unit_section_end_date=>X_UNIT_SECTION_END_DATE,
x_enrollment_actual=>X_ENROLLMENT_ACTUAL,
x_waitlist_actual=>X_WAITLIST_ACTUAL,
x_offered_ind=>NVL(X_OFFERED_IND,'Y' ),
x_state_financial_aid=>X_STATE_FINANCIAL_AID,
x_grading_schema_prcdnce_ind=>NVL(X_GRADING_SCHEMA_PRCDNCE_IND,'N' ),
x_federal_financial_aid=>X_FEDERAL_FINANCIAL_AID,
x_unit_quota=>X_UNIT_QUOTA,
x_unit_quota_reserved_places=>X_UNIT_QUOTA_RESERVED_PLACES,
x_institutional_financial_aid=>X_INSTITUTIONAL_FINANCIAL_AID,
x_unit_contact=>X_UNIT_CONTACT,
x_grading_schema_cd=>X_GRADING_SCHEMA_CD,
x_gs_version_number=>X_GS_VERSION_NUMBER,
x_owner_org_unit_cd => x_owner_org_unit_cd,
x_attendance_required_ind => x_attendance_required_ind,
x_reserved_seating_allowed => x_reserved_seating_allowed,
x_special_permission_ind => x_special_permission_ind,
x_ss_display_ind => x_ss_display_ind,
x_creation_date=>X_LAST_UPDATE_DATE,
x_created_by=>X_LAST_UPDATED_BY,
x_last_update_date=>X_LAST_UPDATE_DATE,
x_last_updated_by=>X_LAST_UPDATED_BY,
x_last_update_login=>X_LAST_UPDATE_LOGIN,
x_ss_enrol_ind =>X_SS_ENROL_IND,
x_dir_enrollment =>X_DIR_ENROLLMENT,
x_enr_from_wlst =>X_ENR_FROM_WLST,
x_inq_not_wlst =>X_INQ_NOT_WLST,
x_rev_account_cd => x_rev_account_cd,
x_anon_unit_grading_ind => x_anon_unit_grading_ind,
x_anon_assess_grading_ind => x_anon_assess_grading_ind,
x_non_std_usec_ind => x_non_std_usec_ind,
x_auditable_ind => x_auditable_ind,
x_audit_permission_ind => x_audit_permission_ind,
x_not_multiple_section_flag => x_not_multiple_section_flag,
x_sup_uoo_id => x_sup_uoo_id,
x_relation_type => x_relation_type,
x_default_enroll_flag => x_default_enroll_flag,
x_abort_flag => x_abort_flag
);
X_PROGRAM_UPDATE_DATE :=
OLD_REFERENCES.PROGRAM_UPDATE_DATE;
X_PROGRAM_UPDATE_DATE := SYSDATE;
update IGS_PS_UNIT_OFR_OPT_ALL set
UOO_ID = NEW_REFERENCES.UOO_ID,
IVRS_AVAILABLE_IND = NEW_REFERENCES.IVRS_AVAILABLE_IND,
CALL_NUMBER = NEW_REFERENCES.CALL_NUMBER,
UNIT_SECTION_STATUS = NEW_REFERENCES.UNIT_SECTION_STATUS,
UNIT_SECTION_START_DATE = NEW_REFERENCES.UNIT_SECTION_START_DATE,
UNIT_SECTION_END_DATE = NEW_REFERENCES.UNIT_SECTION_END_DATE,
ENROLLMENT_ACTUAL = NEW_REFERENCES.ENROLLMENT_ACTUAL,
WAITLIST_ACTUAL = NEW_REFERENCES.WAITLIST_ACTUAL,
OFFERED_IND = NEW_REFERENCES.OFFERED_IND,
STATE_FINANCIAL_AID = NEW_REFERENCES.STATE_FINANCIAL_AID,
GRADING_SCHEMA_PRCDNCE_IND = NEW_REFERENCES.GRADING_SCHEMA_PRCDNCE_IND,
FEDERAL_FINANCIAL_AID = NEW_REFERENCES.FEDERAL_FINANCIAL_AID,
UNIT_QUOTA = NEW_REFERENCES.UNIT_QUOTA,
UNIT_QUOTA_RESERVED_PLACES = NEW_REFERENCES.UNIT_QUOTA_RESERVED_PLACES,
INSTITUTIONAL_FINANCIAL_AID = NEW_REFERENCES.INSTITUTIONAL_FINANCIAL_AID,
UNIT_CONTACT = NEW_REFERENCES.UNIT_CONTACT,
GRADING_SCHEMA_CD = NEW_REFERENCES.GRADING_SCHEMA_CD,
GS_VERSION_NUMBER = NEW_REFERENCES.GS_VERSION_NUMBER,
owner_org_unit_cd = new_references.owner_org_unit_cd,
attendance_required_ind = new_references.attendance_required_ind,
reserved_seating_allowed = new_references.reserved_seating_allowed,
special_permission_ind = new_references.special_permission_ind,
ss_display_ind = new_references.ss_display_ind,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,
REQUEST_ID = X_REQUEST_ID,
PROGRAM_ID = X_PROGRAM_ID,
PROGRAM_APPLICATION_ID = X_PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE = X_PROGRAM_UPDATE_DATE,
SS_ENROL_IND = X_SS_ENROL_IND,
DIR_ENROLLMENT = new_references.DIR_ENROLLMENT,
ENR_FROM_WLST = new_references.ENR_FROM_WLST,
INQ_NOT_WLST = new_references.INQ_NOT_WLST,
rev_account_cd = new_references.rev_account_cd ,
anon_unit_grading_ind = new_references.anon_unit_grading_ind ,
anon_assess_grading_ind = new_references.anon_assess_grading_ind,
NON_STD_USEC_IND = new_references.NON_STD_USEC_IND ,
auditable_ind = new_references.auditable_ind,
audit_permission_ind = new_references.audit_permission_ind,
not_multiple_section_flag = new_references.not_multiple_section_flag,
sup_uoo_id = new_references.sup_uoo_id,
relation_type = new_references.relation_type,
default_enroll_flag = new_references.default_enroll_flag,
abort_flag= new_references.abort_flag
where ROWID = X_ROWID;
SELECT auto_enroll_waitlist_flag
FROM IGS_EN_INST_WL_STPS;
p_action => 'UPDATE' ,
x_rowid => X_ROWID );
end UPDATE_ROW;
cursor c1 is select ROWID from IGS_PS_UNIT_OFR_OPT_ALL
where UNIT_CD= X_UNIT_CD
and VERSION_NUMBER = X_VERSION_NUMBER
and CAL_TYPE = X_CAL_TYPE
and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
and LOCATION_CD = X_LOCATION_CD
and UNIT_CLASS = X_UNIT_CLASS
;
INSERT_ROW (
X_ROWID,
X_UNIT_CD,
X_VERSION_NUMBER,
X_CAL_TYPE,
X_CI_SEQUENCE_NUMBER,
X_LOCATION_CD,
X_UNIT_CLASS,
X_UOO_ID,
X_IVRS_AVAILABLE_IND,
X_CALL_NUMBER,
X_UNIT_SECTION_STATUS,
X_UNIT_SECTION_START_DATE,
X_UNIT_SECTION_END_DATE,
X_ENROLLMENT_ACTUAL,
X_WAITLIST_ACTUAL,
X_OFFERED_IND,
X_STATE_FINANCIAL_AID,
X_GRADING_SCHEMA_PRCDNCE_IND,
X_FEDERAL_FINANCIAL_AID,
X_UNIT_QUOTA,
X_UNIT_QUOTA_RESERVED_PLACES,
X_INSTITUTIONAL_FINANCIAL_AID,
X_UNIT_CONTACT,
X_GRADING_SCHEMA_CD,
X_GS_VERSION_NUMBER,
x_owner_org_unit_cd,
x_attendance_required_ind,
x_reserved_seating_allowed,
x_special_permission_ind,
x_ss_display_ind,
X_MODE,
X_ORG_ID,
X_SS_ENROL_IND,
X_DIR_ENROLLMENT,
X_ENR_FROM_WLST,
X_INQ_NOT_WLST,
x_rev_account_cd ,
x_anon_unit_grading_ind,
x_anon_assess_grading_ind,
X_NON_STD_USEC_IND,
x_auditable_ind,
x_audit_permission_ind,
x_not_multiple_section_flag,
x_sup_uoo_id,
x_relation_type,
x_default_enroll_flag,
x_abort_flag
);
UPDATE_ROW (
X_ROWID,
X_UNIT_CD,
X_VERSION_NUMBER,
X_CAL_TYPE,
X_CI_SEQUENCE_NUMBER,
X_LOCATION_CD,
X_UNIT_CLASS,
X_UOO_ID,
X_IVRS_AVAILABLE_IND,
X_CALL_NUMBER,
X_UNIT_SECTION_STATUS,
X_UNIT_SECTION_START_DATE,
X_UNIT_SECTION_END_DATE,
X_ENROLLMENT_ACTUAL,
X_WAITLIST_ACTUAL,
X_OFFERED_IND,
X_STATE_FINANCIAL_AID,
X_GRADING_SCHEMA_PRCDNCE_IND,
X_FEDERAL_FINANCIAL_AID,
X_UNIT_QUOTA,
X_UNIT_QUOTA_RESERVED_PLACES,
X_INSTITUTIONAL_FINANCIAL_AID,
X_UNIT_CONTACT,
X_GRADING_SCHEMA_CD,
X_GS_VERSION_NUMBER,
x_owner_org_unit_cd,
x_attendance_required_ind,
x_reserved_seating_allowed,
x_special_permission_ind,
x_ss_display_ind,
X_MODE,
X_SS_ENROL_IND,
X_DIR_ENROLLMENT,
X_ENR_FROM_WLST,
X_INQ_NOT_WLST,
x_rev_account_cd,
x_anon_unit_grading_ind,
x_anon_assess_grading_ind,
X_NON_STD_USEC_IND,
x_auditable_ind,
x_audit_permission_ind,
x_not_multiple_section_flag,
x_sup_uoo_id,
x_relation_type,
x_default_enroll_flag,
x_abort_flag
);
procedure DELETE_ROW (
X_ROWID in VARCHAR2
) AS
/*************************************************************
Created By : kdande@in
Date Created By : 2000/05/11
Purpose :
Know limitations, enhancements or remarks
Change History
Who When What
(reverse chronological order - newest change first)
***************************************************************/
begin
Before_DML (
p_action => 'DELETE',
x_rowid => X_ROWID
);
delete from IGS_PS_UNIT_OFR_OPT_ALL
where ROWID = X_ROWID
;
p_action => 'DELETE' ,
x_rowid => X_ROWID );
end DELETE_ROW;