DBA Data[Home] [Help]

APPS.IGS_PE_IMMU_DTLS_PKG dependencies on IGS_PE_IMMU_DTLS

Line 1: PACKAGE BODY igs_pe_immu_dtls_pkg AS

1: PACKAGE BODY igs_pe_immu_dtls_pkg AS
2: /* $Header: IGSNI90B.pls 120.3 2005/10/17 02:22:16 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_immu_dtls%ROWTYPE;

Line 5: old_references igs_pe_immu_dtls%ROWTYPE;

1: PACKAGE BODY igs_pe_immu_dtls_pkg AS
2: /* $Header: IGSNI90B.pls 120.3 2005/10/17 02:22:16 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_immu_dtls%ROWTYPE;
6: new_references igs_pe_immu_dtls%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,

Line 6: new_references igs_pe_immu_dtls%ROWTYPE;

2: /* $Header: IGSNI90B.pls 120.3 2005/10/17 02:22:16 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_immu_dtls%ROWTYPE;
6: new_references igs_pe_immu_dtls%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2, --DEFAULT NULL,

Line 56: FROM igs_pe_immu_dtls

52: */
53:
54: CURSOR cur_old_ref_values IS
55: SELECT *
56: FROM igs_pe_immu_dtls
57: WHERE rowid = x_rowid;
58:
59: BEGIN
60:

Line 229: FROM igs_pe_immu_dtls

225: || (reverse chronological order - newest change first)
226: */
227: CURSOR cur_rowid IS
228: SELECT rowid
229: FROM igs_pe_immu_dtls
230: WHERE immu_details_id = x_immu_details_id
231: FOR UPDATE NOWAIT;
232:
233: lv_rowid cur_rowid%RowType;

Line 266: FROM igs_pe_immu_dtls

262: || (reverse chronological order - newest change first)
263: */
264: CURSOR cur_rowid IS
265: SELECT rowid
266: FROM igs_pe_immu_dtls
267: WHERE person_id = x_person_id
268: AND immunization_code = x_immunization_code
269: AND start_date = x_start_date
270: AND ((l_rowid IS NULL) OR (rowid <> l_rowid));

Line 303: FROM igs_pe_immu_dtls

299: || (reverse chronological order - newest change first)
300: */
301: CURSOR cur_rowid IS
302: SELECT rowid
303: FROM igs_pe_immu_dtls
304: WHERE ((person_id = x_party_id));
305:
306: lv_rowid cur_rowid%RowType;
307:

Line 488: FROM igs_pe_immu_dtls

484: || (reverse chronological order - newest change first)
485: */
486: CURSOR c IS
487: SELECT rowid
488: FROM igs_pe_immu_dtls
489: WHERE immu_details_id = x_immu_details_id;
490:
491: x_last_update_date DATE;
492: x_last_updated_by NUMBER;

Line 516: SELECT igs_pe_immu_dtls_s.NEXTVAL

512: igs_ge_msg_stack.add;
513: app_exception.raise_exception;
514: END IF;
515:
516: SELECT igs_pe_immu_dtls_s.NEXTVAL
517: INTO x_immu_details_id
518: FROM dual;
519:
520: before_dml(

Line 560: INSERT INTO igs_pe_immu_dtls (

556:
557: IF (x_mode = 'S') THEN
558: igs_sc_gen_001.set_ctx('R');
559: END IF;
560: INSERT INTO igs_pe_immu_dtls (
561: immu_details_id,
562: person_id,
563: immunization_code,
564: status_code,

Line 724: FROM igs_pe_immu_dtls

720: ATTRIBUTE18,
721: ATTRIBUTE19,
722: ATTRIBUTE20
723:
724: FROM igs_pe_immu_dtls
725: WHERE rowid = x_rowid
726: FOR UPDATE NOWAIT;
727:
728: tlinfo c1%ROWTYPE;

Line 929: UPDATE igs_pe_immu_dtls

925:
926: IF (x_mode = 'S') THEN
927: igs_sc_gen_001.set_ctx('R');
928: END IF;
929: UPDATE igs_pe_immu_dtls
930: SET
931: person_id = new_references.person_id,
932: immunization_code = new_references.immunization_code,
933: status_code = new_references.status_code,

Line 1031: FROM igs_pe_immu_dtls

1027: || (reverse chronological order - newest change first)
1028: */
1029: CURSOR c1 IS
1030: SELECT rowid
1031: FROM igs_pe_immu_dtls
1032: WHERE immu_details_id = x_immu_details_id;
1033:
1034: BEGIN
1035:

Line 1134: DELETE FROM igs_pe_immu_dtls

1130:
1131: IF (x_mode = 'S') THEN
1132: igs_sc_gen_001.set_ctx('R');
1133: END IF;
1134: DELETE FROM igs_pe_immu_dtls
1135: WHERE rowid = x_rowid;
1136:
1137: IF (SQL%NOTFOUND) THEN
1138: fnd_message.set_name ('IGS', 'IGS_SC_POLICY_UPD_DEL_EXCEP');

Line 1151: END igs_pe_immu_dtls_pkg;

1147:
1148: END delete_row;
1149:
1150:
1151: END igs_pe_immu_dtls_pkg;