1: PACKAGE BODY igs_en_svs_auth_cal_pkg AS
2: /* $Header: IGSEI82B.pls 120.0 2006/05/02 01:43:28 amuthu noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_svs_auth_cal%ROWTYPE;
1: PACKAGE BODY igs_en_svs_auth_cal_pkg AS
2: /* $Header: IGSEI82B.pls 120.0 2006/05/02 01:43:28 amuthu noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_svs_auth_cal%ROWTYPE;
6: new_references igs_en_svs_auth_cal%ROWTYPE;
7:
8: PROCEDURE afterinsert1(
9: x_sevis_auth_id IN NUMBER,
2: /* $Header: IGSEI82B.pls 120.0 2006/05/02 01:43:28 amuthu noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_svs_auth_cal%ROWTYPE;
6: new_references igs_en_svs_auth_cal%ROWTYPE;
7:
8: PROCEDURE afterinsert1(
9: x_sevis_auth_id IN NUMBER,
10: x_cal_type IN VARCHAR2,
33: */
34:
35: CURSOR cur_old_ref_values IS
36: SELECT *
37: FROM igs_en_svs_auth_cal
38: WHERE rowid = x_rowid;
39:
40: BEGIN
41:
132: || (reverse chronological order - newest change first)
133: */
134: CURSOR cur_rowid IS
135: SELECT rowid
136: FROM igs_en_svs_auth_cal
137: WHERE sevis_auth_id = x_sevis_auth_id
138: AND cal_type = x_cal_type
139: AND ci_sequence_number = x_ci_sequence_number
140: FOR UPDATE NOWAIT;
169: || (reverse chronological order - newest change first)
170: */
171: CURSOR cur_rowid IS
172: SELECT rowid
173: FROM igs_en_svs_auth_cal
174: WHERE ((sevis_auth_id = x_sevis_auth_id));
175:
176: lv_rowid cur_rowid%RowType;
177:
196: x_ci_sequence_number IN NUMBER
197: ) AS
198: CURSOR cur_rowid IS
199: SELECT ROWID
200: FROM igs_en_svs_auth_cal
201: WHERE cal_type = x_cal_type
202: AND ci_sequence_number = x_ci_sequence_number ;
203: lv_rowid cur_rowid%ROWTYPE;
204:
231: AND eeo.ci_sequence_number = x_ci_sequence_number;
232:
233: CURSOR c_another_auth (cp_person_id HZ_PARTIES.PARTY_ID%TYPE) IS
234: SELECT 'X'
235: FROM IGS_EN_SVS_AUTH_CAL sac, IGS_EN_SVS_AUTH esa
236: WHERE esa.SEVIS_AUTH_ID <> x_sevis_auth_id
237: AND esa.person_id = cp_person_id
238: AND esa.sevis_auth_id = sac.sevis_auth_id
239: AND sac.cal_type = x_cal_type
405:
406:
407: CURSOR c_earliest_cal IS
408: SELECT cal_type, ci_sequence_number
409: FROM IGS_EN_SVS_AUTH_CAL
410: WHERE sevis_auth_id = x_sevis_auth_id
411: ORDER BY CREATION_DATE ASC;
412:
413: CURSOR c_person_id IS
556: x_last_update_login := -1;
557: END IF;
558: ELSE
559: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
560: fnd_message.set_token ('ROUTINE', 'IGS_EN_SVS_AUTH_CAL_PKG.INSERT_ROW');
561: igs_ge_msg_stack.add;
562: app_exception.raise_exception;
563: END IF;
564:
574: x_last_updated_by => x_last_updated_by,
575: x_last_update_login => x_last_update_login
576: );
577:
578: INSERT INTO igs_en_svs_auth_cal (
579: sevis_auth_id,
580: cal_type,
581: ci_sequence_number,
582: creation_date,
624: */
625: CURSOR c1 IS
626: SELECT
627: rowid
628: FROM igs_en_svs_auth_cal
629: WHERE rowid = x_rowid
630: FOR UPDATE NOWAIT;
631:
632: tlinfo c1%ROWTYPE;
668: p_action => 'DELETE',
669: x_rowid => x_rowid
670: );
671:
672: DELETE FROM igs_en_svs_auth_cal
673: WHERE rowid = x_rowid;
674:
675: IF (SQL%NOTFOUND) THEN
676: RAISE NO_DATA_FOUND;
684:
685: END delete_row;
686:
687:
688: END igs_en_svs_auth_cal_pkg;