1: package body IGS_RE_CANDIDATURE_PKG as
2: /* $Header: IGSRI01B.pls 120.1 2005/07/04 00:40:40 appldev ship $ */
3: -------------------------------------------------------------------------------------------
4: --Change History:
5: --Who When What
6: --smadathi 24-AUG-2001 Bug No. 1956374 .The call to igs_re_val_ca.genp_val_sdtt_sess
7: -- is changed to igs_as_val_suaap.genp_val_sdtt_sess
8: -------------------------------------------------------------------------------------------
9: l_rowid VARCHAR2(25);
10: old_references IGS_RE_CANDIDATURE_ALL%RowType;
11: new_references IGS_RE_CANDIDATURE_ALL%RowType;
12: PROCEDURE Set_Column_Values (
13: p_action IN VARCHAR2,
14: x_rowid IN VARCHAR2,
7: -- is changed to igs_as_val_suaap.genp_val_sdtt_sess
8: -------------------------------------------------------------------------------------------
9: l_rowid VARCHAR2(25);
10: old_references IGS_RE_CANDIDATURE_ALL%RowType;
11: new_references IGS_RE_CANDIDATURE_ALL%RowType;
12: PROCEDURE Set_Column_Values (
13: p_action IN VARCHAR2,
14: x_rowid IN VARCHAR2,
15: x_industry_links IN VARCHAR2 ,
32: x_org_id IN NUMBER
33: ) AS
34: CURSOR cur_old_ref_values IS
35: SELECT *
36: FROM IGS_RE_CANDIDATURE_ALL
37: WHERE rowid = x_rowid;
38: BEGIN
39: l_rowid := x_rowid;
40: -- Code for setting the Old and New Reference Values.
86: -- Log an entry in the IGS_PE_STD_TODO table, indicating that a fee re-assessment
87: -- is required.
88: IF p_updating THEN
89: -- Indicate fee assessment if attendance percentage has changed
90: -- and the IGS_RE_CANDIDATURE is linked to a student IGS_PS_COURSE attempt
91: IF (NVL(old_references.attendance_percentage,-1) <> NVL(new_references.attendance_percentage,-1))
92: AND
93: (new_references.sca_course_cd IS NOT NULL) THEN
94: v_sequence_number := IGS_GE_GEN_003.GENP_INS_STDNT_TODO(
105: p_updating IN BOOLEAN,
106: p_deleting IN BOOLEAN
107: ) AS
108: v_message_name VARCHAR2(30);
109: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
110: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
111: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
112: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
113: BEGIN
106: p_deleting IN BOOLEAN
107: ) AS
108: v_message_name VARCHAR2(30);
109: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
110: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
111: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
112: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
113: BEGIN
114: IF p_inserting OR
107: ) AS
108: v_message_name VARCHAR2(30);
109: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
110: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
111: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
112: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
113: BEGIN
114: IF p_inserting OR
115: p_updating THEN
108: v_message_name VARCHAR2(30);
109: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
110: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
111: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
112: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
113: BEGIN
114: IF p_inserting OR
115: p_updating THEN
116: IF p_inserting THEN
281: p_updating IN BOOLEAN,
282: p_deleting IN BOOLEAN
283: ) AS
284: v_message_name VARCHAR2(30);
285: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
286: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
287: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
288: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
289: BEGIN
282: p_deleting IN BOOLEAN
283: ) AS
284: v_message_name VARCHAR2(30);
285: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
286: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
287: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
288: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
289: BEGIN
290:
283: ) AS
284: v_message_name VARCHAR2(30);
285: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
286: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
287: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
288: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
289: BEGIN
290:
291: IF p_inserting OR
284: v_message_name VARCHAR2(30);
285: v_old_sca_course_cd IGS_RE_CANDIDATURE.sca_course_cd%TYPE;
286: v_old_acai_admission_appl_num IGS_RE_CANDIDATURE.acai_admission_appl_number%TYPE;
287: v_old_acai_nominated_course_cd IGS_RE_CANDIDATURE.acai_nominated_course_cd%TYPE;
288: v_old_acai_sequence_number IGS_RE_CANDIDATURE.acai_sequence_number%TYPE;
289: BEGIN
290:
291: IF p_inserting OR
292: p_updating THEN
387: v_message_name VARCHAR2(30);
388:
389: BEGIN
390: -- If trigger has not been disabled, perform required processing
391: IF igs_as_val_suaap.genp_val_sdtt_sess('IGS_RE_CANDIDATURE_ALL') THEN
392: -- Insert IGS_RE_CANDIDATURE attendance history from row ids saved
393: -- when IGS_RE_CANDIDATURE attendance percentage changed
394:
395: -- Mutation logic pasted
388:
389: BEGIN
390: -- If trigger has not been disabled, perform required processing
391: IF igs_as_val_suaap.genp_val_sdtt_sess('IGS_RE_CANDIDATURE_ALL') THEN
392: -- Insert IGS_RE_CANDIDATURE attendance history from row ids saved
393: -- when IGS_RE_CANDIDATURE attendance percentage changed
394:
395: -- Mutation logic pasted
396: -- Insert IGS_RE_CANDIDATURE attendance history
389: BEGIN
390: -- If trigger has not been disabled, perform required processing
391: IF igs_as_val_suaap.genp_val_sdtt_sess('IGS_RE_CANDIDATURE_ALL') THEN
392: -- Insert IGS_RE_CANDIDATURE attendance history from row ids saved
393: -- when IGS_RE_CANDIDATURE attendance percentage changed
394:
395: -- Mutation logic pasted
396: -- Insert IGS_RE_CANDIDATURE attendance history
397: IF IGS_RE_GEN_002.RESP_INS_CA_CAH(
392: -- Insert IGS_RE_CANDIDATURE attendance history from row ids saved
393: -- when IGS_RE_CANDIDATURE attendance percentage changed
394:
395: -- Mutation logic pasted
396: -- Insert IGS_RE_CANDIDATURE attendance history
397: IF IGS_RE_GEN_002.RESP_INS_CA_CAH(
398: New_References.person_id,
399: New_References.sequence_number,
400: New_References.sca_course_cd,
401: New_References.attendance_percentage,
402: v_message_name) = FALSE THEN
403: Fnd_Message.Set_Name ('IGS', v_message_name);
404: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
405: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR,'igs.plsql.igs_re_candidature_pkg.AfterStmtInsertUpdate5.ERR',FALSE);
406: END IF;
407: IGS_GE_MSG_STACK.ADD;
408: App_Exception.Raise_Exception;
409: END IF;
630: END Check_Parent_Existance;
631:
632: PROCEDURE Check_Child_Existance AS
633: BEGIN
634: IGS_RE_CDT_ATT_HIST_PKG.GET_FK_IGS_RE_CANDIDATURE (
635: old_references.person_id,
636: old_references.sequence_number
637: );
638: IGS_RE_CDT_FLD_OF_SY_PKG.GET_FK_IGS_RE_CANDIDATURE (
634: IGS_RE_CDT_ATT_HIST_PKG.GET_FK_IGS_RE_CANDIDATURE (
635: old_references.person_id,
636: old_references.sequence_number
637: );
638: IGS_RE_CDT_FLD_OF_SY_PKG.GET_FK_IGS_RE_CANDIDATURE (
639: old_references.person_id,
640: old_references.sequence_number
641: );
642: IGS_RE_CAND_SEO_CLS_PKG.GET_FK_IGS_RE_CANDIDATURE (
638: IGS_RE_CDT_FLD_OF_SY_PKG.GET_FK_IGS_RE_CANDIDATURE (
639: old_references.person_id,
640: old_references.sequence_number
641: );
642: IGS_RE_CAND_SEO_CLS_PKG.GET_FK_IGS_RE_CANDIDATURE (
643: old_references.person_id,
644: old_references.sequence_number
645: );
646: IGS_PR_MILESTONE_PKG.GET_FK_IGS_RE_CANDIDATURE (
642: IGS_RE_CAND_SEO_CLS_PKG.GET_FK_IGS_RE_CANDIDATURE (
643: old_references.person_id,
644: old_references.sequence_number
645: );
646: IGS_PR_MILESTONE_PKG.GET_FK_IGS_RE_CANDIDATURE (
647: old_references.person_id,
648: old_references.sequence_number
649: );
650: IGS_RE_SPRVSR_PKG.GET_FK_IGS_RE_CANDIDATURE (
646: IGS_PR_MILESTONE_PKG.GET_FK_IGS_RE_CANDIDATURE (
647: old_references.person_id,
648: old_references.sequence_number
649: );
650: IGS_RE_SPRVSR_PKG.GET_FK_IGS_RE_CANDIDATURE (
651: old_references.person_id,
652: old_references.sequence_number
653: );
654: IGS_RE_SCHOLARSHIP_PKG.GET_FK_IGS_RE_CANDIDATURE (
650: IGS_RE_SPRVSR_PKG.GET_FK_IGS_RE_CANDIDATURE (
651: old_references.person_id,
652: old_references.sequence_number
653: );
654: IGS_RE_SCHOLARSHIP_PKG.GET_FK_IGS_RE_CANDIDATURE (
655: old_references.person_id,
656: old_references.sequence_number
657: );
658: IGS_RE_THESIS_PKG.GET_FK_IGS_RE_CANDIDATURE (
654: IGS_RE_SCHOLARSHIP_PKG.GET_FK_IGS_RE_CANDIDATURE (
655: old_references.person_id,
656: old_references.sequence_number
657: );
658: IGS_RE_THESIS_PKG.GET_FK_IGS_RE_CANDIDATURE (
659: old_references.person_id,
660: old_references.sequence_number
661: );
662: END Check_Child_Existance;
668: RETURN BOOLEAN
669: AS
670: CURSOR cur_rowid IS
671: SELECT rowid
672: FROM IGS_RE_CANDIDATURE_ALL
673: WHERE person_id = x_person_id
674: AND sequence_number = x_sequence_number
675: FOR UPDATE NOWAIT;
676: lv_rowid cur_rowid%RowType;
693: x_sequence_number IN NUMBER
694: ) AS
695: CURSOR cur_rowid IS
696: SELECT rowid
697: FROM IGS_RE_CANDIDATURE_ALL
698: WHERE person_id = x_person_id
699: AND acai_admission_appl_number = x_admission_appl_number
700: AND acai_nominated_course_cd = x_nominated_course_cd
701: AND acai_sequence_number = x_sequence_number ;
717: x_govt_toa_class_cd IN VARCHAR2
718: ) AS
719: CURSOR cur_rowid IS
720: SELECT rowid
721: FROM IGS_RE_CANDIDATURE_ALL
722: WHERE govt_type_of_activity_cd = x_govt_toa_class_cd ;
723: lv_rowid cur_rowid%RowType;
724: BEGIN
725: Open cur_rowid;
737: x_person_id IN NUMBER
738: ) AS
739: CURSOR cur_rowid IS
740: SELECT rowid
741: FROM IGS_RE_CANDIDATURE_ALL
742: WHERE person_id = x_person_id ;
743: lv_rowid cur_rowid%RowType;
744: BEGIN
745: Open cur_rowid;
759: x_course_cd IN VARCHAR2
760: ) AS
761: CURSOR cur_rowid IS
762: SELECT rowid
763: FROM IGS_RE_CANDIDATURE_ALL
764: WHERE person_id = x_person_id
765: AND sca_course_cd = x_course_cd ;
766: lv_rowid cur_rowid%RowType;
767: BEGIN
925: X_INDUSTRY_LINKS in VARCHAR2,
926: X_MODE in VARCHAR2,
927: X_ORG_ID in NUMBER
928: ) as
929: cursor C is select ROWID from IGS_RE_CANDIDATURE_ALL
930: where PERSON_ID = X_PERSON_ID
931: and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER;
932: X_LAST_UPDATE_DATE DATE;
933: X_LAST_UPDATED_BY NUMBER;
990: ) ;
991: IF (x_mode = 'S') THEN
992: igs_sc_gen_001.set_ctx('R');
993: END IF;
994: insert into IGS_RE_CANDIDATURE_ALL (
995: PERSON_ID,
996: SEQUENCE_NUMBER,
997: SCA_COURSE_CD,
998: ACAI_ADMISSION_APPL_NUMBER,
1092: MAX_SUBMISSION_DT,
1093: MIN_SUBMISSION_DT,
1094: RESEARCH_TOPIC,
1095: INDUSTRY_LINKS
1096: from IGS_RE_CANDIDATURE_ALL
1097: where ROWID = X_ROWID
1098: for update nowait;
1099: tlinfo c1%rowtype;
1100: begin
1223: end if;
1224: IF (x_mode = 'S') THEN
1225: igs_sc_gen_001.set_ctx('R');
1226: END IF;
1227: update IGS_RE_CANDIDATURE_ALL set
1228: SCA_COURSE_CD = NEW_REFERENCES.SCA_COURSE_CD,
1229: ACAI_ADMISSION_APPL_NUMBER = NEW_REFERENCES.ACAI_ADMISSION_APPL_NUMBER,
1230: ACAI_NOMINATED_COURSE_CD = NEW_REFERENCES.ACAI_NOMINATED_COURSE_CD,
1231: ACAI_SEQUENCE_NUMBER = NEW_REFERENCES.ACAI_SEQUENCE_NUMBER,
1287: X_INDUSTRY_LINKS in VARCHAR2,
1288: X_MODE in VARCHAR2 ,
1289: X_ORG_ID in NUMBER
1290: ) as
1291: cursor c1 is select rowid from IGS_RE_CANDIDATURE_ALL
1292: where PERSON_ID = X_PERSON_ID
1293: and SEQUENCE_NUMBER = X_SEQUENCE_NUMBER
1294: ;
1295: begin
1343: );
1344: IF (x_mode = 'S') THEN
1345: igs_sc_gen_001.set_ctx('R');
1346: END IF;
1347: delete from IGS_RE_CANDIDATURE_ALL
1348: where ROWID = X_ROWID;
1349: if (sql%notfound) then
1350: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1351: igs_ge_msg_stack.add;
1360: p_action => 'DELETE',
1361: x_rowid => X_ROWID
1362: );
1363: end DELETE_ROW;
1364: end IGS_RE_CANDIDATURE_PKG;