The following lines contain the word 'select', 'insert', 'update' or 'delete':
FND_MSG_PUB.DELETE_MSG (p_msg_index => l_msg_count);
FND_MSG_PUB.DELETE_MSG (p_msg_index => l_msg_count);
FND_MSG_PUB.DELETE_MSG (p_msg_index => l_msg_count);
FND_MSG_PUB.DELETE_MSG (p_msg_index => l_msg_count);
FND_MSG_PUB.DELETE_MSG (p_msg_index => l_msg_count);
|| check before insertion of a Thesis Details record.
|| Known limitations, enhancements or remarks :
|| Change History :
|| Who When What
|| (reverse chronological order - newest change first)
*/
l_ret_status VARCHAR2(1) := 'S';
|| inserting a Thesis Details Record
|| Known limitations, enhancements or remarks :
|| Change History :
|| Who When What
|| (reverse chronological order - newest change first)
*/
l_thesis_status VARCHAR2(15) := NULL;
|| check before insertion of a Thesis exam record.
|| Known limitations, enhancements or remarks :
|| Change History :
|| Who When What
|| (reverse chronological order - newest change first)
*/
l_ret_status VARCHAR2(1) := 'S';
|| inserting a Thesis Exam Record
|| Known limitations, enhancements or remarks :
|| Change History :
|| Who When What
|| (reverse chronological order - newest change first)
|| Nishikant 30DEC2002 Bug#2722106. A new validation has been put to check for the fields
|| thesis_exam_type, thesis_panel_type, submission_dt.
*/
l_thesis_status VARCHAR2(15) := NULL;
|| Purpose : This procedure inserts records into the Thesis Details table and
|| Thesis Exam table after checking all the validations.
|| Known limitations, enhancements or remarks :
|| Change History :
|| Who When What
|| (reverse chronological order - newest change first)
|| Nishikant 27DEC2002 Bug#2722106. If any of the fields thesis_exam_type, thesis_panel_type
|| submission_dt, thesis_result_cd having NOT NULL value then proceed to insert the
|| EXAM Record after all the bussiness validations are done successfully.
|| Otherwise Insert only the Thesis Details Record, skip the Thesis Exam record.
*/
CURSOR c_the_seq_num IS
SELECT IGS_RE_THESIS_SEQ_NUM_S.NEXTVAL
FROM DUAL;
l_last_update_date igs_re_thesis_all.creation_date%TYPE;
l_last_updated_by igs_re_thesis_all.last_updated_by%TYPE;
l_last_update_login igs_re_thesis_all.last_update_login%TYPE;
/****** Insert data into Thesis Details and Thesis Exam table ******/
IF l_the_exam_status <> 'INVALID' THEN --1st level IF clause starts here
--Deriving values for the WHO Columns
l_last_update_date := SYSDATE;
l_last_updated_by := FND_GLOBAL.USER_ID;
IF l_last_updated_by IS NULL THEN
l_last_updated_by := -1;
l_last_update_login := FND_GLOBAL.LOGIN_ID;
IF l_last_update_login IS NULL THEN
l_last_update_login := -1;
INSERT INTO igs_re_thesis_all (
PERSON_ID,
CA_SEQUENCE_NUMBER,
SEQUENCE_NUMBER,
TITLE,
FINAL_TITLE_IND,
SHORT_TITLE,
ABBREVIATED_TITLE,
THESIS_RESULT_CD,
EXPECTED_SUBMISSION_DT,
LIBRARY_LODGEMENT_DT,
LIBRARY_CATALOGUE_NUMBER,
EMBARGO_EXPIRY_DT,
THESIS_FORMAT,
LOGICAL_DELETE_DT,
EMBARGO_DETAILS,
THESIS_TOPIC,
CITATION,
COMMENTS,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN,
ORG_ID )
VALUES (
l_person_id,
l_ca_sequence_number,
l_the_seq_num,
p_the_dtls_rec.title,
NVL(p_the_dtls_rec.final_title_ind,'N'),
p_the_dtls_rec.short_title,
p_the_dtls_rec.abbreviated_title,
p_the_dtls_rec.final_thesis_result_cd,
p_the_dtls_rec.expected_submission_dt,
p_the_dtls_rec.library_lodgement_dt,
p_the_dtls_rec.library_catalogue_number,
p_the_dtls_rec.embargo_expiry_dt,
p_the_dtls_rec.thesis_format,
NULL,
p_the_dtls_rec.embargo_details,
p_the_dtls_rec.thesis_topic,
p_the_dtls_rec.citation,
p_the_dtls_rec.comments,
l_last_update_date,
l_last_updated_by,
l_last_update_date,
l_last_updated_by,
l_last_update_login,
igs_ge_gen_003.get_org_id);
INSERT INTO igs_re_thesis_exam (
PERSON_ID,
CA_SEQUENCE_NUMBER,
THE_SEQUENCE_NUMBER,
CREATION_DT,
SUBMISSION_DT,
THESIS_EXAM_TYPE,
THESIS_PANEL_TYPE,
TRACKING_ID,
THESIS_RESULT_CD,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
LAST_UPDATE_LOGIN )
VALUES (
l_person_id,
l_ca_sequence_number,
l_the_seq_num,
l_creation_dt,
p_the_dtls_rec.submission_dt,
p_the_dtls_rec.thesis_exam_type,
p_the_dtls_rec.thesis_panel_type,
NULL, --tracking_id
p_the_dtls_rec.thesis_result_cd,
l_last_update_date,
l_last_updated_by,
l_last_update_date,
l_last_updated_by,
l_last_update_login);