[Home] [Help]
1: PACKAGE BODY igs_fi_pp_templates_pkg AS
2: /* $Header: IGSSID8B.pls 115.1 2003/09/08 16:55:31 smvk noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_fi_pp_templates%ROWTYPE;
1: PACKAGE BODY igs_fi_pp_templates_pkg AS
2: /* $Header: IGSSID8B.pls 115.1 2003/09/08 16:55:31 smvk noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_fi_pp_templates%ROWTYPE;
6: new_references igs_fi_pp_templates%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSSID8B.pls 115.1 2003/09/08 16:55:31 smvk noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_fi_pp_templates%ROWTYPE;
6: new_references igs_fi_pp_templates%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
36: */
37:
38: CURSOR cur_old_ref_values IS
39: SELECT *
40: FROM igs_fi_pp_templates
41: WHERE rowid = x_rowid;
42:
43: BEGIN
44:
134: || (reverse chronological order - newest change first)
135: */
136: CURSOR cur_rowid IS
137: SELECT rowid
138: FROM igs_fi_pp_templates
139: WHERE payment_plan_name = x_payment_plan_name;
140:
141: lv_rowid cur_rowid%RowType;
142:
283: x_last_update_login := -1;
284: END IF;
285: ELSE
286: fnd_message.set_name ('FND', 'SYSTEM-INVALID ARGS');
287: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_TEMPLATES_PKG.INSERT_ROW');
288: igs_ge_msg_stack.add;
289: app_exception.raise_exception;
290: END IF;
291:
309: x_last_updated_by => x_last_updated_by,
310: x_last_update_login => x_last_update_login
311: );
312:
313: INSERT INTO igs_fi_pp_templates (
314: payment_plan_name,
315: payment_plan_desc,
316: closed_flag,
317: installment_period_code,
383: processing_fee_type,
384: processing_fee_amt,
385: installment_method_flag,
386: base_amt
387: FROM igs_fi_pp_templates
388: WHERE rowid = x_rowid
389: FOR UPDATE NOWAIT;
390:
391: tlinfo c1%ROWTYPE;
471: x_last_update_login := -1;
472: END IF;
473: ELSE
474: fnd_message.set_name( 'FND', 'SYSTEM-INVALID ARGS');
475: fnd_message.set_token ('ROUTINE', 'IGS_FI_PP_TEMPLATES_PKG.UPDATE_ROW');
476: igs_ge_msg_stack.add;
477: app_exception.raise_exception;
478: END IF;
479:
497: x_last_updated_by => x_last_updated_by,
498: x_last_update_login => x_last_update_login
499: );
500:
501: UPDATE igs_fi_pp_templates
502: SET
503: payment_plan_desc = new_references.payment_plan_desc,
504: closed_flag = new_references.closed_flag,
505: installment_period_code = new_references.installment_period_code,
547: || (reverse chronological order - newest change first)
548: */
549: CURSOR c1 IS
550: SELECT rowid
551: FROM igs_fi_pp_templates
552: WHERE payment_plan_name = x_payment_plan_name;
553:
554: BEGIN
555:
594: );
595:
596: END add_row;
597:
598: END igs_fi_pp_templates_pkg;