The following lines contain the word 'select', 'insert', 'update' or 'delete':
x_last_update_date IN DATE DEFAULT NULL,
x_last_updated_by IN NUMBER DEFAULT NULL,
x_last_update_login IN NUMBER DEFAULT NULL
) AS
CURSOR cur_old_ref_values IS
SELECT *
FROM IGS_PS_OFR_PAT
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 DEFAULT FALSE,
p_updating IN BOOLEAN DEFAULT FALSE,
p_deleting IN BOOLEAN DEFAULT FALSE
) AS
v_message_name VARCHAR2(30);
IF p_inserting THEN
IGS_PS_GEN_003.CRSP_GET_COO_KEY (
new_references.coo_id,
new_references.course_cd,
new_references.version_number,
new_references.cal_type,
new_references.location_cd,
new_references.attendance_mode,
new_references.attendance_type);
IF p_inserting OR p_updating THEN
v_course_cd := new_references.course_cd;
-- Validate that inserts are allowed
IF p_inserting THEN
-- Validate IGS_PS_COURSE offering option
-- IGS_GE_NOTE:crsp_val_iud_crv_dtl called from this function
IF IGS_PS_VAL_COp.crsp_val_coo_inactiv (
new_references.course_cd,
new_references.version_number,
new_references.cal_type,
new_references.location_cd,
new_references.attendance_mode,
new_references.attendance_type,
v_message_name) = FALSE THEN
Fnd_Message.Set_Name('IGS',v_message_name);
IF p_inserting OR p_updating THEN
-- Validate entry assessment scores.
IF IGS_PS_VAL_COI.crsp_val_ent_ass_scr(
new_references.min_entry_ass_score,
new_references.guaranteed_entry_ass_scr,
v_message_name) = FALSE THEN
Fnd_Message.Set_Name('IGS',v_message_name);
END BeforeRowInsertUpdateDelete1;
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 rowid
FROM IGS_PS_OFR_PAT
WHERE course_cd = x_course_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 attendance_mode = x_attendance_mode
AND attendance_type = x_attendance_type
FOR UPDATE NOWAIT;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE cop_id = x_cop_id
AND (l_rowid IS NULL OR rowid <> l_rowid)
FOR UPDATE NOWAIT;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE course_cd = x_course_cd
AND version_number = x_version_number
AND cal_type = x_cal_type
AND ci_sequence_number = x_ci_sequence_number ;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE course_cd = x_course_cd
AND version_number = x_version_number
AND cal_type = x_cal_type
AND location_cd = x_location_cd
AND attendance_mode = x_attendance_mode
AND attendance_type = x_attendance_type ;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE coo_id = x_coo_id ;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE grading_schema_cd = x_grading_schema_cd
AND gs_version_number = x_version_number ;
SELECT rowid
FROM IGS_PS_OFR_PAT
WHERE (adm_ass_officer_person_id = x_person_id )
OR (adm_contact_person_id = x_person_id );
x_last_update_date IN DATE DEFAULT NULL,
x_last_updated_by IN NUMBER DEFAULT NULL,
x_last_update_login IN NUMBER DEFAULT NULL
) AS
BEGIN
Set_Column_Values (
p_action,
x_rowid,
x_course_cd,
x_version_number,
x_cal_type,
x_ci_sequence_number,
x_location_cd,
x_attendance_mode,
x_attendance_type,
x_cop_id,
x_coo_id,
x_offered_ind,
x_confirmed_offering_ind,
x_entry_point_ind,
x_pre_enrol_units_ind,
x_enrollable_ind,
x_ivrs_available_ind,
x_min_entry_ass_score,
x_guaranteed_entry_ass_scr,
x_max_cross_faculty_cp,
x_max_cross_location_cp,
x_max_cross_mode_cp,
x_max_hist_cross_faculty_cp,
x_adm_ass_officer_person_id,
x_adm_contact_person_id,
x_grading_schema_cd,
x_gs_version_number,
x_creation_date,
x_created_by,
x_last_update_date,
x_last_updated_by,
x_last_update_login
);
IF (p_action = 'INSERT') THEN
-- Call all the procedures related to Before Insert.
BeforeRowInsertUpdateDelete1 ( p_inserting => TRUE );
ELSIF (p_action = 'UPDATE') THEN
-- Call all the procedures related to Before Update.
BeforeRowInsertUpdateDelete1 ( p_updating => TRUE );
ELSIF (p_action = 'DELETE') THEN
-- Call all the procedures related to Before Delete.
BeforeRowInsertUpdateDelete1 ( p_deleting => TRUE );
ELSIF (p_action = 'VALIDATE_INSERT') THEN
IF Get_PK_For_Validation(
new_references.course_cd ,
new_references.version_number ,
new_references.cal_type ,
new_references.ci_sequence_number ,
new_references.location_cd ,
new_references.attendance_mode ,
new_references.attendance_type
) THEN
Fnd_Message.Set_Name ('IGS', 'IGS_GE_RECORD_ALREADY_EXISTS');
ELSIF (p_action = 'VALIDATE_UPDATE') THEN
Check_Uniqueness;
ELSIF (p_action = 'VALIDATE_DELETE') THEN
Check_Child_Existance;
procedure INSERT_ROW (
X_ROWID in out NOCOPY VARCHAR2,
X_COURSE_CD in VARCHAR2,
X_CI_SEQUENCE_NUMBER in NUMBER,
X_CAL_TYPE in VARCHAR2,
X_VERSION_NUMBER in NUMBER,
X_LOCATION_CD in VARCHAR2,
X_ATTENDANCE_TYPE in VARCHAR2,
X_ATTENDANCE_MODE in VARCHAR2,
X_COP_ID in NUMBER,
X_COO_ID in NUMBER,
X_OFFERED_IND in VARCHAR2,
X_CONFIRMED_OFFERING_IND in VARCHAR2,
X_ENTRY_POINT_IND in VARCHAR2,
X_PRE_ENROL_UNITS_IND in VARCHAR2,
X_ENROLLABLE_IND in VARCHAR2,
X_IVRS_AVAILABLE_IND in VARCHAR2,
X_MIN_ENTRY_ASS_SCORE in NUMBER,
X_GUARANTEED_ENTRY_ASS_SCR in NUMBER,
X_MAX_CROSS_FACULTY_CP in NUMBER,
X_MAX_CROSS_LOCATION_CP in NUMBER,
X_MAX_CROSS_MODE_CP in NUMBER,
X_MAX_HIST_CROSS_FACULTY_CP in NUMBER,
X_ADM_ASS_OFFICER_PERSON_ID in NUMBER,
X_ADM_CONTACT_PERSON_ID in NUMBER,
X_GRADING_SCHEMA_CD in VARCHAR2,
X_GS_VERSION_NUMBER in NUMBER,
X_MODE in VARCHAR2 default 'R'
) AS
cursor C is select ROWID from IGS_PS_OFR_PAT
where COURSE_CD = X_COURSE_CD
and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
and CAL_TYPE = X_CAL_TYPE
and VERSION_NUMBER = X_VERSION_NUMBER
and LOCATION_CD = X_LOCATION_CD
and ATTENDANCE_TYPE = X_ATTENDANCE_TYPE
and ATTENDANCE_MODE = X_ATTENDANCE_MODE;
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_course_cd => X_COURSE_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_attendance_mode => X_ATTENDANCE_MODE,
x_attendance_type => X_ATTENDANCE_TYPE,
x_cop_id => X_COP_ID,
x_coo_id => X_COO_ID,
x_offered_ind => NVL(X_OFFERED_IND,'N'),
x_confirmed_offering_ind => NVL(X_CONFIRMED_OFFERING_IND,'Y'),
x_entry_point_ind => NVL(X_ENTRY_POINT_IND,'Y'),
x_pre_enrol_units_ind => NVL(X_PRE_ENROL_UNITS_IND,'Y'),
x_enrollable_ind => NVL(X_ENROLLABLE_IND,'Y'),
x_ivrs_available_ind => NVL(X_IVRS_AVAILABLE_IND,'Y'),
x_min_entry_ass_score => X_MIN_ENTRY_ASS_SCORE ,
x_guaranteed_entry_ass_scr => X_GUARANTEED_ENTRY_ASS_SCR ,
x_max_cross_faculty_cp => X_MAX_CROSS_FACULTY_CP ,
x_max_cross_location_cp => X_MAX_CROSS_LOCATION_CP ,
x_max_cross_mode_cp => X_MAX_CROSS_MODE_CP ,
x_max_hist_cross_faculty_cp => X_MAX_HIST_CROSS_FACULTY_CP ,
x_adm_ass_officer_person_id => X_ADM_ASS_OFFICER_PERSON_ID ,
x_adm_contact_person_id => X_ADM_CONTACT_PERSON_ID ,
x_grading_schema_cd => X_GRADING_SCHEMA_CD ,
x_gs_version_number => X_GS_VERSION_NUMBER ,
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
);
insert into IGS_PS_OFR_PAT (
COURSE_CD,
VERSION_NUMBER,
CAL_TYPE,
CI_SEQUENCE_NUMBER,
LOCATION_CD,
ATTENDANCE_MODE,
ATTENDANCE_TYPE,
COP_ID,
COO_ID,
OFFERED_IND,
CONFIRMED_OFFERING_IND,
ENTRY_POINT_IND,
PRE_ENROL_UNITS_IND,
ENROLLABLE_IND,
IVRS_AVAILABLE_IND,
MIN_ENTRY_ASS_SCORE,
GUARANTEED_ENTRY_ASS_SCR,
MAX_CROSS_FACULTY_CP,
MAX_CROSS_LOCATION_CP,
MAX_CROSS_MODE_CP,
MAX_HIST_CROSS_FACULTY_CP,
ADM_ASS_OFFICER_PERSON_ID,
ADM_CONTACT_PERSON_ID,
GRADING_SCHEMA_CD,
GS_VERSION_NUMBER,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
REQUEST_ID,
PROGRAM_ID,
PROGRAM_APPLICATION_ID,
PROGRAM_UPDATE_DATE
) values (
NEW_REFERENCES.COURSE_CD,
NEW_REFERENCES.VERSION_NUMBER,
NEW_REFERENCES.CAL_TYPE,
NEW_REFERENCES.CI_SEQUENCE_NUMBER,
NEW_REFERENCES.LOCATION_CD,
NEW_REFERENCES.ATTENDANCE_MODE,
NEW_REFERENCES.ATTENDANCE_TYPE,
NEW_REFERENCES.COP_ID,
NEW_REFERENCES.COO_ID,
NEW_REFERENCES.OFFERED_IND,
NEW_REFERENCES.CONFIRMED_OFFERING_IND,
NEW_REFERENCES.ENTRY_POINT_IND,
NEW_REFERENCES.PRE_ENROL_UNITS_IND,
NEW_REFERENCES.ENROLLABLE_IND,
NEW_REFERENCES.IVRS_AVAILABLE_IND,
NEW_REFERENCES.MIN_ENTRY_ASS_SCORE,
NEW_REFERENCES.GUARANTEED_ENTRY_ASS_SCR,
NEW_REFERENCES.MAX_CROSS_FACULTY_CP,
NEW_REFERENCES.MAX_CROSS_LOCATION_CP,
NEW_REFERENCES.MAX_CROSS_MODE_CP,
NEW_REFERENCES.MAX_HIST_CROSS_FACULTY_CP,
NEW_REFERENCES.ADM_ASS_OFFICER_PERSON_ID,
NEW_REFERENCES.ADM_CONTACT_PERSON_ID,
NEW_REFERENCES.GRADING_SCHEMA_CD,
NEW_REFERENCES.GS_VERSION_NUMBER,
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
);
p_action => 'INSERT',
x_rowid => X_ROWID
);
end INSERT_ROW;
cursor c1 is select
COP_ID,
COO_ID,
OFFERED_IND,
CONFIRMED_OFFERING_IND,
ENTRY_POINT_IND,
PRE_ENROL_UNITS_IND,
ENROLLABLE_IND,
IVRS_AVAILABLE_IND,
MIN_ENTRY_ASS_SCORE,
GUARANTEED_ENTRY_ASS_SCR,
MAX_CROSS_FACULTY_CP,
MAX_CROSS_LOCATION_CP,
MAX_CROSS_MODE_CP,
MAX_HIST_CROSS_FACULTY_CP,
ADM_ASS_OFFICER_PERSON_ID,
ADM_CONTACT_PERSON_ID,
GRADING_SCHEMA_CD,
GS_VERSION_NUMBER
from IGS_PS_OFR_PAT
where ROWID = X_ROWID
for update nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
X_ROWID IN VARCHAR2,
X_COURSE_CD in VARCHAR2,
X_CI_SEQUENCE_NUMBER in NUMBER,
X_CAL_TYPE in VARCHAR2,
X_VERSION_NUMBER in NUMBER,
X_LOCATION_CD in VARCHAR2,
X_ATTENDANCE_TYPE in VARCHAR2,
X_ATTENDANCE_MODE in VARCHAR2,
X_COP_ID in NUMBER,
X_COO_ID in NUMBER,
X_OFFERED_IND in VARCHAR2,
X_CONFIRMED_OFFERING_IND in VARCHAR2,
X_ENTRY_POINT_IND in VARCHAR2,
X_PRE_ENROL_UNITS_IND in VARCHAR2,
X_ENROLLABLE_IND in VARCHAR2,
X_IVRS_AVAILABLE_IND in VARCHAR2,
X_MIN_ENTRY_ASS_SCORE in NUMBER,
X_GUARANTEED_ENTRY_ASS_SCR in NUMBER,
X_MAX_CROSS_FACULTY_CP in NUMBER,
X_MAX_CROSS_LOCATION_CP in NUMBER,
X_MAX_CROSS_MODE_CP in NUMBER,
X_MAX_HIST_CROSS_FACULTY_CP in NUMBER,
X_ADM_ASS_OFFICER_PERSON_ID in NUMBER,
X_ADM_CONTACT_PERSON_ID in NUMBER,
X_GRADING_SCHEMA_CD in VARCHAR2,
X_GS_VERSION_NUMBER in NUMBER,
X_MODE in VARCHAR2 default 'R'
) AS
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_course_cd => X_COURSE_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_attendance_mode => X_ATTENDANCE_MODE,
x_attendance_type => X_ATTENDANCE_TYPE,
x_cop_id => X_COP_ID,
x_coo_id => X_COO_ID,
x_offered_ind => X_OFFERED_IND,
x_confirmed_offering_ind => X_CONFIRMED_OFFERING_IND ,
x_entry_point_ind => X_ENTRY_POINT_IND ,
x_pre_enrol_units_ind => X_PRE_ENROL_UNITS_IND ,
x_enrollable_ind => X_ENROLLABLE_IND ,
x_ivrs_available_ind => X_IVRS_AVAILABLE_IND ,
x_min_entry_ass_score => X_MIN_ENTRY_ASS_SCORE ,
x_guaranteed_entry_ass_scr => X_GUARANTEED_ENTRY_ASS_SCR ,
x_max_cross_faculty_cp => X_MAX_CROSS_FACULTY_CP ,
x_max_cross_location_cp => X_MAX_CROSS_LOCATION_CP ,
x_max_cross_mode_cp => X_MAX_CROSS_MODE_CP ,
x_max_hist_cross_faculty_cp => X_MAX_HIST_CROSS_FACULTY_CP ,
x_adm_ass_officer_person_id => X_ADM_ASS_OFFICER_PERSON_ID ,
x_adm_contact_person_id => X_ADM_CONTACT_PERSON_ID ,
x_grading_schema_cd => X_GRADING_SCHEMA_CD ,
x_gs_version_number => X_GS_VERSION_NUMBER ,
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_PROGRAM_UPDATE_DATE := OLD_REFERENCES.PROGRAM_UPDATE_DATE;
X_PROGRAM_UPDATE_DATE := SYSDATE;
update IGS_PS_OFR_PAT set
COP_ID = NEW_REFERENCES.COP_ID,
COO_ID = NEW_REFERENCES.COO_ID,
OFFERED_IND = NEW_REFERENCES.OFFERED_IND,
CONFIRMED_OFFERING_IND = NEW_REFERENCES.CONFIRMED_OFFERING_IND,
ENTRY_POINT_IND = NEW_REFERENCES.ENTRY_POINT_IND,
PRE_ENROL_UNITS_IND = NEW_REFERENCES.PRE_ENROL_UNITS_IND,
ENROLLABLE_IND = NEW_REFERENCES.ENROLLABLE_IND,
IVRS_AVAILABLE_IND = NEW_REFERENCES.IVRS_AVAILABLE_IND,
MIN_ENTRY_ASS_SCORE = NEW_REFERENCES.MIN_ENTRY_ASS_SCORE,
GUARANTEED_ENTRY_ASS_SCR = NEW_REFERENCES.GUARANTEED_ENTRY_ASS_SCR,
MAX_CROSS_FACULTY_CP = NEW_REFERENCES.MAX_CROSS_FACULTY_CP,
MAX_CROSS_LOCATION_CP = NEW_REFERENCES.MAX_CROSS_LOCATION_CP,
MAX_CROSS_MODE_CP = NEW_REFERENCES.MAX_CROSS_MODE_CP,
MAX_HIST_CROSS_FACULTY_CP = NEW_REFERENCES.MAX_HIST_CROSS_FACULTY_CP,
ADM_ASS_OFFICER_PERSON_ID = NEW_REFERENCES.ADM_ASS_OFFICER_PERSON_ID,
ADM_CONTACT_PERSON_ID = NEW_REFERENCES.ADM_CONTACT_PERSON_ID,
GRADING_SCHEMA_CD = NEW_REFERENCES.GRADING_SCHEMA_CD,
GS_VERSION_NUMBER = NEW_REFERENCES.GS_VERSION_NUMBER,
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
where ROWID = X_ROWID
;
p_action => 'UPDATE',
x_rowid => X_ROWID
);
end UPDATE_ROW;
cursor c1 is select rowid from IGS_PS_OFR_PAT
where COURSE_CD = X_COURSE_CD
and CI_SEQUENCE_NUMBER = X_CI_SEQUENCE_NUMBER
and CAL_TYPE = X_CAL_TYPE
and VERSION_NUMBER = X_VERSION_NUMBER
and LOCATION_CD = X_LOCATION_CD
and ATTENDANCE_TYPE = X_ATTENDANCE_TYPE
and ATTENDANCE_MODE = X_ATTENDANCE_MODE
;
INSERT_ROW (
X_ROWID,
X_COURSE_CD,
X_CI_SEQUENCE_NUMBER,
X_CAL_TYPE,
X_VERSION_NUMBER,
X_LOCATION_CD,
X_ATTENDANCE_TYPE,
X_ATTENDANCE_MODE,
X_COP_ID,
X_COO_ID,
X_OFFERED_IND,
X_CONFIRMED_OFFERING_IND,
X_ENTRY_POINT_IND,
X_PRE_ENROL_UNITS_IND,
X_ENROLLABLE_IND,
X_IVRS_AVAILABLE_IND,
X_MIN_ENTRY_ASS_SCORE,
X_GUARANTEED_ENTRY_ASS_SCR,
X_MAX_CROSS_FACULTY_CP,
X_MAX_CROSS_LOCATION_CP,
X_MAX_CROSS_MODE_CP,
X_MAX_HIST_CROSS_FACULTY_CP,
X_ADM_ASS_OFFICER_PERSON_ID,
X_ADM_CONTACT_PERSON_ID,
X_GRADING_SCHEMA_CD,
X_GS_VERSION_NUMBER,
X_MODE);
UPDATE_ROW (
X_ROWID,
X_COURSE_CD,
X_CI_SEQUENCE_NUMBER,
X_CAL_TYPE,
X_VERSION_NUMBER,
X_LOCATION_CD,
X_ATTENDANCE_TYPE,
X_ATTENDANCE_MODE,
X_COP_ID,
X_COO_ID,
X_OFFERED_IND,
X_CONFIRMED_OFFERING_IND,
X_ENTRY_POINT_IND,
X_PRE_ENROL_UNITS_IND,
X_ENROLLABLE_IND,
X_IVRS_AVAILABLE_IND,
X_MIN_ENTRY_ASS_SCORE,
X_GUARANTEED_ENTRY_ASS_SCR,
X_MAX_CROSS_FACULTY_CP,
X_MAX_CROSS_LOCATION_CP,
X_MAX_CROSS_MODE_CP,
X_MAX_HIST_CROSS_FACULTY_CP,
X_ADM_ASS_OFFICER_PERSON_ID,
X_ADM_CONTACT_PERSON_ID,
X_GRADING_SCHEMA_CD,
X_GS_VERSION_NUMBER,
X_MODE);
procedure DELETE_ROW (
X_ROWID in VARCHAR2
) AS
begin
Before_DML (
p_action => 'DELETE',
x_rowid => X_ROWID
);
delete from IGS_PS_OFR_PAT
where ROWID = X_ROWID;
p_action => 'DELETE',
x_rowid => X_ROWID
);
end DELETE_ROW;