1: PACKAGE BODY igf_ap_appl_setup_pkg AS
2: /* $Header: IGFAI01B.pls 120.1 2005/08/09 07:42:50 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igf_ap_appl_setup_all%ROWTYPE;
6: new_references igf_ap_appl_setup_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
2: /* $Header: IGFAI01B.pls 120.1 2005/08/09 07:42:50 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igf_ap_appl_setup_all%ROWTYPE;
6: new_references igf_ap_appl_setup_all%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2 DEFAULT NULL,
47: */
48:
49: CURSOR cur_old_ref_values IS
50: SELECT *
51: FROM IGF_AP_APPL_SETUP_ALL
52: WHERE rowid = x_rowid;
53:
54: BEGIN
55:
198:
199:
200: CURSOR cur_rowid IS
201: SELECT rowid
202: FROM igf_ap_appl_setup_all
203: WHERE question_id = x_question_id
204: FOR UPDATE NOWAIT;
205:
206: lv_rowid cur_rowid%RowType;
234: || (reverse chronological order - newest change first)
235: */
236: CURSOR cur_rowid IS
237: SELECT rowid
238: FROM igf_ap_appl_setup_all
239: WHERE ((ci_cal_type = x_cal_type) AND
240: (ci_sequence_number = x_sequence_number));
241:
242: lv_rowid cur_rowid%RowType;
275:
276:
277: CURSOR cur_rowid IS
278: SELECT rowid
279: FROM igf_ap_appl_setup_all
280: WHERE ci_cal_type = x_ci_cal_type
281: AND ci_sequence_number = x_ci_sequence_number
282: AND application_code = x_application_code
283: AND question = x_question
452: || (reverse chronological order - newest change first)
453: */
454: CURSOR c IS
455: SELECT rowid
456: FROM igf_ap_appl_setup_all
457: WHERE question_id = x_question_id;
458:
459: x_last_update_date DATE;
460: x_last_updated_by NUMBER;
517: x_hint_txt => x_hint_txt
518: );
519:
520:
521: INSERT INTO igf_ap_appl_setup_all (
522: question_id,
523: question,
524: enabled,
525: org_id,
644: minimum_date,
645: maximium_date,
646: lookup_code,
647: hint_txt
648: FROM igf_ap_appl_setup_all
649: WHERE rowid = x_rowid
650: FOR UPDATE NOWAIT;
651:
652: tlinfo c1%ROWTYPE;
792: x_lookup_code => x_lookup_code,
793: x_hint_txt => x_hint_txt
794: );
795:
796: UPDATE igf_ap_appl_setup_all
797: SET
798: question = new_references.question,
799: enabled = new_references.enabled,
800: ci_cal_type = new_references.ci_cal_type,
863: || (reverse chronological order - newest change first)
864: */
865: CURSOR c1 IS
866: SELECT rowid
867: FROM igf_ap_appl_setup_all
868: WHERE question_id = x_question_id;
869:
870: BEGIN
871:
952: p_action => 'DELETE',
953: x_rowid => x_rowid
954: );
955:
956: DELETE FROM igf_ap_appl_setup_all
957: WHERE rowid = x_rowid;
958:
959: IF (SQL%NOTFOUND) THEN
960: RAISE NO_DATA_FOUND;