[Home] [Help]
1: PACKAGE BODY igs_uc_defaults_pkg AS
2: /* $Header: IGSXI17B.pls 115.15 2003/12/04 11:49:07 rbezawad noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_uc_defaults%ROWTYPE;
1: PACKAGE BODY igs_uc_defaults_pkg AS
2: /* $Header: IGSXI17B.pls 115.15 2003/12/04 11:49:07 rbezawad noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_uc_defaults%ROWTYPE;
6: new_references igs_uc_defaults%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGSXI17B.pls 115.15 2003/12/04 11:49:07 rbezawad noship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_uc_defaults%ROWTYPE;
6: new_references igs_uc_defaults%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,
47: */
48:
49: CURSOR cur_old_ref_values IS
50: SELECT *
51: FROM IGS_UC_DEFAULTS
52: WHERE rowid = x_rowid;
53:
54: BEGIN
55:
203: ) as
204:
205: CURSOR cur_rowid1 IS
206: SELECT rowid
207: FROM IGS_UC_DEFAULTS
208: WHERE obsolete_outcome_status= x_adm_outcome_status ;
209:
210:
211: CURSOR cur_rowid2 IS
209:
210:
211: CURSOR cur_rowid2 IS
212: SELECT rowid
213: FROM IGS_UC_DEFAULTS
214: WHERE pending_outcome_status= x_adm_outcome_status;
215:
216:
217: CURSOR cur_rowid3 IS
215:
216:
217: CURSOR cur_rowid3 IS
218: SELECT rowid
219: FROM IGS_UC_DEFAULTS
220: WHERE rejected_outcome_status= x_adm_outcome_status ;
221:
222: lv_rowid1 cur_rowid1%RowType;
223: lv_rowid2 cur_rowid2%RowType;
268: ) as
269:
270: CURSOR cur_rowid IS
271: SELECT rowid
272: FROM IGS_UC_DEFAULTS
273: WHERE decision_reason_id = x_code_id;
274:
275: lv_rowid cur_rowid%RowType;
276:
295: ) as
296:
297: CURSOR cur_rowid IS
298: SELECT rowid
299: FROM IGS_UC_DEFAULTS
300: WHERE application_type = x_application_type;
301:
302: lv_rowid cur_rowid%RowType;
303:
330: || (reverse chronological order - newest change first)
331: */
332: CURSOR cur_rowid IS
333: SELECT rowid
334: FROM igs_uc_defaults
335: WHERE system_code = x_system_code;
336:
337: lv_rowid cur_rowid%RowType;
338:
487: || (reverse chronological order - newest change first)
488: */
489: CURSOR c IS
490: SELECT rowid
491: FROM igs_uc_defaults
492: ;
493:
494: x_last_update_date DATE;
495: x_last_updated_by NUMBER;
546: x_configured_cycle => x_configured_cycle,
547: x_prev_inst_left_date => x_prev_inst_left_date
548: );
549:
550: INSERT INTO igs_uc_defaults (
551: current_inst_code,
552: ucas_id_format,
553: test_app_no,
554: test_choice_no,
669: ucas_security_key ,
670: current_cycle ,
671: configured_cycle,
672: prev_inst_left_date
673: FROM igs_uc_defaults
674: WHERE rowid = x_rowid
675: FOR UPDATE NOWAIT;
676:
677: tlinfo c1%ROWTYPE;
816: x_configured_cycle => x_configured_cycle,
817: x_prev_inst_left_date => x_prev_inst_left_date
818: );
819:
820: UPDATE igs_uc_defaults
821: SET
822: current_inst_code = new_references.current_inst_code,
823: ucas_id_format = new_references.ucas_id_format,
824: test_app_no = new_references.test_app_no,
887: || (reverse chronological order - newest change first)
888: */
889: CURSOR c1 IS
890: SELECT rowid
891: FROM igs_uc_defaults
892: ;
893:
894: BEGIN
895:
955:
956: END add_row;
957:
958:
959: END igs_uc_defaults_pkg;