[Home] [Help]
1: PACKAGE BODY igs_en_spa_awd_aim_pkg AS
2: /* $Header: IGSEI59B.pls 120.4 2006/06/29 10:41:27 shimitta ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spa_awd_aim%ROWTYPE;
1: PACKAGE BODY igs_en_spa_awd_aim_pkg AS
2: /* $Header: IGSEI59B.pls 120.4 2006/06/29 10:41:27 shimitta ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spa_awd_aim%ROWTYPE;
6: new_references igs_en_spa_awd_aim%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSEI59B.pls 120.4 2006/06/29 10:41:27 shimitta ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spa_awd_aim%ROWTYPE;
6: new_references igs_en_spa_awd_aim%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
36: */
37:
38: CURSOR cur_old_ref_values IS
39: SELECT *
40: FROM igs_en_spa_awd_aim
41: WHERE rowid = x_rowid;
42:
43: BEGIN
44:
121: PROCEDURE del_spaa_hist(p_rowid IN VARCHAR2) AS
122: l_rowid VARCHAR2(25);
123: CURSOR cur_spaah IS
124: SELECT spaah.rowid
125: FROM igs_en_spa_awd_aim spaa,
126: igs_en_spaa_hist spaah
127: WHERE spaa.rowid = p_rowid AND
128: spaa.person_id = spaah.person_id AND
129: spaa.course_cd = spaah.course_cd AND
208:
209:
210: CURSOR cur_conf_dt (p_rowid VARCHAR2) IS
211: SELECT *
212: FROM IGS_EN_SPA_AWD_AIM
213: WHERE ROWID = p_rowid ;
214:
215: cur_conf_dt_rec cur_conf_dt%ROWTYPE;
216: cur_pe_typ_inst_rec cur_pe_typ_inst%ROWTYPE;
685: || (reverse chronological order - newest change first)
686: */
687: CURSOR cur_rowid IS
688: SELECT rowid
689: FROM igs_en_spa_awd_aim
690: WHERE award_cd = x_award_cd
691: AND course_cd = x_course_cd
692: AND person_id = x_person_id
693: FOR UPDATE NOWAIT;
723: || (reverse chronological order - newest change first)
724: */
725: CURSOR cur_rowid IS
726: SELECT rowid
727: FROM igs_en_spa_awd_aim
728: WHERE ((course_cd = x_course_cd) AND
729: (person_id = x_person_id));
730:
731: lv_rowid cur_rowid%RowType;
762: || (reverse chronological order - newest change first)
763: */
764: CURSOR cur_rowid IS
765: SELECT rowid
766: FROM igs_en_spa_awd_aim
767: WHERE (( grading_schema_cd = x_grading_schema_cd) AND
768: (gs_version_number = x_gs_version_number));
769:
770: lv_rowid cur_rowid%RowType;
944: || (reverse chronological order - newest change first)
945: */
946: CURSOR c IS
947: SELECT rowid
948: FROM igs_en_spa_awd_aim
949: WHERE award_cd = x_award_cd
950: AND course_cd = x_course_cd
951: AND person_id = x_person_id;
952:
998:
999: IF (x_mode = 'S') THEN
1000: igs_sc_gen_001.set_ctx('R');
1001: END IF;
1002: INSERT INTO igs_en_spa_awd_aim (
1003: person_id,
1004: course_cd,
1005: award_cd,
1006: start_dt,
1093: start_dt,
1094: end_dt,
1095: complete_ind,
1096: conferral_date
1097: FROM igs_en_spa_awd_aim
1098: WHERE rowid = x_rowid
1099: FOR UPDATE NOWAIT;
1100:
1101: tlinfo c1%ROWTYPE;
1207:
1208: IF (x_mode = 'S') THEN
1209: igs_sc_gen_001.set_ctx('R');
1210: END IF;
1211: UPDATE igs_en_spa_awd_aim
1212: SET
1213: award_cd = new_references.award_cd,
1214: start_dt = new_references.start_dt,
1215: end_dt = new_references.end_dt,
1282: || (reverse chronological order - newest change first)
1283: */
1284: CURSOR c1 IS
1285: SELECT rowid
1286: FROM igs_en_spa_awd_aim
1287: WHERE award_cd = x_award_cd
1288: AND course_cd = x_course_cd
1289: AND person_id = x_person_id;
1290:
1355:
1356: IF (x_mode = 'S') THEN
1357: igs_sc_gen_001.set_ctx('R');
1358: END IF;
1359: DELETE FROM igs_en_spa_awd_aim
1360: WHERE rowid = x_rowid;
1361:
1362: IF (SQL%NOTFOUND) THEN
1363: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');
1372:
1373: END delete_row;
1374:
1375:
1376: END igs_en_spa_awd_aim_pkg;