1: PACKAGE BODY igs_en_spi_rconds_pkg AS
2: /* $Header: IGSEI81B.pls 120.1 2006/04/16 23:48:24 smaddali noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spi_rconds%ROWTYPE;
1: PACKAGE BODY igs_en_spi_rconds_pkg AS
2: /* $Header: IGSEI81B.pls 120.1 2006/04/16 23:48:24 smaddali noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spi_rconds%ROWTYPE;
6: new_references igs_en_spi_rconds%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSEI81B.pls 120.1 2006/04/16 23:48:24 smaddali noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_en_spi_rconds%ROWTYPE;
6: new_references igs_en_spi_rconds%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
33: */
34:
35: CURSOR cur_old_ref_values IS
36: SELECT *
37: FROM igs_en_spi_rconds
38: WHERE rowid = x_rowid;
39:
40: BEGIN
41:
148: || (reverse chronological order - newest change first)
149: */
150: CURSOR cur_rowid IS
151: SELECT rowid
152: FROM igs_en_spi_rconds
153: WHERE person_id = x_person_id
154: AND course_cd = x_course_cd
155: AND start_dt = x_start_dt
156: AND logical_delete_date = x_logical_delete_date
182: ) AS
183: -- Get the details of
184: CURSOR cur_rowid IS
185: SELECT rowid
186: FROM igs_en_spi_rconds
187: WHERE person_id = x_person_id
188: AND course_cd = x_course_cd
189: AND start_dt = x_start_dt
190: AND logical_delete_date = x_logical_delete_date;
329: x_last_update_login := -1;
330: END IF;
331: ELSE
332: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
333: fnd_message.set_token ('ROUTINE', 'IGS_EN_SPI_RCONDS_PKG.INSERT_ROW');
334: igs_ge_msg_stack.add;
335: app_exception.raise_exception;
336: END IF;
337:
353: x_last_updated_by => x_last_updated_by,
354: x_last_update_login => x_last_update_login
355: );
356:
357: INSERT INTO igs_en_spi_rconds (
358: person_id,
359: course_cd,
360: start_dt,
361: logical_delete_date,
411: SELECT
412: status_code,
413: approved_dt,
414: approved_by
415: FROM igs_en_spi_rconds
416: WHERE rowid = x_rowid
417: FOR UPDATE NOWAIT;
418:
419: tlinfo c1%ROWTYPE;
489: x_last_update_login := -1;
490: END IF;
491: ELSE
492: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
493: fnd_message.set_token ('ROUTINE', 'IGS_EN_SPI_RCONDS_PKG.UPDATE_ROW');
494: igs_ge_msg_stack.add;
495: app_exception.raise_exception;
496: END IF;
497:
512: x_last_updated_by => x_last_updated_by,
513: x_last_update_login => x_last_update_login
514: );
515:
516: UPDATE igs_en_spi_rconds
517: SET
518: logical_delete_date = new_references.logical_delete_date,
519: status_code = new_references.status_code,
520: approved_dt = new_references.approved_dt,
553: || (reverse chronological order - newest change first)
554: */
555: CURSOR c1 IS
556: SELECT rowid
557: FROM igs_en_spi_rconds
558: WHERE person_id = x_person_id
559: AND course_cd = x_course_cd
560: AND start_dt = x_start_dt
561: AND logical_delete_date = x_logical_delete_date
618: p_action => 'DELETE',
619: x_rowid => x_rowid
620: );
621:
622: DELETE FROM igs_en_spi_rconds
623: WHERE rowid = x_rowid;
624:
625: IF (SQL%NOTFOUND) THEN
626: RAISE NO_DATA_FOUND;
628:
629: END delete_row;
630:
631:
632: END igs_en_spi_rconds_pkg;