1: PACKAGE BODY igs_as_doc_dlvy_typ_pkg AS
2: /* $Header: IGSDI66B.pls 115.1 2002/11/28 23:27:34 nsidana noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_as_doc_dlvy_typ%ROWTYPE;
1: PACKAGE BODY igs_as_doc_dlvy_typ_pkg AS
2: /* $Header: IGSDI66B.pls 115.1 2002/11/28 23:27:34 nsidana noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_as_doc_dlvy_typ%ROWTYPE;
6: new_references igs_as_doc_dlvy_typ%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSDI66B.pls 115.1 2002/11/28 23:27:34 nsidana noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_as_doc_dlvy_typ%ROWTYPE;
6: new_references igs_as_doc_dlvy_typ%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,
29: */
30:
31: CURSOR cur_old_ref_values IS
32: SELECT *
33: FROM igs_as_doc_dlvy_typ
34: WHERE rowid = x_rowid;
35:
36: BEGIN
37:
82: || (reverse chronological order - newest change first)
83: */
84: BEGIN
85:
86: igs_as_doc_details_pkg.get_fk_igs_as_doc_dlvy_typ (
87: old_references.delivery_method_type
88: );
89:
90: igs_as_doc_dlvy_fee_pkg.get_fk_igs_as_doc_dlvy_typ (
86: igs_as_doc_details_pkg.get_fk_igs_as_doc_dlvy_typ (
87: old_references.delivery_method_type
88: );
89:
90: igs_as_doc_dlvy_fee_pkg.get_fk_igs_as_doc_dlvy_typ (
91: old_references.delivery_method_type
92: );
93:
94: END check_child_existance;
107: || (reverse chronological order - newest change first)
108: */
109: CURSOR cur_rowid IS
110: SELECT rowid
111: FROM igs_as_doc_dlvy_typ
112: WHERE delivery_method_type = x_delivery_method_type
113: FOR UPDATE NOWAIT;
114:
115: lv_rowid cur_rowid%RowType;
216: || (reverse chronological order - newest change first)
217: */
218: CURSOR c IS
219: SELECT rowid
220: FROM igs_as_doc_dlvy_typ
221: WHERE delivery_method_type = x_delivery_method_type;
222:
223: x_last_update_date DATE;
224: x_last_updated_by NUMBER;
258: x_last_updated_by => x_last_updated_by,
259: x_last_update_login => x_last_update_login
260: );
261:
262: INSERT INTO igs_as_doc_dlvy_typ (
263: delivery_method_type,
264: description,
265: s_delivery_method_type,
266: closed_ind,
312: SELECT
313: description,
314: s_delivery_method_type,
315: closed_ind
316: FROM igs_as_doc_dlvy_typ
317: WHERE rowid = x_rowid
318: FOR UPDATE NOWAIT;
319:
320: tlinfo c1%ROWTYPE;
404: x_last_updated_by => x_last_updated_by,
405: x_last_update_login => x_last_update_login
406: );
407:
408: UPDATE igs_as_doc_dlvy_typ
409: SET
410: description = new_references.description,
411: s_delivery_method_type = new_references.s_delivery_method_type,
412: closed_ind = new_references.closed_ind,
440: || (reverse chronological order - newest change first)
441: */
442: CURSOR c1 IS
443: SELECT rowid
444: FROM igs_as_doc_dlvy_typ
445: WHERE delivery_method_type = x_delivery_method_type;
446:
447: BEGIN
448:
493: p_action => 'DELETE',
494: x_rowid => x_rowid
495: );
496:
497: DELETE FROM igs_as_doc_dlvy_typ
498: WHERE rowid = x_rowid;
499:
500: IF (SQL%NOTFOUND) THEN
501: RAISE NO_DATA_FOUND;
503:
504: END delete_row;
505:
506:
507: END igs_as_doc_dlvy_typ_pkg;