DBA Data[Home] [Help]

APPS.IGS_PE_VISIT_HISTRY_PKG dependencies on IGS_PE_VISIT_HISTRY

Line 1: PACKAGE BODY igs_pe_visit_histry_pkg AS

1: PACKAGE BODY igs_pe_visit_histry_pkg AS
2: /* $Header: IGSNI52B.pls 120.2 2005/10/17 02:21:43 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_visit_histry%ROWTYPE;

Line 5: old_references igs_pe_visit_histry%ROWTYPE;

1: PACKAGE BODY igs_pe_visit_histry_pkg AS
2: /* $Header: IGSNI52B.pls 120.2 2005/10/17 02:21:43 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_visit_histry%ROWTYPE;
6: new_references igs_pe_visit_histry%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,

Line 6: new_references igs_pe_visit_histry%ROWTYPE;

2: /* $Header: IGSNI52B.pls 120.2 2005/10/17 02:21:43 appldev ship $ */
3:
4: l_rowid VARCHAR2(25);
5: old_references igs_pe_visit_histry%ROWTYPE;
6: new_references igs_pe_visit_histry%ROWTYPE;
7:
8: PROCEDURE set_column_values (
9: p_action IN VARCHAR2,
10: x_rowid IN VARCHAR2,

Line 56: FROM igs_pe_visit_histry

52: */
53:
54: CURSOR cur_old_ref_values IS
55: SELECT *
56: FROM igs_pe_visit_histry
57: WHERE rowid = x_rowid;
58:
59: BEGIN
60:

Line 224: FROM igs_pe_visit_histry

220: || (reverse chronological order - newest change first)
221: */
222: CURSOR cur_rowid IS
223: SELECT rowid
224: FROM igs_pe_visit_histry
225: WHERE port_of_entry = x_port_of_entry
226: AND cntry_entry_form_num = x_cntry_entry_form_num
227: FOR UPDATE NOWAIT;
228:

Line 260: FROM igs_pe_visit_histry

256: || (reverse chronological order - newest change first)
257: */
258: CURSOR cur_rowid IS
259: SELECT rowid
260: FROM igs_pe_visit_histry
261: WHERE ((visa_id = x_visa_id));
262:
263: lv_rowid cur_rowid%RowType;
264:

Line 417: FROM igs_pe_visit_histry_v a ,igs_pe_visit_histry_v b

413: ----------------------------------------------------------------------------------------------
414:
415: CURSOR c_visit_hist_overlap(cp_person_id igs_pe_visa.person_id%TYPE) IS
416: SELECT count(1)
417: FROM igs_pe_visit_histry_v a ,igs_pe_visit_histry_v b
418: WHERE a.person_id = cp_person_id AND
419: a.person_id = b.person_id AND
420: a.row_id <> b.row_id AND
421: NVL(a.visit_end_date,TO_DATE('4712/12/31','YYYY/MM/DD')) >= b.visit_start_date AND

Line 424: CURSOR person_id_cur(cp_visa_id igs_pe_visit_histry.visa_id%TYPE) IS

420: a.row_id <> b.row_id AND
421: NVL(a.visit_end_date,TO_DATE('4712/12/31','YYYY/MM/DD')) >= b.visit_start_date AND
422: NVL(a.visit_end_date,TO_DATE('4712/12/31','YYYY/MM/DD')) <= NVL(b.visit_end_date,TO_DATE('4712/12/31','YYYY/MM/DD'));
423:
424: CURSOR person_id_cur(cp_visa_id igs_pe_visit_histry.visa_id%TYPE) IS
425: SELECT person_id
426: FROM igs_pe_visa
427: WHERE visa_id = cp_visa_id;
428:

Line 589: INSERT INTO igs_pe_visit_histry (

585: x_last_updated_by => x_last_updated_by,
586: x_last_update_login => x_last_update_login
587: );
588:
589: INSERT INTO igs_pe_visit_histry (
590: port_of_entry,
591: cntry_entry_form_num,
592: visa_id,
593: visit_start_date,

Line 731: FROM igs_pe_visit_histry

727: attribute17,
728: attribute18,
729: attribute19,
730: attribute20
731: FROM igs_pe_visit_histry
732: WHERE rowid = x_rowid
733: FOR UPDATE NOWAIT;
734:
735: tlinfo c1%ROWTYPE;

Line 835: FROM igs_pe_visit_histry

831: x_last_update_login NUMBER;
832:
833: CURSOR cur_rowid IS
834: SELECT rowid
835: FROM igs_pe_visit_histry
836: WHERE port_of_entry = x_port_of_entry
837: AND cntry_entry_form_num = x_cntry_entry_form_num
838: AND rowid <> x_rowid
839: FOR UPDATE NOWAIT;

Line 912: UPDATE igs_pe_visit_histry

908: END IF;
909:
910: CLOSE cur_rowid;
911:
912: UPDATE igs_pe_visit_histry
913: SET
914: cntry_entry_form_num = new_references.cntry_entry_form_num,
915: port_of_entry = new_references.port_of_entry,
916: visa_id = new_references.visa_id,

Line 1000: FROM igs_pe_visit_histry

996: || (reverse chronological order - newest change first)
997: */
998: CURSOR c1 IS
999: SELECT rowid
1000: FROM igs_pe_visit_histry
1001: WHERE port_of_entry = x_port_of_entry
1002: AND cntry_entry_form_num = x_cntry_entry_form_num;
1003:
1004: BEGIN

Line 1100: DELETE FROM igs_pe_visit_histry

1096: p_action => 'DELETE',
1097: x_rowid => x_rowid
1098: );
1099:
1100: DELETE FROM igs_pe_visit_histry
1101: WHERE rowid = x_rowid;
1102:
1103: IF (SQL%NOTFOUND) THEN
1104: RAISE NO_DATA_FOUND;

Line 1110: END igs_pe_visit_histry_pkg;

1106:
1107: END delete_row;
1108:
1109:
1110: END igs_pe_visit_histry_pkg;