1: PACKAGE BODY igs_co_ltr_param_pkg AS
2: /* $Header: IGSLI08B.pls 115.7 2002/11/29 01:04:09 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_co_ltr_param%ROWTYPE;
1: PACKAGE BODY igs_co_ltr_param_pkg AS
2: /* $Header: IGSLI08B.pls 115.7 2002/11/29 01:04:09 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_co_ltr_param%ROWTYPE;
6: new_references igs_co_ltr_param%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSLI08B.pls 115.7 2002/11/29 01:04:09 nsidana ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_co_ltr_param%ROWTYPE;
6: new_references igs_co_ltr_param%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_CO_LTR_PARAM
34: WHERE rowid = x_rowid;
35:
36: BEGIN
37:
162:
163: -- Trigger description :-
164: -- "OSS_TST".trg_lp_br_i
165: -- BEFORE INSERT
166: -- ON IGS_CO_LTR_PARAM
167: -- FOR EACH ROW
168:
169: PROCEDURE BeforeRowInsert1(
170: p_inserting IN BOOLEAN DEFAULT FALSE,
226: || (reverse chronological order - newest change first)
227: */
228: BEGIN
229:
230: igs_co_ltr_pr_rpt_gr_pkg.get_fk_igs_co_ltr_param (
231: old_references.letter_order_number,
232: old_references.correspondence_type,
233: old_references.letter_reference_number
234: );
232: old_references.correspondence_type,
233: old_references.letter_reference_number
234: );
235:
236: igs_co_s_per_lt_parm_pkg.get_fk_igs_co_ltr_param (
237: old_references.letter_order_number,
238: old_references.correspondence_type,
239: old_references.letter_reference_number
240: );
257: || (reverse chronological order - newest change first)
258: */
259: CURSOR cur_rowid IS
260: SELECT rowid
261: FROM igs_co_ltr_param
262: WHERE letter_order_number = x_letter_order_number
263: AND correspondence_type = x_correspondence_type
264: AND letter_reference_number = x_letter_reference_number
265: FOR UPDATE NOWAIT;
294: || (reverse chronological order - newest change first)
295: */
296: CURSOR cur_rowid IS
297: SELECT rowid
298: FROM igs_co_ltr_param
299: WHERE ((letter_parameter_type = x_letter_parameter_type));
300:
301: lv_rowid cur_rowid%RowType;
302:
330: || (reverse chronological order - newest change first)
331: */
332: CURSOR cur_rowid IS
333: SELECT rowid
334: FROM igs_co_ltr_param
335: WHERE ((correspondence_type = x_correspondence_type) AND
336: (letter_reference_number = x_letter_reference_number));
337:
338: lv_rowid cur_rowid%RowType;
450: || (reverse chronological order - newest change first)
451: */
452: CURSOR c IS
453: SELECT rowid
454: FROM igs_co_ltr_param
455: WHERE letter_order_number = x_letter_order_number
456: AND correspondence_type = x_correspondence_type
457: AND letter_reference_number = x_letter_reference_number;
458:
494: x_last_updated_by => x_last_updated_by,
495: x_last_update_login => x_last_update_login
496: );
497:
498: INSERT INTO igs_co_ltr_param (
499: correspondence_type,
500: letter_reference_number,
501: letter_parameter_type,
502: letter_order_number,
546: */
547: CURSOR c1 IS
548: SELECT
549: letter_parameter_type
550: FROM igs_co_ltr_param
551: WHERE rowid = x_rowid
552: FOR UPDATE NOWAIT;
553:
554: tlinfo c1%ROWTYPE;
636: x_last_updated_by => x_last_updated_by,
637: x_last_update_login => x_last_update_login
638: );
639:
640: UPDATE igs_co_ltr_param
641: SET
642: letter_parameter_type = new_references.letter_parameter_type,
643: last_update_date = x_last_update_date,
644: last_updated_by = x_last_updated_by,
670: || (reverse chronological order - newest change first)
671: */
672: CURSOR c1 IS
673: SELECT rowid
674: FROM igs_co_ltr_param
675: WHERE letter_order_number = x_letter_order_number
676: AND correspondence_type = x_correspondence_type
677: AND letter_reference_number = x_letter_reference_number;
678:
725: p_action => 'DELETE',
726: x_rowid => x_rowid
727: );
728:
729: DELETE FROM igs_co_ltr_param
730: WHERE rowid = x_rowid;
731:
732: IF (SQL%NOTFOUND) THEN
733: RAISE NO_DATA_FOUND;
735:
736: END delete_row;
737:
738:
739: END igs_co_ltr_param_pkg;